--- trunk/libf/phylmd/aaam_bud.f90	2012/01/10 19:02:02	56
+++ trunk/phylmd/aaam_bud.f	2014/09/04 10:40:24	105
@@ -8,7 +8,7 @@
        dragv, liftv, phyv, p, u, v, aam, torsfc)
 
     ! Author: F. Lott (LMD/CNRS). Date: 2003/10/20. Object: Compute
-    ! different terms of the axial AAAM Budget and mountain torque.
+    ! different terms of the axial AAAM budget and mountain torque.
     ! Only valid for regular rectangular grids. Should be called after
     ! "lift_noro".
 
@@ -49,7 +49,6 @@
     REAL tmou(3) ! resolved mountain torque (3 components)
     REAL tsso(3) ! parameterised moutain drag torque (3 components)
     REAL tbls(3) ! parameterised boundary layer torque (3 components)
-    integer iax
 
     REAL ZS(801, 401) ! topographic height
     REAL PS(801, 401) ! surface pressure