Changeset 509

Timestamp:

03/30/12 17:45:23 (12 years ago)

Author:

lelod

Message:

correction plantage quand seulement une ligne dans la zone

File:

• trunk/src/extract_amsua.pro (modified) (2 diffs)

trunk/src/extract_amsua.pro

@@ -372 +372 @@
    jnd=where(amalong[midpix,*] gt lon_min-15 and amalong[midpix,*] lt lon_max+15 and amalati[midpix,*] gt lat_min-15 and amalati[midpix,*] lt lat_max+15 ,nzon)
    print,"iii : nb de points du fichier dans le domaine geographique +15deg ",nzon, SYSTIME()
-   if nzon ne 0 then begin
+   if nzon gt 1 then begin
       amalat=amalati[*,jnd]
       amalon=amalong[*,jnd]
@@ -379 +379 @@
       tt=ttt[jnd]
       dims = SIZE(amalon, /DIMENSIONS)
-     ; print,'dimension tableaux extraits',dims
+      print,'dimension tableaux extraits',dims
       n_scan=dims[1]
-     ; PRINT,'il y a des donnees dans la region '
+      PRINT,'il y a des donnees dans la region '
       amaday=REFORM(ama_scan.scnlindy)
       amafov= fovy_1