【原创】温度场分析与结构耦合一例

carpenter

我前两天作的管线的温度场与结构分析耦合，是个初步分析。
现把命令流贴出来，抛砖引玉。
  
!DEFINE THE SIZE OF PIPE
DO=0.3239           !OUTER DIAMETER
RO=DO/2
THICK=0.0127        !WALL THICKNESS
L0=500              !THE LENGTH
!DEFINE THE PARAMETERS
PKX=50              !HEAT CONDUCTIVITY
PC=500        !SPECIFIC HEAT
PWCONV=500          !CONVECTION COEFFICENT
PSDENS=7800          !DENSITY OF PIPE
OPWT=15
IPWT=85
PEX=2.1E11
PPRXY=0.3
PALPX=1.1E-5
  
/PREP7
ET,1,SOLID70
KEYOPT,1,2,1        !SURFACE TEMPERATURE
TOFFST,273          !DEFINE TEMPERATURE UNIT
MP,KXX,1,PKX
MP,C,1,PC
MP,DENS,1,PSDENS
  
CYLIND,RO-THICK,RO,,L0
ESIZE,,16
VSWEEP,ALL
  
/SOLU
CSYS,1
ASEL,S,LOC,X,RO
SFA,ALL,,CONV,PWCONV,15
ASEL,S,LOC,X,RO-THICK
SFA,ALL,,CONV,PWCONV,85
ALLSEL,ALL
CSYS,0
SOLVE
FINISH
  
/PREP7
ETCHG,TTS
TOFFST,273
MP,EX,1,PEX
MP,PRXY,1,PPRXY
MP,ALPX,1,PALPX
FINISH
  
/SOLU
NSEL,S,LOC,Z,0
NSEL,A,LOC,Z,L0
TREF,20
D,ALL,ALL,
LDREAD,TEMP,,,,,,RTH
SOLVE
FINISH
  
/POST1
PLNSOL,S,EQV
  
下面变形和应力图：

carpenter

变形图：

hubeiyiejian

谢谢!

xiaoyuerzzu

太好了，谢谢楼主分享