| File |
Line number |
Procedure |
Code |
|
./pkg/dic/DIC_VARS.h |
105 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) DIC_silicaFile |
|
./pkg/dic/DIC_VARS.h |
97 |
NO PROCEDURE |
& DIC_ironFile, DIC_silicaFile, DIC_parFile, |
|
./pkg/dic/dic_fields_load.F |
110 |
DIC_FIELDS_LOAD |
IF ( DIC_silicaFile .NE. ' ' ) THEN |
|
./pkg/dic/dic_fields_load.F |
111 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_silicaFile,silica0,intime0, |
|
./pkg/dic/dic_fields_load.F |
113 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_silicaFile,silica1,intime1, |
|
./pkg/dic/dic_fields_load.F |
191 |
DIC_FIELDS_LOAD |
IF ( DIC_silicaFile .NE. ' ' ) THEN |
|
./pkg/dic/dic_readparms.F |
132 |
DIC_READPARMS |
DIC_silicaFile= ' ' |
|
./pkg/dic/dic_readparms.F |
265 |
DIC_READPARMS |
CALL WRITE_0D_C( DIC_silicaFile, -1,INDEX_NONE,'DIC_silicaFile=', |
|
./pkg/dic/dic_readparms.F |
94 |
DIC_READPARMS |
& DIC_ironFile, DIC_silicaFile, DIC_parFile, |
|
./pkg/dic/dic_surfforcing_init.F |
81 |
DIC_SURFFORCING_INIT |
IF ( DIC_silicaFile .NE. ' ' ) THEN |
|
./pkg/dic/dic_surfforcing_init.F |
82 |
DIC_SURFFORCING_INIT |
CALL READ_REC_XY_RS( DIC_silicaFile,silica0,intime0, |
|
./pkg/dic/dic_surfforcing_init.F |
84 |
DIC_SURFFORCING_INIT |
CALL READ_REC_XY_RS( DIC_silicaFile,silica1,intime1, |
|
./pkg/dic/dic_surfforcing_init.F |
98 |
DIC_SURFFORCING_INIT |
IF ( DIC_silicaFile .NE. ' ' ) THEN |