<p><b>duda</b> 2011-06-29 14:21:36 -0600 (Wed, 29 Jun 2011)</p><p>BRANCH COMMIT<br>
<br>
Update hydrostatic atmosphere core w.r.t. trunk; see commit<br>
message for r630 of the trunk for an explanation of the <br>
changes in module_time_integration.F<br>
<br>
<br>
M    src/core_hyd_atmos/module_time_integration.F<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_hyd_atmos/module_time_integration.F
===================================================================
--- branches/atmos_physics/src/core_hyd_atmos/module_time_integration.F        2011-06-29 20:19:14 UTC (rev 910)
+++ branches/atmos_physics/src/core_hyd_atmos/module_time_integration.F        2011-06-29 20:21:36 UTC (rev 911)
@@ -1995,10 +1995,7 @@
       ! Compute height at vertices, pv at vertices, and average pv to edge locations
       !  ( this computes pv_vertex at all vertices bounding real cells )
       !
-      VTX_LOOP: do iVertex = 1,nVertices
-         do i=1,grid % vertexDegree
-            if (cellsOnVertex(i,iVertex) &gt; nCells) cycle VTX_LOOP
-         end do
+      do iVertex = 1,nVertices
          do k=1,nVertLevels
             h_vertex = 0.0
             do i=1,grid % vertexDegree
@@ -2008,7 +2005,7 @@
 
             pv_vertex(k,iVertex) = (fVertex(iVertex) + vorticity(k,iVertex)) / h_vertex
          end do
-      end do VTX_LOOP
+      end do
       ! tdr
 
 

</font>
</pre>