New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 4517 for branches/2013/dev_MERGE_2013/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_plot_all_1Y.pro – NEMO

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

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

File:
1 edited

Legend:

Unmodified
Added
Removed
  • 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   
Note: See TracChangeset for help on using the changeset viewer.