Changeset 4517


Ignore:
Timestamp:
2014-02-25T15:39:09+01:00 (7 years ago)
Author:
flavoni
Message:

change order of plots ocean first; ice last, see ticket #724

Location:
branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_plot_all.pro

    r4516 r4517  
    368368  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_ZonMld, MLD1, MLD2, MLD, _extra = ex 
    369369 
     370  cnt = cnt+1   &   blabla = 'Vertical Global mean T & S' 
     371  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_GlobMeanTS, T1, T2, TLev, S1, S2, SLev, _extra = ex 
     372; 
    370373  cnt = cnt+1   &   blabla = 'Zonal mean Temperature diff with Levitus: Global' 
    371374  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_zonal_T, T1, T2, TLev, _extra = ex 
     
    392395  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_zonal_S, S1, S2, SLev, SUBBASIN = 'Pac', _extra = ex  
    393396 
    394 ;  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: MARCH' 
    395 ;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ARC, /MARCH, _extra = ex 
    396 ; 
    397   cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: APRIL' 
    398   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ARC, /APRIL, _extra = ex 
    399 ; 
    400   cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: SEPT' 
    401   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ARC, /SEPT, _extra = ex 
    402  
    403 ;  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: MARCH' 
    404 ;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ANT, /MARCH, _extra = ex 
    405 ;  
    406   cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: APRIL' 
    407   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ANT, /APRIL, _extra = ex 
    408 ; 
    409   cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: SEPT' 
    410   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ANT, /SEPT, _extra = ex 
    411 ; 
    412   cnt = cnt+1   &   blabla = 'Arctic Ice Age: MARCH' 
    413   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ARC, /MARCH, _extra = ex 
    414  
    415   cnt = cnt+1   &   blabla = 'Arctic Ice Age: SEPT' 
    416   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ARC, /SEPT, _extra = ex 
    417  
    418   cnt = cnt+1   &   blabla = 'Antarctic Ice Age: MARCH' 
    419   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ANT, /MARCH, _extra = ex 
    420 ; 
    421   cnt = cnt+1   &   blabla = 'Antarctic Ice Age: SEPT' 
    422   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ANT, /SEPT, _extra = ex 
    423 ; 
    424   cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: MARCH' 
    425   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ARC, /MARCH, _extra = ex 
    426  
    427   cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: SEPT' 
    428   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ARC, /SEPT, _extra = ex 
    429  
    430   cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: MARCH' 
    431   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ANT, /MARCH, _extra = ex 
    432 ; 
    433   cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: SEPT' 
    434   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ANT, /SEPT, _extra = ex 
    435 ; 
    436   cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: MARCH' 
    437   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ARC, /MARCH, _extra = ex 
    438 ;  
    439   cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: SEPT' 
    440   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ARC, /SEPT, _extra = ex 
    441  
    442   cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: MARCH' 
    443   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ANT, /MARCH, _extra = ex 
    444 ;  
    445   cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: SEPT' 
    446   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ANT, /SEPT, _extra = ex 
    447 ;  
    448   cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: MARCH' 
    449   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_march_1, Isal_march_2, /ARC, /MARCH, _extra = ex 
    450 ;  
    451   cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: SEPT' 
    452   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ARC, /SEPT, _extra = ex 
    453  
    454   cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: FEBRUARY' 
    455   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_febr_1, Isal_febr_2, /ANT, /FEBR, _extra = ex 
    456 ;  
    457   cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: SEPT' 
    458   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ANT, /SEPT, _extra = ex 
    459 ;  
    460397  cnt = cnt+1   &   blabla = 'Meridional stream Function: Global (no Med)' 
    461398  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_msf, V1, V2, SUBBASIN = 'GloNoMed', _extra = ex 
     
    491428  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_Med_Sdepth, S1, S2, SLev, 38, _extra = ex 
    492429; 
    493   cnt = cnt+1   &   blabla = 'Vertical Global mean T & S' 
    494   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_GlobMeanTS, T1, T2, TLev, S1, S2, SLev, _extra = ex 
    495 ; 
     430;  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: MARCH' 
     431;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ARC, /MARCH, _extra = ex 
     432; 
     433  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: APRIL' 
     434  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ARC, /APRIL, _extra = ex 
     435; 
     436  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: SEPT' 
     437  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ARC, /SEPT, _extra = ex 
     438 
     439;  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: MARCH' 
     440;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ANT, /MARCH, _extra = ex 
     441;  
     442  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: APRIL' 
     443  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ANT, /APRIL, _extra = ex 
     444; 
     445  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: SEPT' 
     446  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ANT, /SEPT, _extra = ex 
     447; 
     448  cnt = cnt+1   &   blabla = 'Arctic Ice Age: MARCH' 
     449  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ARC, /MARCH, _extra = ex 
     450 
     451  cnt = cnt+1   &   blabla = 'Arctic Ice Age: SEPT' 
     452  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ARC, /SEPT, _extra = ex 
     453 
     454  cnt = cnt+1   &   blabla = 'Antarctic Ice Age: MARCH' 
     455  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ANT, /MARCH, _extra = ex 
     456; 
     457  cnt = cnt+1   &   blabla = 'Antarctic Ice Age: SEPT' 
     458  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ANT, /SEPT, _extra = ex 
     459; 
     460  cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: MARCH' 
     461  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ARC, /MARCH, _extra = ex 
     462 
     463  cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: SEPT' 
     464  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ARC, /SEPT, _extra = ex 
     465 
     466  cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: MARCH' 
     467  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ANT, /MARCH, _extra = ex 
     468; 
     469  cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: SEPT' 
     470  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ANT, /SEPT, _extra = ex 
     471; 
     472  cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: MARCH' 
     473  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ARC, /MARCH, _extra = ex 
     474;  
     475  cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: SEPT' 
     476  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ARC, /SEPT, _extra = ex 
     477 
     478  cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: MARCH' 
     479  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ANT, /MARCH, _extra = ex 
     480;  
     481  cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: SEPT' 
     482  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ANT, /SEPT, _extra = ex 
     483;  
     484  cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: MARCH' 
     485  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_march_1, Isal_march_2, /ARC, /MARCH, _extra = ex 
     486;  
     487  cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: SEPT' 
     488  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ARC, /SEPT, _extra = ex 
     489 
     490  cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: FEBRUARY' 
     491  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_febr_1, Isal_febr_2, /ANT, /FEBR, _extra = ex 
     492;  
     493  cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: SEPT' 
     494  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ANT, /SEPT, _extra = ex 
     495;  
     496  
    496497  IF n_elements(htmltxt) GT 1 THEN putfile, psdir+'std_plot_html_body.txt', htmltxt[1:*] 
    497498   
  • branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_plot_all_1Y.pro

    r4516 r4517  
    103103;climatology  
    104104  QNET = read_ncdf(getenv('VAR_FLUX'), filename = std_file_oaflux ) 
    105  
     105    
    106106; erp (evaporation damping) 
    107107  ERP1 = read_ncdf(getenv('VAR1_ERP'), allrecords = allrec, direc = 't', filename = std_file1_T ) 
    108108  ERP1 = {arr:ERP1.arr * 86400., unit:'mm/day', grid:'T'} 
    109109  IF std_file2_T NE std_file1_T THEN BEGIN 
    110     ERP2 = read_ncdf(getenv('VAR2_ERP'), allrecords = allrec, direc = 't', filename = std_file2_T ) 
    111     ERP2 = {arr:ERP2.arr * 86400., unit:'mm/day', grid:'T'} 
     110     ERP2 = read_ncdf(getenv('VAR2_ERP'), allrecords = allrec, direc = 't', filename = std_file2_T ) 
     111     ERP2 = {arr:ERP2.arr * 86400., unit:'mm/day', grid:'T'} 
    112112  ENDIF ELSE ERP2 = {arr:-1} 
    113  
     113  
    114114; emp (evaporation minus precipitation) 
    115115  EMP1 = read_ncdf(getenv('VAR1_EMP'), allrecords = allrec, direc = 't', filename = std_file1_T ) 
     
    368368  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_ZonMld, MLD1, MLD2, MLD, _extra = ex 
    369369 
     370  cnt = cnt+1   &   blabla = 'Vertical Global mean T & S' 
     371  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_GlobMeanTS, T1, T2, TLev, S1, S2, SLev, _extra = ex 
     372; 
    370373  cnt = cnt+1   &   blabla = 'Zonal mean Temperature diff with Levitus: Global' 
    371374  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_zonal_T, T1, T2, TLev, _extra = ex 
     
    392395  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_zonal_S, S1, S2, SLev, SUBBASIN = 'Pac', _extra = ex  
    393396 
    394 ;  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: MARCH' 
    395 ;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ARC, /MARCH, _extra = ex 
    396 ; 
    397   cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: APRIL' 
    398   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ARC, /APRIL, _extra = ex 
    399 ; 
    400   cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: SEPT' 
    401   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ARC, /SEPT, _extra = ex 
    402  
    403 ;  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: MARCH' 
    404 ;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ANT, /MARCH, _extra = ex 
    405 ;  
    406   cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: APRIL' 
    407   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ANT, /APRIL, _extra = ex 
    408 ; 
    409   cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: SEPT' 
    410   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ANT, /SEPT, _extra = ex 
    411 ; 
    412   cnt = cnt+1   &   blabla = 'Arctic Ice Age: MARCH' 
    413   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ARC, /MARCH, _extra = ex 
    414  
    415   cnt = cnt+1   &   blabla = 'Arctic Ice Age: SEPT' 
    416   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ARC, /SEPT, _extra = ex 
    417  
    418   cnt = cnt+1   &   blabla = 'Antarctic Ice Age: MARCH' 
    419   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ANT, /MARCH, _extra = ex 
    420 ; 
    421   cnt = cnt+1   &   blabla = 'Antarctic Ice Age: SEPT' 
    422   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ANT, /SEPT, _extra = ex 
    423 ; 
    424   cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: MARCH' 
    425   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ARC, /MARCH, _extra = ex 
    426  
    427   cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: SEPT' 
    428   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ARC, /SEPT, _extra = ex 
    429  
    430   cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: MARCH' 
    431   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ANT, /MARCH, _extra = ex 
    432 ; 
    433   cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: SEPT' 
    434   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ANT, /SEPT, _extra = ex 
    435 ; 
    436   cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: MARCH' 
    437   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ARC, /MARCH, _extra = ex 
    438 ;  
    439   cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: SEPT' 
    440   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ARC, /SEPT, _extra = ex 
    441  
    442   cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: MARCH' 
    443   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ANT, /MARCH, _extra = ex 
    444 ;  
    445   cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: SEPT' 
    446   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ANT, /SEPT, _extra = ex 
    447 ;  
    448   cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: MARCH' 
    449   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_march_1, Isal_march_2, /ARC, /MARCH, _extra = ex 
    450 ;  
    451   cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: SEPT' 
    452   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ARC, /SEPT, _extra = ex 
    453  
    454   cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: FEBRUARY' 
    455   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_febr_1, Isal_febr_2, /ANT, /FEBR, _extra = ex 
    456 ;  
    457   cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: SEPT' 
    458   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ANT, /SEPT, _extra = ex 
    459 ;  
    460397  cnt = cnt+1   &   blabla = 'Meridional stream Function: Global (no Med)' 
    461398  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_msf, V1, V2, SUBBASIN = 'GloNoMed', _extra = ex 
     
    491428  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_Med_Sdepth, S1, S2, SLev, 38, _extra = ex 
    492429; 
    493   cnt = cnt+1   &   blabla = 'Vertical Global mean T & S' 
    494   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_GlobMeanTS, T1, T2, TLev, S1, S2, SLev, _extra = ex 
    495 ; 
     430;  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: MARCH' 
     431;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ARC, /MARCH, _extra = ex 
     432; 
     433  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: APRIL' 
     434  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ARC, /APRIL, _extra = ex 
     435; 
     436  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: SEPT' 
     437  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ARC, /SEPT, _extra = ex 
     438 
     439;  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: MARCH' 
     440;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ANT, /MARCH, _extra = ex 
     441;  
     442  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: APRIL' 
     443  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ANT, /APRIL, _extra = ex 
     444; 
     445  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: SEPT' 
     446  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ANT, /SEPT, _extra = ex 
     447; 
     448  cnt = cnt+1   &   blabla = 'Arctic Ice Age: MARCH' 
     449  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ARC, /MARCH, _extra = ex 
     450 
     451  cnt = cnt+1   &   blabla = 'Arctic Ice Age: SEPT' 
     452  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ARC, /SEPT, _extra = ex 
     453 
     454  cnt = cnt+1   &   blabla = 'Antarctic Ice Age: MARCH' 
     455  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ANT, /MARCH, _extra = ex 
     456; 
     457  cnt = cnt+1   &   blabla = 'Antarctic Ice Age: SEPT' 
     458  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ANT, /SEPT, _extra = ex 
     459; 
     460  cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: MARCH' 
     461  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ARC, /MARCH, _extra = ex 
     462 
     463  cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: SEPT' 
     464  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ARC, /SEPT, _extra = ex 
     465 
     466  cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: MARCH' 
     467  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ANT, /MARCH, _extra = ex 
     468; 
     469  cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: SEPT' 
     470  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ANT, /SEPT, _extra = ex 
     471; 
     472  cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: MARCH' 
     473  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ARC, /MARCH, _extra = ex 
     474;  
     475  cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: SEPT' 
     476  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ARC, /SEPT, _extra = ex 
     477 
     478  cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: MARCH' 
     479  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ANT, /MARCH, _extra = ex 
     480;  
     481  cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: SEPT' 
     482  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ANT, /SEPT, _extra = ex 
     483;  
     484  cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: MARCH' 
     485  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_march_1, Isal_march_2, /ARC, /MARCH, _extra = ex 
     486;  
     487  cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: SEPT' 
     488  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ARC, /SEPT, _extra = ex 
     489 
     490  cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: FEBRUARY' 
     491  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_febr_1, Isal_febr_2, /ANT, /FEBR, _extra = ex 
     492;  
     493  cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: SEPT' 
     494  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ANT, /SEPT, _extra = ex 
     495;  
     496  
    496497  IF n_elements(htmltxt) GT 1 THEN putfile, psdir+'std_plot_html_body.txt', htmltxt[1:*] 
    497498   
  • branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_plot_all_last_year_5D.pro

    r4516 r4517  
    105105;climatology  
    106106  QNET = read_ncdf(getenv('VAR_FLUX'), filename = std_file_oaflux ) 
    107  
     107  
    108108; erp (evaporation damping) 
    109109  ERP1 = read_ncdf(getenv('VAR1_ERP'), allrecords = allrec, direc = 't', filename = std_file1_T ) 
    110110  ERP1 = {arr:ERP1.arr * 86400., unit:'mm/day', grid:'T'} 
    111111  IF std_file2_T NE std_file1_T THEN BEGIN 
    112     ERP2 = read_ncdf(getenv('VAR2_ERP'), allrecords = allrec, direc = 't', filename = std_file2_T ) 
    113     ERP2 = {arr:ERP2.arr * 86400., unit:'mm/day', grid:'T'} 
     112     ERP2 = read_ncdf(getenv('VAR2_ERP'), allrecords = allrec, direc = 't', filename = std_file2_T ) 
     113     ERP2 = {arr:ERP2.arr * 86400., unit:'mm/day', grid:'T'} 
    114114  ENDIF ELSE ERP2 = {arr:-1} 
    115  
     115  
    116116; emp (evaporation minus precipitation) 
    117117  EMP1 = read_ncdf(getenv('VAR1_EMP'), allrecords = allrec, direc = 't', filename = std_file1_T ) 
     
    417417  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_zonal_S, S1, S2, SLev, SUBBASIN = 'Pac', _extra = ex  
    418418 
    419 ;  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: MARCH' 
    420 ;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ARC, /MARCH, _extra = ex 
    421 ; 
    422   cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: APRIL' 
    423   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ARC, /APRIL, _extra = ex 
    424 ; 
    425   cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: SEPT' 
    426   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ARC, /SEPT, _extra = ex 
    427  
    428 ;  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: MARCH' 
    429 ;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ANT, /MARCH, _extra = ex 
    430 ;  
    431   cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: APRIL' 
    432   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ANT, /APRIL, _extra = ex 
    433 ; 
    434   cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: SEPT' 
    435   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ANT, /SEPT, _extra = ex 
    436 ; 
    437   cnt = cnt+1   &   blabla = 'Arctic Ice Age: MARCH' 
    438   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ARC, /MARCH, _extra = ex 
    439  
    440   cnt = cnt+1   &   blabla = 'Arctic Ice Age: SEPT' 
    441   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ARC, /SEPT, _extra = ex 
    442  
    443   cnt = cnt+1   &   blabla = 'Antarctic Ice Age: MARCH' 
    444   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ANT, /MARCH, _extra = ex 
    445 ; 
    446   cnt = cnt+1   &   blabla = 'Antarctic Ice Age: SEPT' 
    447   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ANT, /SEPT, _extra = ex 
    448 ; 
    449   cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: MARCH' 
    450   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ARC, /MARCH, _extra = ex 
    451  
    452   cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: SEPT' 
    453   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ARC, /SEPT, _extra = ex 
    454  
    455   cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: MARCH' 
    456   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ANT, /MARCH, _extra = ex 
    457 ; 
    458   cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: SEPT' 
    459   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ANT, /SEPT, _extra = ex 
    460 ; 
    461   cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: MARCH' 
    462   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ARC, /MARCH, _extra = ex 
    463 ;  
    464   cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: SEPT' 
    465   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ARC, /SEPT, _extra = ex 
    466  
    467   cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: MARCH' 
    468   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ANT, /MARCH, _extra = ex 
    469 ;  
    470   cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: SEPT' 
    471   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ANT, /SEPT, _extra = ex 
    472 ;  
    473   cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: MARCH' 
    474   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_march_1, Isal_march_2, /ARC, /MARCH, _extra = ex 
    475 ;  
    476   cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: SEPT' 
    477   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ARC, /SEPT, _extra = ex 
    478  
    479   cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: FEBRUARY' 
    480   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_febr_1, Isal_febr_2, /ANT, /FEBR, _extra = ex 
    481 ;  
    482   cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: SEPT' 
    483   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ANT, /SEPT, _extra = ex 
    484 ;  
    485419  cnt = cnt+1   &   blabla = 'Meridional stream Function: Global (no Med)' 
    486420  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_msf, V1, V2, SUBBASIN = 'GloNoMed', _extra = ex 
     
    516450  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_Med_Sdepth, S1, S2, SLev, 38, _extra = ex 
    517451; 
    518   cnt = cnt+1   &   blabla = 'Vertical Global mean T & S' 
    519   IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_GlobMeanTS, T1, T2, TLev, S1, S2, SLev, _extra = ex 
    520 ; 
     452;  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: MARCH' 
     453;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ARC, /MARCH, _extra = ex 
     454; 
     455  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: APRIL' 
     456  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ARC, /APRIL, _extra = ex 
     457; 
     458  cnt = cnt+1   &   blabla = 'Arctic Ice Thickness: SEPT' 
     459  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ARC, /SEPT, _extra = ex 
     460 
     461;  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: MARCH' 
     462;  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_march_1, Ithi_march_2, /ANT, /MARCH, _extra = ex 
     463;  
     464  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: APRIL' 
     465  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_april_1, Ithi_april_2, /ANT, /APRIL, _extra = ex 
     466; 
     467  cnt = cnt+1   &   blabla = 'Antarctic Ice Thickness: SEPT' 
     468  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceThick, Ithi_sept_1, Ithi_sept_2, /ANT, /SEPT, _extra = ex 
     469; 
     470  cnt = cnt+1   &   blabla = 'Arctic Ice Age: MARCH' 
     471  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ARC, /MARCH, _extra = ex 
     472 
     473  cnt = cnt+1   &   blabla = 'Arctic Ice Age: SEPT' 
     474  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ARC, /SEPT, _extra = ex 
     475 
     476  cnt = cnt+1   &   blabla = 'Antarctic Ice Age: MARCH' 
     477  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_march_1, Iage_march_2, /ANT, /MARCH, _extra = ex 
     478; 
     479  cnt = cnt+1   &   blabla = 'Antarctic Ice Age: SEPT' 
     480  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceAge, Iage_sept_1, Iage_sept_2, /ANT, /SEPT, _extra = ex 
     481; 
     482  cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: MARCH' 
     483  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ARC, /MARCH, _extra = ex 
     484 
     485  cnt = cnt+1   &   blabla = 'Arctic Ice Fraction: SEPT' 
     486  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ARC, /SEPT, _extra = ex 
     487 
     488  cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: MARCH' 
     489  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_march_1, Ifra_march_2, /ANT, /MARCH, _extra = ex 
     490; 
     491  cnt = cnt+1   &   blabla = 'Antarctic Ice Fraction: SEPT' 
     492  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceFrac, Ifra_sept_1, Ifra_sept_2, /ANT, /SEPT, _extra = ex 
     493; 
     494  cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: MARCH' 
     495  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ARC, /MARCH, _extra = ex 
     496;  
     497  cnt = cnt+1   &   blabla = 'Arctic SNOW Thickness: SEPT' 
     498  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ARC, /SEPT, _extra = ex 
     499 
     500  cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: MARCH' 
     501  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_march_1, Isnow_march_2, /ANT, /MARCH, _extra = ex 
     502;  
     503  cnt = cnt+1   &   blabla = 'Antarctic SNOW Thickness: SEPT' 
     504  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_SnowThick, Isnow_sept_1, Isnow_sept_2, /ANT, /SEPT, _extra = ex 
     505;  
     506  cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: MARCH' 
     507  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_march_1, Isal_march_2, /ARC, /MARCH, _extra = ex 
     508;  
     509  cnt = cnt+1   &   blabla = 'Arctic Ice Salinity: SEPT' 
     510  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ARC, /SEPT, _extra = ex 
     511 
     512  cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: FEBRUARY' 
     513  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_febr_1, Isal_febr_2, /ANT, /FEBR, _extra = ex 
     514;  
     515  cnt = cnt+1   &   blabla = 'Antarctic Ice Salinity: SEPT' 
     516  IF doplot EQ cnt OR doplot EQ 0 THEN std_plot_IceSal, Isal_sept_1, Isal_sept_2, /ANT, /SEPT, _extra = ex 
     517;  
     518  
    521519  IF n_elements(htmltxt) GT 1 THEN putfile, psdir+'std_plot_html_body.txt', htmltxt[1:*] 
    522520   
Note: See TracChangeset for help on using the changeset viewer.