Changeset 12812


Ignore:
Timestamp:
07/30/12 07:46:56 (13 years ago)
Author:
Mathieu Morlighem
Message:

convert time from years to seconds

File:
1 edited

Legend:

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

    r12761 r12812  
    9797        if(isdelta18o){
    9898                IssmDouble *temp = NULL;
     99                IssmDouble  yts;
    99100                int         N,M;
    100101
    101                 iomodel->FetchData(&temp,&N,&M,SurfaceforcingsDelta18oEnum);
    102                 _assert_(N==2);
     102                iomodel->Constant(&yts,ConstantsYtsEnum);
     103
     104                iomodel->FetchData(&temp,&N,&M,SurfaceforcingsDelta18oEnum); _assert_(N==2);
     105                for(i=0;i<M;i++) temp[M+i]=yts*temp[M+i];
    103106                parameters->AddObject(new TransientParam(SurfaceforcingsDelta18oEnum,&temp[0],&temp[M],M));
    104107                xDelete<IssmDouble>(temp);
    105108
    106                 iomodel->FetchData(&temp,&N,&M,SurfaceforcingsDelta18oSurfaceEnum);
    107                 _assert_(N==2);
     109                iomodel->FetchData(&temp,&N,&M,SurfaceforcingsDelta18oSurfaceEnum); _assert_(N==2);
     110                for(i=0;i<M;i++) temp[M+i]=yts*temp[M+i];
    108111                parameters->AddObject(new TransientParam(SurfaceforcingsDelta18oSurfaceEnum,&temp[0],&temp[M],M));
    109112                xDelete<IssmDouble>(temp);
Note: See TracChangeset for help on using the changeset viewer.