当前位置:首页 >> 机械/仪表 >>

abaqus简单umat子程序


SUBROUTINE UMAT(STRESS,STATEV,DDSDDE,SSE,SPD,SCD,RPL,DDSDDT, 1 DRPLDE,DRPLDT,STRAN,DSTRAN,TIME,DTIME,TEMP,DTEMP,PREDEF,DPRED, 2 CMNAME,NDI,NSHR,NTENS,NSTATV,PROPS,NPROPS,COORDS,DROT, 3 PNEWDT,CELENT,DFGRD0,DFGRD1,NOEL,NPT,LAYER,KSPT,KSTEP,KINC) include 'aba_param.inc' CHARACTER*8 CMNAME DIMENSION STRESS(NTENS),STATEV(NSTATV),DDSDDE(NTENS,NTENS), 1 DDSDDT(NTENS),DRPLDE(NTENS),STRAN(NTENS),DSTRAN(NTENS), 2 TIME(2),PREDEF(1),DPRED(1),PROPS(NPROPS),COORDS(3),DROT(3,3), 3 DFGRD0(3,3),DFGRD1(3,3) C UMAT FOR ISOTROPIC ELASTICITY C CANNOT BE USED FOR PLANE STRESS C ---------------------------------------------------------------C PROPS(1) - E C PROPS(2) - NU C ---------------------------------------------------------------C IF (NDI.NE.3) THEN WRITE (*,*) 'THIS UMAT MAY ONLY BE USED FOR ELEMENTS 1 WITH THREE DIRECT STRESS COMPONENTS' CALL XIT ENDIF open(400,file='D:\test.txt')

C

ELASTIC PROPERTIES EMOD=PROPS(1) ENU=PROPS(2) EBULK3=EMOD/(1-2*ENU) EG2=EMOD/(1+ENU) EG=EG2/2 EG3=3*EG ELAM=(EBULK3-EG2)/3 write(400,*) 'temp=',temp

C ELASTIC STIFFNESS C DO K1=1, NDI DO K2=1, NDI DDSDDE(K2, K1)=ELAM END DO DDSDDE(K1, K1)=EG2+ELAM

END DO DO K1=NDI+1, NTENS DDSDDE(K1 ,K1)=EG END DO C C C do k1=1,ntens write(16,155) (DDSDDE(k1,K2),k2=1,6) enddo

C 155 FORMAT(10F12.2) C C CALCULATE STRESS C DO K1=1, NTENS DO K2=1, NTENS STRESS(K2)=STRESS(K2)+DDSDDE(K2, K1)*DSTRAN(K1) END DO END DO C write(16,156) (STRESS(K2),k2=1,6) C 156 FORMAT(6F12.2 write(400,*) 'temp=',temp RETURN END


相关文章:
(ABAQUS)UMAT心得
(ABAQUS)UMAT心得_工程科技_专业资料。看到网上好多关于询问 UMAT 的一致切线模量的问题,以及 UEL 中的内力与外力残差 问题。做子程序也有两年多,这里谈谈自己的...
ABAQUS-UMAT-自学知识整理贴
UMAT:[user defined material mechanical behavior]用户材料子程序,是 ABAQUS 提供...由于 Fortran90 对 过程的许多功能做了扩充,有些功能单靠简单的调用语句已经...
abaqus umat 例子程序
abaqus umat 例子程序_材料科学_工程科技_专业资料 暂无评价|0人阅读|0次下载|举报文档 abaqus umat 例子程序_材料科学_工程科技_专业资料。C C C C C C C ...
ABAQUS子程序UMAT里弹塑本构的实现 - 副本
ABAQUS子程序UMAT里弹塑本构的实现 - 副本_计算机软件及应用_IT/计算机_专业...[2], 其解决问题的 范围 从相对简单的线性分析到最富有挑战性的非线性模拟...
如何配置ABAQUS的UMAT
如何配置ABAQUS的UMAT_计算机软件及应用_IT/计算机_专业资料。想使用 UMAT 吗?貌似...abaqus简单umat子程序 2页 免费 ABAQUS有限元分析应用与... 9页 免费喜欢...
UMAT全过程技术篇
UMAT 全过程-"技术篇" 全过程- 技术篇" [写在前面: 这篇文章是 UMAT 全...3.用户子程序和主程序的结合 3.用户子程序和主程序的结合 ABAQUS 的用户子...
ABAQUS-二次开发资料-UMAT_图文
使用 UMAT 子程序: (1)可以定义材料的本构关系,使用 ABAQUS 材料库中没有包含...简单的调用语句已经无法反应,因而系统也就无法进行正确的编译,这时需要在主调程序...
abaqus材料子程序
abaqus材料子程序_材料科学_工程科技_专业资料。各向同性材料损伤本构模型 SUBROUTINE UMAT(STRESS,STATEV,DDSDDE,SSE,SPD,SCD, + RPL,DDSDDT,DRPLDE,DRPLDT, +...
abaqus调用子程序的方法
Abaqus 运行子程序方法试了好几种调用子程序的方法最后总算找到了最简单的了, ...Abaqus用户子程序UMAT 15页 免费 浅谈ABAQUS用户子程序 8页 免费 Abaqus用户子...
ABAQUS子程序USDFLD
ABAQUS子程序USDFLD_物理_自然科学_专业资料。ABAQUSAbaqus/CAE User's Manual 12...子程序中被更新,并且被更新的数值能够在(CREEP, HETVAL, UEXPAN, UMAT, UMAT...
更多相关标签: