ansys等效彈性應變的案例
通過ansys利用均勻化理論計算復合材料等效性能--等效彈性模量，剪切模量等
***********計算NIX,NIY,應變矩陣元素
NIX(K)=YT*NS(K)-YS*NT(K)
NIY(K)=-XT*NS(K)+XS*NT(K)
*ENDDO !***********計算NIX,NIY,應變矩陣元素
EPX=0
EPY=0
*DO,K,1,4 !***********計算插值點應變
EPX=NIX(K)*V(K)+EPX
EPY=NIY(K)*U(K)+EPY
*ENDDO !***********計算插值點應變
PX=PX+EPX
PY=PY+EPY
*ENDDO !***********計算單元應變PX,PY
*GET,DA,ELEM,M,AREA !提取單元的面積
K=EPSI/(1+NU)/2/AREA
E1212H=K*(DA-PY*KA-PX*KA
)+E1212H
*GET,M,ELEM,M,NXTH
*ENDDO
*enddo
allsel,
finish
G12=E1212H
展開 