File |
Line number |
Procedure |
Code |
./pkg/aim/aim_external_fields_load.F |
56 |
AIM_FIELDS_LOAD |
INTEGER prevMnthIndex |
./pkg/aim/aim_external_fields_load.F |
57 |
AIM_FIELDS_LOAD |
DATA prevMnthIndex / 0 / |
./pkg/aim/aim_external_fields_load.F |
58 |
AIM_FIELDS_LOAD |
SAVE prevMnthIndex |
./pkg/aim/aim_external_fields_load.F |
79 |
AIM_FIELDS_LOAD |
IF ( mnthIndex .NE. prevMnthIndex .OR. |
./pkg/aim/aim_external_fields_load.F |
82 |
AIM_FIELDS_LOAD |
prevMnthIndex = mnthIndex |
./pkg/aim_v23/aim_fields_load.F |
229 |
AIM_FIELDS_LOAD |
IF (myIter.EQ.nIter0 .OR. nm0.NE.prevMnthIndex) THEN |
./pkg/aim_v23/aim_fields_load.F |
238 |
AIM_FIELDS_LOAD |
prevMnthIndex = nm0 |
./pkg/aim_v23/aim_fields_load.F |
58 |
AIM_FIELDS_LOAD |
INTEGER prevMnthIndex |
./pkg/aim_v23/aim_fields_load.F |
59 |
AIM_FIELDS_LOAD |
DATA prevMnthIndex / 0 / |
./pkg/aim_v23/aim_fields_load.F |
60 |
AIM_FIELDS_LOAD |
SAVE prevMnthIndex |
./pkg/aim_v23/aim_fields_load.F |
86 |
AIM_FIELDS_LOAD |
IF ( mnthIndex .NE. prevMnthIndex .OR. |
./pkg/aim_v23/aim_fields_load.F |
95 |
AIM_FIELDS_LOAD |
prevMnthIndex = mnthIndex |