Changeset 44 for trunk/Obsolete/nlecmois.pro

Timestamp:

05/02/06 18:13:44 (18 years ago)

Author:

pinsard

Message:

upgrade of LECTURE/ReadWrite according to cerbere.lodyc.jussieu.fr: /usr/home/smasson/SAXO_RD/ : files

File:

• trunk/Obsolete/nlecmois.pro (copied) (copied from trunk/LECTURE/nlecmois.pro) (2 diffs)

trunk/Obsolete/nlecmois.pro

@@ -58 +58 @@
       vargrid=grille
       nomfich=prefix+'.moyenne.mensuelle.'+strtrim(annee, 1)+'-'+strtrim(annee+2, 1)+'.grid.'+vargrid+'.nc'
+      IF !version.OS_FAMILY EQ 'unix' THEN spawn, '\file '+iodir+nomfich+' > /dev/null'
       cdfid=ncdf_open(iodir+nomfich)
       varcontient=ncdf_varinq(cdfid,nom)
@@ -66 +67 @@
          return, report('LES FICHIERS: '+iodir+prefix+'.moyenne.mensuelle.'+strtrim(annee, 1)+'-'+strtrim(annee+2, 1)+'.grid... n''existe pas.')
       for i=0,n_elements(quelsfichiers)-1 do begin
+         IF !version.OS_FAMILY EQ 'unix' THEN spawn, '\file '+quelsfichiers[i]+' > /dev/null'
          cdfid=ncdf_open(quelsfichiers[i])
          contient=ncdf_inquire(cdfid)