1
/PREP7
ET,1,LINK1
R,1,0.1
MP,EX,1,1E5
N,1,0
N,2,1
N,3,0.5,0.5
E,1,3
E,2,3
/PLOPTS,INFO,0
FINISH
/SOLU
D,1,ALL
D,2,ALL
F,3,FY,-100
*DO,I,1,10
TIME,i
SOLVE
MP,EX,1,1E5-1000*i
*ENDDO
FINISH
/POST26
NSOL,2,3,U,Y,y_disp
ABS,3,2,,,,,,1,
PLVAR,3
/IMAGE,SAVE,y_disp,BMP
FINISH
2
/PREP7
SMRT,OFF
/TITLE,TWO DIMENSIONAL HEAT TRANSFER WITH CONVECTION
ANTYPE,STATIC
ET,1,PLANE55
MP,KXX,1,52.0
K,1
K,2,.6
K,3,.6,1.0
K,4,,1.0
K,5,.6,.2
L,1,2
L,2,5