Index: /issm/trunk-jpl/src/c/classes/Elements/Tria.cpp
===================================================================
--- /issm/trunk-jpl/src/c/classes/Elements/Tria.cpp	(revision 27827)
+++ /issm/trunk-jpl/src/c/classes/Elements/Tria.cpp	(revision 27828)
@@ -1178,5 +1178,6 @@
 				/* Exp 4: set c=v-wrate(given), for the first 500 years, then c=0 for the second 500 years*/
 				if((groundedice<0) && (time<=500.0*yts)) {
-					wrate_input->GetInputValue(&wrate,&gauss);
+				//	wrate_input->GetInputValue(&wrate,&gauss);
+					wrate = -750*sin(2.0*M_PI*time/yts/1000)/yts;  // m/a -> m/s
 				}
 				else {
