| File |
Line number |
Procedure |
Code |
|
./pkg/dic/DIC_VARS.h |
107 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) DIC_silicaFile |
|
./pkg/dic/DIC_VARS.h |
98 |
NO PROCEDURE |
& DIC_ironFile, DIC_silicaFile, DIC_parFile, |
|
./pkg/dic/dic_fields_load.F |
103 |
DIC_FIELDS_LOAD |
IF ( DIC_silicaFile .NE. ' ' ) THEN |
|
./pkg/dic/dic_fields_load.F |
104 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_silicaFile,silica0,intime0, |
|
./pkg/dic/dic_fields_load.F |
106 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_silicaFile,silica1,intime1, |
|
./pkg/dic/dic_fields_load.F |
194 |
DIC_FIELDS_LOAD |
IF ( DIC_silicaFile .NE. ' ' ) THEN |
|
./pkg/dic/dic_readparms.F |
140 |
DIC_READPARMS |
DIC_silicaFile= ' ' |
|
./pkg/dic/dic_readparms.F |
284 |
DIC_READPARMS |
CALL WRITE_0D_C( DIC_silicaFile, -1,INDEX_NONE,'DIC_silicaFile=', |
|
./pkg/dic/dic_readparms.F |
98 |
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 |