File indexing completed on 2023-03-29 05:10:06 UTC
view on githubraw file Latest commit cda1c18f on 2023-03-28 22:31:47 UTC
4125e77f3d Jean*0001
0002
0003
b66a4a990e Gael*0004
0005 INTEGER NSSHV4COST
0006 PARAMETER ( NSSHV4COST=5 )
0007
0008 character*(MAX_LEN_FNAM) tbarfile
0009 character*(MAX_LEN_FNAM) sbarfile
0010 character*(MAX_LEN_FNAM) sstbarfile
0011 character*(MAX_LEN_FNAM) psbarfile
0012 character*(MAX_LEN_FNAM) bpbarfile
0013 character*(MAX_LEN_FNAM) iestaubarfile
0014 character*(MAX_LEN_FNAM) ubarfile
0015 character*(MAX_LEN_FNAM) vbarfile
0016 character*(MAX_LEN_FNAM) wbarfile
0017 character*(MAX_LEN_FNAM) tauxbarfile
0018 character*(MAX_LEN_FNAM) tauybarfile
0019 character*(MAX_LEN_FNAM) hfluxmeanbarfile
0020 character*(MAX_LEN_FNAM) sfluxmeanbarfile
0021 character*(MAX_LEN_FNAM) costTranspDataFile
0022
0023 _RL mult_hflux
0024 _RL mult_sflux
0025 _RL mult_hfluxmm
0026 _RL mult_sfluxmm
0027 _RL mult_tauu
0028 _RL mult_tauv
0029 _RL mult_hmean
0030 _RL mult_h
0031 _RL mult_tp
0032 _RL mult_ers
0033 _RL mult_gfo
0034 _RL mult_sshv4cost(NSSHV4COST)
0035 _RL mult_temp
0036 _RL mult_salt
0037 _RL mult_temp0
0038 _RL mult_salt0
0039 _RL mult_etan0
0040 _RL mult_uvel0
0041 _RL mult_vvel0
0042 _RL mult_sst
0043 _RL mult_tmi
0044 _RL mult_sss
0045 _RL mult_bp
0046 _RL mult_ies
0047 _RL mult_ctdt
0048 _RL mult_ctds
0049 _RL mult_ctdtclim
0050 _RL mult_ctdsclim
0051 _RL mult_xbt
0052 _RL mult_argot
0053 _RL mult_argos
0054 _RL mult_usercost(NUSERCOST)
0055 _RL mult_drift
0056 _RL mult_tdrift
0057 _RL mult_sdrift
0058 _RL mult_wdrift
0059 _RL mult_scatx
0060 _RL mult_scaty
0061 _RL mult_atemp
0062 _RL mult_aqh
0063 _RL mult_precip
0064 _RL mult_swflux
0065 _RL mult_swdown
0066 _RL mult_snowprecip
0067 _RL mult_lwflux
0068 _RL mult_lwdown
0069 _RL mult_evap
0070 _RL mult_apressure
4125e77f3d Jean*0071
b66a4a990e Gael*0072 _RL mult_uwind
0073 _RL mult_vwind
0074 _RL mult_curmtr
0075 _RL mult_kapgm
0076 _RL mult_kapredi
0077 _RL mult_diffkr
4125e77f3d Jean*0078
b66a4a990e Gael*0079 _RL mult_edtau
0080 _RL mult_bottomdrag
0081 _RL mult_smooth_ic
0082 _RL mult_smooth_bc
0083 _RL mult_transp
0084
0085 character*(MAX_LEN_FNAM) hflux_errfile
0086 character*(MAX_LEN_FNAM) sflux_errfile
0087 character*(MAX_LEN_FNAM) tauu_errfile
0088 character*(MAX_LEN_FNAM) tauv_errfile
4125e77f3d Jean*0089
0090
0091
0092
b66a4a990e Gael*0093 character*(MAX_LEN_FNAM) scatx_errfile
0094 character*(MAX_LEN_FNAM) scaty_errfile
4125e77f3d Jean*0095
0096
b66a4a990e Gael*0097 character*(MAX_LEN_FNAM) geoid_errfile
0098 character*(MAX_LEN_FNAM) geoid_covariancefile
0099 character*(MAX_LEN_FNAM) ssh_errfile
0100 character*(MAX_LEN_FNAM) tp_errfile
0101 character*(MAX_LEN_FNAM) ers_errfile
0102 character*(MAX_LEN_FNAM) gfo_errfile
0103 character*(MAX_LEN_FNAM) sshv4cost_scalefile(NSSHV4COST)
0104 character*(MAX_LEN_FNAM) sshv4cost_errfile(NSSHV4COST)
4125e77f3d Jean*0105
0106
0107
b66a4a990e Gael*0108 character*(MAX_LEN_FNAM) udrifterrfile
0109 character*(MAX_LEN_FNAM) vdrifterrfile
0110 character*(MAX_LEN_FNAM) salterrfile
0111 character*(MAX_LEN_FNAM) temperrfile
0112 character*(MAX_LEN_FNAM) velerrfile
0113 character*(MAX_LEN_FNAM) salt0errfile
0114 character*(MAX_LEN_FNAM) temp0errfile
0115 character*(MAX_LEN_FNAM) etan0errfile
0116 character*(MAX_LEN_FNAM) uvel0errfile
0117 character*(MAX_LEN_FNAM) vvel0errfile
0118 character*(MAX_LEN_FNAM) vel0errfile
0119 character*(MAX_LEN_FNAM) ssterrfile
0120 character*(MAX_LEN_FNAM) ssserrfile
0121 character*(MAX_LEN_FNAM) bperrfile
0122 character*(MAX_LEN_FNAM) ieserrfile
0123 character*(MAX_LEN_FNAM) atemp_errfile
0124 character*(MAX_LEN_FNAM) aqh_errfile
0125 character*(MAX_LEN_FNAM) precip_errfile
0126 character*(MAX_LEN_FNAM) swflux_errfile
0127 character*(MAX_LEN_FNAM) swdown_errfile
0128 character*(MAX_LEN_FNAM) snowprecip_errfile
0129 character*(MAX_LEN_FNAM) lwflux_errfile
0130 character*(MAX_LEN_FNAM) lwdown_errfile
0131 character*(MAX_LEN_FNAM) evap_errfile
0132 character*(MAX_LEN_FNAM) apressure_errfile
4125e77f3d Jean*0133
b66a4a990e Gael*0134 character*(MAX_LEN_FNAM) edtau_errfile
0135 character*(MAX_LEN_FNAM) kapgm_errfile
0136 character*(MAX_LEN_FNAM) kapredi_errfile
0137 character*(MAX_LEN_FNAM) diffkr_errfile
0138 character*(MAX_LEN_FNAM) bottomdrag_errfile
0139 character*(MAX_LEN_FNAM) usercost_errfile(NUSERCOST)
0140 character*(MAX_LEN_FNAM) uwind_errfile
0141 character*(MAX_LEN_FNAM) vwind_errfile
0142
0143 _RL whflux0
0144 _RL wsflux0
0145 _RL wtau0
0146 _RL watemp0
0147 _RL waqh0
0148 _RL wprecip0
0149 _RL wswflux0
0150 _RL wswdown0
0151 _RL wsnowprecip0
0152 _RL wlwflux0
0153 _RL wlwdown0
0154 _RL wevap0
0155 _RL wapressure0
4125e77f3d Jean*0156
b66a4a990e Gael*0157 _RL wbottomdrag0
0158 _RL wwind0
0159 _RL wdiffkr0
0160 _RL wkapgm0
0161 _RL wkapredi0
0162 _RL wedtau0
0163
0164 _RL wmean_hflux
0165 _RL wmean_sflux
0166 _RL wmean_tau
0167 _RL wmean_atemp
0168 _RL wmean_aqh
0169 _RL wmean_precip
0170 _RL wmean_swflux
0171 _RL wmean_swdown
0172 _RL wmean_snowprecip
0173 _RL wmean_lwflux
0174 _RL wmean_lwdown
0175 _RL wmean_evap
0176 _RL wmean_apressure
4125e77f3d Jean*0177
b66a4a990e Gael*0178 _RL wmean_wind
0179
0180 character*(MAX_LEN_FNAM) tdatfile
0181 character*(MAX_LEN_FNAM) sdatfile
0182 character*(MAX_LEN_FNAM) scatxdatfile
0183 character*(MAX_LEN_FNAM) scatydatfile
0184 character*(MAX_LEN_FNAM) sstdatfile
0185 character*(MAX_LEN_FNAM) tmidatfile
0186 character*(MAX_LEN_FNAM) sssdatfile
0187 character*(MAX_LEN_FNAM) bpdatfile
0188 character*(MAX_LEN_FNAM) iesdatfile
0189 character*(MAX_LEN_FNAM) mdtdatfile
0190 character*(MAX_LEN_FNAM) topexfile
0191 character*(MAX_LEN_FNAM) ersfile
0192 character*(MAX_LEN_FNAM) gfofile
0193 character*(MAX_LEN_FNAM) ctdtfile
0194 character*(MAX_LEN_FNAM) ctdsfile
0195 character*(MAX_LEN_FNAM) ctdtclimfile
0196 character*(MAX_LEN_FNAM) ctdsclimfile
0197 character*(MAX_LEN_FNAM) xbtfile
0198 character*(MAX_LEN_FNAM) argotfile
0199 character*(MAX_LEN_FNAM) argosfile
0200 character*(MAX_LEN_FNAM) usercost_datafile(NUSERCOST)
0201 character*(MAX_LEN_FNAM) udriftfile
0202 character*(MAX_LEN_FNAM) vdriftfile
0203 character*(MAX_LEN_FNAM) curmtrufile
0204 character*(MAX_LEN_FNAM) curmtrvfile
0205
4125e77f3d Jean*0206
0207
0208
0209
0210
0211
0212
0213
0214
0215
0216
0217
0218
0219
b66a4a990e Gael*0220
0221 integer tmistartdate1
0222 integer tmistartdate2
0223 integer sststartdate1
0224 integer sststartdate2
0225 integer sssstartdate1
0226 integer sssstartdate2
0227 integer bpstartdate1
0228 integer bpstartdate2
0229 integer iesstartdate1
0230 integer iesstartdate2
0231 integer argotstartdate1
0232 integer argotstartdate2
0233 integer argosstartdate1
0234 integer argosstartdate2
0235 integer topexstartdate1
0236 integer topexstartdate2
0237 integer ersstartdate1
0238 integer ersstartdate2
0239 integer gfostartdate1
0240 integer gfostartdate2
0241 integer scatstartdate1
0242 integer scatstartdate2
0243 integer mdtstartdate1
0244 integer mdtstartdate2
0245 integer mdtenddate1
0246 integer mdtenddate2
0247
0248 _RL topexperiod
0249 _RL ersperiod
0250 _RL gfoperiod
0251 _RL scatperiod
0252
0253 _RL topexintercept
0254 _RL ersintercept
0255 _RL gfointercept
0256 _RL topexslope
0257 _RL ersslope
0258 _RL gfoslope
0259
0260 _RL sshv4cost_errfactor(NSSHV4COST)
0261
0262 character*(MAX_LEN_FNAM) tpTimeMaskFile
0263 character*(MAX_LEN_FNAM) ersTimeMaskFile
0264 character*(MAX_LEN_FNAM) gfoTimeMaskFile
0265
4125e77f3d Jean*0266
0267
0268