发布于:2012-11-24 14:55:24
来自:建筑结构/ANSYS
[复制转发]
命令流计算整体降温15度,但提示节点自由度无效
FINISH
/CLEAR
/PREP7
/NERR,1
CSYS,0
BLOCK,0,2,-1.000,1.000,,2
ET,1,SOLID45
MP,EX,1,2.1E5
MP,PRXY,1,0.2
MP,DENS,1,2500
VATT,1,,1
MSHAPE,0
MSHKEY,1
ESIZE,0.2
ALLSEL,ALL
VSWEEP,ALL
ALLSEL,ALL
ET,4,BEAM4
R,50,2.375E-1,1.2122E-2, 1.2122E-2,0.55,0.55,0$RMORE,,,0,0,,0
MP,EX,3,6.737E9
MP,PRXY,3,0.2
MP,DENS,3,2500
TYPE,4$MAT,3$REAL,50
*DO,I,0,1
N,950001+I, 0.200+I*1.60, 0.8,0$N,920001+I, 0.200+I*1.60, 0.8,-1
E, 920001+I, 950001+I
*ENDDO
*DO,I,0,1
N,950003+I, 0.200+I*1.60, -0.8,0$N,920003+I, 0.200+I*1.60, -0.8,-1
E, 920003+I, 950003+I
*ENDDO
ALLSEL,ALL
*DO,I,0,1
NSEL,S,LOC,X, 0.200+I*1.60-0.2, 0.200+I*1.60+0.2
NSEL,R,LOC,Y, 0.8-0.2, 0.8+0.2
NSEL,R,LOC,Z, 0
CERIG, 950001+I,ALL$ALLSEL,ALL
*ENDDO
ALLSEL,ALL
*DO,I,0,1
NSEL,S,LOC,X, 0.200+I*1.60-0.2, 0.200+I*1.60+0.2
NSEL,R,LOC,Y, -0.8-0.2, -0.8+0.2
NSEL,R,LOC,Z, 0
CERIG, 950003+I,ALL$ALLSEL,ALL
*ENDDO
*DO,I,0,3$D,920001+I,ALL,ALL$*ENDDO
TIME,6$!钢筋混凝土收缩荷载
ALLSEL,ALL
ACEL,0,0,0
FDELE,ALL,ALL,ALL
SFDELE,ALL,ALL
TREF,25
NSEL,S,LOC,Z,1,2
CM,WENDU1,NODE
D,WENDU1,TEMP,10
ALLSEL,ALL
/ESHAPE,1
/PBF,TEMP,,1
LSWRITE,5
EPLOT
!/SOLU$SOLVE$/POST1$PLDISP,1$PLNSOL,U,Z
SOLVE
全部回复(1 )
只看楼主 我来说两句 抢板凳回复 举报