VGETVRM提取結(jié)果異常小？
瀏覽：1393
使用 VGETVRM提取結(jié)果偏差很大， VGETVRM結(jié)果非常小，請問各位大佬這是什么原因？
我把LE11導(dǎo)入到sdv1之中，結(jié)果差的非常多
采用的abaqus2023，使用了crashable foam模型。我的代碼如下
SUBROUTINE VUSDFLD(
1 nblock, nstatev, nfieldv, nprops, ndir, nshr,
2 jElem, kIntPt, kLayer, kSecPt,
3 stepTime, totalTime, dt, cmname,
4 coordMp, direct, T, charLength, props,
5 stateOld, stateNew, field )
INCLUDE 'VABA_PARAM.INC'
DIMENSION jElem(nblock), kIntPt(nblock)
DIMENSION coordMp(nblock,3), direct(nblock,3,3)
DIMENSION T(nblock,3,3), charLength(nblock)
DIMENSION props(nprops)
DIMENSION stateOld(nblock,nstatev)
DIMENSION stateNew(nblock,nstatev)
DIMENSION field(nblock,nfieldv)
CHARACTER*80 cmname
INTEGER nrData
PARAMETER (nrData = 6)
REAL*8 rData(nblock*nrData)
INTEGER jData(nblock*nrData)
CHARACTER*3 cData(nblock*nrData)
INTEGER jStatus
INTEGER ioerr, k, offset
REAL*8 S11, S22, S33, S12, S13, S23
CALL VGETVRM('LE', rData, jData, cData, jStatus)
DO k = 1, nblock
field(k,1) = 1.0
S11 = rData(k)
S22 = rData(nblock + k)
S33 = rData(2*nblock + k)
S12 = rData(3*nblock + k)
S13 = rData(4*nblock + k)
S23 = rData(5*nblock + k)
stateNew(k,1) = S11
stateNew(k,2) = S22
stateNew(k,3) = S33
stateNew(k,4) = S12
stateNew(k,5) = S13
stateNew(k,6) = S23
END DO
RETURN
END
