*HEADING
 TEST OF *IMPERFECTION, IMPERFECTION DEFINED BY CARTESIAN PERTURBATION VALUES
 READ FROM A FILE
*NODE, NSET=QA_TEST_ALLNODES
 101, 5.0,  0.0, 0.0
 110, 0.0,  5.0, 0.0
 701, 5.0,  0.0, 10.0
 710, 0.0,  5.0, 10.0
*NGEN, LINE=C, NSET=BASE
 101,110,1,,0.0,0.0,0.0
*NGEN, LINE=C, NSET=TOP
 701,710,1,,0.0,0.0,10.0
*NFILL,NSET=NALL
 BASE,TOP,6,100
*NSET,NSET=EDGE1,GENERATE
 101,701,100
*NSET,NSET=EDGE2,GENERATE
 110,710,100
*IMPERFECTION,SYSTEM=R,INPUT=imp_rect_data.inp
*ELEMENT, TYPE=S4R
 1, 101,201,202,102
*ELGEN, ELSET=EALL
1, 9,1,1,6,100,10
*SHELL SECTION, ELSET=EALL, MATERIAL=MAT
 .1, 
*TRANSFORM,TYPE=C, NSET=NALL
 0.,0.,0., 0.,0.,1.
*MATERIAL,NAME=MAT
*ELASTIC
 30.E6,.3
*DENSITY
 1.0,
*BOUNDARY
 EDGE1,YSYMM
 EDGE2,YSYMM
 BASE,ENCASTRE
 TOP,ENCASTRE
**
*NSET, NSET=QA_TEST_ALLNODES
QA_TEST_ALLNODES, BASE, TOP, NALL
EDGE1, EDGE2
**
*STEP
*DYNAMIC,EXPLICIT
 ,0.001
*FILE OUTPUT,NUMBER INTERVAL=2
*NODE FILE
 COORD,
*OUTPUT, FIELD, NUMBER INTERVAL=2
*NODE OUTPUT, NSET=QA_TEST_ALLNODES
 COORD,UT
*OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=0.0005
***OUTPUT,HISTORY,VARIABLE=PRESELECT
*END STEP