Changeset 27435
- Timestamp:
- 11/28/22 07:01:04 (2 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/Elements/Element.cpp
r27416 r27435 2730 2730 2731 2731 }/*}}}*/ 2732 void Element::MonthlyF ractionBasin(IssmDouble* monthlyfrac,int enum_type){/*{{{*/2732 void Element::MonthlyFactorBasin(IssmDouble* monthlyfac,int enum_type){/*{{{*/ 2733 2733 2734 2734 /*Variable declaration*/ … … 2779 2779 /*Get basin-specific parameters of the element*/ 2780 2780 this->GetInputValue(&basinid,basinenum_type); 2781 for(int i=0;i<12;i++) monthlyf rac_b[i] = monthlyfrac[basinid*12+i];2781 for(int i=0;i<12;i++) monthlyfac_b[i] = monthlyfac[basinid*12+i]; 2782 2782 2783 2783 /*Retrieve input*/ … … 2787 2787 for(int v=0;v<numvertices;v++){ 2788 2788 for(int i=0;i<12;i++){ 2789 rateinmonth[v*12+i] = varlistinput[v]*monthlyf rac_b[i]*12;2789 rateinmonth[v*12+i] = varlistinput[v]*monthlyfac_b[i]*12; 2790 2790 varlist[v] = varlist[v]+fracdtinmonth[i]*rateinmonth[v*12+i]; 2791 2791 } … … 2797 2797 xDelete<IssmDouble>(fracdtinmonth); 2798 2798 xDelete<IssmDouble>(rateinmonth); 2799 xDelete<IssmDouble>(monthlyf rac_b);2799 xDelete<IssmDouble>(monthlyfac_b); 2800 2800 xDelete<IssmDouble>(monthlyrate_b); 2801 2801 xDelete<IssmDouble>(varlist); -
issm/trunk-jpl/src/c/modules/FrontalForcingsx/FrontalForcingsx.cpp
r27354 r27435 165 165 element->ArmaProcess(isstepforarma,arorder,maorder,numparams,numbreaks,tstep_arma,polyparams,arlagcoefs,malagcoefs,datebreaks,isdischargestochastic,FrontalForcingsSubglacialDischargearmaEnum); 166 166 /*Scale with monthly fractions*/ 167 element->MonthlyF ractionBasin(monthlyfrac,FrontalForcingsSubglacialDischargeEnum);167 element->MonthlyFactorBasin(monthlyfrac,FrontalForcingsSubglacialDischargeEnum); 168 168 } 169 169
Note:
See TracChangeset
for help on using the changeset viewer.