*HEADING COUPLED THERMAL-ELECTRICAL VERIFICATION, ECA6VFSJ *RESTART,WRITE *NODE 1, 0.0, 0.0 19, 0.0, 1.0 21, 0.05, 0.0 39, .05, 1.0 41, 0.1, 0.0 59, 0.1, 1.0 *NGEN,NSET=NALL 1, 19 21, 39 41, 59 *NSET,NSET=EDGE1 1,21,41 *NSET,NSET=EDGE2 19,39,59 *NSET,NSET=NODE_NUMBER_39 39, *NSET,NSET=NODE_NUMBER_59 59, *ELEMENT,TYPE=DCAX6E, ELSET=EALL 1, 1, 41, 3, 21, 22, 2 10, 41, 43, 3, 42, 23, 22 *ELGEN,ELSET=EALL 1,9,2 10,9,2 *SOLID SECTION,MATERIAL=A1, ELSET=EALL *MATERIAL,NAME=A1 *CONDUCTIVITY 45.0, *ELECTRICAL CONDUCTIVITY 6.58E6, *JOULE HEAT FRACTION 1.0, *AMPLITUDE,NAME=STEP_FUNCTION,VAL=RELATIVE 0.,1.,1.,1. *STEP *COUPLED THERMAL-ELECTRICAL,STEADY STATE *BOUNDARY EDGE1, 9, , 0.0 EDGE2, 9, , 0.1 EDGE2, 11, , 100.0 *ENERGY FILE *ENERGY PRINT *NODE PRINT NT,EPOT RFL,RECUR CECUR, *NODE FILE NT,EPOT,RFL,RECUR *EL PRINT ENER, ELEN, HFL, ECD, EPG FLUXS, ECURS, NFLUX, NCURS, *EL FILE ENER, ELEN, HFL, ECD, EPG FLUXS, ECURS NFLUX, NCURS *END STEP *STEP *HEAT TRANSFER,STEADY STATE *BOUNDARY,OP=NEW EDGE2,11,,0.0 *END STEP *STEP *COUPLED THERMAL-ELECTRICAL,STEADY STATE *BOUNDARY,OP=NEW EDGE1, 9, , 0.0 EDGE2, 11, , 100.0 *CECURRENT,AMPLITUDE=STEP_FUNCTION NODE_NUMBER_39,,1.3781E+04 NODE_NUMBER_59,,6891. *EL FILE ENER, ELEN, HFL, ECD, EPG FLUXS, ECURS NCURS *END STEP