crystal_init() included in CPFEM.f90

2007-10-15 09:30:57 +00:00 · 2007-10-15 09:30:57 +00:00 · 64f3f6ccee
parent b0ef9e4a94
commit 64f3f6ccee
1 changed files with 1 additions and 0 deletions
--- a/trunk/CPFEM.f90
+++ b/trunk/CPFEM.f90
@ -106,6 +106,7 @@
 ! three dimensional stress state ?
    call math_init()
    call mesh_init()
+	call crystal_init()
    call constitutive_init()
    call CPFEM_init()
    CPFEM_first_call = .false.