223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

added necessary use statements

This commit is contained in:
Philip Eisenlohr 2007-04-13 14:20:33 +00:00
parent d90162dc38
commit bbfb86fb8f
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
trunk/CPFEM.f90
View File

@ -93,7 +93,9 @@
SUBROUTINE CPFEM_general(ffn, ffn1, CPFEM_inc, CPFEM_subinc, CPFEM_cn, CPFEM_dt, cp_en, CPFEM_in) SUBROUTINE CPFEM_general(ffn, ffn1, CPFEM_inc, CPFEM_subinc, CPFEM_cn, CPFEM_dt, cp_en, CPFEM_in)
! !
use prec, only: pReal,pInt use prec, only: pReal,pInt
use constitutive, only: constitutive_state_old, constitutive_state_new use math, only: math_init
use mesh, only: mesh_init
use constitutive, only: constitutive_init,constitutive_state_old,constitutive_state_new
implicit none implicit none
! !
real(pReal) ffn(3,3), ffn1(3,3), CPFEM_dt real(pReal) ffn(3,3), ffn1(3,3), CPFEM_dt