File |
Line number |
Procedure |
Code |
./pkg/bling/bling_carbonate_init.F |
73 |
BLING_CARBONATE_INIT |
IF ( BLING_silicaFile .NE. ' ' ) THEN |
./pkg/bling/bling_carbonate_init.F |
74 |
BLING_CARBONATE_INIT |
CALL READ_REC_XY_RS( BLING_silicaFile,silica0,intime0, |
./pkg/bling/bling_carbonate_init.F |
76 |
BLING_CARBONATE_INIT |
CALL READ_REC_XY_RS( BLING_silicaFile,silica1,intime1, |
./pkg/bling/bling_carbonate_init.F |
89 |
BLING_CARBONATE_INIT |
IF ( BLING_silicaFile .NE. ' ' ) THEN |
./pkg/bling/bling_fields_load.F |
116 |
BLING_FIELDS_LOAD |
IF ( BLING_silicaFile .NE. ' ' ) THEN |
./pkg/bling/bling_fields_load.F |
117 |
BLING_FIELDS_LOAD |
CALL READ_REC_XY_RS( BLING_silicaFile,silica0,intime0, |
./pkg/bling/bling_fields_load.F |
119 |
BLING_FIELDS_LOAD |
CALL READ_REC_XY_RS( BLING_silicaFile,silica1,intime1, |
./pkg/bling/bling_fields_load.F |
177 |
BLING_FIELDS_LOAD |
IF ( BLING_silicaFile .NE. ' ' ) THEN |