--- MITgcm_contrib/bling/pkg/bling_light.F	2016/02/28 21:49:24	1.2
+++ MITgcm_contrib/bling/pkg/bling_light.F	2016/05/15 00:30:35	1.3
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/bling/pkg/bling_light.F,v 1.2 2016/02/28 21:49:24 mmazloff Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/bling/pkg/bling_light.F,v 1.3 2016/05/15 00:30:35 mmazloff Exp $
 C $Name:  $
 
 #include "BLING_OPTIONS.h"
@@ -146,9 +146,7 @@
 c ---------------------------------------------------------------------
 c  instantaneous light, mixed layer averaged light
 
-C$TAF LOOP = parallel
       DO j=jmin,jmax
-C$TAF LOOP = parallel
        DO i=imin,imax
        
 c  Photosynthetically-available radiations (PAR)
@@ -169,9 +167,7 @@
         tmp_ML     = 0. _d 0
 #endif
 
-c C$TAF init ml_stuff = static, Nr
         DO k=1,Nr
-c C$TAF STORE SumMLDepth = ml_stuff
 
          IF (hFacC(i,j,k,bi,bj).gt.0) THEN