*HEADING
 FLAT SHEET ROLLING --- 2 ROLLERS, 20% REDUCTION IN EACH ROLL
**
**  Flat sheet.
**
*NODE
1, 0., 0.
21,.1,0.
401,0.,.02
421,.1,.02
*NGEN,NSET=BOTTOM
1,21,1
*NGEN,NSET=TOP
401,421,1
*NFILL,NSET=ALL
BOTTOM,TOP,4,100
*ELEMENT,TYPE=CPE4R
1, 1,2,102,101
*ELGEN,ELSET=SHEET
1, 20,1,1, 4,100,20
*ELSET,ELSET=TOP,GEN
61,80,1
*ELSET,ELSET=END,GEN
20,80,20
*ELSET,ELSET=QA_TEST
END,
**
**  HKSTEST1 gives the kinematic hardening plasticity routine which is
**  described in the User's Manual in the Chapter on user subroutines.
**
*SOLID SECTION,ELSET=SHEET,MATERIAL=HKSTEST1
*MATERIAL,NAME=HKSTEST1
*USER MATERIAL,CONSTANTS=4
210.E9,.3,250.E6,0.
*DENSITY
7850., 
*DEPVAR
5, 
*BOUNDARY
BOTTOM,YSYMM
*INITIAL CONDITIONS, TYPE=VELOCITY
ALL,1,27.6
*INITIAL CONDITIONS, TYPE=TEMPERATURE
ALL,292.
**
**  Rigid roller number 1.
**
*NODE,NSET=ROLLER1
1000,.1196,.066
1001,.1196,.116
1091,.0696,.066
1181,.1196,.016
*NGEN,NSET=ROLLER1,LINE=C
1001,1091,1,1000
1091,1181,1,1000
*ELEMENT,TYPE=R2D2,ELSET=ROLLER1
1001, 1001,1004
*ELGEN,ELSET=ROLLER1
1001, 60,3,1
*BOUNDARY
1000,1,2
1000,6
**
**  Rigid roller number 2.
**
*NODE,NSET=ROLLER2
2000,.1796,.062
2001,.1796,.112
2091,.1296,.062
2181,.1796,.012
*NGEN,NSET=ROLLER2,LINE=C
2001,2091,1,2000
2091,2181,1,2000
*ELEMENT,TYPE=R2D2,ELSET=ROLLER2
2001, 2001,2004
*ELGEN,ELSET=ROLLER2
2001, 60,3,1
*BOUNDARY
2000,1,2
2000,6
**
*NSET,NSET=CNODES
 1000, 2000
*ELSET,ELSET=ELHIST
 56,
**
*SURFACE,TYPE=ELEMENT,NAME=ROLLER1
ROLLER1,SNEG
*SURFACE,TYPE=ELEMENT,NAME=ROLLER2
ROLLER2,SNEG
*SURFACE,TYPE=ELEMENT,NAME=SHEET
TOP,S3
END,S2
*RIGID BODY,ELSET=ROLLER1,REF NODE=1000
*RIGID BODY,ELSET=ROLLER2,REF NODE=2000
**
*STEP
*DYNAMIC,EXPLICIT
,2.E-3
*BOUNDARY,TYPE=VELOCITY
1000,6,6,600.
*SURFACE INTERACTION,NAME=ROLL_TO_STEEL
*FRICTION,TAUMAX=144.3E6
 .3,
*CONTACT PAIR,INTERACTION=ROLL_TO_STEEL,CPSET=ONE
ROLLER1,SHEET
*CONTACT CONTROLS,CPSET=ONE,FASTLOCALTRK=NO
**
*RESTART,TIMEMARKS=NO,WRITE,NUM=1
*OUTPUT,FIELD,NUM=5
*ELEMENT OUTPUT
S,LE
*NODE OUTPUT
U,RF
*CONTACT OUTPUT
FSLIP,FSLIPR,CSTRESS
**
*FILE OUTPUT,TIMEMARKS=YES,NUMBER INTERVAL=1
*EL FILE,ELSET=END
LE,
*NODE FILE,NSET=CNODES
RF,
*****QA TESTING**************
*NSET,NSET=QA_TEST,ELSET=QA_TEST
*OUTPUT,FIELD,NUM=1
*NODE OUTPUT,NSET=QA_TEST
U,
*OUTPUT,HISTORY, TIME INT=2.E-3
*ENERGY OUTPUT, VAR=ALL
*****************************
**
**  History output.
**
***OUTPUT,HISTORY,TIME INTERVAL=1.E-4
***NODE OUTPUT,NSET=CNODES
**UR3,RM3
**RF,
***ELEMENT OUTPUT,ELSET=ELHIST
**MISES,S22,PEEQ,PE,SDV
***ENERGY OUTPUT
**ALLKE,ALLSE,ALLWK,ALLPD,ALLIE,ALLVD,ETOTAL
*END STEP
**
*STEP
*DYNAMIC,EXPLICIT
,2.E-3
*RESTART,TIMEMARKS=NO,WRITE,NUM=2
*BOUNDARY,TYPE=VELOCITY,OP=MOD
2000,6,6,600.
*CONTACT PAIR,INTERACTION=ROLL_TO_STEEL,CPSET=TWO
ROLLER2,SHEET
*CONTACT CONTROLS,CPSET=TWO,FASTLOCALTRK=YES
**
**  History output.
**
***OUTPUT,HISTORY,TIME INTERVAL=0.
*END STEP