Changeset 27686


Ignore:
Timestamp:
04/10/23 15:15:31 (2 years ago)
Author:
youngmc3
Message:

CHG: added Cfrheologybbarabsgrad

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

Legend:

Unmodified
Added
Removed

  • issm/trunk-jpl/src/c/Makefile.am

    r27498 r27686  
    9090        ./classes/Cfsurfacesquare.cpp \
    9191        ./classes/Cfdragcoeffabsgrad.cpp \
     92        ./classes/Cfrheologybbarabsgrad.cpp \
    9293        ./classes/Cfsurfacelogvel.cpp \
    9394        ./classes/Cflevelsetmisfit.cpp \

  • issm/trunk-jpl/src/c/classes/classes.h

    r26252 r27686  
    2525#include "./Cfsurfacesquare.h"
    2626#include "./Cfdragcoeffabsgrad.h"
     27#include "./Cfrheologybbarabsgrad.h"
    2728#include "./Cfsurfacelogvel.h"
    2829#include "./Cflevelsetmisfit.h"

  • issm/trunk-jpl/src/c/datastructures/DataSet.cpp

    r27677 r27686  
    271271                                this->AddObject(cfdragcoeff);
    272272                        }
     273                        else if(obj_enum==CfrheologybbarabsgradEnum){
     274                                Cfrheologybbarabsgrad* cfrheologybbarabsgrad=new Cfrheologybbarabsgrad();
     275                                cfrheologybbarabsgrad->Marshall(marshallhandle);
     276                                this->AddObject(cfrheologybbarabsgrad);
     277                        }
    273278                        else if(obj_enum==NodalvalueEnum){
    274279                                Nodalvalue* nodalvalue=new Nodalvalue();

  • issm/trunk-jpl/src/c/modules/ModelProcessorx/CreateOutputDefinitions.cpp

    r27681 r27686  
    306306                                /*}}}*/
    307307                        }
     308                        else if (output_definition_enums[i]==CfrheologybbarabsgradEnum){
     309                                /*Deal with cfrheologybbarabsgrad: {{{*/
     310
     311                                /*cfrheologybbarabsgrad variables: */
     312                                int          num_cfrheologybbarabsgrads;
     313                                char**       cfrheologybbarabsgrad_name_s                = NULL;
     314                                char**       cfrheologybbarabsgrad_definitionstring_s    = NULL;
     315                                IssmDouble** cfrheologybbarabsgrad_weights_s             = NULL;
     316                                int*         cfrheologybbarabsgrad_weights_M_s           = NULL;
     317                                int*         cfrheologybbarabsgrad_weights_N_s           = NULL;
     318                                char**       cfrheologybbarabsgrad_weights_string_s      = NULL;
     319
     320                                /*Fetch name, model_string, observation, observation_string, etc ... (see src/m/classes/cfrheologybbarabsgrad.m): */
     321                                iomodel->FetchMultipleData(&cfrheologybbarabsgrad_name_s,&num_cfrheologybbarabsgrads,                                                        "md.cfrheologybbarabsgrad.name");
     322                                iomodel->FetchMultipleData(&cfrheologybbarabsgrad_definitionstring_s,&num_cfrheologybbarabsgrads,                                            "md.cfrheologybbarabsgrad.definitionstring");
     323                                iomodel->FetchMultipleData(&cfrheologybbarabsgrad_weights_s,&cfrheologybbarabsgrad_weights_M_s,&cfrheologybbarabsgrad_weights_N_s,&num_cfrheologybbarabsgrads,             "md.cfrheologybbarabsgrad.weights");
     324                                iomodel->FetchMultipleData(&cfrheologybbarabsgrad_weights_string_s,&num_cfrheologybbarabsgrads,                                              "md.cfrheologybbarabsgrad.weights_string");
     325
     326                                for(j=0;j<num_cfrheologybbarabsgrads;j++){
     327
     328                                        int weight_vector_type=0;
     329                                        if ((cfrheologybbarabsgrad_weights_M_s[j]==iomodel->numberofvertices) || (cfrheologybbarabsgrad_weights_M_s[j]==iomodel->numberofvertices+1)){
     330                                                weight_vector_type=1;
     331                                        }
     332                                        else if ((cfrheologybbarabsgrad_weights_M_s[j]==iomodel->numberofelements) || (cfrheologybbarabsgrad_weights_M_s[j]==iomodel->numberofelements+1)){
     333                                                weight_vector_type=2;
     334                                        }
     335                                        else
     336                                         _error_("cfrheologybbarabsgrad weight size not supported yet");
     337
     338                                        /*First create a cfrheologybbarabsgrad object for that specific string (cfrheologybbarabsgrad_model_string_s[j]):*/
     339                                        output_definitions->AddObject(new Cfrheologybbarabsgrad(cfrheologybbarabsgrad_name_s[j],StringToEnumx(cfrheologybbarabsgrad_definitionstring_s[j]),StringToEnumx(cfrheologybbarabsgrad_weights_string_s[j]),false));
     340
     341                                        /*Now, for this particular cfrheologybbarabsgrad object, make sure we plug into the elements: the observation, and the weights.*/
     342                                        for(Object* & object : elements->objects){
     343
     344                                                Element* element=xDynamicCast<Element*>(object);
     345
     346                                                element->DatasetInputAdd(StringToEnumx(cfrheologybbarabsgrad_definitionstring_s[j]),cfrheologybbarabsgrad_weights_s[j],inputs,iomodel,cfrheologybbarabsgrad_weights_M_s[j],cfrheologybbarabsgrad_weights_N_s[j],weight_vector_type,StringToEnumx(cfrheologybbarabsgrad_weights_string_s[j]),7,WeightsSurfaceObservationEnum);
     347
     348                                        }
     349
     350                                }
     351                                    /*Free ressources:*/
     352            for(j=0;j<num_cfrheologybbarabsgrads;j++){
     353               char* string=NULL;
     354               IssmDouble* matrix = NULL;
     355
     356               string = cfrheologybbarabsgrad_definitionstring_s[j];    xDelete<char>(string);
     357               string = cfrheologybbarabsgrad_weights_string_s[j];      xDelete<char>(string);
     358               string = cfrheologybbarabsgrad_name_s[j];    xDelete<char>(string);
     359               matrix = cfrheologybbarabsgrad_weights_s[j]; xDelete<IssmDouble>(matrix);
     360            }
     361            xDelete<char*>(cfrheologybbarabsgrad_name_s);
     362            xDelete<char*>(cfrheologybbarabsgrad_definitionstring_s);
     363            xDelete<IssmDouble*>(cfrheologybbarabsgrad_weights_s);
     364            xDelete<int>(cfrheologybbarabsgrad_weights_M_s);
     365            xDelete<int>(cfrheologybbarabsgrad_weights_N_s);
     366            xDelete<char*>(cfrheologybbarabsgrad_weights_string_s);
     367            /*}}}*/
     368         }
    308369                        else if (output_definition_enums[i]==CfsurfacelogvelEnum){
    309370                                /*Deal with cfsurfacelogvel: {{{*/

  • issm/trunk-jpl/src/c/shared/Enum/Enum.vim

    r27684 r27686  
    13881388syn keyword cConstant CalvingPollardEnum
    13891389syn keyword cConstant CfdragcoeffabsgradEnum
     1390syn keyword cConstant CfrheologybbarabsgradEnum
    13901391syn keyword cConstant CfsurfacelogvelEnum
    13911392syn keyword cConstant CfsurfacesquareEnum
    … …  
    17641765syn keyword cType Cfsurfacesquare
    17651766syn keyword cType Channel
     1767syn keyword cType classes
    17661768syn keyword cType Constraint
    17671769syn keyword cType Constraints
    … …  
    17701772syn keyword cType ControlInput
    17711773syn keyword cType Covertree
     1774syn keyword cType DatasetInput
    17721775syn keyword cType DataSetParam
    1773 syn keyword cType DatasetInput
    17741776syn keyword cType Definition
    17751777syn keyword cType DependentObject
    … …  
    17841786syn keyword cType ElementInput
    17851787syn keyword cType ElementMatrix
     1788syn keyword cType Elements
    17861789syn keyword cType ElementVector
    1787 syn keyword cType Elements
    17881790syn keyword cType ExponentialVariogram
    17891791syn keyword cType ExternalResult
    … …  
    17921794syn keyword cType Friction
    17931795syn keyword cType Gauss
     1796syn keyword cType GaussianVariogram
     1797syn keyword cType gaussobjects
    17941798syn keyword cType GaussPenta
    17951799syn keyword cType GaussSeg
    17961800syn keyword cType GaussTetra
    17971801syn keyword cType GaussTria
    1798 syn keyword cType GaussianVariogram
    17991802syn keyword cType GenericExternalResult
    18001803syn keyword cType GenericOption
    … …  
    18131816syn keyword cType IssmDirectApplicInterface
    18141817syn keyword cType IssmParallelDirectApplicInterface
     1818syn keyword cType krigingobjects
    18151819syn keyword cType Load
    18161820syn keyword cType Loads
    … …  
    18231827syn keyword cType Matice
    18241828syn keyword cType Matlitho
     1829syn keyword cType matrixobjects
    18251830syn keyword cType MatrixParam
    18261831syn keyword cType Misfit
    … …  
    18351840syn keyword cType Observations
    18361841syn keyword cType Option
     1842syn keyword cType Options
    18371843syn keyword cType OptionUtilities
    1838 syn keyword cType Options
    18391844syn keyword cType Param
    18401845syn keyword cType Parameters
    … …  
    18501855syn keyword cType Regionaloutput
    18511856syn keyword cType Results
     1857syn keyword cType Riftfront
    18521858syn keyword cType RiftStruct
    1853 syn keyword cType Riftfront
    18541859syn keyword cType SealevelGeometry
    18551860syn keyword cType Seg
    18561861syn keyword cType SegInput
     1862syn keyword cType Segment
    18571863syn keyword cType SegRef
    1858 syn keyword cType Segment
    18591864syn keyword cType SpcDynamic
    18601865syn keyword cType SpcStatic
    … …  
    18751880syn keyword cType Vertex
    18761881syn keyword cType Vertices
    1877 syn keyword cType classes
    1878 syn keyword cType gaussobjects
    1879 syn keyword cType krigingobjects
    1880 syn keyword cType matrixobjects
    18811882syn keyword cType AdjointBalancethickness2Analysis
    18821883syn keyword cType AdjointBalancethicknessAnalysis

  • issm/trunk-jpl/src/c/shared/Enum/EnumDefinitions.h

    r27684 r27686  
    13871387        CalvingPollardEnum,
    13881388        CfdragcoeffabsgradEnum,
     1389        CfrheologybbarabsgradEnum,
    13891390        CfsurfacelogvelEnum,
    13901391        CfsurfacesquareEnum,

  • issm/trunk-jpl/src/c/shared/Enum/EnumToStringx.cpp

    r27684 r27686  
    13901390                case CalvingPollardEnum : return "CalvingPollard";
    13911391                case CfdragcoeffabsgradEnum : return "Cfdragcoeffabsgrad";
     1392                case CfrheologybbarabsgradEnum : return "Cfrheologybbarabsgrad";
    13921393                case CfsurfacelogvelEnum : return "Cfsurfacelogvel";
    13931394                case CfsurfacesquareEnum : return "Cfsurfacesquare";

  • issm/trunk-jpl/src/c/shared/Enum/Enumjl.vim

    r27684 r27686  
    13811381syn keyword juliaConstC CalvingPollardEnum
    13821382syn keyword juliaConstC CfdragcoeffabsgradEnum
     1383syn keyword juliaConstC CfrheologybbarabsgradEnum
    13831384syn keyword juliaConstC CfsurfacelogvelEnum
    13841385syn keyword juliaConstC CfsurfacesquareEnum

  • issm/trunk-jpl/src/c/shared/Enum/StringToEnumx.cpp

    r27684 r27686  
    752752              else if (strcmp(name,"BasalStress")==0) return BasalStressEnum;
    753753              else if (strcmp(name,"Base")==0) return BaseEnum;
    754               else if (strcmp(name,"BaseOld")==0) return BaseOldEnum;
    755               else if (strcmp(name,"BaseSlopeX")==0) return BaseSlopeXEnum;
    756754         else stage=7;
    757755   }
    758756   if(stage==7){
    759               if (strcmp(name,"BaseSlopeY")==0) return BaseSlopeYEnum;
     757              if (strcmp(name,"BaseOld")==0) return BaseOldEnum;
     758              else if (strcmp(name,"BaseSlopeX")==0) return BaseSlopeXEnum;
     759              else if (strcmp(name,"BaseSlopeY")==0) return BaseSlopeYEnum;
    760760              else if (strcmp(name,"BaselineBasalforcingsFloatingiceMeltingRate")==0) return BaselineBasalforcingsFloatingiceMeltingRateEnum;
    761761              else if (strcmp(name,"BaselineBasalforcingsSpatialDeepwaterMeltingRate")==0) return BaselineBasalforcingsSpatialDeepwaterMeltingRateEnum;
    … …  
    834834              else if (strcmp(name,"EsaEmotion")==0) return EsaEmotionEnum;
    835835              else if (strcmp(name,"EsaNmotion")==0) return EsaNmotionEnum;
    836               else if (strcmp(name,"EsaStrainratexy")==0) return EsaStrainratexyEnum;
    837          else stage=7;
    838    }
    839    if(stage==7){
    840               if (strcmp(name,"EsaRotationrate")==0) return EsaRotationrateEnum;
     836              else if (strcmp(name,"EsaRotationrate")==0) return EsaRotationrateEnum;
    841837              else if (strcmp(name,"EsaStrainratexx")==0) return EsaStrainratexxEnum;
    842838              else if (strcmp(name,"EsaStrainratexy")==0) return EsaStrainratexyEnum;
    … …  
    879875              else if (strcmp(name,"HydrologyBasinsId")==0) return HydrologyBasinsIdEnum;
    880876              else if (strcmp(name,"HydrologyBumpHeight")==0) return HydrologyBumpHeightEnum;
    881               else if (strcmp(name,"HydrologyBumpSpacing")==0) return HydrologyBumpSpacingEnum;
    882               else if (strcmp(name,"HydrologyChannelConductivity")==0) return HydrologyChannelConductivityEnum;
    883877         else stage=8;
    884878   }
    885879   if(stage==8){
    886               if (strcmp(name,"HydrologydcBasalMoulinInput")==0) return HydrologydcBasalMoulinInputEnum;
     880              if (strcmp(name,"HydrologyBumpSpacing")==0) return HydrologyBumpSpacingEnum;
     881              else if (strcmp(name,"HydrologyChannelConductivity")==0) return HydrologyChannelConductivityEnum;
     882              else if (strcmp(name,"HydrologydcBasalMoulinInput")==0) return HydrologydcBasalMoulinInputEnum;
    887883              else if (strcmp(name,"HydrologydcEplThickness")==0) return HydrologydcEplThicknessEnum;
    888884              else if (strcmp(name,"HydrologydcEplThicknessOld")==0) return HydrologydcEplThicknessOldEnum;
    … …  
    966962              else if (strcmp(name,"RadarAttenuationMacGregor")==0) return RadarAttenuationMacGregorEnum;
    967963              else if (strcmp(name,"RadarAttenuationWolff")==0) return RadarAttenuationWolffEnum;
    968               else if (strcmp(name,"RadarPowerWolff")==0) return RadarPowerWolffEnum;
    969          else stage=8;
    970    }
    971    if(stage==8){
    972               if (strcmp(name,"RadarIcePeriod")==0) return RadarIcePeriodEnum;
     964              else if (strcmp(name,"RadarIcePeriod")==0) return RadarIcePeriodEnum;
    973965              else if (strcmp(name,"RadarPowerMacGregor")==0) return RadarPowerMacGregorEnum;
    974966              else if (strcmp(name,"RadarPowerWolff")==0) return RadarPowerWolffEnum;
    … …  
    1006998              else if (strcmp(name,"SealevelBarystaticOceanMask")==0) return SealevelBarystaticOceanMaskEnum;
    1007999              else if (strcmp(name,"SealevelBarystaticOceanWeights")==0) return SealevelBarystaticOceanWeightsEnum;
    1008               else if (strcmp(name,"SealevelBarystaticOceanArea")==0) return SealevelBarystaticOceanAreaEnum;
    1009               else if (strcmp(name,"SealevelBarystaticOceanLatbar")==0) return SealevelBarystaticOceanLatbarEnum;
    10101000         else stage=9;
    10111001   }
    10121002   if(stage==9){
    1013               if (strcmp(name,"SealevelBarystaticOceanLongbar")==0) return SealevelBarystaticOceanLongbarEnum;
     1003              if (strcmp(name,"SealevelBarystaticOceanArea")==0) return SealevelBarystaticOceanAreaEnum;
     1004              else if (strcmp(name,"SealevelBarystaticOceanLatbar")==0) return SealevelBarystaticOceanLatbarEnum;
     1005              else if (strcmp(name,"SealevelBarystaticOceanLongbar")==0) return SealevelBarystaticOceanLongbarEnum;
    10141006              else if (strcmp(name,"SealevelBarystaticOceanLoad")==0) return SealevelBarystaticOceanLoadEnum;
    10151007              else if (strcmp(name,"SealevelNEsa")==0) return SealevelNEsaEnum;
    … …  
    10991091              else if (strcmp(name,"SmbDswrf")==0) return SmbDswrfEnum;
    11001092              else if (strcmp(name,"SmbDswdiffrf")==0) return SmbDswdiffrfEnum;
    1101               else if (strcmp(name,"SmbDzMin")==0) return SmbDzMinEnum;
    1102          else stage=9;
    1103    }
    1104    if(stage==9){
    1105               if (strcmp(name,"SmbDzAdd")==0) return SmbDzAddEnum;
     1093              else if (strcmp(name,"SmbDzAdd")==0) return SmbDzAddEnum;
    11061094              else if (strcmp(name,"SmbDz")==0) return SmbDzEnum;
    11071095              else if (strcmp(name,"SmbDzMin")==0) return SmbDzMinEnum;
    … …  
    11331121              else if (strcmp(name,"SmbMassBalanceTransient")==0) return SmbMassBalanceTransientEnum;
    11341122              else if (strcmp(name,"SmbMask")==0) return SmbMaskEnum;
    1135               else if (strcmp(name,"SmbMeanLHF")==0) return SmbMeanLHFEnum;
    1136               else if (strcmp(name,"SmbMeanSHF")==0) return SmbMeanSHFEnum;
    11371123         else stage=10;
    11381124   }
    11391125   if(stage==10){
    1140               if (strcmp(name,"SmbMeanULW")==0) return SmbMeanULWEnum;
     1126              if (strcmp(name,"SmbMeanLHF")==0) return SmbMeanLHFEnum;
     1127              else if (strcmp(name,"SmbMeanSHF")==0) return SmbMeanSHFEnum;
     1128              else if (strcmp(name,"SmbMeanULW")==0) return SmbMeanULWEnum;
    11411129              else if (strcmp(name,"SmbMelt")==0) return SmbMeltEnum;
    11421130              else if (strcmp(name,"SmbMonthlytemperatures")==0) return SmbMonthlytemperaturesEnum;
    … …  
    12431231              else if (strcmp(name,"ThicknessAbsMisfit")==0) return ThicknessAbsMisfitEnum;
    12441232              else if (strcmp(name,"ThicknessAcrossGradient")==0) return ThicknessAcrossGradientEnum;
    1245               else if (strcmp(name,"ThicknessOld")==0) return ThicknessOldEnum;
    1246          else stage=10;
    1247    }
    1248    if(stage==10){
    1249               if (strcmp(name,"ThicknessAlongGradient")==0) return ThicknessAlongGradientEnum;
     1233              else if (strcmp(name,"ThicknessAlongGradient")==0) return ThicknessAlongGradientEnum;
    12501234              else if (strcmp(name,"Thickness")==0) return ThicknessEnum;
    12511235              else if (strcmp(name,"ThicknessOld")==0) return ThicknessOldEnum;
    … …  
    12601244              else if (strcmp(name,"VxMesh")==0) return VxMeshEnum;
    12611245              else if (strcmp(name,"VxObs")==0) return VxObsEnum;
    1262               else if (strcmp(name,"VxShear")==0) return VxShearEnum;
    1263               else if (strcmp(name,"VxSurface")==0) return VxSurfaceEnum;
    12641246         else stage=11;
    12651247   }
    12661248   if(stage==11){
    1267               if (strcmp(name,"VyAverage")==0) return VyAverageEnum;
     1249              if (strcmp(name,"VxShear")==0) return VxShearEnum;
     1250              else if (strcmp(name,"VxSurface")==0) return VxSurfaceEnum;
     1251              else if (strcmp(name,"VyAverage")==0) return VyAverageEnum;
    12681252              else if (strcmp(name,"VyBase")==0) return VyBaseEnum;
    12691253              else if (strcmp(name,"VyDebris")==0) return VyDebrisEnum;
    … …  
    13751359              else if (strcmp(name,"Outputdefinition81")==0) return Outputdefinition81Enum;
    13761360              else if (strcmp(name,"Outputdefinition82")==0) return Outputdefinition82Enum;
    1377          else stage=11;
    1378    }
    1379    if(stage==11){
    1380               if (strcmp(name,"Outputdefinition83")==0) return Outputdefinition83Enum;
     1361              else if (strcmp(name,"Outputdefinition83")==0) return Outputdefinition83Enum;
    13811362              else if (strcmp(name,"Outputdefinition84")==0) return Outputdefinition84Enum;
    13821363              else if (strcmp(name,"Outputdefinition85")==0) return Outputdefinition85Enum;
    … …  
    13861367              else if (strcmp(name,"Outputdefinition89")==0) return Outputdefinition89Enum;
    13871368              else if (strcmp(name,"Outputdefinition8")==0) return Outputdefinition8Enum;
    1388               else if (strcmp(name,"Outputdefinition90")==0) return Outputdefinition90Enum;
     1369         else stage=12;
     1370   }
     1371   if(stage==12){
     1372              if (strcmp(name,"Outputdefinition90")==0) return Outputdefinition90Enum;
    13891373              else if (strcmp(name,"Outputdefinition91")==0) return Outputdefinition91Enum;
    13901374              else if (strcmp(name,"Outputdefinition92")==0) return Outputdefinition92Enum;
    13911375              else if (strcmp(name,"Outputdefinition93")==0) return Outputdefinition93Enum;
    13921376              else if (strcmp(name,"Outputdefinition94")==0) return Outputdefinition94Enum;
    1393          else stage=12;
    1394    }
    1395    if(stage==12){
    1396               if (strcmp(name,"Outputdefinition95")==0) return Outputdefinition95Enum;
     1377              else if (strcmp(name,"Outputdefinition95")==0) return Outputdefinition95Enum;
    13971378              else if (strcmp(name,"Outputdefinition96")==0) return Outputdefinition96Enum;
    13981379              else if (strcmp(name,"Outputdefinition97")==0) return Outputdefinition97Enum;
    … …  
    14421423              else if (strcmp(name,"CalvingPollard")==0) return CalvingPollardEnum;
    14431424              else if (strcmp(name,"Cfdragcoeffabsgrad")==0) return CfdragcoeffabsgradEnum;
     1425              else if (strcmp(name,"Cfrheologybbarabsgrad")==0) return CfrheologybbarabsgradEnum;
    14441426              else if (strcmp(name,"Cfsurfacelogvel")==0) return CfsurfacelogvelEnum;
    14451427              else if (strcmp(name,"Cfsurfacesquare")==0) return CfsurfacesquareEnum;
    … …  
    15031485              else if (strcmp(name,"FSvelocity")==0) return FSvelocityEnum;
    15041486              else if (strcmp(name,"FemModel")==0) return FemModelEnum;
    1505          else stage=12;
    1506    }
    1507    if(stage==12){
    1508               if (strcmp(name,"FileParam")==0) return FileParamEnum;
     1487              else if (strcmp(name,"FileParam")==0) return FileParamEnum;
    15091488              else if (strcmp(name,"FixedTimestepping")==0) return FixedTimesteppingEnum;
    15101489              else if (strcmp(name,"FloatingArea")==0) return FloatingAreaEnum;
    15111490              else if (strcmp(name,"FloatingAreaScaled")==0) return FloatingAreaScaledEnum;
    15121491              else if (strcmp(name,"FloatingMeltRate")==0) return FloatingMeltRateEnum;
    1513               else if (strcmp(name,"Free")==0) return FreeEnum;
     1492         else stage=13;
     1493   }
     1494   if(stage==13){
     1495              if (strcmp(name,"Free")==0) return FreeEnum;
    15141496              else if (strcmp(name,"FreeSurfaceBaseAnalysis")==0) return FreeSurfaceBaseAnalysisEnum;
    15151497              else if (strcmp(name,"FreeSurfaceTopAnalysis")==0) return FreeSurfaceTopAnalysisEnum;
    … …  
    15171499              else if (strcmp(name,"FrontalForcingsRignot")==0) return FrontalForcingsRignotEnum;
    15181500              else if (strcmp(name,"FrontalForcingsRignotarma")==0) return FrontalForcingsRignotarmaEnum;
    1519          else stage=13;
    1520    }
    1521    if(stage==13){
    1522               if (strcmp(name,"Fset")==0) return FsetEnum;
     1501              else if (strcmp(name,"Fset")==0) return FsetEnum;
    15231502              else if (strcmp(name,"FullMeltOnPartiallyFloating")==0) return FullMeltOnPartiallyFloatingEnum;
    15241503              else if (strcmp(name,"GLheightadvectionAnalysis")==0) return GLheightadvectionAnalysisEnum;
    … …  
    16341613              else if (strcmp(name,"MaxVx")==0) return MaxVxEnum;
    16351614              else if (strcmp(name,"MaxVy")==0) return MaxVyEnum;
    1636          else stage=13;
     1615         else stage=14;
    16371616   }
    1638    if(stage==13){
     1617   if(stage==14){
    16391618              if (strcmp(name,"MaxVz")==0) return MaxVzEnum;
    16401619              else if (strcmp(name,"Melange")==0) return MelangeEnum;
    … …  
    16431622              else if (strcmp(name,"MeshX")==0) return MeshXEnum;
    16441623              else if (strcmp(name,"MeshY")==0) return MeshYEnum;
    1645          else stage=14;
    1646    }
    1647    if(stage==14){
    1648               if (strcmp(name,"MinVel")==0) return MinVelEnum;
     1624              else if (strcmp(name,"MinVel")==0) return MinVelEnum;
    16491625              else if (strcmp(name,"MinVx")==0) return MinVxEnum;
    16501626              else if (strcmp(name,"MinVy")==0) return MinVyEnum;
    … …  
    17601736              else if (strcmp(name,"StringExternalResult")==0) return StringExternalResultEnum;
    17611737              else if (strcmp(name,"StringParam")==0) return StringParamEnum;
    1762               else if (strcmp(name,"SubelementFriction1")==0) return SubelementFriction1Enum;
    1763          else stage=14;
     1738         else stage=15;
    17641739   }
    1765    if(stage==14){
    1766               if (strcmp(name,"SubelementFriction2")==0) return SubelementFriction2Enum;
     1740   if(stage==15){
     1741              if (strcmp(name,"SubelementFriction1")==0) return SubelementFriction1Enum;
     1742              else if (strcmp(name,"SubelementFriction2")==0) return SubelementFriction2Enum;
    17671743              else if (strcmp(name,"SubelementMelt1")==0) return SubelementMelt1Enum;
    17681744              else if (strcmp(name,"SubelementMelt2")==0) return SubelementMelt2Enum;
    17691745              else if (strcmp(name,"SubelementMigration")==0) return SubelementMigrationEnum;
    17701746              else if (strcmp(name,"SurfaceSlopeSolution")==0) return SurfaceSlopeSolutionEnum;
    1771          else stage=15;
    1772    }
    1773    if(stage==15){
    1774               if (strcmp(name,"TaylorHood")==0) return TaylorHoodEnum;
     1747              else if (strcmp(name,"TaylorHood")==0) return TaylorHoodEnum;
    17751748              else if (strcmp(name,"Tetra")==0) return TetraEnum;
    17761749              else if (strcmp(name,"TetraInput")==0) return TetraInputEnum;
Note: See TracChangeset for help on using the changeset viewer.