FINI/CLEA/PREP7 ET,1,BEAM188ET,2,SHELL63R,1,0.35, , , , , , RMORE, , , ,RMORE RMORE, ,R,2,0.25,0,0,0,0,0, RMORE,0,0,0,RMORE RMORE,0,SECTYPE, 1, BEAM, CSOLID, 1, 0SECOFFSET, CENT SECDATA,0.02,0,0,0,0,0,0,0,0,0 SECTYPE, 2, BEAM, CSOLID, 2, 0SECOFFSET, CENT SECDATA,0.1,0,0,0,0,0,0,0,0,0 SECTYPE, 3, BEAM, RECT,3, 0 SECOFFSET, CENT SECDATA,0.05,0.03,0,0,0,0,0,0,0,0 SECTYPE, 4, BEAM, CSOLID, 4, 0SECOFFSET, CENT SECDATA,0.15,0,0,0,0,0,0,0,0,0 MPTEMP,1,0 MPDATA,DENS,1,,7800 MPDATA,EX,1,,3.0e11 MPDATA,PRXY,1,,0.3
/PREP7 K, ,,,, K, ,1.2,,, K, ,5.2,,,FLST,3,1,3,ORDE,1 FITEM,3,3 KGEN,8,P51X, , ,5.18, , , ,0K, ,45.46,,,K, ,46.66,,,FINISH /PREP7 FLST,3,8,3,ORDE,2 FITEM,3,3 FITEM,3,-10 KGEN,2,P51X, , , ,4, , ,0 K, ,10.38,5.55,,K, ,15.56,6.55,,K, ,20.74,7.24,,K, ,25.92,7.24,,K, ,31.1,6.55,, K, ,36.28,5.55,,
*do,i,13,19l,i,i+1*enddo*do,i,21,25l,i,i+1*enddo*do,i,3,10l,i,i+10*enddo*do,i,14,19l,i,i+7*enddoLSTR, 2, 13 LSTR, 13, 21 LSTR, 26, 20 LSTR, 20, 11
FLST,3,26,3,ORDE,2 FITEM,3,1 FITEM,3,-26 KGEN,2,P51X, , , , ,4.6,40,0GPLOTFLST,3,30,4,ORDE,2 FITEM,3,1 FITEM,3,-30 LGEN,2,P51X, , , , ,4.6,40,0
*do,i,13,26lstr,i,i+40*enddo*do,i,13,19lstr,i,i+41*enddo*do,i,14,20lstr,i,i+39*enddo
FLST,3,12,3,ORDE,2 FITEM,3,41 FITEM,3,-52 KGEN,2,P51X, , , , ,1.45,100,0 GPLOT FLST,3,12,3,ORDE,2 FITEM,3,1 FITEM,3,-12 KGEN,2,P51X, , , , ,-1.45,100,0
FINISH /PREP7 FLST,3,24,3,ORDE,4 FITEM,3,101,-112,141,-152 KGEN,2,P51X, , , ,1.2, ,100,0
*do,i,103,110lstr,i,i+100*enddo*do,i,143,150lstr,i,i+100*enddoLSTR, 101, 201 LSTR, 141, 241LSTR, 112, 212 LSTR, 152, 252
FLST,3,18,4,ORDE,2 FITEM,3,89 FITEM,3,-106LGEN,25,P51X, , ,0.215833, , ,200,0 GPLOT
FINISH /PREP7 FLST,3,12,3,ORDE,2 FITEM,3,41 FITEM,3,-52 KGEN,2,P51X, , , , ,-0.3,10000,0 FLST,3,12,3,ORDE,2 FITEM,3,1 FITEM,3,-12 KGEN,2,P51X, , , , ,0.3,10000,0
*do,i,1,11a,i,i+1,i+10001,i+10000*enddo*do,i,41,51a,i,i+1,i+10001,i+10000*enddo
*do,i,1,24lstr,241+200*(i-1),241+200*i*enddo*do,i,1,24lstr,201+200*(i-1),201+200*i*enddo*do,i,1,24lstr,243+200*(i-1),243+200*i*enddo*do,i,1,24lstr,203+200*(i-1),203+200*i*enddo*do,i,1,24lstr,244+200*(i-1),244+200*i*enddo*do,i,1,24lstr,204+200*(i-1),204+200*i*enddo*do,i,1,24lstr,245+200*(i-1),245+200*i*enddo*do,i,1,24lstr,205+200*(i-1),205+200*i*enddo*do,i,1,24lstr,246+200*(i-1),246+200*i*enddo*do,i,1,24lstr,206+200*(i-1),206+200*i*enddo*do,i,1,24lstr,247+200*(i-1),247+200*i*enddo*do,i,1,24lstr,207+200*(i-1),207+200*i*enddo*do,i,1,24lstr,248+200*(i-1),248+200*i*enddo*do,i,1,24lstr,208+200*(i-1),208+200*i*enddo*do,i,1,24lstr,249+200*(i-1),249+200*i*enddo*do,i,1,24lstr,209+200*(i-1),209+200*i*enddo*do,i,1,24lstr,250+200*(i-1),250+200*i*enddo*do,i,1,24lstr,210+200*(i-1),210+200*i*enddo
FINISH /PREP7 NUMCMP,KP NUMMRG,KP, , , ,LOW
*do,i,1,11a,i,i+1,i+53,i+52*enddo*do,i,27,37a,i,i+1,i+39,i+38*enddo
*do,i,53,63a,i,i+1,i+13,i+12*enddo
FLST,3,10,3,ORDE,4 FITEM,3,3 FITEM,3,-7 FITEM,3,29 FITEM,3,-33 KGEN,2,P51X, , ,4, , ,10000,0 FLST,3,10,3,ORDE,4 FITEM,3,6 FITEM,3,-10 FITEM,3,32 FITEM,3,-36 KGEN,2,P51X, , ,-4, , ,20000,0 *do,i,13,17lstr,i,i+9990*enddo*do,i,39,43lstr,i,i+9990*enddo*do,i,16,20lstr,i,i+19990*enddo*do,i,42,46lstr,i,i+19990*enddoNUMMRG,KP, , , ,LOW LSTR, 956, 91 LSTR, 79, 947 LSTR, 100, 964 LSTR, 955, 88


