<p><b>jgraham@lanl.gov</b> 2012-11-26 15:42:05 -0700 (Mon, 26 Nov 2012)</p><p>now builds<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/turbulent_transfer/src/core_ocean/mpas_ocn_tendency.F
===================================================================
--- branches/ocean_projects/turbulent_transfer/src/core_ocean/mpas_ocn_tendency.F        2012-11-26 22:18:07 UTC (rev 2320)
+++ branches/ocean_projects/turbulent_transfer/src/core_ocean/mpas_ocn_tendency.F        2012-11-26 22:42:05 UTC (rev 2321)
@@ -66,6 +66,7 @@
public :: ocn_tend_h, &
ocn_tend_u, &
+ ocn_tend_u_diagnostic, &
ocn_tend_scalar, &
ocn_diagnostic_solve, &
ocn_wtop, &
@@ -289,7 +290,7 @@
integer :: err
integer :: iEdge, iCell, k, i
- integer :: boundaryMask, velMask, nCells, nEdges, nVertices, nVertLevels, vertexDegree, err
+ integer :: nCells
integer, dimension(:), pointer :: nEdgesOnCell, maxLevelCell
integer, dimension(:,:), pointer :: edgesOnCell
</font>
</pre>