<p><b>dwj07@fsu.edu</b> 2012-10-15 15:26:39 -0600 (Mon, 15 Oct 2012)</p><p><br>
        -- BRANCH COMMIT --<br>
<br>
        Adding more fixes for monthly forcing.<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/basin_pbc_mrp/src/basin.F
===================================================================
--- branches/ocean_projects/basin_pbc_mrp/src/basin.F        2012-10-15 21:19:13 UTC (rev 2211)
+++ branches/ocean_projects/basin_pbc_mrp/src/basin.F        2012-10-15 21:26:39 UTC (rev 2212)
@@ -1616,7 +1616,7 @@
 allocate(fVertexNew(nVerticesNew))
 allocate(bottomDepthNew(nCellsNew))
 allocate(u_srcNew(nVertLevelsNew,nEdgesNew))
-allocate(windStressMonthlyNew(12,nEdgesNew))
+allocate(windStressMonthlyNew(nMonths,nEdgesNew))
 allocate(uNew(1,nVertLevelsNew,nEdgesNew))
 allocate(vNew(1,nVertLevelsNew,nEdgesNew))
 allocate(hNew(1,nVertLevelsNew,nCellsNew))
@@ -1628,8 +1628,8 @@
 allocate(temperatureRestoreNew(nCellsNew))
 allocate(salinityRestoreNew(nCellsNew))
 
-allocate(temperatureRestoreMonthlyNew(12,nCellsNew))
-allocate(salinityRestoreMonthlyNew(12,nCellsNew))
+allocate(temperatureRestoreMonthlyNew(nMonths,nCellsNew))
+allocate(salinityRestoreMonthlyNew(nMonths,nCellsNew))
 
 
 xCellNew=0; yCellNew=0; zCellNew=0; latCellNew=0; lonCellNew=0; meshDensityNew=1.0; meshSpacingNew=0.0

</font>
</pre>