source: trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/definedefaultextra.pro @ 134

Last change on this file since 134 was 134, checked in by navarro, 18 years ago

change *.pro file properties (del eof-style, del executable, set keywords Id
  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 624 bytes
Line 
1FUNCTION definedefaultextra, nomvariable
2;
3  compile_opt idl2, strictarrsubs
4;
5   case strlowcase(nomvariable) of
6;       'sn':BEGIN
7;          return, get_extra(min = 31., max = 37., inter = .2, lct = 33,/nocontout)
8;       END
9;       'tn':BEGIN
10;          return, get_extra(min = 20, max = 31, inter = .5, lct = 39)
11;       END
12;       'un':BEGIN
13;          return, get_extra(min = -1, max = 1, inter = .1, lct = 64)
14;       END
15;       'vn':BEGIN
16;          return, get_extra(min = -1, max = 1, inter = .1, lct = 64)
17;       END
18      ELSE:
19   ENDCASE
20
21   return, get_extra(min = '', max = '', inter = '', lct = 39)
22end
Note: See TracBrowser for help on using the repository browser.