FINISH
/CLEAR
/PREP7
ET,1,SOLID65
R,1
MP,EX,1,3.0E4
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,5.1,69
TB,MISO,1,1,15
TBPT,, 100E-6, 3.0
TBPT,, 300E-6, 8.3
TBPT,, 600E-6,14.6
TBPT,, 900E-6,19.1
TBPT,,1100E-6,21.0
TBPT,,1250E-6,22.0
TBPT,,1400E-6,22.6
TBPT,,1550E-6,22.8
TBPT,,1650E-6,22.7
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,2800E-6,16.8
TBPT,,3200E-6,14.7
TBPT,,3800E-6,12.3
TBPT,,4600E-6, 9.9
ET,2,LINK8
R,2,113
MP,EX,2,200E3
MP,NUXY,2,0.3
TB,BKIN,2,1
TBTEMP,0
TBDATA,,300,0
ET,3,LINK8
R,3,28
MP,EX,3,200E3
MP,NUXY,3,0.3
TB,BKIN,3,1
TBTEMP,0
TBDATA,,300,0
N,1,0,0,0
NGEN,5,1,1,1,1,0,50,0
NGEN,61,5,1,5,1,50,0,0
NGEN,3,1000,1,305,1,,,60
TYPE,1
REAL,1
MAT,1
E,1,1001,1002,2,6,1006,1007,7
EGEN,4,1,1,1,1
EGEN,60,5,1,4,1
EGEN,2,1000,1,240,1
TYPE,2
REAL,2
MAT,2
ENDI=1-5
ENDJ=6-5
*DO,I,1,60,1
ENDI=ENDI+5
ENDJ=ENDJ+5
E,ENDI,ENDJ
*ENDDO
ENDI=1001-5
ENDJ=1006-5
*DO,I,1,60,1
ENDI=ENDI+5
ENDJ=ENDJ+5
E,ENDI,ENDJ
*ENDDO
!
ENDI=2001-5
ENDJ=2006-5
*DO,I,1,60,1
ENDI=ENDI+5
ENDJ=ENDJ+5
E,ENDI,ENDJ
*ENDDO
!
ENDI=5-5
ENDJ=10-5
*DO,I,1,60,1
ENDI=ENDI+5
ENDJ=ENDJ+5
E,ENDI,ENDJ
*ENDDO
ENDI=2005-5
ENDJ=2010-5
*DO,I,1,60,1
ENDI=ENDI+5
ENDJ=ENDJ+5
E,ENDI,ENDJ
*ENDDO
TYPE,3
REAL,3
MAT,3
STARTP=1+2*5
*DO,I,1,10,1
STARTP=STARTP+2*5
ENDI=STARTP
*DO,J,1,4,1
E,ENDI,ENDI+1
ENDI=ENDI+1
*ENDDO
ENDI=STARTP
*DO,J,1,2,1
E,ENDI,ENDI+1000
ENDI=ENDI+1000
*ENDDO
ENDI=STARTP+4
*DO,J,1,2,1
E,ENDI,ENDI+1000
ENDI=ENDI+1000
*ENDDO
ENDI=STARTP+2*1000
*DO,J,1,4,1
E,ENDI,ENDI+1
ENDI=ENDI+1
*ENDDO
*ENDDO
STARTP=1+18*2*5
*DO,I,1,10,1
STARTP=STARTP+2*5
ENDI=STARTP
*DO,J,1,4,1
E,ENDI,ENDI+1
ENDI=ENDI+1
*ENDDO
ENDI=STARTP
*DO,J,1,2,1
E,ENDI,ENDI+1000
ENDI=ENDI+1000
*ENDDO
ENDI=STARTP+4
*DO,J,1,2,1
E,ENDI,ENDI+1000
ENDI=ENDI+1000
*ENDDO
ENDI=STARTP+2*1000
*DO,J,1,4,1
E,ENDI,ENDI+1
ENDI=ENDI+1
*ENDDO
*ENDDO
FINISH
/SOLU
NSEL,S,LOC,X,100
NSEL,R,LOC,Y,0
D,ALL,ALL
NSEL,S,LOC,X,2900
NSEL,R,LOC,Y,0
D,ALL,UY,0
D,ALL,UZ,0
NSEL,S,LOC,X,1200
NSEL,R,LOC,Y,200
CP,1,UY,ALL
D,ALL,UY,-25
NSEL,S,LOC,X,1800
NSEL,R,LOC,Y,200
CP,2,UY,ALL
D,ALL,UY,-25
NSEL,ALL
ANTYPE,STATIC
AUTOTS,1
OUTRES,ALL,1
NSUBST,50
PRED,ON
SOLVE
FINISH
/POST1
/TYPE,1,0
SET,,, ,,, ,4
PLCRACK,0,0
/WAIT,3
/TYPE,1,0
SET,,, ,,, ,6
PLCRACK,0,0
/WAIT,3
/TYPE,1,0
SET,,, ,,, ,8
PLCRACK,0,0
/WAIT,3
/TYPE,1,0
SET,,, ,,, ,12
PLCRACK,0,0
/WAIT,3
/TYPE,1,0
SET,,, ,,, ,16
PLCRACK,0,0
/WAIT,3
/TYPE,1,0
SET,,, ,,, ,24
PLCRACK,0,0
/WAIT,3
FINISH
/POST26
NUMVAR,15
NSOL,2,node(1500,0,0),U,Y,UY
RFORCE,3,node(1200,200,0),F,Y,FY
RFORCE,4,node(1200,200,60),F,Y,FY
RFORCE,5,node(1200,200,120),F,Y,FY
RFORCE,6,node(1800,200,0),F,Y,FY
RFORCE,7,node(1800,200,60),F,Y,FY
RFORCE,8,node(1800,200,120),F,Y,FY
ADD,9,2,,,DISP,,,-1
ADD,10,3,4,5,LOAD,,,-1/1000,-1/1000,-1/1000
ADD,11,10,6,7,LOAD,,,1,-1/1000,-1/1000
ADD,12,11,8,,LOAD,,,1,-1/1000
/AXLAB,X,DISP
/AXLAB,Y,LOAD
XVAR,9
PLVAR,12
/WAIT,5
FINISH |