--- MITgcm/pkg/ptracers/ptracers_integrate.F	2007/12/17 22:03:15	1.36
+++ MITgcm/pkg/ptracers/ptracers_integrate.F	2008/01/23 15:30:12	1.37
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/ptracers/ptracers_integrate.F,v 1.36 2007/12/17 22:03:15 jmc Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/ptracers/ptracers_integrate.F,v 1.37 2008/01/23 15:30:12 jmc Exp $
 C $Name:  $
 
 #include "PTRACERS_OPTIONS.h"
@@ -194,7 +194,7 @@
      I                          bi,bj,K,
      U                          gPtr(1-Olx,1-Oly,1,1,1,iTracer),
      I                          myThid )
-        IF ( PTRACERS_AdamsBashGtr(iTracer) ) THEN
+        IF ( PTRACERS_AdamsBashGtr(iTracer) )
      &  CALL FREESURF_RESCALE_G(
      I                          bi,bj,K,
      U                          gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer),