- 积分
- 0
- 注册时间
- 2011-3-14
- 仿真币
-
- 最后登录
- 1970-1-1
|
本帖最后由 Ujs_lihui 于 2012-2-23 16:03 编辑
今天刚刚
把子程序调入abaqus中模拟,出现这样的警告:Output variable sdv has no components in this analysis for element type c3d8r,并且后处理中也没有SDV云图。我想知道这是怎么回事?是不是SDV不适应C3D8R网格,还是我哪边出问题了?
C
C User subroutine VFRIC
subroutine vfric (
C Write only -
* fTangential,
C Read/Write -
* statev,
C Read only -
* kStep, kInc, nContact, nFacNod, nSlvNod, nMstNod,
* nFricDir, nDir, nStateVar, nProps, nTemp, nPred, numDefTfv,
* jSlvUid, jMstUid, jConSlvid, jConMstid, timStep, timGlb,
* dTimCur, surfInt, surfSlv, surfMast, lContType,
* dSlipFric, fStickForce, fTangPrev, fNormal, frictionWork,
* shape, coordSlv, coordMst, dircosSl, dircosN, props,
* areaSlv, tempSlv, preDefSlv, tempMst, preDefMst )
C
include 'vaba_param.inc'
C
dimension props(nProps), statev(*),
1 dSlipFric(nDir,nContact),
2 fTangential(nFricDir,nContact),
3 fTangPrev(nDir,nContact),
4 fStickForce(nContact), areaSlv(nSlvNod),
5 fNormal(nContact), shape(nFacNod,nContact),
6 coordSlv(nDir,nSlvNod), coordMst(nDir,nMstNod),
7 dircosSl(nDir,nContact), dircosN(nDir,nContact),
8 jSlvUid(nSlvNod), jMstUid(nMstNod),
9 jConSlvid(nContact), jConMstid(nFacNod,nContact),
1 tempSlv(nContact), tempMst(numDefTfv),
2 preDefSlv(nContact, nPred),
3 preDefMst(numDefTfv, nPred)
C
character*80 surfInt, surfSlv, surfMast
parameter ( zero = 0.d0 )
*
xMuT = props(1)
xMuN = 0.001
worn = 0.0
if ( nDir .eq. 2 ) then
do kcon = 1, ncontact
worn=statev(1)
slipNorm = sqrt(
* dSlipFric( 1,kcon )*dSlipFric( 1,kcon )+
* dSlipFric( 2,kcon )*dSlipFric( 2,kcon ) )
worn1=xMuT*slipNorm*xMuN
worn=worn+worn1
statev(1)=worn
open(110,file='D:\file\aba.txt')
write(110,*)jConSlvid,worn
end do
else if ( nDir .eq. 3 ) then
do kcon = 1, ncontact
worn=statev(1)
slipNorm = sqrt(
* dSlipFric( 1,kcon )*dSlipFric( 1,kcon )+
* dSlipFric( 2,kcon )*dSlipFric( 2,kcon )+
* dSlipFric( 3,kcon )*dSlipFric( 3,kcon ) )
worn1=xMuT*slipNorm*xMuN
worn=worn+worn1
statev(1)=worn
open(110,file='D:\file\aba.txt')
write(110,*)jConSlvid,worn
end do
end if
*
return
end |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?注册
×
|