| File |
Line number |
Procedure |
Code |
|
./pkg/aim/aim_external_fields_load.F |
55 |
AIM_FIELDS_LOAD |
INTEGER mnthIndex |
|
./pkg/aim/aim_external_fields_load.F |
78 |
AIM_FIELDS_LOAD |
mnthIndex = INT(tYear*12.)+1 |
|
./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/aim_external_fields_load.F |
84 |
AIM_FIELDS_LOAD |
WRITE(fNam,'(A,A,A)' ) 'salb.',mnthNam(mnthIndex),'.ft.bin' |
|
./pkg/aim/aim_external_fields_load.F |
91 |
AIM_FIELDS_LOAD |
WRITE(fNam,'(A,A,A)' ) 'stheta.',mnthNam(mnthIndex),'.ft.bin' |
|
./pkg/aim/aim_external_fields_load.F |
99 |
AIM_FIELDS_LOAD |
WRITE(fNam,'(A,A,A)' ) 'smoist.',mnthNam(mnthIndex),'.ft.bin' |
|
./pkg/aim_v23/aim_fields_load.F |
107 |
AIM_FIELDS_LOAD |
& mnthNam(mnthIndex), aim_MMsufx(1:aim_MMsufxLength) |
|
./pkg/aim_v23/aim_fields_load.F |
110 |
AIM_FIELDS_LOAD |
& mnthNam(mnthIndex), aim_MMsufx(1:aim_MMsufxLength) |
|
./pkg/aim_v23/aim_fields_load.F |
118 |
AIM_FIELDS_LOAD |
& mnthNam(mnthIndex), aim_MMsufx(1:aim_MMsufxLength) |
|
./pkg/aim_v23/aim_fields_load.F |
63 |
AIM_FIELDS_LOAD |
INTEGER mnthIndex |
|
./pkg/aim_v23/aim_fields_load.F |
84 |
AIM_FIELDS_LOAD |
mnthIndex = INT(tYear*12.)+1 |
|
./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 |
|
./pkg/aim_v23/aim_fields_load.F |
99 |
AIM_FIELDS_LOAD |
& mnthNam(mnthIndex), aim_MMsufx(1:aim_MMsufxLength) |