*HEADING
 DADEPPO'S ARCH
*NODE
*NGEN,LINE=C,NSET=NOR1
*NCOPY,SHIFT,OLD SET=NOR1,CHANGE NUMBER=100
*NSET,NSET=APEX
*ELEMENT,TYPE=B32H
*ELGEN,ALLNODES,ELSET=EALL
*ELSET,ELSET=CENT
*BEAM SECTION,SECTION=RECT,ELSET=EALL,MATERIAL=MAT
 1.0,2.289428295
*MATERIAL,NAME=MAT
*ELASTIC
 1.E6,.0
*BOUNDARY
 1,1,6
61,1,3
*RESTART,WRITE,FREQUENCY=5
*STEP,NLGEOM,INC=150
*STATIC,RIKS
 0.45,1.0,,,9.5
*CONTROLS, PARAMETERS=FIELD
5.0E-6,
,0.0,
*CLOAD
 31,2,-100.0
*EL PRINT,ELSET=CENT,FREQUENCY=5
 SF,
 SE,
*EL FILE,ELSET=CENT,FREQUENCY=10
 SF,
 SE,
*NODE PRINT,FREQUENCY=5
*NODE FILE,NSET=APEX
 U,
 CF,
*NODE FILE
 RF,
*END STEP