UDMGINI3 允许您定义平织复合材料中的初始损伤萌生。
损伤萌生可以在成分级别(纤维和基体的每个牵引)也可以在复合材料级别定义。该例程在每个平衡迭代处针对织物复合材料(您为其请求用户损坏萌生例程的材料)的每个积分点进行调用。以下是 UDMGINI3 界面的样板。 请注意,将调用此子例程,直到预测到纤维失效。
SUBROUTINE UDMGINI3(HMAT, HPROP, NPROPS, PROPS, NSDV, SDV, STRAIN, STRESS, DFGRD, DELT, LE, FI, SR, IFAIL, MSTATE)
USE HELIUS
IMPLICIT NONE
INTEGER(HANDLE), INTENT(IN) :: HMAT
INTEGER(HANDLE), INTENT(IN) :: HPROP
INTEGER, INTENT(IN) :: NPROPS
INTEGER, INTENT(IN) :: NSDV
INTEGER, INTENT(IN) :: IFAIL(8)
INTEGER, INTENT(IN) :: MSTATE
REAL(8), INTENT(IN) :: PROPS(NPROPS)
REAL(8), INTENT(IN) :: STRAIN(6,8)
REAL(8), INTENT(IN) :: STRESS(6,8)
REAL(8), INTENT(IN) :: DFGRD(3,3)
REAL(8), INTENT(IN) :: DELT
REAL(8), INTENT(IN) :: LE
REAL(8), INTENT(INOUT) :: FI(4)
REAL(8), INTENT(INOUT) :: SR(4)
REAL(8), INTENT(INOUT) :: SDV(NSDV)
... user coding to upate FI, SR, and SDV here ...
RETURN
ENDSUBROUTINE
一个指向当前材料的句柄。 这将传递到信息例程(信息例程),以便访问材料的相关信息。
一个指向当前材料特性的句柄。 这将传递到信息例程(信息例程),以便访问材料特性的相关信息。
IFAIL(1) | 复合材料 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 |
IFAIL(2) | 填充牵引 | 1 | 2 | 1 | 2 | 3 | 1 | 3 | 2 | 3 |
IFAIL(3) | 扭曲牵引 | 1 | 1 | 2 | 2 | 1 | 3 | 2 | 3 | 3 |
IFAIL(4) | 基体支座 | 1 | 1 | 1 | 2 | 2 | 2 | 2 | 2 | 2 |
IFAIL(5) | 填充纤维 | 1 | 1 | 1 | 1 | 2 | 1 | 2 | 1 | 2 |
IFAIL(6) | 填充基体 | 1 | 2 | 1 | 2 | 2 | 1 | 2 | 2 | 2 |
IFAIL(7) | 扭曲纤维 | 1 | 1 | 1 | 1 | 1 | 2 | 1 | 2 | 2 |
IFAIL(8) | 扭曲基体 | 1 | 1 | 2 | 2 | 1 | 2 | 2 | 2 | 2 |