$
$   modified 4-1-94
$
$ file mic1.dat (modified pchdisp1.dat) - create DMIG of the solution
$  using SOL 101
$
$ ID SE, SAMPLE PROBLEM SOL 101
ID SE, MIC1
$
SOL 101 $ SUPERELEMENT STATICS - SINGLE LEVEL TREE
TIME 15
$
$ modified pchdispa.v2001 - to create mic
compile sedrcvr, souin=mscsou, noref
$  alter 48 $ v682
$  alter 44 $ v67,v675
$  alter 40 $ v66b
  alter 'sdr2.*qg.*ug'(1,-1)  $  .v2001
  matgen eqexins/intext/9/0/lusets $
  mpyad intext,ug,/mic/1 $
tabpt ug,mic// $
  matmod mic,eqexins,,,,/mat1,/16/1 $
$
CEND
TITLE = Static sample                                          MIC1
SUBTITLE = create DMIG of static solution - 1 loading
$
$ request calculation of desired displacements
$
DISP = ALL
$
SUBCASE 101
LABEL = PRESSURE LOAD
LOAD = 101
$
$SUBCASE 201
$LABEL = 2# NORMAL LOADS
$LOAD = 201
$
$SUBCASE 301
$LABEL = OPPOSING LOADS
$LOAD = 301
$
$SUBCASE 401
$LABEL = MIXTURE OF LOADS
$LOAD = 401
$
BEGIN BULK
$
GRDSET,,,,,,,6
GRID,1,,-.4,0.,0.,,123456
GRID,3,,-.4,0.9,0.
=,*2,=,=,*.9,==
=1
GRID,2,,.4,0.,0.,,123456
GRID,4,,.4,0.9,0.
=,*2,=,=,*.9,==
=1
GRID,9,,-3.6,3.6,0.
=,*1,=,*.8,==
=8
GRID,19,,-3.6,4.4,0.
=,*1,=,*.8,==
=8
GRID,29,,-3.6,5.2,0.
GRID,30,,-2.8,5.2,0.
GRID,31,,2.8,5.2,0.
GRID,32,,3.6,5.2,0.
GRID,33,,-5.2,6.,0.
=,*1,=,*.8,==
=4
GRID,39,,1.2,6.,0.
=,*1,=,*.8,==
=4
GRID,45,,-5.2,6.8,0.
=,*1,=,*.8,==
=4
GRID,51,,1.2,6.8,0.
=,*1,=,*.8,==
=4
GRID,57,,-5.2,7.6,0.
=,*1,=,*.8,==
=4
GRID,63,,1.2,7.6,0.
=,*1,=,*.8,==
=4
GRID,69,,-5.2,8.4,0.
=,*1,=,*.8,==
=4
GRID,75,,1.2,8.4,0.
=,*1,=,*.8,==
=4
GRID,81,,-5.2,9.2,0.
=,*1,=,*.8,==
=4
GRID,87,,1.2,9.2,0.
=,*1,=,*.8,==
=4
GRID,93,,-5.2,10.,0.
=,*1,=,*.8,==
=4
GRID,99,,1.2,10.,0.
=,*1,=,*.8,==
=4
$
$  ELEMENTS
$
CQUAD4,1,1,1,2,4,3
=,*1,=,*2,*2,*2,*2
=1
CQUAD4,4,1,7,8,14,13
CQUAD4,6,1,9,10,20,19
=,*1,=,*1,*1,*1,*1
=2
CQUAD4,5,1,13,14,24,23
CQUAD4,10,1,14,15,25,24
= *1,=,*1,*1,*1,*1
=2
CQUAD4,14,1,19,20,30,29
CQUAD4,15,1,29,30,36,35
CQUAD4,16,1,27,28,32,31
CQUAD4,17,1,31,32,42,41
CQUAD4,18,1,33,34,46,45
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,23,1,45,46,58,57
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,28,1,57,58,70,69
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,33,1,69,70,82,81
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,38,1,81,82,94,93
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,43,1,39,40,52,51
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,48,1,51,52,64,63
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,53,1,63,64,76,75
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,58,1,75,76,88,87
=,*1,=,*1,*1,*1,*1
=3
CQUAD4,63,1,87,88,100,99
=,*1,=,*1,*1,*1,*1
=3
MAT1,1,30.+6,,.3,.283
PARAM,WTMASS,.00259
PARAM,AUTOSPC,YES
PSHELL,1,1,.05,1,,1
$
$ LOADINGS - FOR RUN SHOWING CONVENTIONAL CASE CONTROL
$
$ LOAD CASE 1 - PRESSURE LOAD
$
PLOAD2,101,-1.,18,THRU,42
PLOAD2,101,-1.,43,THRU,67
$
$ LOAD CASE 2 - 2 POINT LOADS AT CORNERS
$
FORCE,201,93,,2.,0.,0.,1.
FORCE,201,104,,2.,0.,0.,1.
$
$ LOAD CASE 3 - OPPOSING POINT LOADS AT CORNERS
$
FORCE,301,93,,2.,0.,0.,1.
FORCE,301,104,,2.,0.,0.,-1.
$
$ LOAD CASE 4 - "randomly" distributed forces
$
FORCE,401,14,,1.,0.,10.,1.
FORCE,401,93,,1.,0.,-10.,1.
FORCE,401,84,,1.,1.,-1.,-1.
FORCE,401,104,,1.,1.,-1.,-1.
FORCE,401,24,,1.,1.,1.,1.
FORCE,401,34,,1.,-1.,1.,1.
FORCE,401,54,,1.,0.,10.,1.
ENDDATA