FEAP * * Example 3. Circular Disk: Block inputs
0 0 0 2 2 4
NOPRint
PARAmeter
m = 20
n = 20
BLOCk 1
CARTesian,m,n,1,1,1
QUADrilateral 4
1 0.0 0.0
2 0.5 0.0
3 0.4 0.4
4 0.0 0.5
PARAmeters
s = sind(22.5)
c = cosd(22.5)
BLOCk 2
CARTesian,n,n
QUADrilateral 4
1 0.5 0.0
2 1.0 0.0
3 0.701 0.701
4 0.4 0.4
6 c s
BLOCk 3
CARTesian,n,n
QUADrilateral 4
1 0.4 0.4
2 0.701 0.701
3 0.0 1.0
4 0.0 0.5
6 s c
EBOUndary ! Edge boundary restraints
1 0.0 1 0
2 0.0 0 1
CFORce ! Coordinate specified forces
NODE 0.0 1.0 0.0 -5.0
MATErial,1
SOLId
ELAStic ISOTropic 10000 0.25
DENSity data 0.10
QUADrature data 2 2
END
TIE ! Tie nodes with same coordinates.
BATCh
TANGent,,1
DISPlacement,,1,100
STRESS,,1,20
REACtion,,1,100
PLOT,MESH
PLOT,LOAD,,-1
PLOT,CONT,2
END ! End of batch execution
INTEractive
STOP