FLST,5,44,5,ORDE,2 FITEM,5,1 FITEM,5,-44 CM,_Y,AREA ASEL, , , ,P51X CM,_Y1,AREA CMSEL,S,_Y
CMSEL,S,_Y1 AATT, 1, 1, 2, 0, 1 CMSEL,S,_Y CMDELE,_Y CMDELE,_Y1 FLST,5,11,5,ORDE,2 FITEM,5,45 FITEM,5,-55 CM,_Y,AREA ASEL, , , ,P51X CM,_Y1,AREA CMSEL,S,_Y CMSEL,S,_Y1 AATT, 1, 2, 2, 0, 1 CMSEL,S,_Y CMDELE,_Y CMDELE,_Y1 MSHAPE,0,2D MSHKEY,0 FLST,5,55,5,ORDE,2 FITEM,5,1 FITEM,5,-55 CM,_Y,AREA ASEL, , , ,P51X CM,_Y1,AREA CHKMSH,'AREA' CMSEL,S,_Y AMESH,_Y1 CMDELE,_Y CMDELE,_Y1 CMDELE,_Y2 !* LPLOT
FLST,5,20,4,ORDE,8 FITEM,5,13,-20,27,30,43,-50,57,60 CM,_Y,LINE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,S,_Y CMSEL,S,_Y1 LATT,1,1,1, , , ,4 CMSEL,S,_Y CMDELE,_Y CMDELE,_Y1
FLST,5,431,4,ORDE,4 FITEM,5,609,-911,913,-1040 CM,_Y,LINE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,S,_Y !* !* CMSEL,S,_Y1 LATT,1,1,1, , , ,3 CMSEL,S,_Y CMDELE,_Y CMDELE,_Y1
FLST,5,439,4,ORDE,14FITEM,5,19,90,-106,108,-353,355,-522,530,538,-539,580,627,708,913CM,_Y,LINE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,S,_Y !* !* CMSEL,S,_Y1 LATT,1,1,1, , , ,1 CMSEL,S,_Y CMDELE,_Y CMDELE,_Y1
FLST,5,110,4,ORDE,6 FITEM,5,1,-88,1085,-1104,1107,-1108 CM,_Y,LINE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,S,_Y CMSEL,S,_Y1 LATT,1,1,1, , , ,2 CMSEL,S,_Y CMDELE,_Y CMDELE,_Y1
FLST,5,4,4,ORDE,2 FITEM,5,1105,-1108 CM,_Y,LINE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,S,_Y CMSEL,S,_Y1 LATT,1,1,1, , , ,3 CMSEL,S,_Y CMDELE,_Y CMDELE,_Y1 /VIEW,1,1,2,3 /ANG,1 /REP,FAST GPLOTFINISH /SOLFINISH /PREP7 FLST,5,55,5,ORDE,2 FITEM,5,1 FITEM,5,-55 CM,_Y,AREA ASEL, , , ,P51X CM,_Y1,AREA CHKMSH,'AREA' CMSEL,S,_Y !* !* ACLEAR,_Y1 AMESH,_Y1 !* CMDELE,_Y CMDELE,_Y1 CMDELE,_Y2 FLST,2,1108,4,ORDE,2FITEM,2,1 FITEM,2,-1108 LMESH,P51X FINISH /SOL!* ANTYPE,0
FLST,2,2,4,ORDE,2 FITEM,2,1074FITEM,2,1084!* /GO DL,P51X, ,ALL, ACEL,0,9.8,0, FLST,2,4,5,ORDE,4 FITEM,2,3 FITEM,2,48 FITEM,2,-49 FITEM,2,51 /GO !* SFA,P51X,1,PRES,300000
SOLVE FINISH /POST1 SET,FIRST !* /EFACET,1 PLNSOL, U,SUM, 0,1.0!* /EFACET,1 PLNSOL, S,EQV, 0,1.0
ANTYPE,2!* MSAVE,0 !* MODOPT,LANB,6 EQSLV,SPAR MXPAND,6, , ,0 LUMPM,0 PSTRES,0!* MODOPT,LANB,6,0,0, ,OFF /STATUS,SOLUSOLVE FINISH
SET,FIRSTPLNSOL,S,EQV,0,1.0PLNSOL,U,SUM,0,1.0SET,NEXTPLNSOL,S,EQV,0,1.0PLNSOL,U,SUM,0,1.0SET,NEXTPLNSOL,S,EQV,0,1.0PLNSOL,U,SUM,0,1.0SET,NEXTPLNSOL,S,EQV,0,1.0PLNSOL,U,SUM,0,1.0SET,NEXTPLNSOL,S,EQV,0,1.0PLNSOL,U,SUM,0,1.0SET,LASTPLNSOL,S,EQV,0,1.0PLNSOL,U,SUM,0,1.0FINISH

