ANSYS經(jīng)典三個(gè)主應(yīng)力代數(shù)和云圖顯示方法(UPFS子程序)
瀏覽:3169 收藏:1
c--- 狀態(tài)變量數(shù)大于零時(shí)進(jìn)行if(nsvar .gt. 0) thenc--- 在當(dāng)前單元各積分點(diǎn)間循環(huán)do k = 1, numIntgc--- 獲得應(yīng)力向量call get_ElmData ('SIG ',elemId, k, ncomp, stress)c--- 給stitemp賦值do i=1,ncompstitemp(i) = stress(i)end doc--- 計(jì)算三個(gè)主應(yīng)力代數(shù)和call prinst(stitemp(1))svar(1)=stitemp(7)+stitemp(8)+stitemp(9) c--- 將新的狀態(tài)變量寫入ANSYS數(shù)據(jù)庫(kù)call put_ElmData ('SVAR',elemId, k, nsvar, svar)end doend if
完結(jié)
文章來(lái)源:ansys學(xué)習(xí)分享網(wǎng)
技術(shù)鄰APP
工程師必備
工程師必備
- 項(xiàng)目客服
- 培訓(xùn)客服
- 平臺(tái)客服
TOP
2
1




















