Changeset 3 for trunk/src/join_dmean_asc.pro

Timestamp:

11/29/10 14:58:57 (14 years ago)

Author:

pinsard

Message:

ok for reading models files

File:

• trunk/src/join_dmean_asc.pro (modified) (5 diffs)

trunk/src/join_dmean_asc.pro

@@ -43 +43 @@
 ;
 ; :func:`report`
-; :func:`julday`
 ;
 ; :see also:
@@ -68 +67 @@
 ; :history:
 ;
+; - fplod 20101129T133140Z aedon.locean-ipsl.upmc.fr (Darwin)
+;
+;   * correction for NaN
+;   * suppression print controle
+;
 ; - fplod 20101129T091703Z aedon.locean-ipsl.upmc.fr (Darwin)
 ;
@@ -75 +79 @@
 ;
 ;   * input = structures no more files
-;
-; - fplod 20101124T141037Z aedon.locean-ipsl.upmc.fr (Darwin)
-;
-;   * data.julianday type from float to double to be compatible
-;     with :func:`julday`
 ;
 ; - fplod 20101123T154451Z aedon.locean-ipsl.upmc.fr (Darwin)
@@ -126 +125 @@
 result = replicate(resultstruct, ndays)
 ;
-help, result,/structure
-help, data_dmean,/structure
-help, data_asc,/structure
 ; fill returned structure
 FOR iday=0L, ndays -1 DO BEGIN
@@ -145 +141 @@
    IF (count EQ 0) THEN BEGIN
       print, 'no station ',  data_dmean[iday].first_station,' in data_asc.station'
-      result[iday].lat = NaN 
-      result[iday].lon = NaN
+      result[iday].lat = !VALUES.F_NAN
+      result[iday].lon = !VALUES.F_NAN
    ENDIF ELSE BEGIN
       ;print, 'indice de la first_station', data_dmean[iday].first_station,' dans data_asc = ',indice_asc