Changeset 491 for trunk


Ignore:
Timestamp:
02/14/12 12:01:37 (12 years ago)
Author:
lelod
Message:

etopoice - domdef

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/extract_amsua.pro

    r486 r491  
    249249; lecture fichier land - sea (S. Masson) 
    250250file=project_id_env+'/MASK/ETOPO1_Ice_g_gmt4.nc' 
     251initncdf,file, zaxisname='toto',xaxisname='lon',yaxisname='lat',XMINMESH=8900,XMAXMESH=14000, YMINMESH=4500,YMAXMESH=8000  
    251252domdef,lon_min-15, lon_max+15, lat_min-15, lat_max+15 
    252 bate = ncdf_lec(file, var = 'z') GT 0 
    253 xxe = float(ncdf_lec(file, var = 'lon')) 
    254 yye = float(ncdf_lec(file, var = 'lat')) 
     253bathy=read_ncdf('z',file=file) 
     254bate=bathy.arr gt 0 
     255; bate: bathymetry flagged by >0 -> 1 over land and 0 over Ocean 
     256;bate = ncdf_lec(file, var = 'z') GT 0 
     257;xxe = float(ncdf_lec(file, var = 'lon')) 
     258;yye = float(ncdf_lec(file, var = 'lat')) 
    255259jpie = n_elements(xxe) 
    256260jpje = n_elements(yye) 
Note: See TracChangeset for help on using the changeset viewer.