马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
这是小弟的几何模型简化后的部分命令流,我第一次划分六面体网格,请各位大虾支招!!
FINI
/CLE
LS=13
WD=11
RR=3
*DIM,RD,ARRAY,4,5
RD(1,1)=0,3,3.5,7.65
RD(1,2)=0,3,3.69,6.69
RD(1,3)=3,3.6,6.6
RD(1,4)=0,1.65,2.01,4.51
*DIM,H,ARRAY,5,1
H(1,1)=0,3,6,20,13
/PREP7
LOCAL,11,0,0,0,0,0,90,
WPCSYS,,11
!建立圆柱体
*DO,I,1,2
*DO,J,1,3
CYLIND,RD(J,I),RD(J+1,I),H(I,1),H(I+1,1),180,360
*ENDDO
*ENDDO
!建立长方体
*DO,I,3,3
BLOCK,-RD(1,I),RD(1,I),-RD(1,I),0,H(I,1),H(I+1,1)
*ENDDO
*DO,I,3,3
*DO,J,2,3
BLOCK,-RD(J,I),RD(J,I),-RD(J-1,I),-RD(J,I),H(I,1),H(I+1,1)
*ENDDO
*ENDDO
*DO,I,3,3
*DO,J,2,3
BLOCK,RD(J-1,I),RD(J,I),-RD(J-1,I),0,H(I,1),H(I+1,1)
BLOCK,-RD(J-1,I),-RD(J,I),-RD(J-1,I),0,H(I,1),H(I+1,1)
*ENDDO
*ENDDO
*DO,I,1,2
BLOCK,-LS,LS,-WD,0,H(I,1),H(I+1,1)
*ENDDO
*DO,I,3,3
BLOCK,-LS,LS,-WD,-RD(3,I),H(I,1),H(I+1,1)
*ENDDO
*DO,I,3,3
BLOCK,-RD(3,I),-LS,0,-RD(3,I),H(I,1),H(I+1,1)
BLOCK,RD(3,I),LS,0,-RD(3,I),H(I,1),H(I+1,1)
*ENDDO
ALLS
VPTN,ALL
NUMCMP,ALL
CM,CM_V1,VOLU
SAVE,V1,DB
LOCAL,12,0,RD(1,3),-H(5,1),0,,,90
WPCSYS,,12
*DO,I,1,3
CYLIND,RD(I,4),RD(I+1,4),RD(I,3)-RR,LS-RR,0,90
*ENDDO
VSEL,S,,,ALL
CMSEL,R,CM_V1
VSEL,INVE
CM,CM_V2,VOLU
ALLS
VSBV,CM_V1,CM_V2,,DELETE,DELETE
!重复!!!!!!!!!
WPCSYS,,12
*DO,I,1,3
CYLIND,RD(I,4),RD(I+1,4),RD(I,3)-RR,LS-RR,0,90
*ENDDO
!!!!!!!!!!!!!!!!!!
ALLS
VGLUE,ALL
SAVE,V2,DB |