Changeset 23305
- Timestamp:
 - 09/18/18 09:11:06 (7 years ago)
 - Location:
 - issm/trunk-jpl/src/c/classes/Params
 - Files:
 - 
      
- 2 edited
 
- 
          
  Parameters.cpp (modified) (2 diffs)
 - 
          
  Parameters.h (modified) (2 diffs)
 
 
Legend:
- Unmodified
 - Added
 - Removed
 
- 
      
issm/trunk-jpl/src/c/classes/Params/Parameters.cpp
r23254 r23305 426 426 } 427 427 /*}}}*/ 428 void Parameters::FindParamAndMakePassive(IssmPDouble* pscalar,int param_enum){ _assert_(this);/*{{{*/ 429 _assert_(param_enum>ParametersSTARTEnum); 430 _assert_(param_enum<ParametersENDEnum); 431 432 /*Get "active" parameter*/ 433 IssmDouble intermediary; 434 int index = param_enum - ParametersSTARTEnum -1; 435 if(!this->params[index]) _error_("Parameter " << EnumToStringx(param_enum) <<" not set"); 436 this->params[index]->GetParameterValue(&intermediary); 437 438 /*cast to "passive"*/ 439 *pscalar=reCast<IssmPDouble>(intermediary); 440 } 441 /*}}}*/ 428 442 void Parameters::FindParamInDataset(IssmDouble** pIssmDoublearray,int* pM,int* pN,int dataset_type,int enum_type){/*{{{*/ 429 443 _assert_(this); … … 717 731 } 718 732 /*}}}*/ 719 720 /*Specific case with ADOL-C, we might need to get double params for m1qn3*/721 #if defined(_HAVE_AD_) && !defined(_WRAPPERS_)722 void Parameters::FindParamAndMakePassive(double* pscalar,int param_enum){ _assert_(this);/*{{{*/723 _assert_(param_enum>ParametersSTARTEnum);724 _assert_(param_enum<ParametersENDEnum);725 726 /*Get "active" parameter*/727 IssmDouble intermediary;728 int index = param_enum - ParametersSTARTEnum -1;729 if(!this->params[index]) _error_("Parameter " << EnumToStringx(param_enum) <<" not set");730 this->params[index]->GetParameterValue(&intermediary);731 732 /*cast to "passive"*/733 *pscalar=reCast<double>(intermediary);734 }735 /*}}}*/736 #endif - 
      
issm/trunk-jpl/src/c/classes/Params/Parameters.h
r23254 r23305 52 52 void FindParam(FILE** pfid,int enum_type); 53 53 void FindParam(DataSet** pdataset, int enum_type); 54 void FindParamAndMakePassive(IssmPDouble* pscalar, int enum_type); 54 55 void FindParamInDataset(IssmDouble** pIssmDoublearray,int* pM,int* pN,int dataset_type,int enum_type); 55 56 … … 70 71 Param* FindParamObject(int enum_type); 71 72 72 /*Specific instantiations for IssmDouble*: */73 #if defined(_HAVE_AD_) && !defined(_WRAPPERS_)74 void FindParamAndMakePassive(double* pscalar, int enum_type);75 #endif76 77 73 }; 78 74  
  Note:
 See   TracChangeset
 for help on using the changeset viewer.
  ![(please configure the [header_logo] section in trac.ini)](/trac/issm/chrome/common/trac_banner.png)