FINISH
/CLEAR
/TITLE,ANALYSIS OF THE CORRUGATED STEEL WEBS
*SET,aw,0.43
*SET,bw,0.37
*SET,cw,0.22
*SET,THK,0.1
*SET,THK,0.1
/PREP7
ET,1,SHELL63
MP,EX,1,2.0E5
MP,PRXY,1,0.3
MP,DENS,1,7800
R,1,THK,,,,,
ET,2,SOLID65
MP,EX,2,3.5E10
MP,PRXY,2,0.1667
R,2,2,,,
K,1,0,0,0
K,2,0,0,30.03
LSTR,1,2
K,3,3.25,0,0
K,4,3.25,0.6,0
K,5,2.6,0.6,0
K,6,2.3,0.3,0
K,7,-2.3,0.3,0
K,8,-2.6,0.6,0
K,9,-3.25,0.6,0
K,10,-3.25,0,0
A,3,4,5,6,7,8,9,10
K,11,0.75,4.2,0
K,12,2.6,3.9,0
K,13,3.25,3.9,0
K,14,6,4.3,0
K,15,6,4.5,0
K,16,-6,4.5,0
K,17,-6,4.3,0
K,18,-3.25,3.9,0
K,19,-2.6,3.9,0
K,20,-0.75,4.2,0
A,11,12,13,14,15,16,17,18,19,20
APLOT,ALL
VDRAG,ALL,,,,,,1,,,,,
LDELE,1,,,1
ALLSEL,ALL
NUMCMP,ALL
VPLOT,ALL
*GET,FIRST_KNUM,KP,0,NUM,MAX
*DO,I,1,19,1
K,FIRST_KNUM+1+4*(I-1),2.815,0,1.6*(I-1)
K,FIRST_KNUM+2+4*(I-1),2.815,0,aw+1.6*(I-1)
K,FIRST_KNUM+3+4*(I-1),3.035,0,aw+bw+1.6*(I-1)
K,FIRST_KNUM+4+4*(I-1),3.035,0,2*aw+bw+1.6*(I-1)
*ENDDO
*GET,SECOND_KNUM,KP,0,NUM,MAX
*DO,I,SECOND_KNUM-75,SECOND_KNUM-1,1
LSTR,I,I+1
*ENDDO
K,SECOND_KNUM+1,2.815,4.5,0
LSTR,SECOND_KNUM-75,SECOND_KNUM+1
*GET,FIRST_LNUM,LINE,0,NUM,MAX
LSEL,S,LOC,Y,0,,,
LSEL,R,LOC,X,2.815,3.035,,
ADRAG,ALL,,,,,,FIRST_LNUM,,,,,
LDELE,FIRST_LNUM,,,1
ALLSEL,ALL
NUMCMP,ALL
ASEL,S,LOC,Y,0,4.5,,
ASEL,R,LOC,X,2.815,3.035,,
ASEL,U,LOC,Y,0.6,,,
ASEL,U,LOC,Y,3.9,,,
AGLUE,ALL
CM,WEB_L_FIRST,AREA
CMSEL,S,WEB_L_FIRST,AREA
ARSYM,X,ALL,,,,,,
ASEL,S,LOC,Y,0,4.5,,
ASEL,R,LOC,X,-2.815,-3.035,,
ASEL,U,LOC,Y,0.6,,,
ASEL,U,LOC,Y,3.9,,,
CM,WEB_R_FIRST,AREA
ALLSEL,ALL
WPOFFS,0,0.3,0
WPROTA,0,90,0
VSBW,1,0,0
WPOFFS,0,0,-3.9
VSBW,2,0,0
WPCSYS,-1
VSBA,ALL,ALL,,,KEEP
AOVLAP,ALL
NUMMRG,KP
ASEL,S,LOC,Y,0.3,4.2,,
ASEL,R,LOC,X,2.815,3.035,,
ASEL,U,LOC,Y,0.6,,,
ASEL,U,LOC,Y,3.9,,,
AGLUE,ALL
CM,WEB_L_FIRST,AREA
CMSEL,S,WEB_L_FIRST,AREA
ASEL,S,LOC,Y,0.3,4.2,,
ASEL,R,LOC,X,-2.815,-3.035,,
ASEL,U,LOC,Y,0.6,,,
ASEL,U,LOC,Y,3.9,,,
AGLUE,ALL
CM,WEB_R_FIRST,AREA
CMSEL,ALL
AATT,1,1,1,0
AESIZE,ALL,0.2
AMESH,ALL
ALLSEL
VSEL,ALL
VPLOT
VATT,2,2,2,0
ESIZE,0.4,0
MSHKEY,0
MSHAPE,1,3D
VMESH,ALL
NUMMRG,ALL
NUMCMP,ALL
/SOLU
ANTYPE,STATIC
LSEL,S,LOC,Y,0,,,
LSEL,R,LOC,Z,0,,,
NSLL,S,ALL
D,ALL,UX
D,ALL,UY
D,ALL,UZ
D,ALL,ROTY
D,ALL,ROTZ
LSEL,S,LOC,Y,0,,,
LSEL,R,LOC,Z,30.03,,,
NSLL,S,ALL
D,ALL,UX
D,ALL,UY
D,ALL,ROTY
D,ALL,ROTZ
ALLSEL
ACEL,,9.8
NSEL,S,LOC,Y,4.5,,,
NSEL,R,LOC,Z,15,15.3,
NSEL,R,LOC,X,-3.5,3.5,
*GET,NUMD,NODE,,COUNT
F,ALL,FY,-5.074787195/NUMD
ALLSEL
SOLVE |