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 2760 for trunk/NEMOGCM/CONFIG – NEMO

Changeset 2760 for trunk/NEMOGCM/CONFIG


Ignore:
Timestamp:
2011-05-02T17:10:47+02:00 (13 years ago)
Author:
smasson
Message:

bugfix in IDL_scripts

Location:
trunk/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_plot_S100m.pro

    r2751 r2760  
    1616  title = 'Salinity ('+sdepref+')!C'+std_file1_T 
    1717  plt, S1, MIN = 33., MAX = 38.2, INTER = .2, format = '(f4.1)' $ 
    18        , small = [1, 2, 1], COAST_THICK = 2, TITLE = title, boxzoom = [105., 106.], /PORTRAIT, _extra = ex 
     18       , small = [1, 2, 1], COAST_THICK = 2, TITLE = title, boxzoom = [floor(gdept[ind]), ceil(gdept[ind])], /PORTRAIT, _extra = ex 
    1919; 
    2020  if std_file1_T NE std_file2_T then begin 
    2121    title = title+ ' - '+std_file2_T 
    2222    plt, S1.arr[*, *, 0] - S2.arr[*, *, 0], MIN = -1., MAX = 1., INTER = .1, STYLE = 'so0so', format = '(f4.1)' $ 
    23          , small = [1, 2, 2], COAST_THICK = 2, TITLE = title, boxzoom = [105., 106.], /noerase, _extra = ex    
     23         , small = [1, 2, 2], COAST_THICK = 2, TITLE = title, boxzoom = [floor(gdept[ind]), ceil(gdept[ind])], /noerase, _extra = ex    
    2424  endif else begin 
    2525    title = title+ ' - Levitus' 
    2626    plt, S1.arr-SLev.arr, MIN = -1., MAX = 1., INTER = 0.1, STYLE = 'so0so', format = '(f4.1)' $ 
    27          , small = [1, 2, 2], COAST_THICK = 2, TITLE = title, boxzoom = [105., 106.], /noerase, _extra = ex 
     27         , small = [1, 2, 2], COAST_THICK = 2, TITLE = title, boxzoom = [floor(gdept[ind]), ceil(gdept[ind])], /noerase, _extra = ex 
    2828  endelse 
    2929 
  • trunk/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_plot_T100m.pro

    r2751 r2760  
    1616  title = 'Temperature ('+sdepref+')!C'+std_file1_T 
    1717  plt, T1, MIN = -2., MAX = 32., INTER = 1., FORMAT = '(I2)'  $ 
    18        , small = [1, 2, 1], COAST_THICK = 2, TITLE = title, boxzoom = [105., 106.], /portrait, _extra = ex 
     18       , small = [1, 2, 1], COAST_THICK = 2, TITLE = title, boxzoom = [floor(gdept[ind]), ceil(gdept[ind])], /portrait, _extra = ex 
    1919; 
    2020  IF std_file1_T NE std_file2_T THEN BEGIN 
    2121    title = title+ ' - '+std_file2_T 
    2222    plt, T1.arr - T2.arr, MIN = -2., MAX = 2., INTER = .2, STYLE = 'so0so', FORMAT = '(f4.1)' $ 
    23          , small = [1, 2, 2], COAST_THICK = 2, TITLE = title, boxzoom = [105., 106.], /noerase,  _extra = ex 
     23         , small = [1, 2, 2], COAST_THICK = 2, TITLE = title, boxzoom = [floor(gdept[ind]), ceil(gdept[ind])], /noerase,  _extra = ex 
    2424  ENDIF ELSE BEGIN 
    2525    title = title+ ' - Levitus' 
    26     plt, T1.arr - TLev.arr, MIN = -4., MAX = 4., INTER = .5, STYLE = 'so0so', FORMAT = '(I2)'  $ 
    27          , small = [1, 2, 2], COAST_THICK = 2, TITLE = title, boxzoom = [105., 106.], /noerase, _extra = ex    
     26    plt, T1.arr - TLev.arr, MIN = -5., MAX = 5., INTER = .5, STYLE = 'so0so', FORMAT = '(I2)'  $ 
     27         , small = [1, 2, 2], COAST_THICK = 2, TITLE = title, boxzoom = [floor(gdept[ind]), ceil(gdept[ind])], /noerase, _extra = ex    
    2828  ENDELSE 
    2929; 
  • trunk/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_plot_mht.pro

    r2751 r2760  
    5454  subtitle = '(Qnet='+ibce1+' W/m2)' 
    5555  plt1d, htr1, 'y', min = -2., max = 2.5, TITLE = title, SUBTITLE = subtitle, /portrait $  
    56          , SMALL = [2, 2, 1], YTITLE = 'PW',  XGRIDSTYLE = 2, TICKLEN = 1, YGRIDSTYLE = 2, _extra = ex 
     56         , SMALL = [2-(std_file1_T EQ std_file2_T), 2, 1], YTITLE = 'PW',  XGRIDSTYLE = 2, TICKLEN = 1, YGRIDSTYLE = 2, _extra = ex 
    5757  plt1d, htr1_atl, 'y', COLOR = 50, /ov1d,  _extra = ex 
    5858 
  • trunk/NEMOGCM/CONFIG/ORCA2_LIM/IDL_scripts/std_plot_msf.pro

    r2751 r2760  
    3333  domdef, 0, 6000 
    3434 
    35   mm1 = msf(V1.arr, indexboxzoom = ind, maskout = ma) 
     35  mm1 = msf(V1.arr, msk, indexboxzoom = ind, maskout = ma) 
    3636  title = 'Meridional Stream Function, '+subname+'!C'+std_file1_V 
    3737  pltz, mm1, 'yz', -20., 20., int = 1., boxzoom = [ind[0:1], lat_ext, 0, 5500], /xindex, FORMAT = '(I3)', /portrait $ 
     
    3939 
    4040  if std_file1_V NE std_file2_V then begin 
    41     mm2 = msf(V2.arr, indexboxzoom = ind, maskout = ma) 
     41    mm2 = msf(V2.arr, msk, indexboxzoom = ind, maskout = ma) 
    4242    title = title+' - '+std_file2_V 
    4343    pltz, mm1.arr-mm2.arr, 'yz', -10., 10., int = 1., boxzoom = [ind[0:1], lat_ext, 0, 5500], /xindex,  FORMAT = '(I3)'  $ 
Note: See TracChangeset for help on using the changeset viewer.