*HEADING xpl-std testing: transfer of temperatures (the first xpl file) for s3rt *preprint,model=yes,history=yes *RESTART,WRITE *NODE,NSET=ALL 1,0.0,0.0 2,1.0,0.0 3,1.0,1.0 4,0.0,1.0 *NSET,NSET=BOT 1,2 *NSET,NSET=RIGHT 2,3 *NSET,NSET=LEFT 1,4 *NSET,NSET=TOP 3, *ELEMENT,TYPE=S3RT, ELSET=EALL 1,1,2,3 2,1,3,4 *SHELL SECTION,MATERIAL=A1, ELSET=EALL,TEMPERATURE=5 0.1 *PHYSICAL CONSTANTS, ABSOLUTE ZERO=-273.0, STEFAN BOLTZMANN=5.0E-8 *MATERIAL,NAME=A1 *ELASTIC 2.E11,0.3 *PLASTIC 200.E8,0.0,0.0 250.E8,0.1,0.0 300.E8,0.15,0.0 150.E8,0.0,200.0 200.E8,0.1,200.0 250.E8,0.15,200.0 *EXPANSION 10.0E-6, *CONDUCTIVITY 50., *DENSITY 7800., *SPECIFIC HEAT 450.0 *INITIAL CONDITIONS, TYPE=TEMPERATURE ALL,25.0,20.,15.0,10.0,5.0 *INITIAL CONDITIONS,TYPE=FIELD, VARIABLE=1 ALL,25.01,20.1,15.01,10.01,5.01 *INITIAL CONDITIONS,TYPE=FIELD, VARIABLE=2 ALL,125.01,120.1,115.01,110.01,105.01 *BOUNDARY LEFT,1,6 BOT,2,6 BOT,11,15 TOP,4,6 *STEP *DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT ,1.0 *CLOAD RIGHT,1,1.E7 ****** *OUTPUT,HISTORY,FREQUENCY=1 *ENERGY OUTPUT,VARIABLE=PRESELECT *NODE OUTPUT,NSET=ALL NT ******* *OUTPUT,FIELD *ELEMENT OUTPUT S,FV,TEMP *NODE OUTPUT RF, NT, RFL, U COORD, *END STEP