Changeset 17270


Ignore:
Timestamp:
02/12/14 15:57:04 (11 years ago)
Author:
jbondzio
Message:

CHG: restoring order stressbalance - levelset - masstransport - groundingline - gia in transient_core.cpp

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/cores/transient_core.cpp

    r17261 r17270  
    123123                }
    124124               
    125                 if(isgroundingline){
    126                         if(VerboseSolution()) _printf0_("   computing new grounding line position\n");
    127                         GroundinglineMigrationx(femmodel->elements,femmodel->nodes,femmodel->vertices,femmodel->loads,femmodel->materials,femmodel->parameters);
    128                         if(save_results){
    129                                 int outputs[3] = {SurfaceEnum,BedEnum,MaskGroundediceLevelsetEnum};
    130                                 femmodel->RequestedOutputsx(&femmodel->results,&outputs[0],3);
    131                         }
    132                 }
    133                 if(isgia){
    134                         if(VerboseSolution()) _printf0_("   computing glacial isostatic adjustment\n");
    135                         #ifdef _HAVE_GIA_
    136                         gia_core(femmodel);
    137                         #else
    138                         _error_("ISSM was not compiled with gia capabilities. Exiting");
    139                         #endif
    140 
    141                 }
    142 
    143125                if(islevelset){
    144126                        if(VerboseSolution()) _printf0_("   computing movement of ice boundaries\n");
     
    173155                        femmodel->UpdateVertexPositionsx();
    174156                }
     157               
     158                if(isgroundingline){
     159                        if(VerboseSolution()) _printf0_("   computing new grounding line position\n");
     160                        GroundinglineMigrationx(femmodel->elements,femmodel->nodes,femmodel->vertices,femmodel->loads,femmodel->materials,femmodel->parameters);
     161                        if(save_results){
     162                                int outputs[3] = {SurfaceEnum,BedEnum,MaskGroundediceLevelsetEnum};
     163                                femmodel->RequestedOutputsx(&femmodel->results,&outputs[0],3);
     164                        }
     165                }
     166                if(isgia){
     167                        if(VerboseSolution()) _printf0_("   computing glacial isostatic adjustment\n");
     168                        #ifdef _HAVE_GIA_
     169                        gia_core(femmodel);
     170                        #else
     171                        _error_("ISSM was not compiled with gia capabilities. Exiting");
     172                        #endif
     173                }
    175174
    176175                /*unload results*/
Note: See TracChangeset for help on using the changeset viewer.