FINI
/CLEA
/PREP7
ET,1,BEAM188
ET,2,SHELL63
R,1,0.35, , , , , ,
RMORE, , , ,
RMORE
RMORE, ,
R,2,0.25,0,0,0,0,0,
RMORE,0,0,0,
RMORE
RMORE,0,
SECTYPE, 1, BEAM, CSOLID, 1, 0
SECOFFSET, CENT
SECDATA,0.02,0,0,0,0,0,0,0,0,0
SECTYPE, 2, BEAM, CSOLID, 2, 0
SECOFFSET, CENT
SECDATA,0.1,0,0,0,0,0,0,0,0,0
SECTYPE, 3, BEAM, RECT,3, 0
SECOFFSET, CENT
SECDATA,0.05,0.03,0,0,0,0,0,0,0,0
SECTYPE, 4, BEAM, CSOLID, 4, 0
SECOFFSET, CENT
SECDATA,0.15,0,0,0,0,0,0,0,0,0
MPTEMP,1,0
MPDATA,DENS,1,,7800
MPDATA,EX,1,,3.0e11
MPDATA,PRXY,1,,0.3
/PREP7
K, ,,,,
K, ,1.2,,,
K, ,5.2,,,
FLST,3,1,3,ORDE,1
FITEM,3,3
KGEN,8,P51X, , ,5.18, , , ,0
K, ,45.46,,,
K, ,46.66,,,
FINISH
/PREP7
FLST,3,8,3,ORDE,2
FITEM,3,3
FITEM,3,-10
KGEN,2,P51X, , , ,4, , ,0
K, ,10.38,5.55,,
K, ,15.56,6.55,,
K, ,20.74,7.24,,
K, ,25.92,7.24,,
K, ,31.1,6.55,,
K, ,36.28,5.55,,
*do,i,13,19
l,i,i+1
*enddo
*do,i,21,25
l,i,i+1
*enddo
*do,i,3,10
l,i,i+10
*enddo
*do,i,14,19
l,i,i+7
*enddo
LSTR, 2, 13
LSTR, 13, 21
LSTR, 26, 20
LSTR, 20, 11
FLST,3,26,3,ORDE,2
FITEM,3,1
FITEM,3,-26
KGEN,2,P51X, , , , ,4.6,40,0
GPLOT
FLST,3,30,4,ORDE,2
FITEM,3,1
FITEM,3,-30
LGEN,2,P51X, , , , ,4.6,40,0
*do,i,13,26
lstr,i,i+40
*enddo
*do,i,13,19
lstr,i,i+41
*enddo
*do,i,14,20
lstr,i,i+39
*enddo
FLST,3,12,3,ORDE,2
FITEM,3,41
FITEM,3,-52
KGEN,2,P51X, , , , ,1.45,100,0
GPLOT
FLST,3,12,3,ORDE,2
FITEM,3,1
FITEM,3,-12
KGEN,2,P51X, , , , ,-1.45,100,0
FINISH
/PREP7
FLST,3,24,3,ORDE,4
FITEM,3,101,-112,141,-152
KGEN,2,P51X, , , ,1.2, ,100,0
*do,i,103,110
lstr,i,i+100
*enddo
*do,i,143,150
lstr,i,i+100
*enddo
LSTR, 101, 201
LSTR, 141, 241
LSTR, 112, 212
LSTR, 152, 252
FLST,3,18,4,ORDE,2
FITEM,3,89
FITEM,3,-106
LGEN,25,P51X, , ,0.215833, , ,200,0
GPLOT
FINISH
/PREP7
FLST,3,12,3,ORDE,2
FITEM,3,41
FITEM,3,-52
KGEN,2,P51X, , , , ,-0.3,10000,0
FLST,3,12,3,ORDE,2
FITEM,3,1
FITEM,3,-12
KGEN,2,P51X, , , , ,0.3,10000,0
*do,i,1,11
a,i,i+1,i+10001,i+10000
*enddo
*do,i,41,51
a,i,i+1,i+10001,i+10000
*enddo
*do,i,1,24
lstr,241+200*(i-1),241+200*i
*enddo
*do,i,1,24
lstr,201+200*(i-1),201+200*i
*enddo
*do,i,1,24
lstr,243+200*(i-1),243+200*i
*enddo
*do,i,1,24
lstr,203+200*(i-1),203+200*i
*enddo
*do,i,1,24
lstr,244+200*(i-1),244+200*i
*enddo
*do,i,1,24
lstr,204+200*(i-1),204+200*i
*enddo
*do,i,1,24
lstr,245+200*(i-1),245+200*i
*enddo
*do,i,1,24
lstr,205+200*(i-1),205+200*i
*enddo
*do,i,1,24
lstr,246+200*(i-1),246+200*i
*enddo
*do,i,1,24
lstr,206+200*(i-1),206+200*i
*enddo
*do,i,1,24
lstr,247+200*(i-1),247+200*i
*enddo
*do,i,1,24
lstr,207+200*(i-1),207+200*i
*enddo
*do,i,1,24
lstr,248+200*(i-1),248+200*i
*enddo
*do,i,1,24
lstr,208+200*(i-1),208+200*i
*enddo
*do,i,1,24
lstr,249+200*(i-1),249+200*i
*enddo
*do,i,1,24
lstr,209+200*(i-1),209+200*i
*enddo
*do,i,1,24
lstr,250+200*(i-1),250+200*i
*enddo
*do,i,1,24
lstr,210+200*(i-1),210+200*i
*enddo
FINISH
/PREP7
NUMCMP,KP
NUMMRG,KP, , , ,LOW
*do,i,1,11
a,i,i+1,i+53,i+52
*enddo
*do,i,27,37
a,i,i+1,i+39,i+38
*enddo
*do,i,53,63
a,i,i+1,i+13,i+12
*enddo
FLST,3,10,3,ORDE,4
FITEM,3,3
FITEM,3,-7
FITEM,3,29
FITEM,3,-33
KGEN,2,P51X, , ,4, , ,10000,0
FLST,3,10,3,ORDE,4
FITEM,3,6
FITEM,3,-10
FITEM,3,32
FITEM,3,-36
KGEN,2,P51X, , ,-4, , ,20000,0
*do,i,13,17
lstr,i,i+9990
*enddo
*do,i,39,43
lstr,i,i+9990
*enddo
*do,i,16,20
lstr,i,i+19990
*enddo
*do,i,42,46
lstr,i,i+19990
*enddo
NUMMRG,KP, , , ,LOW
LSTR, 956, 91
LSTR, 79, 947
LSTR, 100, 964
LSTR, 955, 88 

