Ignore:
Timestamp:
06/19/06 16:14:56 (18 years ago)
Author:
smasson
Message:

new compilation options (compile_opt idl2, strictarrsubs) in each routine

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/ToBeReviewed/TRIANGULATION/section.pro

    r29 r114  
    3939;--------------------------------------------------------- 
    4040; include common 
     41; 
     42  compile_opt idl2, strictarrsubs 
     43; 
    4144@cm_4mesh 
    4245@cm_4data 
     
    342345    xsave = !x 
    343346    ysave = !y 
    344     plt, findgen(nx, ny), /nodata, /nofill, /rempli, title = '', subtitle = '', coast_thick = 2, window = showbuild 
     347    plt, findgen(nx, ny), /nodata, /nofill, /rempli, title = '', subtitle = '' $ 
     348         , coast_thick = 2, window = showbuild 
    345349    !p.title = '' 
    346350    !p.subtitle = '' 
     
    356360    plots, float(points2), imaginary(points2), color = 150, psym = 1 
    357361    plots, float(inter), imaginary(inter), color = 250, psym = 1 
    358      
    359     IF terre[0] NE -1 THEN plots, float(inter[terre]), imaginary(inter[terre]), color = 0, psym = 1 
    360      
     362 
     363;  ?? bug ??    IF terre[0] NE -1 THEN plots, float(terre[inter]), imaginary(terre[inter]), color = 0, psym = 1 
     364      
    361365;      dummy = '' 
    362366;      read, dummy,  prompt = 'press return to continue' 
Note: See TracChangeset for help on using the changeset viewer.