FEAP * * Example 3. Circular Disk: Block inputs0 0 0 2 2 4NOPRintPARAmeterm = 20n = 20BLOCk 1CARTesian,m,n,1,1,1QUADrilateral 41 0.0 0.02 0.5 0.03 0.4 0.44 0.0 0.5
PARAmeterss = sind(22.5)c = cosd(22.5)BLOCk 2CARTesian,n,nQUADrilateral 41 0.5 0.02 1.0 0.03 0.701 0.7014 0.4 0.46 c sBLOCk 3CARTesian,n,nQUADrilateral 41 0.4 0.42 0.701 0.7013 0.0 1.04 0.0 0.56 s cEBOUndary ! Edge boundary restraints1 0.0 1 02 0.0 0 1CFORce ! Coordinate specified forcesNODE 0.0 1.0 0.0 -5.0MATErial,1SOLIdELAStic ISOTropic 10000 0.25DENSity data 0.10QUADrature data 2 2ENDTIE ! Tie nodes with same coordinates.
BATChTANGent,,1DISPlacement,,1,100STRESS,,1,20REACtion,,1,100PLOT,MESHPLOT,LOAD,,-1PLOT,CONT,2END ! End of batch execution
INTEractiveSTOP