| File |
Line number |
Procedure |
Code |
|
./pkg/dic/dic_surfforcing_init.F |
45 |
DIC_SURFFORCING_INIT |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/dic/dic_surfforcing_init.F |
70 |
DIC_SURFFORCING_INIT |
Ifcyc=int(externForcingCycle*rdt+0.5) |
|
./pkg/dic/dic_surfforcing_init.F |
71 |
DIC_SURFFORCING_INIT |
Iftm=mod( Imytm+Ifcyc-Ifprd/2 ,Ifcyc) |
|
./pkg/dic/dic_fields_load.F |
46 |
DIC_FIELDS_LOAD |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/dic/dic_fields_load.F |
60 |
DIC_FIELDS_LOAD |
Ifcyc=int(externForcingCycle*rdt+0.5) |
|
./pkg/dic/dic_fields_load.F |
61 |
DIC_FIELDS_LOAD |
Iftm=mod( Imytm+Ifcyc-Ifprd/2 ,Ifcyc) |
|
./pkg/dic/dic_aver_final.F |
47 |
DIC_AVER_FINAL |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/dic/dic_aver.F |
47 |
DIC_AVER |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/dic/dic_aver.F |
73 |
DIC_AVER |
Ifcyc=int(externForcingCycle*rdt+0.5) |
|
./pkg/dic/dic_aver.F |
74 |
DIC_AVER |
Iftm=mod( Imytm+Ifcyc ,Ifcyc) |
|
./pkg/dic/dic_aver_init.F |
51 |
DIC_AVER_INIT |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/obcs/obcs_external_fields_load.F |
70 |
OBCS_EXTERNAL_FIELDS_LOAD |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/obcs/obcs_external_fields_load.F |
80 |
OBCS_EXTERNAL_FIELDS_LOAD |
Ifcyc=int(externForcingCycle*rdt+0.5) |
|
./pkg/obcs/obcs_external_fields_load.F |
81 |
OBCS_EXTERNAL_FIELDS_LOAD |
Iftm=mod( Imytm+Ifcyc-Ifprd/2 ,Ifcyc) |
|
./pkg/bulk_force/bulkf_fields_load.F |
128 |
BULKF_FIELDS_LOAD |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/bulk_force/bulkf_fields_load.F |
182 |
BULKF_FIELDS_LOAD |
Ifcyc=int(externForcingCycle*rdt+0.5) |
|
./pkg/bulk_force/bulkf_fields_load.F |
183 |
BULKF_FIELDS_LOAD |
Iftm=mod( Imytm+Ifcyc-Ifprd/2 ,Ifcyc) |
|
./model/src/external_fields_load.F |
101 |
EXTERNAL_FIELDS_LOAD |
Ifcyc = NINT(externForcingCycle*rdt) |
|
./model/src/external_fields_load.F |
102 |
EXTERNAL_FIELDS_LOAD |
Iftm = MOD( Imytm+Ifcyc-Ifprd/2, Ifcyc) |
|
./model/src/external_fields_load.F |
64 |
EXTERNAL_FIELDS_LOAD |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./verification/natl_box/code/external_fields_load.F |
63 |
EXTERNAL_FIELDS_LOAD |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./verification/natl_box/code/external_fields_load.F |
94 |
EXTERNAL_FIELDS_LOAD |
Ifcyc=int(externForcingCycle*rdt) |
|
./verification/natl_box/code/external_fields_load.F |
95 |
EXTERNAL_FIELDS_LOAD |
Iftm=mod( Imytm ,Ifcyc) |
|
./pkg/cfc/cfc_fields_load.F |
46 |
CFC_FIELDS_LOAD |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/cfc/cfc_fields_load.F |
71 |
CFC_FIELDS_LOAD |
Ifcyc=int(externForcingCycle*rdt+0.5) |
|
./pkg/cfc/cfc_fields_load.F |
72 |
CFC_FIELDS_LOAD |
Iftm=mod( Imytm+Ifcyc-Ifprd/2 ,Ifcyc) |
|
./pkg/offline/offline_fields_load.F |
102 |
OFFLINE_FIELDS_LOAD |
INTEGER nForcingPeriods,Imytm,Ifprd,Ifcyc,Iftm |
|
./pkg/offline/offline_fields_load.F |
145 |
OFFLINE_FIELDS_LOAD |
Ifcyc=int(offlineForcingCycle*rdt+0.5) |
|
./pkg/offline/offline_fields_load.F |
146 |
OFFLINE_FIELDS_LOAD |
Iftm=mod( Imytm+Ifcyc-Ifprd/2 ,Ifcyc) |