Changeset 421 for trunk/SRC/ToBeReviewed


Ignore:
Timestamp:
02/02/10 09:47:19 (14 years ago)
Author:
smasson
Message:

make sure that x[y]min[max]mesh are properly used

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/ToBeReviewed/INIT/initncdf.pro

    r371 r421  
    2424; x/yaxis = keyword_set(start1) + findgen(jpi/jpj) 
    2525; this forces key_onearth = 0 
     26; 
     27; @keyword XMINMESH {default=0L}{type=scalar} 
     28; Define common (cm_4mesh) variables ixminmesh used to define the localization 
     29; of the first point of the grid along the x direction in a zoom of the original grid 
     30; 
     31; @keyword YMINMESH {default=0L}{type=scalar} 
     32; Define common (cm_4mesh) variables iyminmesh used to define the localization 
     33; of the first point of the grid along the y direction in a zoom of the original grid 
     34; 
     35; @keyword XMAXMESH {default=jpiglo-1}{type=scalar} 
     36; Define common (cm_4mesh) variables ixmaxmesh used to define the localization 
     37; of the last point of the grid along the x direction in a zoom of the original grid 
     38; Note that if XMAXMESH < 0 then ixmaxmesh is defined as ixmaxmesh = jpiglo -1 + xmaxmesh 
     39; 
     40; @keyword YMAXMESH {default=jpjglo-1}{type=scalar} 
     41; Define common (cm_4mesh) variables iymaxmesh used to define the localization 
     42; of the last point of the grid along the y direction in a zoom of the original grid 
     43; Note that if YMAXMESH < 0 then iymaxmesh is defined as iymaxmesh = jpjglo -1 + ymaxmesh 
    2644; 
    2745; @keyword ZINDEX {default=0}{type=scalar: 0 or 1} 
     
    5573;- 
    5674PRO initncdf, ncfilein $ 
     75              , XMINMESH = xminmesh, XMAXMESH = xmaxmesh $ 
     76              , YMINMESH = yminmesh, YMAXMESH = ymaxmesh $ 
    5777              , ZAXISNAME=zaxisname, START1=start1 $ 
    5878              , XYINDEX=xyindex, ZINDEX=zindex $ 
     
    86106; find the x/yaxis 
    87107 ncdf_getaxis, cdfid, dimidx, dimidy, xaxis, yaxis $ 
     108               , XMINMESH = xminmesh, XMAXMESH = xmaxmesh $ 
     109               , YMINMESH = yminmesh, YMAXMESH = ymaxmesh $ 
    88110               , START1 = start1, XYINDEX = xyindex, ROMSGRID = romsgrid, _extra = ex 
    89111;---------------------------------------------------------- 
Note: See TracChangeset for help on using the changeset viewer.