Changeset 479 for trunk/SRC/ToBeReviewed/TRIANGULATION/dessinetri.pro
- Timestamp:
- 08/17/12 12:18:32 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/TRIANGULATION/dessinetri.pro
r370 r479 74 74 ; 75 75 IF keyword_set(changecolor) THEN BEGIN 76 oldname = !d.name 77 if !d.name EQ 'PS' OR !d.name EQ 'Z' then BEGIN 78 thisos = strupcase(strmid(!version.os_family, 0, 3)) 79 CASE thisOS of 80 'MAC': set_plot, thisOS 81 'WIN': set_plot, thisOS 82 ELSE: set_plot, 'X' 83 ENDCASE 84 ncolors=(!d.n_colors-1) < 255 85 set_plot, oldname 86 ENDIF ELSE ncolors=(!d.n_colors-1) < 255 87 color = 1+indgen(changecolor)*(ncolors/(changecolor-1)) 88 ENDIF ELSE color = 0 89 color = color#replicate(1, n_elements(tri)/3/n_elements(color)+1) 76 ncolors = (!d.n_colors-1) < 255 77 color = 1+indgen(changecolor)*(ncolors/(changecolor-1)) 78 ENDIF ELSE color = 0 79 color = color#replicate(1, n_elements(tri)/3/n_elements(color)+1) 90 80 ; 91 81 tempdeux = systime(1) ; For key_performance =2
Note: See TracChangeset
for help on using the changeset viewer.