crystal_init() included in CPFEM.f90

This commit is contained in:
Luc Hantcherli 2007-10-15 09:30:57 +00:00
parent b0ef9e4a94
commit 64f3f6ccee
1 changed files with 1 additions and 0 deletions

View File

@ -106,6 +106,7 @@
! three dimensional stress state ? ! three dimensional stress state ?
call math_init() call math_init()
call mesh_init() call mesh_init()
call crystal_init()
call constitutive_init() call constitutive_init()
call CPFEM_init() call CPFEM_init()
CPFEM_first_call = .false. CPFEM_first_call = .false.