added necessary use statements

This commit is contained in:
Philip Eisenlohr 2007-04-13 14:20:59 +00:00
parent bbfb86fb8f
commit 09495e852d
1 changed files with 2 additions and 1 deletions

View File

@ -120,8 +120,9 @@
!
!
use prec, only: pReal,pInt
use CPFEM, only: CPFEM_stress_all, CPFEM_jaco_old
use math, only: invnrmMandel, nrmMandel
use mesh, only: mesh_FEasCP
use CPFEM, only: CPFEM_general,CPFEM_stress_all, CPFEM_jaco_old
implicit real(pReal) (a-h,o-z)
!
! Marc common blocks are in fixed format so they have to be pasted in here