Ignore:
Timestamp:
03/19/07 18:15:51 (17 years ago)
Author:
pinsard
Message:

improvements/corrections of some *.pro headers

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/ToBeReviewed/HOPE/createhopestruct.pro

    r163 r231  
    3030; 
    3131;- 
     32; 
    3233FUNCTION createhopestruct, event 
    3334; 
     
    8485   ENDIF 
    8586   tint = time[where(yyyymmdd GE tlimits[0] AND yyyymmdd LE tlimits[1])] 
    86 ;  
     87; 
    8788; limits of the domain 
    8889; 
     
    9091   nyt = n_elements(yint) 
    9192   nzt = n_elements(zint) 
    92    jpt = n_elements(tint)  
     93   jpt = n_elements(tint) 
    9394; 
    9495   firstx = (where(xaxis GE xint[0]))[0] 
     
    140141      if (where(attnames EQ 'missing_value'))[0] EQ -1 then valmask = 1e20 $ 
    141142      ELSE ncdf_attget,cdfid,varid,'missing_value', valmask 
    142    ENDIF ELSE BEGIN  
     143   ENDIF ELSE BEGIN 
    143144      varunit = '' 
    144145      valmask = 1e20 
Note: See TracChangeset for help on using the changeset viewer.