| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_get_bulkf.F |
96 |
THSICE_GET_BULKF |
IF ( useFluxFormula_AIM ) THEN |
|
./pkg/bulk_force/BULKF_PARAMS.h |
124 |
NO PROCEDURE |
LOGICAL useFluxFormula_AIM |
|
./pkg/bulk_force/BULKF_PARAMS.h |
128 |
NO PROCEDURE |
& useFluxFormula_AIM, |
|
./pkg/bulk_force/bulkf_fields_load.F |
340 |
BULKF_FIELDS_LOAD |
IF ( useFluxFormula_AIM ) THEN |
|
./pkg/bulk_force/bulkf_fields_load.F |
401 |
BULKF_FIELDS_LOAD |
IF ( useFluxFormula_AIM ) THEN |
|
./pkg/bulk_force/bulkf_forcing.F |
86 |
BULKF_FORCING |
IF ( useFluxFormula_AIM ) THEN |
|
./pkg/bulk_force/bulkf_readparms.F |
128 |
BULKF_READPARMS |
useFluxFormula_AIM = .FALSE. |
|
./pkg/bulk_force/bulkf_readparms.F |
190 |
BULKF_READPARMS |
IF ( useFluxFormula_AIM ) THEN |
|
./pkg/bulk_force/bulkf_readparms.F |
252 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: useFluxFormula_AIM=',useFluxFormula_AIM |
|
./pkg/bulk_force/bulkf_readparms.F |
52 |
BULKF_READPARMS |
& useFluxFormula_AIM, blk_nIter, calcWindStress, |