<a name="l00186"></a>00186       <span class="comment">! Compute ocean fluxes and update SST</span>
<a name="l00187"></a>00187       <span class="comment">!-----------------------------------------------------------------</span>
<a name="l00188"></a>00188 
<a name="l00189"></a>00189 <span class="comment">!DIR$ CONCURRENT !Cray</span>
<a name="l00190"></a>00190 <span class="comment">!cdir nodep      !NEC</span>
<a name="l00191"></a>00191 <span class="comment">!ocl novrec      !Fujitsu</span>
<a name="l00192"