Changeset 181
- Timestamp:
- 09/15/06 10:24:36 (18 years ago)
- Location:
- trunk/SRC
- Files:
-
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/Documentation/xmldoc/websaxo.html
r180 r181 37 37 </div> 38 38 <div><span class="pubdate">svn Id of xml source file : $Id: 39 websaxo.xml 1 76 2006-09-13 14:17:41Z smasson $<br>39 websaxo.xml 180 2006-09-14 15:32:21Z smasson $<br> 40 40 <br></span></div> 41 41 <div> … … 86 86 <p>This page is a miror of <a href= 87 87 "http://forge.ipsl.jussieu.fr/saxo" target="_top">SAXO web page</a> 88 and allows you to browse IDLhelp pages in local.</p>88 and allows you to browse SAXO help pages in local.</p> 89 89 </div> 90 90 <div class="sect1" lang="en"> … … 189 189 <ul type="disc"> 190 190 <li> 191 <p>You like SAXO? please subscribe to SAXO <a href=191 <p>You like SAXO? Please subscribe to SAXO <a href= 192 192 "mailing.html?format=raw" target="_top">mailing lists</a> 193 193 (subscription and archives).</p> … … 195 195 <li> 196 196 <p><a href="http://forge.ipsl.jussieu.fr/saxo/report" target= 197 "_top"> read</a> tickets. Because of abusive use of our tickets,197 "_top">Read</a> tickets. Because of abusive use of our tickets, 198 198 <a href="http://forge.ipsl.jussieu.fr/saxo/newticket" target= 199 199 "_top">sending tickets</a> is now limited to a registred login -
trunk/SRC/Documentation/xmldoc/websaxo.xml
r180 r181 35 35 36 36 <note><para> 37 This page is a miror of <ulink url="http://forge.ipsl.jussieu.fr/saxo">SAXO web page</ulink> and allows you to browse IDLhelp pages in local.37 This page is a miror of <ulink url="http://forge.ipsl.jussieu.fr/saxo">SAXO web page</ulink> and allows you to browse SAXO help pages in local. 38 38 </para></note> 39 39 … … 101 101 <listitem> 102 102 <para> 103 You like SAXO? please subscribe to SAXO <ulink url="../../saxo/browser/trunk/SRC/Documentation/xmldoc/mailing.html?format=raw">mailing lists</ulink> (subscription and archives).103 You like SAXO? Please subscribe to SAXO <ulink url="../../saxo/browser/trunk/SRC/Documentation/xmldoc/mailing.html?format=raw">mailing lists</ulink> (subscription and archives). 104 104 </para> 105 105 </listitem> 106 106 <listitem> 107 107 <para> 108 <ulink url="http://forge.ipsl.jussieu.fr/saxo/report"> read</ulink> tickets. Because of abusive use of our tickets, <ulink url="http://forge.ipsl.jussieu.fr/saxo/newticket">sending tickets</ulink> is now limited to a registred login accessible if you subscribe to <ulink url="../../saxo/browser/trunk/SRC/Documentation/xmldoc/mailing.html?format=raw">SAXO mailing lists</ulink>.108 <ulink url="http://forge.ipsl.jussieu.fr/saxo/report">Read</ulink> tickets. Because of abusive use of our tickets, <ulink url="http://forge.ipsl.jussieu.fr/saxo/newticket">sending tickets</ulink> is now limited to a registred login accessible if you subscribe to <ulink url="../../saxo/browser/trunk/SRC/Documentation/xmldoc/mailing.html?format=raw">SAXO mailing lists</ulink>. 109 109 </para> 110 110 </listitem> -
trunk/SRC/ToBeReviewed/LECTURE/read_ncdf.pro
r174 r181 561 561 ncdf_attget, cdfid, 'hc', hc, /global 562 562 ; look for all variables names 563 allvarnames = strarr( varcontient.nvars)564 FOR i = 0, varcontient.nvars-1 DO BEGIN563 allvarnames = strarr(contient.nvars) 564 FOR i = 0, contient.nvars-1 DO BEGIN 565 565 tmp = ncdf_varinq( cdfid, i) 566 566 allvarnames[i] = tmp.name … … 568 568 CASE 1 OF 569 569 keyword_set(hfilename): $ 570 hroms = read_ncdf('h', 0, 0, FILENAME = hfile $570 hroms = read_ncdf('h', 0, 0, FILENAME = hfilename $ 571 571 , /TIMESTEP, /NOSTRUCT, CONT_NOFILL = CONT_NOFILL $ 572 572 , GRID = vargrid, /CALLITSELF, _EXTRA = ex) … … 583 583 , /TIMESTEP, /NOSTRUCT, CONT_NOFILL = CONT_NOFILL $ 584 584 , GRID = vargrid, /CALLITSELF, _EXTRA = ex) 585 (where(allvarnames EQ ' h'))[0] NE -1: $585 (where(allvarnames EQ 'zeta'))[0] NE -1: $ 586 586 zeta = read_ncdf('zeta', firsttps, lasttps, FILENAME = filename $ 587 587 , /TIMESTEP, /NOSTRUCT, CONT_NOFILL = CONT_NOFILL $ -
trunk/SRC/ToBeReviewed/PLOTS/DESSINE/pltv.pro
r163 r181 127 127 ;------------------------------------------------------------ 128 128 determineminmax, z2d, msk, truemin, truemax, MININ = min, MAXIN = max, NAN = nan 129 z2d = min > temporary(z2d) < max 129 130 ;------------------------------------------------------------ 130 131 ; apply other keywords (nointerp, c_nan, c_mask) … … 132 133 IF NOT keyword_set(nointerp) THEN BEGIN 133 134 ; interpolation between bottom and bottom+ncolors-1 134 m = 1.*(ncolors-1)/( truemax-truemin)135 p = bottom - 1.* truemin*m135 m = 1.*(ncolors-1)/(max-min) 136 p = bottom - 1.*min*m 136 137 z2d = m * temporary(z2d) + p 137 138 ENDIF -
trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/loadgrid.pro
r150 r181 64 64 ; add the arguments and keywords if necessary 65 65 IF n_elements(meshfile) GT 1 AND strmid(listing, 0, 1) NE '@' THEN BEGIN 66 FOR i = 1+(filepro NE 'NOT FOUND'), n_elements(meshfile)-1 DO listing = listing + ', ' + meshfile[i] 66 FOR i = 1, n_elements(meshfile)-1 DO BEGIN 67 IF strpos(meshfile[i], '.') NE -1 THEN str = isnumber(meshfile[i]) ELSE str = createfunc('n_elements('+meshfile[i]+')') 68 IF str EQ 0 THEN listing = listing + ', ''' + meshfile[i] + '''' ELSE listing = listing + ', ' + meshfile[i] 69 ENDFOR 67 70 ENDIF 68 71 69 72 IF strmid(listing, 0, 1) NE '@' THEN listing = listing + ', strcalling = ''' + meshfilein + ''', _extra = ex' 73 74 print, listing 75 70 76 71 77 createpro, listing, filename = myuniquetmpdir +'for_createpro.pro', _extra = ex -
trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/scanfile.pro
r172 r181 231 231 dummy = report('the file '+fullname+' has no time axis.!C we create a fake calendar ...') 232 232 fakecal = 1 233 time = date0fk + lindgen( jpt)233 time = date0fk + lindgen(1>jpt) 234 234 END 235 235 invar.natts EQ 0:BEGIN 236 236 dummy = report('the variable '+invar.name+' has no attribut.!C we create a fake calendar ...') 237 237 fakecal = 1 238 time = date0fk + lindgen( jpt)238 time = date0fk + lindgen(1>jpt) 239 239 END 240 240 ELSE:BEGIN … … 247 247 dummy = report('Attribut ''units'' not found for the variable '+invar.name+'!C we create a fake calendar ...') 248 248 fakecal = 1 249 time = date0fk + lindgen( jpt)249 time = date0fk + lindgen(1>jpt) 250 250 ENDIF ELSE BEGIN 251 251 ; we read the time axis … … 271 271 dummy = report('attribut units of time has not the good format: [^ ]* since ([0-9]){4}-([0-9]){2}-([0-9]){2}.*') 272 272 fakecal = 1 273 time = date0fk + lindgen( jpt)273 time = date0fk + lindgen(1>jpt) 274 274 ENDIF ELSE BEGIN 275 275 debut = str_sep(mots[2], '-') … … 325 325 IF max(histogram([long(time-time[0])])) GT 1 THEN fakecal = 1 ELSE fakecal = 0 326 326 date0fk = date2jul(19000101) 327 IF keyword_set(fakecal) THEN time = date0fk+lindgen( jpt) $327 IF keyword_set(fakecal) THEN time = date0fk+lindgen(1>jpt) $ 328 328 ELSE time = long(time) 329 329 ; -
trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/selectfile.pro
r157 r181 258 258 based = widget_base(base, /row, /align_center, uname = 'arg base', sensitive = 0) 259 259 dummyid = widget_label(based, value = 'procedure arguments') 260 a grbase = widget_text(based, value = '', uvalue = {name:'argtxt'} $260 argbase = widget_text(based, value = '', uvalue = {name:'argtxt'} $ 261 261 , uname = 'argtxt', xsize = 45, /EDITABLE) 262 262 ; keyword informations
Note: See TracChangeset
for help on using the changeset viewer.