FLST,5,44,5,ORDE,2
FITEM,5,1
FITEM,5,-44
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y
CMSEL,S,_Y1
AATT,1, 1, 2, 0, 1
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
FLST,5,11,5,ORDE,2
FITEM,5,45
FITEM,5,-55
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y
CMSEL,S,_Y1
AATT, 1, 2, 2, 0, 1
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
MSHAPE,0,2D
MSHKEY,0
FLST,5,55,5,ORDE,2
FITEM,5,1
FITEM,5,-55
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
AMESH,_Y1
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
LPLOT
FLST,5,20,4,ORDE,8
FITEM,5,13,-20,27,30,43,-50,57,60
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,S,_Y
CMSEL,S,_Y1
LATT,1,1,1, , , ,4
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
FLST,5,431,4,ORDE,4
FITEM,5,609,-911,913,-1040
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,S,_Y
CMSEL,S,_Y1
LATT,1,1,1, , , ,3
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
FLST,5,439,4,ORDE,14
FITEM,5,19,90,-106,108,-353,355,-522,530,538,-539,580,627,708,913
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,S,_Y
CMSEL,S,_Y1
LATT,1,1,1, , , ,1
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
FLST,5,110,4,ORDE,6
FITEM,5,1,-88,1085,-1104,1107,-1108
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,S,_Y
CMSEL,S,_Y1
LATT,1,1,1, , , ,2
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
FLST,5,4,4,ORDE,2
FITEM,5,1105,-1108
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,S,_Y
CMSEL,S,_Y1
LATT,1,1,1, , , ,3
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
/VIEW,1,1,2,3
/ANG,1
/REP,FAST
GPLOT
FINISH
/SOL
FINISH
/PREP7
FLST,5,55,5,ORDE,2
FITEM,5,1
FITEM,5,-55
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
!*
ACLEAR,_Y1
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
FLST,2,1108,4,ORDE,2
FITEM,2,1
FITEM,2,-1108
LMESH,P51X
FINISH
/SOL
!*
ANTYPE,0
FLST,2,2,4,ORDE,2
FITEM,2,1074
FITEM,2,1084
!*
/GO
DL,P51X, ,ALL,
ACEL,0,9.8,0,
FLST,2,4,5,ORDE,4
FITEM,2,3
FITEM,2,48
FITEM,2,-49
FITEM,2,51
/GO
!*
SFA,P51X,1,PRES,300000
SOLVE
FINISH
/POST1
SET,FIRST
!*
/EFACET,1
PLNSOL, U,SUM, 0,1.0
!*
/EFACET,1
PLNSOL, S,EQV, 0,1.0
ANTYPE,2
!*
MSAVE,0
!*
MODOPT,LANB,6
EQSLV,SPAR
MXPAND,6, , ,0
LUMPM,0
PSTRES,0
!*
MODOPT,LANB,6,0,0, ,OFF
/STATUS,SOLU
SOLVE
FINISH
SET,FIRST
PLNSOL,S,EQV,0,1.0
PLNSOL,U,SUM,0,1.0
SET,NEXT
PLNSOL,S,EQV,0,1.0
PLNSOL,U,SUM,0,1.0
SET,NEXT
PLNSOL,S,EQV,0,1.0
PLNSOL,U,SUM,0,1.0
SET,NEXT
PLNSOL,S,EQV,0,1.0
PLNSOL,U,SUM,0,1.0
SET,NEXT
PLNSOL,S,EQV,0,1.0
PLNSOL,U,SUM,0,1.0
SET,LAST
PLNSOL,S,EQV,0,1.0
PLNSOL,U,SUM,0,1.0
FINISH