Changeset 493 for trunk/SRC/ToBeReviewed/CALCULS/grossemoyenne.pro

Timestamp:

04/08/14 11:28:29 (10 years ago)

Author:

pinsard

Message:

fix some typos in comments

File:

• trunk/SRC/ToBeReviewed/CALCULS/grossemoyenne.pro (modified) (5 diffs)

trunk/SRC/ToBeReviewed/CALCULS/grossemoyenne.pro

@@ -66 +66 @@
 ;
 ; @keyword SSH
-; array giving the sea level elenation (in meter) that must be added
+; array giving the sea level elevation (in meter) that must be added
 ; to the thickness of the first level when computing vertical mean
 ;
@@ -84 +84 @@
 ;
 ; @history
-; Jerome Vialard (jv\@lodyc.jussieu.fr)
+; JérÎme Vialard (jv\@lodyc.jussieu.fr)
 ;                       2/7/98
 ;                       Sebastien Masson (smasson\@lodyc.jussieu.fr)
@@ -148 +148 @@
   endcase
 ;------------------------------------------------------------
-;   I.3) Obtainment of scale's factors and of the mask on the subdomain concernedby the average.
-; Redefinition of the domain ajusted at boxzoom (at 6 elements)
+;   I.3) Obtainment of scale's factors and of the mask on the subdomain 
+;        concerned by the average.
+; Redefinition of the domain adjusted at boxzoom (at 6 elements)
 ; This will allowed us to calculate only in the domain concerned by the average.
 ; Domdef, followed by grid give us all arrays of the grid on the subdomain
@@ -272 +273 @@
         if keyword_set(savedbox) THEN restoreboxparam, 'boxparam4grmoyenne.dat'
         return, report('Probleme d''adequation entre les tailles du domaine nx*ny*jpt '+strtrim(nx, 1)+'*'+strtrim(ny, 1)+'*'+strtrim(jpt, 1)+' et du tableau '+strtrim(taille[1], 1)+'*'+strtrim(taille[2], 1)+'*'+strtrim(taille[3], 1))
-      enD
+      END
     endcase
     if keyword_set(nan) NE 0 then BEGIN
@@ -612 +613 @@
   ENDIF
 ;------------------------------------------------------------
-; IV.3) We replace in the domain whch was defined at the entry of average
+; IV.3) We replace in the domain which was defined at the entry of average
 ;------------------------------------------------------------
   if keyword_set(savedbox) THEN restoreboxparam, 'boxparam4grmoyenne.dat'