/FluidMechanics/TOOLS/MeshCreation/02_CreateCMInput/varskinds.mod

 1GFORTRAN module version '0' created from cheart_prep3D.f on Fri Apr 17 14:08:23 2009
 2MD5:b4dc5c3afe68719160ce9761768eeff4 -- If you edit this, you'll get what you deserve.
 3
 4(() () () () () () () () () () () () () () () () () () () () () () () ()
 5() () ())
 6
 7()
 8
 9()
10
11()
12
13()
14
15(2 'dpr' 'varskinds' 'dpr' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC
16UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (CONSTANT (
17INTEGER 4 0 0 INTEGER ()) 0 '8') () 0 () () () 0 0)
183 'selected_real_kind' '(intrinsic)' 'selected_real_kind' 1 ((PROCEDURE
19UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN UNKNOWN FUNCTION) (REAL 4 0 0 REAL ())
200 0 () () 3 () () () 0 0)
214 'spr' 'varskinds' 'spr' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC
22UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (CONSTANT (
23INTEGER 4 0 0 INTEGER ()) 0 '4') () 0 () () () 0 0)
245 'varskinds' 'varskinds' 'varskinds' 1 ((MODULE UNKNOWN-INTENT
25UNKNOWN-PROC UNKNOWN UNKNOWN) (UNKNOWN 0 0 0 UNKNOWN ()) 0 0 () () 0 ()
26() () 0 0)
27)
28
29('dpr' 0 2 'selected_real_kind' 0 3 'spr' 0 4 'varskinds' 0 5)