use statement for marc was wrong (preprocessor)
This commit is contained in:
parent
d008b566b4
commit
6170209198
|
@ -490,18 +490,17 @@ subroutine mesh_init(ip,el)
|
||||||
use DAMASK_interface
|
use DAMASK_interface
|
||||||
use, intrinsic :: iso_fortran_env ! to get compiler_version and compiler_options (at least for gfortran 4.6 at the moment)
|
use, intrinsic :: iso_fortran_env ! to get compiler_version and compiler_options (at least for gfortran 4.6 at the moment)
|
||||||
use IO, only: &
|
use IO, only: &
|
||||||
IO_timeStamp, &
|
|
||||||
IO_error, &
|
|
||||||
IO_write_jobFile, &
|
|
||||||
#ifdef Abaqus
|
#ifdef Abaqus
|
||||||
IO_abaqus_hasNoPart, &
|
IO_abaqus_hasNoPart, &
|
||||||
#endif
|
#endif
|
||||||
#ifdef Spectral
|
#ifdef Spectral
|
||||||
IO_open_file
|
IO_open_file, &
|
||||||
#else
|
#else
|
||||||
use numerics, only: &
|
IO_open_InputFile, &
|
||||||
IO_open_InputFile
|
|
||||||
#endif
|
#endif
|
||||||
|
IO_timeStamp, &
|
||||||
|
IO_error, &
|
||||||
|
IO_write_jobFile
|
||||||
use debug, only: &
|
use debug, only: &
|
||||||
debug_e, &
|
debug_e, &
|
||||||
debug_i, &
|
debug_i, &
|
||||||
|
|
Loading…
Reference in New Issue