UMAT绗﹀彿璇存槑 - 鐧惧害鏂囧簱

鏂板缓

涓婁紶

棣栭〉

鍔╂墜

鏈�杩?/div>

璧勬枡搴?/div>

宸ュ叿

UMAT 

 

 

 

 

- 

1 

- 

******************************************************************** 

inp

 ********************************************************* 

*MATERIAL, NAME=

 <

鐢ㄦ埛鑷�瀹氫箟鏉愭枡鐨勫悕绉�

> 

*USER MATERIAL, CONSTANTS=

 8<

闇�杈撳叆鐨勫彉閲忎釜鏁?/p>

>

锛?/p>

 

锛?/p>

UNSYMN

锛?/p>

 

30.E6, 0.3, 30.E3, 0., 40.E3, 0.1, 50.E3, 0.5 <

渚濇�＄粰鍑洪渶杈撳叆鐨勫彉閲忕殑鍊?/p>

> 

*DEPVAR 

13 <

瀹氫箟姹傝В杩囩▼涓�鐨勭姸鎬佸彉閲?/p>

(SDVs)

闇�瑕佺殑瀛樺偍绌洪棿锛屽嵆鐘舵�佸彉閲忎釜鏁帮紝

=NSTATV> 

*INITIAL CONDITIONS, TYPE=SOLUTION 

<

渚濇�＄粰鍑虹姸鎬佸彉閲忕殑鍊硷紝涔熷彲涓嶅啓

> 

*USER SUBROUTINES

锛?/p>

 

锛?/p>

INPUT=

<UMAT

鐨?/p>

Fortran

绋嬪簭鍚?/p>

>

锛?/p>

 

 

 

******************************************************************** 

Fortran

绋嬪簭

 ************************************************ 

SUBROUTINE UMAT(STRESS,STATEV,DDSDDE,SSE,SPD,SCD, 

     1 RPL,DDSDDT,DRPLDE,DRPLDT, 

     2 STRAN,DSTRAN,TIME,DTIME,TEMP,DTEMP,PREDEF,DPRED,CMNAME, 

     3 NDI,NSHR,NTENS,NSTATV,PROPS,NPROPS,COORDS,DROT,PNEWDT, 

     4 CELENT,DFGRD0,DFGRD1,NOEL,NPT,LAYER,KSPT,KSTEP,KINC) 

C 

      INCLUDE 'ABA_PARAM.INC' 

C 

      CHARACTER*80 CMNAME 

      DIMENSION STRESS(NTENS),STATEV(NSTATV), 

     1 DDSDDE(NTENS,NTENS),DDSDDT(NTENS),DRPLDE(NTENS), 

     2 STRAN(NTENS),DSTRAN(NTENS),TIME(2),PREDEF(1),DPRED(1), 

     3 PROPS(NPROPS),COORDS(3),DROT(3,3),DFGRD0(3,3),DFGRD1(3,3) 

 

      

user coding to define

 DDSDDE, STRESS, STATEV, SSE, SPD, SCD 

      

and, if necessary,

 RPL, DDSDDT, DRPLDE, DRPLDT, PNEWDT 

 

      RETURN 

      END