Changeset 4495 for branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG
- Timestamp:
- 2014-02-10T16:51:42+01:00 (10 years ago)
- Location:
- branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts
- Files:
-
- 9 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_AMOC.pro
r4394 r4495 98 98 , small = [1, 2, 1], TITLE = title, YTITLE = varunit, _extra = ex 99 99 IF prefix NE prefix2 then begin 100 title = prefix+' '+d1_d2+' - '+prefix2+' '+d1_d2_2+'!C'+'Max Atlantic MOC between 40N and 50N' 101 pltt, t45 - t45_2, 't', -9., 9., date1, date2, /REMPLI, /NOERASE $ 102 , COLOR = 250, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex 100 title = prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2+'!C'+'Max Atlantic MOC between 40N and 50N' 101 pltt, t45, 't', 0., 30., date1, date2, /REMPLI, /NOERASE $ 102 , small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex ; BLACK 103 pltt, t45_2, 't', 0., 30., date1, date2, /REMPLI, /NOERASE $ 104 , /ov1d, COLOR = 250, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex ; RED 103 105 endif 104 106 … … 111 113 , small = [1, 2, 1], TITLE = title, YTITLE = varunit, _extra = ex 112 114 if prefix NE prefix2 then begin 113 title = prefix+' '+d1_d2+' - '+prefix2+' '+d1_d2_2+'!C'+'Max AntArctic Bottom Water between 80S and 65S' 114 pltt, -t70 + t70_2, 't', -5., 5., date1, date2, /REMPLI, /NOERASE $ 115 , COLOR = 250, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex 115 title = prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2+'!C'+'Max AntArctic Bottom Water between 80S and 65S' 116 pltt, -t70, 't', 0., 20., date1, date2, /REMPLI, /NOERASE $ 117 , small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex ; BLACK 118 pltt, -t70_2, 't', 0., 20., date1, date2, /REMPLI, /NOERASE $ 119 , /ov1d, COLOR = 250, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex ; RED 116 120 endif 117 121 … … 124 128 , small = [1, 2, 1], TITLE = title, YTITLE = varunit, _extra = ex 125 129 if prefix NE prefix2 then begin 126 title = prefix+' '+d1_d2+' - '+prefix2+' '+d1_d2_2+'!C'+'Max AntArctic Bottom Cell between 65S and 30N' 127 pltt, -t50 + t50_2, 't', -5., 5., date1, date2, /REMPLI, /NOERASE $ 128 , COLOR = 250, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex 130 title = prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2+'!C'+'Max AntArctic Bottom Cell between 65S and 30N' 131 pltt, -t50 , 't', 5., 30., date1, date2, /REMPLI, /NOERASE $ 132 , small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex ; BLACK 133 pltt, -t50_2, 't', 5., 30., date1, date2, /REMPLI, /NOERASE $ 134 , /ov1d, COLOR = 250, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex ; RED 129 135 endif 130 136 -
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_Drake.pro
r4394 r4495 59 59 time = tsave & IF n_elements(time) NE jpt THEN stop 60 60 61 title = prefix+' '+d1_d2+' - '+prefix2+' '+d1_d2_2+'!C'+blabla 62 pltt, drk1 - drk2, 't', -30., 30., date1, date2, /REMPLI, /NOERASE $ 63 , COLOR = 250, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex 61 title = prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2+'!C'+blabla 62 pltt, drk1 , 't', 0., 200., date1, date2, /REMPLI, /NOERASE $ 63 , COLOR = 000, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex ; BLACK 64 pltt, drk2, 't', 0., 200., date1, date2, /REMPLI, /NOERASE $ 65 , /ov1d, COLOR = 250, small = [1, 2, 2], TITLE = title, YTITLE = varunit, _extra = ex ; RED 64 66 65 67 endif -
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_ICE.pro
r4395 r4495 88 88 ICE_S_15 = {arr:ICE_S_15 * 1.e-12, unit : '10^12 m^2'} 89 89 ; 90 title = 'Northern Hemisphere'+'!C'+prefix+' '+d1_d2+'!C'+' Global Annual Mean Ice Area (BLACK)'+'!C'+ 'and Extend minus 15% (BLUE)'+'!C'+'Observation(DASHED)'90 title = 'Northern Hemisphere'+'!C'+prefix+' (BLACK) '+d1_d2+'!C'+'OBSERVATION (light blue) '+'!C'+' Global Annual Mean Ice Area (CONTINUOUS) '+'!C'+ 'and Extend minus 15% (DASHED)' 91 91 jpt=12 92 92 time=julday(1,15,1900)+30*lindgen(12) 93 pltt, ICE_N, 't', 0., 15., 19000101, 19001231,/REMPLI, /PORTRAIT, MIN = 4., MAX = 16. $93 pltt, ICE_N, 't', 0., 15., /REMPLI, /PORTRAIT, MIN = 4., MAX = 16. $ 94 94 , COLOR = 000 , small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 95 pltt, ICE_N_15, 't', 0., 15., 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $ ;;; dashed lines is LINESTYLE=2 $95 pltt, ICE_N_15, 't', 0., 15., /REMPLI, /PORTRAIT, LINESTYLE=2 $ ;;; dashed lines is LINESTYLE=2 $ 96 96 , /ov1d, COLOR = 000, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 97 pltt, vICE_area_NH, 't', 0., 15., 19000101, 19001231,/REMPLI, /PORTRAIT $97 pltt, vICE_area_NH, 't', 0., 15., /REMPLI, /PORTRAIT $ 98 98 , /ov1d, COLOR = 100, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 99 pltt, vICE_ext_NH, 't', 0., 15., 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $ ;;; dashed lines is LINESTYLE=2 $99 pltt, vICE_ext_NH, 't', 0., 15., /REMPLI, /PORTRAIT, LINESTYLE=2 $ ;;; dashed lines is LINESTYLE=2 $ 100 100 , /ov1d, COLOR = 100, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 101 101 ; 102 title = 'Southern Hemisphere !C'+prefix+' '+d1_d2+' - '+'!C'+'Global Annual Mean Ice Area (BLACK)'+'!C'+ 'and Extend minus 15% (BLUE)'+'!C'+'Observation(DASHED)'103 pltt, ICE_S, 't', 0., 15., 19000101 ,19001231 ,/REMPLI, /NOERASE , MIN = 0., MAX = 20. $102 title = 'Southern Hemisphere'+'!C'+prefix+' (BLACK) '+d1_d2+'!C'+'OBSERVATION (light blue) '+'!C'+' Global Annual Mean Ice Area (CONTINUOUS) '+'!C'+ 'and Extend minus 15% (DASHED)' 103 pltt, ICE_S, 't', 0., 15., /REMPLI, /NOERASE , MIN = 0., MAX = 20. $ 104 104 ,COLOR = 000, small = [1, 2, 2], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 105 pltt, ICE_S_15, 't', 0., 15., 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $105 pltt, ICE_S_15, 't', 0., 15., /REMPLI, /PORTRAIT, LINESTYLE=2 $ 106 106 , /ov1d, COLOR = 000, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 107 pltt, vICE_area_SH, 't', 0., 15., 19000101, 19001231,/REMPLI, /PORTRAIT $107 pltt, vICE_area_SH, 't', 0., 15., /REMPLI, /PORTRAIT $ 108 108 , /ov1d, COLOR = 100, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 109 pltt, vICE_ext_SH, 't', 0., 15., 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $109 pltt, vICE_ext_SH, 't', 0., 15., /REMPLI, /PORTRAIT, LINESTYLE=2 $ 110 110 , /ov1d, COLOR = 100, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 111 111 ; … … 162 162 jpt=12 163 163 time=julday(1,15,1900)+30*lindgen(12) 164 pltt, ICE_N .arr, 't', -.2, .2, 19000101, 19001231, /REMPLI, /PORTRAIT,MIN = 4., MAX = 16., window = 2 $164 pltt, ICE_N, 't', -.2, .2, /REMPLI, /PORTRAIT, MIN = 4., MAX = 16., window = 2 $ 165 165 , COLOR = 000, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex ; BLACK 166 pltt, ICE_N2 .arr, 't', -.2, .2, 19000101, 19001231, /REMPLI, /PORTRAIT, window = 2$166 pltt, ICE_N2, 't', -.2, .2, /REMPLI, /PORTRAIT $ 167 167 , /ov1d, COLOR = 250, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex ; RED 168 pltt, ICE_N_15 .arr, 't', -.2, .2, 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $ ; linee tratteggiate LINESTYLE=2 $168 pltt, ICE_N_15, 't', -.2, .2, /REMPLI, /PORTRAIT, LINESTYLE=2 $ ; linee tratteggiate LINESTYLE=2 $ 169 169 , /ov1d, COLOR = 000, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 170 pltt, ICE_N2_15 .arr , 't', -.2, .2, 19000101, 19001231, /REMPLI, /PORTRAIT, LINESTYLE=2 $ ; linee tratteggiate LINESTYLE=2 $170 pltt, ICE_N2_15, 't', -.2, .2, /REMPLI, /PORTRAIT, LINESTYLE=2 $ ; linee tratteggiate LINESTYLE=2 $ 171 171 , /ov1d, COLOR = 250, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 172 pltt, vICE_area_NH, 't', -2., 2., 19000101, 19001231,/REMPLI, /PORTRAIT $172 pltt, vICE_area_NH, 't', -2., 2., /REMPLI, /PORTRAIT $ 173 173 , /ov1d, COLOR = 100, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex ; light blue 174 pltt, vICE_ext_NH, 't', -2., 2., 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $174 pltt, vICE_ext_NH, 't', -2., 2., /REMPLI, /PORTRAIT, LINESTYLE=2 $ 175 175 , /ov1d, COLOR = 100, small = [1, 2, 1], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex ; blu scuro 176 176 ; 177 177 title ='Southern Hemisphere'+'!C'+prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2+'!C'+'OBSERVATION (light blue) '+'!C'+'Global Annual Mean Ice Area (CONTINUS)'+'!C'+ 'and Extend minus 15% (DASHED)' 178 178 ; title ='Southern Hemisphere'+'!C' 179 pltt, ICE_S.arr, 't', -2., 2., 19000101, 19001231,/REMPLI, /NOERASE, MIN = 0., MAX = 20. $179 pltt, ICE_S.arr, 't', -2., 2., /REMPLI, /NOERASE, MIN = 0., MAX = 20. $ 180 180 , COLOR = 000, small = [1, 2, 2], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 181 pltt, ICE_S2.arr, 't', -2., 2., 19000101, 19001231,/REMPLI, /NOERASE $181 pltt, ICE_S2.arr, 't', -2., 2., /REMPLI, /NOERASE $ 182 182 , /ov1d, COLOR = 250, small = [1, 2, 2], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 183 pltt, ICE_S_15.arr , 't', -2., 2., 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $ ; linee tratteggiate LINESTYLE=2 $183 pltt, ICE_S_15.arr , 't', -2., 2., /REMPLI, /PORTRAIT, LINESTYLE=2 $ ; linee tratteggiate LINESTYLE=2 $ 184 184 , /ov1d, COLOR = 000, small = [1, 2, 2], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 185 pltt, ICE_S2_15.arr , 't', -2., 2., 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $ ; linee tratteggiate LINESTYLE=2 $185 pltt, ICE_S2_15.arr , 't', -2., 2., /REMPLI, /PORTRAIT, LINESTYLE=2 $ ; linee tratteggiate LINESTYLE=2 $ 186 186 , /ov1d, COLOR = 250, small = [1, 2, 2], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 187 pltt, vICE_area_SH, 't', -2., 2., 19000101, 19001231,/REMPLI, /PORTRAIT $187 pltt, vICE_area_SH, 't', -2., 2., /REMPLI, /PORTRAIT $ 188 188 , /ov1d, COLOR = 100, small = [1, 2, 2], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 189 pltt, vICE_ext_SH, 't', -2., 2., 19000101, 19001231,/REMPLI, /PORTRAIT, LINESTYLE=2 $189 pltt, vICE_ext_SH, 't', -2., 2., /REMPLI, /PORTRAIT, LINESTYLE=2 $ 190 190 , /ov1d, COLOR = 100, small = [1, 2, 2], YTITLE = '10^12 m^2 ', TITLE = title, _extra = ex 191 191 ; -
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_ICE_FRAM.pro
r4395 r4495 71 71 ICE_area_export = reform(ICE_area_export, 12, nyr) 72 72 ICE_area_export = total(ICE_area_export,2)/nyr 73 ICE_area_export = {arr:ICE_area_export * 1.e-12 * 86400 * 365 , unit : '10^6 Km^2/year'} 73 ; ICE_area_export = {arr:ICE_area_export * 1.e-12 * 86400 * 365 , unit : '10^6 Km^2/year'} ; annual mean 74 ICE_area_export = {arr:ICE_area_export * 1.e-12 * 86400 * 30 , unit : '10^6 Km^2/month'} ; monthly mean 75 74 76 ; 75 77 ICE_vol_export = reform(ICE_vol_export, 12, nyr) 76 78 ICE_vol_export = total(ICE_vol_export,2)/nyr 77 ICE_vol_export = {arr:ICE_vol_export * 1.e-12 * 86400 * 365 , unit : '10^3 Km^3/year'} 79 ; ICE_vol_export = {arr:ICE_vol_export * 1.e-12 * 86400 * 365 , unit : '10^3 Km^3/year'} ; annual mean 80 ICE_vol_export = {arr:ICE_vol_export * 1.e-12 * 86400 * 30 , unit : '10^3 Km^3/month'} ; monthly mean 78 81 79 82 ; … … 82 85 jpt=12 83 86 time=julday(1,15,1900)+30*lindgen(12) 84 pltt, ICE_area_export, 't', 0., 15., 19000101, 19001231, /REMPLI, /PORTRAIT,MIN = 0., MAX = 2. $ 85 , small = [1, 2, 1],YTITLE = '10^6 Km^2/year', TITLE = title, _extra = ex 87 ;; pltt, ICE_area_export, 't', 0., 15., 19000101, 19001231, /REMPLI, /PORTRAIT,MIN = 0., MAX = .5 $ 88 pltt, ICE_area_export, 't', 0., 15., /REMPLI, /PORTRAIT,MIN = 0., MAX = .5 $ 89 ;; , small = [1, 2, 1], YTITLE = varunit, TITLE = title, _extra = ex 90 , small = [1, 2, 1],YTITLE = '10^6 Km^2/month', TITLE = title, _extra = ex 86 91 ; 87 92 ;title ='Southern Hemisphere' +'!C'+prefix+' '+d1_d2+' - '+'!C'+'Global Annual Mean Ice Volume (Black SOLID simulation)' 88 93 title = 'Fram Strait Volume Export'+'!C'+prefix+' '+d1_d2 89 pltt, ICE_vol_export, 't', 0., 15.,19000101 ,19001231 , /REMPLI, /NOERASE , MIN = 0., MAX = 6. $ 90 , small = [1, 2, 2], YTITLE = '10^3 Km^3/year', TITLE = title, _extra = ex 94 ;; pltt, ICE_vol_export, 't', 0., 15.,19000101 ,19001231 , /REMPLI, /NOERASE , MIN = 0., MAX = .5 $ 95 pltt, ICE_vol_export, 't', 0., 15., /REMPLI, /NOERASE , MIN = 0., MAX = .5 $ 96 ;; , small = [1, 2, 2], YTITLE = varunit, TITLE = title, _extra = ex 97 , small = [1, 2, 2], YTITLE = '10^3 Km^3/month', TITLE = title, _extra = ex 91 98 ; 92 99 htmltxt = [ htmltxt, '<hr>'+blabla, '<br><img width="80%" src='+filename+'.png /> ' ] … … 119 126 ICE_area_export_2 = reform(ICE_area_export_2, 12, nyr) 120 127 ICE_area_export_2 = total(ICE_area_export_2,2)/nyr 121 ICE_area_export_2 = {arr:ICE_area_export_2 * 1.e-12 * 86400 * 365 , unit : '10^6 Km^2/year'} 128 ; ICE_area_export_2 = {arr:ICE_area_export_2 * 1.e-12 * 86400 * 365 , unit : '10^6 Km^2/year'} ; annual mean 129 ICE_area_export_2 = {arr:ICE_area_export_2 * 1.e-12 * 86400 * 30 , unit : '10^6 Km^2/month'} ; monthly mean 122 130 ; 123 131 ICE_vol_export_2 = reform(ICE_vol_export_2, 12, nyr) 124 132 ICE_vol_export_2 = total(ICE_vol_export_2,2)/nyr 125 ICE_vol_export_2 = {arr:ICE_vol_export_2 * 1.e-12 * 86400 * 365 , unit : '10^3 Km^3/year'} 133 ; ICE_vol_export_2 = {arr:ICE_vol_export_2 * 1.e-12 * 86400 * 365 , unit : '10^3 Km^3/year'} ; annual mean 134 ICE_vol_export_2 = {arr:ICE_vol_export_2 * 1.e-12 * 86400 * 30 , unit : '10^3 Km^3/month'} ; monthly mean 126 135 ; 127 136 ; … … 131 140 jpt=12 132 141 time=julday(1,15,1900)+30*lindgen(12) 133 pltt, ICE_area_export.arr, 't', 0., 15., 19000101, 19001231, /REMPLI, /PORTRAIT, MIN = 0., MAX = 2., window = 2 $ 134 , small = [1, 2, 1],YTITLE = '10^6 Km^2/year', TITLE = title, _extra = ex 135 pltt, ICE_area_export_2.arr ,'t', 0., 15., 19000101, 19001231, /REMPLI, /PORTRAIT $ 136 , /ov1d, COLOR = 250, small = [1, 2, 1],YTITLE = '10^6 Km^2/year', TITLE = title, _extra = ex 137 ; 142 ;; pltt, ICE_area_export.arr, 't', 0., 15., 19000101, 19001231, /REMPLI, /PORTRAIT, MIN = 0., MAX = .5, window = 2 $ 143 pltt, ICE_area_export, 't', 0., 15., /REMPLI, /PORTRAIT, MIN = 0., MAX = .5, window = 2 $ 144 ;; , small = [1, 2, 1], YTITLE = varunit, TITLE = title, _extra = ex 145 , small = [1, 2, 1], YTITLE = '10^6 Km^2/month', TITLE = title, _extra = ex 146 ;; pltt, ICE_area_export_2.arr ,'t', 0., 15., 19000101, 19001231, /REMPLI, /PORTRAIT $ 147 pltt, ICE_area_export_2 ,'t', 0., 15., /REMPLI, /PORTRAIT $ 148 ;; , /ov1d, COLOR = 250, small = [1, 2, 1], YTITLE = varunit, TITLE = title, _extra = ex 149 , /ov1d, COLOR = 250, small = [1, 2, 1],YTITLE = '10^6 Km^2/month', TITLE = title, _extra = ex 138 150 ; 139 151 title = 'Fram Strait Volume Export'+'!C'+prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2 140 pltt, ICE_vol_export.arr, 't', 0., 15.,19000101 ,19001231 , /REMPLI, /NOERASE , MIN = 0., MAX = 6. $ 141 , small = [1, 2, 2], YTITLE = '10^3 Km^3/year', TITLE = title, _extra = ex 142 pltt, ICE_vol_export_2.arr, 't', 0., 15.,19000101 ,19001231 , /REMPLI, /NOERASE $ 143 , /ov1d, COLOR = 250, small = [1, 2, 2], YTITLE = '10^3 Km^3/year', TITLE = title, _extra = ex 152 ;; pltt, ICE_vol_export.arr, 't', 0., 15.,19000101 ,19001231 , /REMPLI, /NOERASE , MIN = 0., MAX = .5 $ 153 pltt, ICE_vol_export, 't', 0., 15., /REMPLI, /NOERASE , MIN = 0., MAX = .5 $ 154 ;; , small = [1, 2, 2], YTITLE = varunit, TITLE = title, _extra = ex 155 , small = [1, 2, 2], YTITLE = '10^3 Km^3/month', TITLE = title, _extra = ex 156 ;; pltt, ICE_vol_export_2.arr, 't', 0., 15.,19000101 ,19001231 , /REMPLI, /NOERASE $ 157 pltt, ICE_vol_export_2, 't', 0., 15., /REMPLI, /NOERASE $ 158 ;; , /ov1d, COLOR = 250, small = [1, 2, 2], YTITLE = varunit, TITLE = title, _extra = ex 159 , /ov1d, COLOR = 250, small = [1, 2, 2], YTITLE = '10^3 Km^3/month', TITLE = title, _extra = ex 144 160 ; 145 161 -
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_ICE_Vol.pro
r4395 r4495 65 65 jpt=12 66 66 time=julday(1,15,1900)+30*lindgen(12) 67 pltt, ICE_vol_N, 't', 0., 15., 19000101, 19001231,/REMPLI, /PORTRAIT,MIN = 0., MAX = 30000. $68 , small = [1, 2, 1], YTITLE = ' Km^3 ', TITLE = title, _extra = ex67 pltt, ICE_vol_N, 't', 0., 15., /REMPLI, /PORTRAIT,MIN = 0., MAX = 30000. $ 68 , small = [1, 2, 1], YTITLE = '10^9 Km^3 ', TITLE = title, _extra = ex 69 69 ; 70 70 title ='Southern Hemisphere' +'!C'+prefix+' '+d1_d2+' - '+'!C'+'Global Annual Mean Ice Volume (BLACK)' 71 pltt, ICE_vol_S, 't', 0., 15., 19000101 ,19001231 ,/REMPLI, /NOERASE , MIN = 0., MAX = 11000. $72 , small = [1, 2, 2], YTITLE = ' Km^3 ', TITLE = title, _extra = ex71 pltt, ICE_vol_S, 't', 0., 15., /REMPLI, /NOERASE , MIN = 0., MAX = 11000. $ 72 , small = [1, 2, 2], YTITLE = '10^9 Km^3 ', TITLE = title, _extra = ex 73 73 ; 74 74 htmltxt = [ htmltxt, '<hr>'+blabla, '<br><img width="80%" src='+filename+'.png /> ' ] … … 112 112 jpt=12 113 113 time=julday(1,15,1900)+30*lindgen(12) 114 pltt, ICE_vol_N .arr, 't', -125., -60., 19000101, 19001231, /REMPLI, /PORTRAIT, MIN = 0., MAX = 30000., window = 2 $115 , small = [1, 2, 1], YTITLE = ' Km^3 ', TITLE = title, _extra = ex116 pltt, ICE_vol_N2 .arr , 't', -.2, .2, 19000101, 19001231, /REMPLI, /PORTRAIT $ ; linee tratteggiate LINESTYLE=2 $117 , /ov1d, COLOR = 250, small = [1, 2, 1], YTITLE = ' Km^3 ', TITLE = title, _extra = ex114 pltt, ICE_vol_N, 't', -125., -60., /REMPLI, /PORTRAIT, MIN = 0., MAX = 30000., window = 2 $ 115 , small = [1, 2, 1], YTITLE = '10^9 Km^3 ', TITLE = title, _extra = ex 116 pltt, ICE_vol_N2 , 't', -.2, .2, /REMPLI, /PORTRAIT $ ; linee tratteggiate LINESTYLE=2 $ 117 , /ov1d, COLOR = 250, small = [1, 2, 1], YTITLE = '10^9 Km^3 ', TITLE = title, _extra = ex 118 118 ; 119 119 title = 'Southern Hemisphere'+'!C'+prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2+'!C'+'Global Annual Mean Ice Volume' 120 pltt, ICE_vol_S .arr, 't', -620., -10., 19000101, 19001231, /REMPLI, /NOERASE, MIN = 0., MAX = 11000. $121 , small = [1, 2, 2], YTITLE = ' Km^3 ', TITLE = title, _extra = ex122 pltt, ICE_vol_S2 .arr, 't', -620., -10., 19000101, 19001231, /REMPLI, /NOERASE $123 , /ov1d, COLOR = 250, small = [1, 2, 2], YTITLE = ' Km^3 ', TITLE = title, _extra = ex120 pltt, ICE_vol_S, 't', -620., -10., /REMPLI, /NOERASE, MIN = 0., MAX = 11000. $ 121 , small = [1, 2, 2], YTITLE = '10^9 Km^3 ', TITLE = title, _extra = ex 122 pltt, ICE_vol_S2, 't', -620., -10., /REMPLI, /NOERASE $ 123 , /ov1d, COLOR = 250, small = [1, 2, 2], YTITLE = '10^9 Km^3 ', TITLE = title, _extra = ex 124 124 125 125 htmltxt = [ htmltxt, '<hr>'+blabla, '<br><img width="80%" src='+filename+'_2.png /> ' ] -
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_Q.pro
r2751 r4495 33 33 time = tsave & IF n_elements(time) NE jpt THEN stop 34 34 35 title = prefix+' '+d1_d2+' - '+prefix2+' '+d1_d2_2+'!C'+blabla 36 pltt, ts_Q.arr - ts_Q2.arr, 't', -4., 4., date1, date2, /REMPLI $ 37 , color = 250, small = [1, 2, 2], YTITLE = varunit, TITLE = title, /noerase, _extra = ex 35 title = prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2+'!C'+blabla 36 pltt, ts_Q.arr , 't', -4., 4., date1, date2, /REMPLI $ 37 , small = [1, 2, 2], YTITLE = varunit, TITLE = title, /noerase, _extra = ex 38 pltt, ts_Q2.arr, 't', -4., 4., date1, date2, /REMPLI $ 39 , /ov1d, color = 250, small = [1, 2, 2], YTITLE = varunit, TITLE = title, /noerase, _extra = ex 38 40 39 41 ENDIF -
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_S.pro
r3610 r4495 68 68 if KEYWORD_SET(postscript) then openps, filename+'_3.ps', portrait = 1 69 69 70 title = prefix+' '+d1_d2+'- '+prefix2+' '+d1_d2_2+'!C'+blabla70 title = prefix+' - '+prefix2+' '+d1_d2_2+'!C'+blabla 71 71 pltt, ts_Sal - ts_Sal2, 't', -0.1, 0.1, date1, date2, /REMPLI $ 72 72 , COLOR = 250, small = [1, 2, 1], YTITLE = varunit, TITLE = title, /PORTRAIT, window = 2, _extra = ex 73 73 74 title = prefix+' '+d1_d2+'- '+prefix2+' '+d1_d2_2+'!C ZT-plot (0-6000m) '+blabla74 title = prefix+' - '+prefix2+' '+d1_d2_2+'!C ZT-plot (0-6000m) '+blabla 75 75 pltt, ts_z - ts_z2, 'zt', -0.1, 0.1, INTER = .01, date1, date2, /REMPLI, style = 'so0so' $ 76 76 , small = [1, 2, 2], YTITLE = varunit, TITLE = title, boxzoom = 6000., /NOERASE, _extra = ex -
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_SSH.pro
r4320 r4495 38 38 time = tsave & IF n_elements(time) NE jpt THEN stop 39 39 40 title = prefix+' '+d1_d2+' - '+prefix2+''+d1_d2_2+'!C'+blabla40 title = prefix+' (BLACK) - '+prefix2+' (RED) '+d1_d2_2+'!C'+blabla 41 41 pltt, ts_SSH.arr - ts_SSH2.arr, 't', -10., 10., date1, date2, /REMPLI $ 42 42 ;SF , color = 250, small = [1, 2, 2], YTITLE = 'cm', TITLE = title, /noerase, _extra = ex -
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_ts_T.pro
r4320 r4495 68 68 if KEYWORD_SET(postscript) then openps, filename+'_3.ps', portrait = 1 69 69 70 title = prefix+' '+d1_d2+'- '+prefix2+' '+d1_d2_2+'!C'+blabla70 title = prefix+' - '+prefix2+' '+d1_d2_2+'!C'+blabla 71 71 pltt, ts_Temp - ts_Temp2, 't', -1., 1., date1, date2, /REMPLI $ 72 72 , COLOR = 250, small = [1, 2, 1], YTITLE = varunit, TITLE = title, /PORTRAIT, window = 2, _extra = ex 73 73 74 title = prefix+' '+d1_d2+'- '+prefix2+' '+d1_d2_2+'!C ZT-plot (0-6000m) '+blabla74 title = prefix+' - '+prefix2+' '+d1_d2_2+'!C ZT-plot (0-6000m) '+blabla 75 75 pltt, ts_z - ts_z2, 'zt', -1., 1., inter = .1, date1, date2, /REMPLI, style = 'so0so' $ 76 76 , small = [1, 2, 2], YTITLE = varunit, TITLE = title, boxzoom = 6000., /NOERASE, _extra = ex
Note: See TracChangeset
for help on using the changeset viewer.