<p><b>laura@ucar.edu</b> 2013-01-23 09:28:12 -0700 (Wed, 23 Jan 2013)</p><p>corrected the calculation of the interpolated meridional wind to fixed pressure levels<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_nhyd_atmos/mpas_atm_interp_diagnostics.F
===================================================================
--- branches/atmos_physics/src/core_nhyd_atmos/mpas_atm_interp_diagnostics.F        2013-01-18 23:41:30 UTC (rev 2390)
+++ branches/atmos_physics/src/core_nhyd_atmos/mpas_atm_interp_diagnostics.F        2013-01-23 16:28:12 UTC (rev 2391)
@@ -187,7 +187,7 @@
  do iCell = 1, nCells
  do k = 1, nVertLevels
     kk = nVertLevels+1-k
-    field_in(iCell,kk) = uzonal(k,iCell)
+    field_in(iCell,kk) = umeridional(k,iCell)
  enddo
  enddo
  call interp_tofixed_pressure(nCells,nVertLevels,nIntP,press_in,field_in,press_interp,field_interp)

</font>
</pre>