[issm-svn] r12388 - issm/trunk/src/c/objects/Elements

[lemorzad at issm.ess.uci.edu]

Author: lemorzad
Date: 2012-06-07 11:23:32 -0700 (Thu, 07 Jun 2012)
New Revision: 12388

Modified:
   issm/trunk/src/c/objects/Elements/Penta.cpp
Log:


Modified: issm/trunk/src/c/objects/Elements/Penta.cpp
===================================================================
--- issm/trunk/src/c/objects/Elements/Penta.cpp	2012-06-07 18:15:33 UTC (rev 12387)
+++ issm/trunk/src/c/objects/Elements/Penta.cpp	2012-06-07 18:23:32 UTC (rev 12388)
@@ -2306,6 +2306,7 @@
    double pddtj[NUMVERTICES], hmx2;
 
    //printf("ok1p\n");
+   if(!IsOnBed()) return;
 
    /*Recover monthly temperatures and precipitation*/
    Input*     input=inputs->GetInput(SurfaceforcingsMonthlytemperaturesEnum); _assert_(input);