added use statements

This commit is contained in:
Martin Diehl 2013-02-05 15:03:36 +00:00
parent 865842b0ed
commit 4997328de1
1 changed files with 8 additions and 5 deletions

View File

@ -95,7 +95,8 @@ subroutine AL_init(temperature)
geomdim, & geomdim, &
wgt, & wgt, &
mesh_NcpElems, & mesh_NcpElems, &
mesh_ipCoordinates mesh_ipCoordinates, &
mesh_deformedCoordsFFT
use math, only: & use math, only: &
math_invSym3333 math_invSym3333
@ -221,7 +222,9 @@ type(tSolutionState) function &
use mesh, only: & use mesh, only: &
res, & res, &
geomdim, & geomdim, &
mesh_ipCoordinates mesh_NcpElems, &
mesh_ipCoordinates, &
mesh_deformedCoordsFFT
use IO, only: & use IO, only: &
IO_write_JobBinaryFile IO_write_JobBinaryFile
use DAMASK_spectral_Utilities, only: & use DAMASK_spectral_Utilities, only: &