--- MITgcm/pkg/rbcs/rbcs_add_tendency.F 2005/12/19 19:13:43 1.1 +++ MITgcm/pkg/rbcs/rbcs_add_tendency.F 2006/09/26 19:29:37 1.2 @@ -77,7 +77,7 @@ #ifdef ALLOW_PTRACERS if (tracernum.gt.2) then iTracer=tracernum-2 - irbc=max(maskLEN,tracernum) + irbc=min(maskLEN,tracernum) if (useRBCptracers) then if (useRBCptrnum(iTracer)) then DO j=1,sNy