Ignore:
Timestamp:
08/24/09 17:55:52 (16 years ago)
Author:
Eric.Larour
Message:

Brachning back from issm.controlstatic, by hand

File:
1 edited

Legend:

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

    r1805 r1838  
    1212#include "../shared/shared.h"
    1313#include "../MeshPartitionx/MeshPartitionx.h"
    14 #include "./Model.h"
    15 
    16 void CreateParameters(DataSet** pparameters,Model* model,ConstDataHandle model_handle){
     14#include "./IoModel.h"
     15
     16void CreateParameters(DataSet** pparameters,IoModel* iomodel,ConstDataHandle iomodel_handle){
    1717       
    1818        int i;
     
    3131        count++;
    3232        param= new Param(count,"analysis_type",INTEGER);
    33         param->SetInteger(model->analysis_type);
     33        param->SetInteger(iomodel->analysis_type);
    3434        parameters->AddObject(param);
    3535
    3636        count++;
    3737        param= new Param(count,"sub_analysis_type",INTEGER);
    38         param->SetInteger(model->sub_analysis_type);
     38        param->SetInteger(iomodel->sub_analysis_type);
    3939        parameters->AddObject(param);
    4040
    4141        //dimension 2d or 3d:
    42         if (strcmp(model->meshtype,"2d")==0)dim=2;
     42        if (strcmp(iomodel->meshtype,"2d")==0)dim=2;
    4343        else dim=3;
    4444
     
    5151        count++;
    5252        param= new Param(count,"ishutter",INTEGER);
    53         param->SetInteger(model->ishutter);
     53        param->SetInteger(iomodel->ishutter);
    5454        parameters->AddObject(param);
    5555
    5656        count++;
    5757        param= new Param(count,"ismacayealpattyn",INTEGER);
    58         param->SetInteger(model->ismacayealpattyn);
     58        param->SetInteger(iomodel->ismacayealpattyn);
    5959        parameters->AddObject(param);
    6060
     
    6262        count++;
    6363        param= new Param(count,"isstokes",INTEGER);
    64         param->SetInteger(model->isstokes);
     64        param->SetInteger(iomodel->isstokes);
     65        parameters->AddObject(param);
     66
     67        //control: thermal static
     68        count++;
     69        param= new Param(count,"thermalstatic",INTEGER);
     70        param->SetInteger(iomodel->thermalstatic);
    6571        parameters->AddObject(param);
    6672
    6773        /*debug: */
    6874        param= new Param(count,"debug",INTEGER);
    69         param->SetInteger(model->debug);
     75        param->SetInteger(iomodel->debug);
    7076        parameters->AddObject(param);
    7177
     
    7379        count++;
    7480        param= new Param(count,"eps_res",DOUBLE);
    75         param->SetDouble(model->eps_res);
     81        param->SetDouble(iomodel->eps_res);
    7682        parameters->AddObject(param);
    7783
     
    7985        count++;
    8086        param= new Param(count,"eps_rel",DOUBLE);
    81         param->SetDouble(model->eps_rel);
     87        param->SetDouble(iomodel->eps_rel);
    8288        parameters->AddObject(param);
    8389
     
    8591        count++;
    8692        param= new Param(count,"eps_abs",DOUBLE);
    87         param->SetDouble(model->eps_abs);
     93        param->SetDouble(iomodel->eps_abs);
    8894        parameters->AddObject(param);
    8995
     
    9197        count++;
    9298        param= new Param(count,"yts",DOUBLE);
    93         param->SetDouble(model->yts);
     99        param->SetDouble(iomodel->yts);
    94100        parameters->AddObject(param);
    95101
     
    97103        count++;
    98104        param= new Param(count,"dt",DOUBLE);
    99         param->SetDouble(model->dt);
     105        param->SetDouble(iomodel->dt);
    100106        parameters->AddObject(param);
    101107
     
    103109        count++;
    104110        param= new Param(count,"ndt",DOUBLE);
    105         param->SetDouble(model->ndt);
     111        param->SetDouble(iomodel->ndt);
    106112        parameters->AddObject(param);
    107113
     
    109115        count++;
    110116        param= new Param(count,"penalty_offset",DOUBLE);
    111         param->SetDouble(model->penalty_offset);
     117        param->SetDouble(iomodel->penalty_offset);
    112118        parameters->AddObject(param);
    113119
     
    115121        count++;
    116122        param= new Param(count,"sparsity",DOUBLE);
    117         param->SetDouble(model->sparsity);
     123        param->SetDouble(iomodel->sparsity);
    118124        parameters->AddObject(param);
    119125
     
    121127        count++;
    122128        param= new Param(count,"lowmem",INTEGER);
    123         param->SetInteger(model->lowmem);
     129        param->SetInteger(iomodel->lowmem);
    124130        parameters->AddObject(param);
    125131
     
    127133        count++;
    128134        param= new Param(count,"connectivity",INTEGER);
    129         param->SetInteger(model->connectivity);
     135        param->SetInteger(iomodel->connectivity);
    130136        parameters->AddObject(param);
    131137
     
    133139        count++;
    134140        param= new Param(count,"beta",DOUBLE);
    135         param->SetDouble(model->beta);
     141        param->SetDouble(iomodel->beta);
    136142        parameters->AddObject(param);
    137143
     
    139145        count++;
    140146        param= new Param(count,"meltingpoint",DOUBLE);
    141         param->SetDouble(model->meltingpoint);
     147        param->SetDouble(iomodel->meltingpoint);
    142148        parameters->AddObject(param);
    143149
     
    145151        count++;
    146152        param= new Param(count,"latentheat",DOUBLE);
    147         param->SetDouble(model->latentheat);
     153        param->SetDouble(iomodel->latentheat);
    148154        parameters->AddObject(param);
    149155
     
    151157        count++;
    152158        param= new Param(count,"heatcapacity",DOUBLE);
    153         param->SetDouble(model->heatcapacity);
     159        param->SetDouble(iomodel->heatcapacity);
    154160        parameters->AddObject(param);
    155161
     
    157163        count++;
    158164        param= new Param(count,"penalty_melting",DOUBLE);
    159         param->SetDouble(model->penalty_melting);
     165        param->SetDouble(iomodel->penalty_melting);
    160166        parameters->AddObject(param);
    161167
     
    163169        count++;
    164170        param= new Param(count,"min_thermal_constraints",INTEGER);
    165         param->SetInteger(model->min_thermal_constraints);
     171        param->SetInteger(iomodel->min_thermal_constraints);
    166172        parameters->AddObject(param);
    167173
     
    169175        count++;
    170176        param= new Param(count,"stokesreconditioning",DOUBLE);
    171         param->SetDouble(model->stokesreconditioning);
     177        param->SetDouble(iomodel->stokesreconditioning);
    172178        parameters->AddObject(param);
    173179
     
    175181        count++;
    176182        param= new Param(count,"waitonlock",INTEGER);
    177         param->SetInteger(model->waitonlock);
     183        param->SetInteger(iomodel->waitonlock);
    178184        parameters->AddObject(param);
    179185
     
    181187        count++;
    182188        param= new Param(count,"solverstring",STRING);
    183         param->SetString(model->solverstring);
     189        param->SetString(iomodel->solverstring);
    184190        parameters->AddObject(param);
    185191
     
    187193        count++;
    188194        param= new Param(count,"plot",INTEGER);
    189         param->SetInteger(model->plot);
     195        param->SetInteger(iomodel->plot);
    190196        parameters->AddObject(param);
    191197
     
    193199        count++;
    194200        param= new Param(count,"numberofnodes",INTEGER);
    195         param->SetInteger(model->numberofnodes);
     201        param->SetInteger(iomodel->numberofnodes);
    196202        parameters->AddObject(param);
    197203
    198204        /*Deal with numberofdofspernode: */
    199         DistributeNumDofs(&numberofdofspernode,model->analysis_type,model->sub_analysis_type);
     205        DistributeNumDofs(&numberofdofspernode,iomodel->analysis_type,iomodel->sub_analysis_type);
    200206
    201207        count++;
    202208        param= new Param(count,"numberofdofspernode",INTEGER);
    203209        param->SetInteger(numberofdofspernode);
    204         parameters->AddObject(param);
    205 
     210        parameters->AddObject(param)
     211                ;
    206212        /*numrifts: */
    207213        ModelFetchData((void**)&model->riftinfo,&model->numrifts,NULL,model_handle,"riftinfo","Matrix","Mat");
Note: See TracChangeset for help on using the changeset viewer.