【原创】温度场分析与结构耦合一例
我前两天作的管线的温度场与结构分析耦合,是个初步分析。现把命令流贴出来,抛砖引玉。
!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
下面变形和应力图:
回复: 【原创】温度场分析与结构耦合一例
变形图:回复: 【原创】温度场分析与结构耦合一例
谢谢! 太好了,谢谢楼主分享
页:
[1]