Changeset 9465 for issm/trunk/src/c/modules/ModelProcessorx/CreateParameters.cpp

Timestamp:

08/26/11 14:13:42 (14 years ago)

Author:

Mathieu Morlighem

Message:

moved rheology_law to a string

File:

• issm/trunk/src/c/modules/ModelProcessorx/CreateParameters.cpp (modified) (2 diffs)

issm/trunk/src/c/modules/ModelProcessorx/CreateParameters.cpp ¶

@@ -18 +18 @@
         Parameters *parameters       = NULL;
         double     *requestedoutputs = NULL;
+        char       *rheology_law     = NULL;
         
         if(*pparameters)return; //do not create parameters twice!
@@ -23 +24 @@
         /*Initialize dataset: */
         parameters = iomodel->CopyConstants();
+
+        /*Convert some parameters to Enums*/
+        iomodel->FetchData(&rheology_law,RheologyLawEnum);
+        if      (strcmp(rheology_law,"none")==0)      parameters->AddObject(new IntParam(RheologyLawEnum,NoneEnum));
+        else if (strcmp(rheology_law,"paterson")==0)  parameters->AddObject(new IntParam(RheologyLawEnum,PatersonEnum));
+        else if (strcmp(rheology_law,"arrhenius")==0) parameters->AddObject(new IntParam(RheologyLawEnum,ArrheniusEnum));
+        else _error_("rheology law %s not supported",rheology_law);
 
         /*some parameters that did not come with the iomodel: */