File indexing completed on 2018-06-09 05:10:00 UTC
view on githubraw file Latest commit 46918f1b on 2018-06-01 20:55:34 UTC
785a077159 Alis*0001 #ifdef ALLOW_PTRACERS
0002
0003
0a278985fd Jean*0004
785a077159 Alis*0005
0a278985fd Jean*0006
e6469f285f Jean*0007
785a077159 Alis*0008
0a278985fd Jean*0009
0010
0011
785a077159 Alis*0012
dc3a357327 Jean*0013
0014
9d36aec500 Dimi*0015
0016
dd33ff71a5 Mart*0017
0018
e6469f285f Jean*0019
0020
0021
5d1aafd341 Jean*0022
0023
0024
9d36aec500 Dimi*0025
dc3a357327 Jean*0026 _RL PTRACERS_dTLev(Nr)
55966bc737 Mart*0027 _RL PTRACERS_dumpFreq
9d36aec500 Dimi*0028 _RL PTRACERS_taveFreq
0badf4857e Mart*0029 _RL PTRACERS_monitorFreq
785a077159 Alis*0030 _RL PTRACERS_diffKh(PTRACERS_num)
0031 _RL PTRACERS_diffK4(PTRACERS_num)
d75c5feb26 Jean*0032 _RL PTRACERS_diffKrNr(Nr,PTRACERS_num)
dd33ff71a5 Mart*0033 _RL PTRACERS_ref(Nr,PTRACERS_num)
e6469f285f Jean*0034 _RL PTRACERS_EvPrRn(PTRACERS_num)
5d1aafd341 Jean*0035 _RL PTRACERS_startStepFwd(PTRACERS_num)
0036 _RL PTRACERS_resetFreq(PTRACERS_num)
0037 _RL PTRACERS_resetPhase(PTRACERS_num)
0a278985fd Jean*0038 COMMON /PTRACERS_PARAMS_R/
dc3a357327 Jean*0039 & PTRACERS_dTLev,
0a278985fd Jean*0040 & PTRACERS_dumpFreq,
0041 & PTRACERS_taveFreq,
0042 & PTRACERS_monitorFreq,
0043 & PTRACERS_diffKh,
0044 & PTRACERS_diffK4,
0045 & PTRACERS_diffKrNr,
0046 & PTRACERS_ref,
5d1aafd341 Jean*0047 & PTRACERS_EvPrRn,
0048 & PTRACERS_startStepFwd,
0049 & PTRACERS_resetFreq,
0050 & PTRACERS_resetPhase
0a278985fd Jean*0051
dc3a357327 Jean*0052 #ifdef ALLOW_COST
d217ad1db8 Oliv*0053
282caa8385 Jean*0054
0055 _RL lambdaTr1ClimRelax
0056 COMMON /PTRACERS_OLD_R/
0057 & lambdaTr1ClimRelax
dc3a357327 Jean*0058 #endif
282caa8385 Jean*0059
dc3a357327 Jean*0060
0061
0062
727f3ba9e2 Jean*0063 INTEGER PTRACERS_Iter0
0dcd950fdd Patr*0064 INTEGER PTRACERS_numInUse
1883875e84 Jean*0065 INTEGER PTRACERS_advScheme(PTRACERS_num)
0a278985fd Jean*0066 COMMON /PTRACERS_PARAMS_I/
0067 & PTRACERS_Iter0,
0068 & PTRACERS_numInUse,
0069 & PTRACERS_advScheme
0070
dc3a357327 Jean*0071
fc10d43a89 Jean*0072
d217ad1db8 Oliv*0073
0074
0075
0076
0077
0078
fc10d43a89 Jean*0079
0080
0081
c2ced55abd Jean*0082
fc10d43a89 Jean*0083
0084
0085
0086
dc3a357327 Jean*0087
fc10d43a89 Jean*0088
0aacb0e819 Oliv*0089
0090
46918f1b26 Jean*0091
fc10d43a89 Jean*0092
1883875e84 Jean*0093 LOGICAL PTRACERS_ImplVertAdv(PTRACERS_num)
d31276c95b Jean*0094 LOGICAL PTRACERS_MultiDimAdv(PTRACERS_num)
d217ad1db8 Oliv*0095 LOGICAL PTRACERS_SOM_Advection(PTRACERS_num)
d31276c95b Jean*0096 LOGICAL PTRACERS_AdamsBashGtr(PTRACERS_num)
fc10d43a89 Jean*0097 LOGICAL PTRACERS_AdamsBash_Tr(PTRACERS_num)
785a077159 Alis*0098 LOGICAL PTRACERS_useGMRedi(PTRACERS_num)
1db41719d4 Jean*0099 LOGICAL PTRACERS_useDWNSLP(PTRACERS_num)
785a077159 Alis*0100 LOGICAL PTRACERS_useKPP(PTRACERS_num)
0aacb0e819 Oliv*0101 LOGICAL PTRACERS_linFSConserve(PTRACERS_num)
46918f1b26 Jean*0102 LOGICAL PTRACERS_stayPositive(PTRACERS_num)
fc10d43a89 Jean*0103 LOGICAL PTRACERS_doAB_onGpTr
c2ced55abd Jean*0104 LOGICAL PTRACERS_addSrelax2EmP
dc3a357327 Jean*0105 LOGICAL PTRACERS_startAllTrc
4da58558f5 Oliv*0106 LOGICAL PTRACERS_calcSurfCor
fc10d43a89 Jean*0107 LOGICAL PTRACERS_useRecords
e6469f285f Jean*0108 LOGICAL
de55280acd Mart*0109 & PTRACERS_monitor_mnc, PTRACERS_monitor_stdio,
50653b81f1 Ed H*0110 & PTRACERS_timeave_mdsio, PTRACERS_snapshot_mdsio,
0111 & PTRACERS_pickup_write_mdsio, PTRACERS_pickup_read_mdsio,
0112 & PTRACERS_timeave_mnc, PTRACERS_snapshot_mnc,
0113 & PTRACERS_pickup_write_mnc, PTRACERS_pickup_read_mnc
0a278985fd Jean*0114 COMMON /PTRACERS_PARAMS_L/
1883875e84 Jean*0115 & PTRACERS_ImplVertAdv,
d31276c95b Jean*0116 & PTRACERS_MultiDimAdv,
d217ad1db8 Oliv*0117 & PTRACERS_SOM_Advection,
fc10d43a89 Jean*0118 & PTRACERS_AdamsBashGtr, PTRACERS_AdamsBash_Tr,
46918f1b26 Jean*0119 & PTRACERS_useGMRedi, PTRACERS_useDWNSLP, PTRACERS_useKPP,
0120 & PTRACERS_linFSConserve, PTRACERS_stayPositive,
fc10d43a89 Jean*0121 & PTRACERS_doAB_onGpTr,
c2ced55abd Jean*0122 & PTRACERS_addSrelax2EmP,
dc3a357327 Jean*0123 & PTRACERS_startAllTrc,
4da58558f5 Oliv*0124 & PTRACERS_calcSurfCor,
fc10d43a89 Jean*0125 & PTRACERS_useRecords,
50653b81f1 Ed H*0126 & PTRACERS_timeave_mdsio, PTRACERS_snapshot_mdsio,
0127 & PTRACERS_pickup_write_mdsio, PTRACERS_pickup_read_mdsio,
de55280acd Mart*0128 & PTRACERS_monitor_stdio, PTRACERS_monitor_mnc,
50653b81f1 Ed H*0129 & PTRACERS_timeave_mnc, PTRACERS_snapshot_mnc,
0130 & PTRACERS_pickup_write_mnc, PTRACERS_pickup_read_mnc
785a077159 Alis*0131
dc3a357327 Jean*0132
0a278985fd Jean*0133 CHARACTER*(MAX_LEN_FNAM) PTRACERS_initialFile(PTRACERS_num)
0134 CHARACTER*(MAX_LEN_FNAM) PTRACERS_names(PTRACERS_num)
0135 CHARACTER*(MAX_LEN_FNAM) PTRACERS_long_names(PTRACERS_num)
0136 CHARACTER*(MAX_LEN_FNAM) PTRACERS_units(PTRACERS_num)
0137 COMMON /PTRACERS_PARAMS_C/
0138 & PTRACERS_initialFile,
0139 & PTRACERS_names,
0140 & PTRACERS_long_names,
0141 & PTRACERS_units
de55280acd Mart*0142
01111eb599 Jean*0143
0144
0145 COMMON /PTRACERS_LABELS/
0146 & PTRACERS_ioLabel
0147 CHARACTER*2 PTRACERS_ioLabel(PTRACERS_num)
0148
785a077159 Alis*0149 #endif /* ALLOW_PTRACERS */
d2825c6d08 Ed H*0150
0151
0152
0153