Ignore:
Timestamp:
09/11/06 09:11:26 (18 years ago)
Author:
smasson
Message:

bugfix + manage roms outputs

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_domain.pro

    r167 r172  
    245245      gdep1 = floor(gdep) 
    246246      gdep2 = ceil(gdep) 
    247       same = where(gdep2-gdep1 EQ 0) 
    248       if same[0] NE -1 then gdep2[same] = gdep2[same] + 1 
     247;;       same = where(gdep2-gdep1 EQ 0) 
     248;;       if same[0] NE -1 then gdep2[same] = gdep2[same] + 1 
    249249      widget_control, dthlv1id, set_value = {value:strtrim(gdep1, 1)} 
    250250      widget_control, dthlv2id, set_value = {value:strtrim(gdep2, 1)} 
    … …  
    321321  compile_opt idl2, strictarrsubs 
    322322; 
    323    box = lonarr(6) 
     323   box = fltarr(6) 
    324324   possiblecase = ['lon1', 'lon2', 'lat1', 'lat2', 'depth1', 'depth2'] 
    325325   for i = 0, 5 do begin 
    … …  
    327327       , get_value = value 
    328328      box[i] = value.value 
    329    endfor 
     329    ENDFOR 
    330330   return, box 
    331331end 
    … …  
    636636  gdep1 = floor(gdep) 
    637637  gdep2 = ceil(gdep) 
    638   same = where(gdep2-gdep1 EQ 0) 
    639   if same[0] NE -1 then gdep2[same] = gdep2[same] +1 
     638;;   same = where(gdep2-gdep1 EQ 0) 
     639;;   if same[0] NE -1 then gdep2[same] = gdep2[same] +1 
    640640  sgdep1 = strtrim(gdep1, 1) 
    641641  sgdep2 = strtrim(gdep2, 1) 
Note: See TracChangeset for help on using the changeset viewer.