Changeset 23601


Ignore:
Timestamp:
01/05/19 20:18:05 (6 years ago)
Author:
Mathieu Morlighem
Message:

CHG: moving some params to analysis

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

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/analyses/LoveAnalysis.cpp

    r23585 r23601  
    1919}/*}}}*/
    2020void LoveAnalysis::UpdateParameters(Parameters* parameters,IoModel* iomodel,int solution_enum,int analysis_enum){/*{{{*/
     21
     22        IssmDouble* frequencies = NULL;
     23        int         nfreq;
     24        iomodel->FetchData(&nfreq,"md.love.nfreq");
     25        iomodel->FetchData(&frequencies,NULL,NULL,"md.love.frequencies");
     26        parameters->AddObject(new DoubleVecParam(LoveFrequenciesEnum,frequencies,nfreq));
     27        xDelete<IssmDouble>(frequencies);
     28
     29        parameters->AddObject(iomodel->CopyConstantObject("md.love.nfreq",LoveNfreqEnum));
     30        parameters->AddObject(iomodel->CopyConstantObject("md.love.sh_nmax",LoveShNmaxEnum));
     31        parameters->AddObject(iomodel->CopyConstantObject("md.love.sh_nmin",LoveShNminEnum));
     32        parameters->AddObject(iomodel->CopyConstantObject("md.love.g0",LoveG0Enum));
     33        parameters->AddObject(iomodel->CopyConstantObject("md.love.r0",LoveR0Enum));
     34        parameters->AddObject(iomodel->CopyConstantObject("md.love.mu0",LoveMu0Enum));
     35        parameters->AddObject(iomodel->CopyConstantObject("md.love.allow_layer_deletion",LoveAllowLayerDeletionEnum));
     36        parameters->AddObject(iomodel->CopyConstantObject("md.love.love_kernels",LoveKernelsEnum));
     37        parameters->AddObject(iomodel->CopyConstantObject("md.love.forcing_type",LoveForcingTypeEnum));
    2138}/*}}}*/
    2239void LoveAnalysis::UpdateConstraints(FemModel* femmodel){/*{{{*/
  • issm/trunk-jpl/src/c/modules/ModelProcessorx/CreateParameters.cpp

    r23474 r23601  
    345345        /*}}}*/
    346346
    347         /*Fourier love parameters (FIXME: should be in an analysis...*/
    348         if(solution_type==LoveSolutionEnum){
    349                 IssmDouble* frequencies = NULL;
    350                 int         nfreq;
    351                 iomodel->FetchData(&nfreq,"md.love.nfreq");
    352                 iomodel->FetchData(&frequencies,NULL,NULL,"md.love.frequencies");
    353                 parameters->AddObject(new DoubleVecParam(LoveFrequenciesEnum,frequencies,nfreq));
    354                 xDelete<IssmDouble>(frequencies);
    355 
    356                 parameters->AddObject(iomodel->CopyConstantObject("md.love.nfreq",LoveNfreqEnum));
    357                 parameters->AddObject(iomodel->CopyConstantObject("md.love.sh_nmax",LoveShNmaxEnum));
    358                 parameters->AddObject(iomodel->CopyConstantObject("md.love.sh_nmin",LoveShNminEnum));
    359                 parameters->AddObject(iomodel->CopyConstantObject("md.love.g0",LoveG0Enum));
    360                 parameters->AddObject(iomodel->CopyConstantObject("md.love.r0",LoveR0Enum));
    361                 parameters->AddObject(iomodel->CopyConstantObject("md.love.mu0",LoveMu0Enum));
    362                 parameters->AddObject(iomodel->CopyConstantObject("md.love.allow_layer_deletion",LoveAllowLayerDeletionEnum));
    363                 parameters->AddObject(iomodel->CopyConstantObject("md.love.love_kernels",LoveKernelsEnum));
    364                 parameters->AddObject(iomodel->CopyConstantObject("md.love.forcing_type",LoveForcingTypeEnum));
    365         }
    366 
    367347        /*Before returning, create parameters in case we are running Qmu or control types runs: */
    368348        CreateParametersControl(parameters,iomodel,solution_type);
     
    379359        CreateParametersAutodiff(parameters,iomodel);
    380360        if(VerboseMProcessor()) _printf0_("   ending autodiff parameters \n");
    381 
    382361        #endif
    383362}
Note: See TracChangeset for help on using the changeset viewer.