Skip to content

Commit 7f8ff6c

Browse files
author
Juha Ruokolainen
committed
add "USE Messages"
1 parent a4d7bb4 commit 7f8ff6c

File tree

2 files changed

+3
-0
lines changed

2 files changed

+3
-0
lines changed

fem/tests/UMAT_StVenant_2D/MyUMAT.F90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -13,6 +13,7 @@ SUBROUTINE stvenant_kirchhoff(STRESS, STATEV, DDSDDE, SSE, SPD, SCD, &
1313
kstep, kinc)
1414
!------------------------------------------------------------------------------
1515
USE Types
16+
USE Messages
1617
IMPLICIT NONE
1718

1819
REAL(KIND=dp), INTENT(INOUT) :: STRESS(NTENS)

fem/tests/UMAT_StVenant_axials/LocalUMAT.F90

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -16,6 +16,7 @@ SUBROUTINE UMAT_template(STRESS, STATEV, DDSDDE, SSE, SPD, SCD, &
1616
kstep, kinc)
1717
!------------------------------------------------------------------------------
1818
USE Types
19+
USE Messages
1920
IMPLICIT NONE
2021

2122
REAL(KIND=dp), INTENT(INOUT) :: STRESS(NTENS)
@@ -152,6 +153,7 @@ SUBROUTINE linear_isotropic(STRESS, STATEV, DDSDDE, SSE, SPD, SCD, &
152153
kstep, kinc)
153154
!------------------------------------------------------------------------------
154155
USE Types
156+
USE Messages
155157
IMPLICIT NONE
156158

157159
REAL(KIND=dp), INTENT(INOUT) :: STRESS(NTENS)

0 commit comments

Comments
 (0)