--- MITgcm/model/src/dynamics.F	2001/06/06 15:14:06	1.70
+++ MITgcm/model/src/dynamics.F	2001/06/18 17:39:58	1.71
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/dynamics.F,v 1.70 2001/06/06 15:14:06 adcroft Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/dynamics.F,v 1.71 2001/06/18 17:39:58 cnh Exp $
 C $Name:  $
 
 #include "CPP_OPTIONS.h"
@@ -445,7 +445,7 @@
 C note(jmc) : phiHyd=0 at this point but is not really used in Molteni Physics
         IF ( useAIM ) THEN
          CALL TIMER_START('AIM_DO_ATMOS_PHYS      [DYNAMICS]', myThid)
-         CALL AIM_DO_ATMOS_PHYSICS( phiHyd, myTime, myThid )
+         CALL AIM_DO_ATMOS_PHYSICS( phiHyd, bi, bj, myTime, myThid )
          CALL TIMER_STOP ('AIM_DO_ATMOS_PHYS      [DYNAMICS]', myThid)
         ENDIF
 #endif /* ALLOW_AIM */