<p><b>xylar@lanl.gov</b> 2010-06-02 08:19:06 -0600 (Wed, 02 Jun 2010)</p><p>BRANCH COMMIT<br>
<br>
Changed sign of the the part of the meridional velocity from uX and uY (Thanks, Michael!)<br>
<br>
Added dependence of module_vector_reconstruction on module_RBF_interpolation to the /src/operators/Makefile (Again, thanks Michael!)<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/IBinterp/mpas/src/operators/Makefile
===================================================================
--- branches/ocean_projects/IBinterp/mpas/src/operators/Makefile        2010-06-01 22:40:08 UTC (rev 324)
+++ branches/ocean_projects/IBinterp/mpas/src/operators/Makefile        2010-06-02 14:19:06 UTC (rev 325)
@@ -7,7 +7,7 @@
operators: $(OBJS)
        ar -ru libops.a $(OBJS)
-module_vector_reconstruction.o:
+module_vector_reconstruction.o: module_RBF_interpolation.o
module_RBF_interpolation.o:
clean:
Modified: branches/ocean_projects/IBinterp/mpas/src/operators/module_vector_reconstruction.F
===================================================================
--- branches/ocean_projects/IBinterp/mpas/src/operators/module_vector_reconstruction.F        2010-06-01 22:40:08 UTC (rev 324)
+++ branches/ocean_projects/IBinterp/mpas/src/operators/module_vector_reconstruction.F        2010-06-02 14:19:06 UTC (rev 325)
@@ -189,7 +189,7 @@
clon = cos(lonCell(iCell))
slon = sin(lonCell(iCell))
uReconstructZonal(:,iCell) = -uReconstructX(:,iCell)*slon + uReconstructY(:,iCell)*clon
- uReconstructMeridional(:,iCell) = (uReconstructX(:,iCell)*clon &
+ uReconstructMeridional(:,iCell) = -(uReconstructX(:,iCell)*clon &
+ uReconstructY(:,iCell)*slon)*slat &
+ uReconstructZ(:,iCell)*clat
end do
</font>
</pre>