Changeset 19268


Ignore:
Timestamp:
04/07/15 16:10:07 (10 years ago)
Author:
schlegel
Message:

CHG: remove the yts pdd conversion in create parameters

Location:
issm/trunk-jpl/src/c
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/modules/ModelProcessorx/CreateParameters.cpp

    r19236 r19268  
    119119                        if(ismungsm){
    120120                          iomodel->FetchData(&temp,&N,&M,SurfaceforcingsPfacEnum); _assert_(N==2);
    121                           for(i=0;i<M;i++) temp[M+i]=temp[M+i];
    122121                          parameters->AddObject(new TransientParam(SurfaceforcingsPfacEnum,&temp[0],&temp[M],interp,M));
    123122                          iomodel->DeleteData(temp,SurfaceforcingsPfacEnum);
    124123                       
    125124                          iomodel->FetchData(&temp,&N,&M,SurfaceforcingsTdiffEnum); _assert_(N==2);
    126                           for(i=0;i<M;i++) temp[M+i]=temp[M+i];
    127125                          parameters->AddObject(new TransientParam(SurfaceforcingsTdiffEnum,&temp[0],&temp[M],interp,M));
    128126                          iomodel->DeleteData(temp,SurfaceforcingsTdiffEnum);
    129127
    130128                          iomodel->FetchData(&temp,&N,&M,SurfaceforcingsSealevEnum); _assert_(N==2);
    131                           for(i=0;i<M;i++) temp[M+i]=temp[M+i];
    132129                          parameters->AddObject(new TransientParam(SurfaceforcingsSealevEnum,&temp[0],&temp[M],interp,M));
    133130                          iomodel->DeleteData(temp,SurfaceforcingsSealevEnum);
    134131                        }
    135132                        if(isdelta18o){
    136                                 iomodel->Constant(&yts,ConstantsYtsEnum);
    137 
    138133                                iomodel->FetchData(&temp,&N,&M,SurfaceforcingsDelta18oEnum); _assert_(N==2);
    139                                 for(i=0;i<M;i++) temp[M+i]=yts*temp[M+i];
    140134                                parameters->AddObject(new TransientParam(SurfaceforcingsDelta18oEnum,&temp[0],&temp[M],interp,M));
    141135                                iomodel->DeleteData(temp,SurfaceforcingsDelta18oEnum);
    142136
    143137                                iomodel->FetchData(&temp,&N,&M,SurfaceforcingsDelta18oSurfaceEnum); _assert_(N==2);
    144                                 for(i=0;i<M;i++) temp[M+i]=yts*temp[M+i];
    145138                                parameters->AddObject(new TransientParam(SurfaceforcingsDelta18oSurfaceEnum,&temp[0],&temp[M],interp,M));
    146139                                iomodel->DeleteData(temp,SurfaceforcingsDelta18oSurfaceEnum);
     
    158151                        iomodel->Constant(&isd18opd,SurfaceforcingsIsd18opdEnum);
    159152                        if(isd18opd){
    160                                 iomodel->Constant(&yts,ConstantsYtsEnum);
    161 
    162153                                iomodel->FetchData(&temp,&N,&M,SurfaceforcingsDelta18oEnum); _assert_(N==2);
    163                                 for(i=0;i<M;i++) temp[M+i]=yts*temp[M+i];
    164154                                parameters->AddObject(new TransientParam(SurfaceforcingsDelta18oEnum,&temp[0],&temp[M],interp,M));
    165155                                iomodel->DeleteData(temp,SurfaceforcingsDelta18oEnum);
  • issm/trunk-jpl/src/c/shared/Elements/ComputeMungsmTemperaturePrecipitation.cpp

    r18969 r19268  
    2121    monthlytemperaturestmp[imonth] = tdiffh + TemperaturesPresentday[imonth] ;
    2222
    23     monthlyprectmp[imonth] =min(1.5, PrecipitationsPresentday[imonth] * pow(PrecipitationsLgm[imonth],PfacTime));   // [m/month]
     23    monthlyprectmp[imonth] =min(1.5, PrecipitationsPresentday[imonth] * pow(PrecipitationsLgm[imonth],PfacTime));   // [m/yr]
    2424
    2525    /*Assign output pointer*/
Note: See TracChangeset for help on using the changeset viewer.