Changeset 4605 for TOOLS/CMIP6_FORCING/AER_STRAT/volc.sh
- Timestamp:
- 07/04/19 18:56:39 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
TOOLS/CMIP6_FORCING/AER_STRAT/volc.sh
r4473 r4605 1 1 dirpwd=`pwd` 2 2 3 #original CMIP6 files 4 vv='v3' 5 #corrected CMIP6 files + extended in time 3 6 vv='v4' 4 7 5 8 #--choose the resolution 6 9 #--only LR and zoom works fully for now ! 7 #lmdz='VVLR '8 #lmdz='VLR_L79'9 #lmdz='VLR '10 lmdz='LR'11 #lmdz='MR '10 #lmdz='VVLR_l19' 11 lmdz='VLR_l39' 12 #lmdz='VLR_l79' 13 #lmdz='LR_l79' 14 #lmdz='MR_l79' 12 15 #--added for Frederique Cheruy 13 #lmdz='zoom_128x89 '16 #lmdz='zoom_128x89_l79' 14 17 15 18 dirout='/data/'${USER}'/CMIP6/VOLC/'${lmdz}'_'${vv}'/' … … 26 29 lmdz='${lmdz}' 27 30 ; 28 if (lmdz eq 'VVLR ') then begin31 if (lmdz eq 'VVLR_l19') then begin 29 32 dimlonlmdz=48 30 33 dimlatlmdz=37 31 34 dimz=19 32 output='/data/${USER}/CMIP6/VOLC/ VVLR_${vv}/'35 output='/data/${USER}/CMIP6/VOLC/${lmdz}_${vv}/' 33 36 latfirst=90. 34 37 latinc=-180./float(dimlatlmdz-1) … … 36 39 endif 37 40 38 if (lmdz eq 'VLR ') then begin41 if (lmdz eq 'VLR_l39') then begin 39 42 dimlonlmdz=96 40 43 dimlatlmdz=96 41 44 dimz=39 42 output='/data/${USER}/CMIP6/VOLC/ VLR_${vv}/'45 output='/data/${USER}/CMIP6/VOLC/${lmdz}_${vv}/' 43 46 latfirst=90. 44 47 latinc=-180./float(dimlatlmdz-1) … … 46 49 endif 47 50 48 if (lmdz eq 'VLR_ L79') then begin51 if (lmdz eq 'VLR_l79') then begin 49 52 dimlonlmdz=96 50 53 dimlatlmdz=96 51 54 dimz=79 52 output='/data/${USER}/CMIP6/VOLC/ VLR_L79_${vv}/'55 output='/data/${USER}/CMIP6/VOLC/${lmdz}_${vv}/' 53 56 latfirst=90. 54 57 latinc=-180./float(dimlatlmdz-1) … … 56 59 endif 57 60 58 if (lmdz eq 'LR ') then begin61 if (lmdz eq 'LR_l79') then begin 59 62 dimlonlmdz=144 60 63 dimlatlmdz=143 61 64 dimz=79 62 output='/data/${USER}/CMIP6/VOLC/ LR_${vv}/'65 output='/data/${USER}/CMIP6/VOLC/${lmdz}_${vv}/' 63 66 latfirst=90. 64 67 latinc=-180./float(dimlatlmdz-1) … … 66 69 endif 67 70 68 if (lmdz eq 'MR ') then begin71 if (lmdz eq 'MR_l79') then begin 69 72 dimlonlmdz=256 70 73 dimlatlmdz=257 71 74 dimz=79 72 output='/data/${USER}/CMIP6/VOLC/ MR_${vv}/'75 output='/data/${USER}/CMIP6/VOLC/${lmdz}_${vv}/' 73 76 latfirst=90. 74 77 latinc=-180./float(dimlatlmdz-1) … … 76 79 endif 77 80 78 if (lmdz eq 'zoom_128x89 ') then begin81 if (lmdz eq 'zoom_128x89_l79') then begin 79 82 dimlonlmdz=128 80 83 dimlatlmdz=89 … … 152 155 zz=fltarr(dimz) 153 156 ; 154 ;---approximate altitudes of LMDZ - L19 and L39155 ;---NOT RECOMMENDED156 ;157 if (dimz eq 19) then begin158 zz=[ 0.07125416, 0.2402302, 0.4865242, 0.8627044, 1.426484, 2.244528, $159 3.394085, 4.952366, 6.950302, 9.26943, 11.59338, 13.71214, 15.83651, $160 18.27338, 21.16397, 24.63156, 28.9039, 34.57184, 44.51565] ;161 endif162 ;163 if (dimz eq 39) then begin164 zz=[0.0338988, 0.1106602, 0.2139233, 0.3609663, 0.5685416, 0.8534464, $165 1.233232, 1.726868, 2.355076, 3.139813, 4.101937, 5.25541, 6.596076, $166 8.085103, 9.636482, 11.13441, 12.50023, 13.75765, 15.00424, 16.32207, $167 17.74403, 19.27899, 20.93219, 22.70941, 24.61736, 26.66389, 28.85831, $168 31.21178, 33.73778, 36.45278, 39.37709, 42.53607, 45.96209, 49.69786, $169 53.80379, 58.37727, 63.61497, 70.07092, 80.52708]170 endif171 ;172 157 ;---exact altitudes of LMDZ -- L79 173 ;--only exists for LR, MR and zoom_128x89 at the moment 174 if (dimz eq 79) then begin 175 filename='./zalt_zonmean_${lmdz}_l79_rev.nc' 176 NETCDFREAD,filename,'GEOP',zz,dimzz 177 NETCDFREAD,filename,'LAT',zzlat,dimzzlat 178 NETCDFREAD,filename,'TIME_COUNTER',zztime,dimzztime 179 dimzzilat=dimzzlat[0] 180 dimzzitime=dimzztime[0] 181 ;--becareful zz comes with four dimensions 182 ;--lon lat k time 183 print, 'GEOP size=', size(zz) 184 ;--becareful zzlat comes with South Pole first 185 print, 'LAT from zalt field=', zzlat 186 if (dimzzilat ne dimlatlmdz) then begin 187 print , 'PB dimension latitude' 188 endif 189 endif 190 ; 191 if (dimz eq 39) then begin 192 filename='./zalt_zonmean_${lmdz}_l39_rev.nc' 193 NETCDFREAD,filename,'GEOP',zz,dimzz 194 NETCDFREAD,filename,'LAT',zzlat,dimzzlat 195 NETCDFREAD,filename,'TIME_COUNTER',zztime,dimzztime 196 dimzzilat=dimzzlat[0] 197 dimzzitime=dimzztime[0] 198 ;--becareful zz comes with four dimensions 199 ;--lon lat k time 200 print, 'GEOP size=', size(zz) 201 ;--becareful zzlat comes with South Pole first 202 print, 'LAT from zalt field=', zzlat 203 if (dimzzilat ne dimlatlmdz) then begin 204 print , 'PB dimension latitude' 205 endif 158 ;--only exists for VLR, LR, MR and zoom_128x89 at the moment 159 ; 160 filename='/bdd/input4MIPs/ZALT/zalt_zonmean_${lmdz}_rev.nc' 161 NETCDFREAD,filename,'GEOP',zz,dimzz 162 NETCDFREAD,filename,'LAT',zzlat,dimzzlat 163 NETCDFREAD,filename,'TIME_COUNTER',zztime,dimzztime 164 dimzzilat=dimzzlat[0] 165 dimzzitime=dimzztime[0] 166 ;--becareful zz comes with four dimensions 167 ;--lon lat k time 168 print, 'GEOP size=', size(zz) 169 ;--becareful zzlat comes with South Pole first 170 print, 'LAT from zalt field=', zzlat 171 if (dimzzilat ne dimlatlmdz) then begin 172 print , 'PB dimension latitude' 206 173 endif 207 174 ; … … 578 545 cd $dirpwd 579 546 580 module load idl581 582 547 idl << eof 583 548 .r netcdf
Note: See TracChangeset
for help on using the changeset viewer.