Changeset 15504
- Timestamp:
- 07/18/13 10:36:05 (12 years ago)
- Location:
- issm/trunk-jpl/src
- Files:
-
- 2 added
- 1 deleted
- 17 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/analyses/diagnostic_core.cpp
r15104 r15504 13 13 14 14 /*parameters: */ 15 bool dakota_analysis = false; 16 int dim = -1; 17 bool ishutter = false; 18 bool ismacayealpattyn = false; 19 bool isl1l2 = false; 20 bool isstokes = false; 15 bool dakota_analysis; 16 int dim; 17 bool ishutter,ismacayeal,isl1l2,ispattyn,isstokes; 21 18 bool conserve_loads = true; 22 bool modify_loads = true;23 19 bool save_results; 24 20 int newton; … … 30 26 femmodel->parameters->FindParam(&dim,MeshDimensionEnum); 31 27 femmodel->parameters->FindParam(&ishutter,FlowequationIshutterEnum); 32 femmodel->parameters->FindParam(&ismacayeal pattyn,FlowequationIsmacayealpattynEnum);28 femmodel->parameters->FindParam(&ismacayeal,FlowequationIsmacayealEnum); 33 29 femmodel->parameters->FindParam(&isl1l2,FlowequationIsl1l2Enum); 30 femmodel->parameters->FindParam(&ispattyn,FlowequationIspattynEnum); 34 31 femmodel->parameters->FindParam(&isstokes,FlowequationIsstokesEnum); 35 32 femmodel->parameters->FindParam(&newton,DiagnosticIsnewtonEnum); … … 57 54 58 55 if(ishutter){ 59 60 56 if(VerboseSolution()) _printf0_(" computing hutter velocities\n"); 61 57 62 //Take the last velocity into account so that the velocity on the MacAyeal domain is not zero 63 if (ismacayealpattyn) ResetBoundaryConditions(femmodel,DiagnosticHutterAnalysisEnum); 64 58 /*Take the last velocity into account so that the velocity on the MacAyeal domain is not zero*/ 59 if(ismacayeal || isl1l2 || ispattyn ) ResetBoundaryConditions(femmodel,DiagnosticHutterAnalysisEnum); 65 60 femmodel->SetCurrentConfiguration(DiagnosticHutterAnalysisEnum); 66 61 solutionsequence_linear(femmodel); 67 68 if (ismacayealpattyn) ResetBoundaryConditions(femmodel,DiagnosticHorizAnalysisEnum); 62 if(ismacayeal || isl1l2 || ispattyn) ResetBoundaryConditions(femmodel,DiagnosticHorizAnalysisEnum); 69 63 } 70 64 71 if ((ismacayealpattyn || isl1l2) ^ isstokes){ // ^ = xor 65 if ((ismacayeal || ispattyn || isl1l2) ^ isstokes){ // ^ = xor 66 if(VerboseSolution()) _printf0_(" computing velocities\n"); 72 67 73 if(VerboseSolution()) _printf0_(" computing velocities\n");74 68 femmodel->SetCurrentConfiguration(DiagnosticHorizAnalysisEnum); 75 69 if(newton>0) … … 79 73 } 80 74 81 if (ismacayealpattyn && isstokes){ 82 83 if(VerboseSolution()) _printf0_(" computing coupling macayealpattyn and stokes velocities and pressure \n"); 75 if ((ismacayeal || isl1l2 || ispattyn) && isstokes){ 76 if(VerboseSolution()) _printf0_(" computing coupling betweem lower order models and full-Stokes\n"); 84 77 solutionsequence_stokescoupling_nonlinear(femmodel,conserve_loads); 85 78 } 86 79 87 if (dim==3 & (ishutter || ismacayealpattyn)){ 88 80 if (dim==3 & (ishutter || ismacayeal || isl1l2 || ispattyn)){ 89 81 if(VerboseSolution()) _printf0_(" computing vertical velocities\n"); 90 82 femmodel->SetCurrentConfiguration(DiagnosticVertAnalysisEnum); -
issm/trunk-jpl/src/c/modules/ModelProcessorx/CreateParameters.cpp
r15420 r15504 46 46 parameters->AddObject(iomodel->CopyConstantObject(MeshDimensionEnum)); 47 47 parameters->AddObject(iomodel->CopyConstantObject(FlowequationIshutterEnum)); 48 parameters->AddObject(iomodel->CopyConstantObject(FlowequationIsmacayeal pattynEnum));48 parameters->AddObject(iomodel->CopyConstantObject(FlowequationIsmacayealEnum)); 49 49 parameters->AddObject(iomodel->CopyConstantObject(FlowequationIsl1l2Enum)); 50 parameters->AddObject(iomodel->CopyConstantObject(FlowequationIspattynEnum)); 50 51 parameters->AddObject(iomodel->CopyConstantObject(FlowequationIsstokesEnum)); 51 52 parameters->AddObject(iomodel->CopyConstantObject(FlowequationFeStokesEnum)); -
issm/trunk-jpl/src/c/modules/ModelProcessorx/DiagnosticHoriz/CreateConstraintsDiagnosticHoriz.cpp
r15484 r15504 17 17 IssmDouble rho_ice; 18 18 IssmDouble stokesreconditioning; 19 bool is stokes,isl1l2,ismacayealpattyn;19 bool ismacayeal,isl1l2,ispattyn,isstokes; 20 20 int fe_ssa; 21 21 bool spcpresent = false; … … 48 48 iomodel->Constant(&rho_ice,MaterialsRhoIceEnum); 49 49 iomodel->Constant(&stokesreconditioning,DiagnosticStokesreconditioningEnum); 50 iomodel->Constant(&ismacayeal,FlowequationIsmacayealEnum); 51 iomodel->Constant(&isl1l2,FlowequationIsl1l2Enum); 52 iomodel->Constant(&ispattyn,FlowequationIspattynEnum); 50 53 iomodel->Constant(&isstokes,FlowequationIsstokesEnum); 51 iomodel->Constant(&isl1l2,FlowequationIsl1l2Enum);52 iomodel->Constant(&ismacayealpattyn,FlowequationIsmacayealpattynEnum);53 54 iomodel->Constant(&fe_ssa,FlowequationFeSsaEnum); 54 55 … … 57 58 58 59 /*Now, is the flag macayaealpattyn on? otherwise, do nothing: */ 59 if(!ismacayeal pattyn & !isstokes & !isl1l2){60 if(!ismacayeal & !ispattyn & !isstokes & !isl1l2){ 60 61 *pconstraints=constraints; 61 62 return; … … 312 313 313 314 /*SPC Quadratic elements*/ 314 if(ismacayeal pattyn&& fe_ssa==1){315 if(ismacayeal && fe_ssa==1){ 315 316 316 317 int v1,v2; -
issm/trunk-jpl/src/c/modules/ModelProcessorx/DiagnosticHoriz/CreateLoadsDiagnosticHoriz.cpp
r15465 r15504 14 14 15 15 /*Intermediary*/ 16 int segment_width;17 int element;18 int i;19 int count=0;20 int penpair_ids[2];21 bool ismacayealpattyn,isstokes,isl1l2;22 int numpenalties,numberofpressureloads,numrifts,numriftsegments;16 int segment_width; 17 int element; 18 int i; 19 int count; 20 int penpair_ids[2]; 21 bool ismacayeal,isl1l2,ispattyn,isstokes; 22 int numpenalties,numberofpressureloads,numrifts,numriftsegments; 23 23 IssmDouble *pressureload = NULL; 24 24 IssmDouble *elements_type = NULL; … … 34 34 iomodel->Constant(&isl1l2,FlowequationIsl1l2Enum); 35 35 iomodel->Constant(&isstokes,FlowequationIsstokesEnum); 36 iomodel->Constant(&ismacayealpattyn,FlowequationIsmacayealpattynEnum); 36 iomodel->Constant(&ismacayeal,FlowequationIsmacayealEnum); 37 iomodel->Constant(&ispattyn,FlowequationIspattynEnum); 37 38 iomodel->Constant(&numrifts,RiftsNumriftsEnum); 38 39 … … 41 42 42 43 /*Now, is the flag macayaealpattyn on? otherwise, do nothing: */ 43 if(!ismacayeal pattyn & !isstokes & !isl1l2) return;44 if(!ismacayeal & !ispattyn & !isstokes & !isl1l2) return; 44 45 45 46 /*Create pressure loads as boundary conditions. Pay attention to the partitioning if we are running in parallel (the nodes -
issm/trunk-jpl/src/c/modules/ModelProcessorx/DiagnosticHoriz/CreateNodesDiagnosticHoriz.cpp
r15464 r15504 12 12 13 13 /*Intermediary*/ 14 bool is stokes,isl1l2,ismacayealpattyn;14 bool ismacayeal,isl1l2,ispattyn,isstokes; 15 15 int finiteelementssa; 16 16 17 17 /*Fetch parameters: */ 18 iomodel->Constant(&ismacayeal,FlowequationIsmacayealEnum); 19 iomodel->Constant(&isl1l2,FlowequationIsl1l2Enum); 20 iomodel->Constant(&ispattyn,FlowequationIspattynEnum); 18 21 iomodel->Constant(&isstokes,FlowequationIsstokesEnum); 19 iomodel->Constant(&isl1l2,FlowequationIsl1l2Enum);20 iomodel->Constant(&ismacayealpattyn,FlowequationIsmacayealpattynEnum);21 22 iomodel->Constant(&finiteelementssa,FlowequationFeSsaEnum); 22 23 23 24 /*Now, is the flag macayaealpattyn on? otherwise, do nothing: */ 24 if(!ismacayeal pattyn & !isstokes & !isl1l2) return;25 if(!ismacayeal & !isl1l2 & !ispattyn & !isstokes) return; 25 26 26 27 /*Create nodes: */ -
issm/trunk-jpl/src/c/modules/ModelProcessorx/DiagnosticHoriz/UpdateElementsDiagnosticHoriz.cpp
r15428 r15504 17 17 18 18 int materials_type; 19 bool ismacayealpattyn; 20 bool isl1l2; 21 bool isstokes; 19 bool ismacayeal,isl1l2,ispattyn,isstokes; 22 20 bool control_analysis; 23 21 bool dakota_analysis; 24 22 25 23 /*Fetch constants needed: */ 24 iomodel->Constant(&ismacayeal,FlowequationIsmacayealEnum); 25 iomodel->Constant(&isl1l2,FlowequationIsl1l2Enum); 26 iomodel->Constant(&ispattyn,FlowequationIspattynEnum); 26 27 iomodel->Constant(&isstokes,FlowequationIsstokesEnum); 27 iomodel->Constant(&isl1l2,FlowequationIsl1l2Enum);28 iomodel->Constant(&ismacayealpattyn,FlowequationIsmacayealpattynEnum);29 28 iomodel->Constant(&control_analysis,InversionIscontrolEnum); 30 29 iomodel->Constant(&dakota_analysis,QmuIsdakotaEnum); … … 32 31 33 32 /*Now, is the flag macayaealpattyn on? otherwise, do nothing: */ 34 if(!ismacayeal pattyn & !isstokes &!isl1l2) return;33 if(!ismacayeal & !isl1l2 & !ispattyn & !isstokes) return; 35 34 36 35 /*Fetch data needed: */ -
issm/trunk-jpl/src/c/shared/Enum/EnumDefinitions.h
r15492 r15504 68 68 FlowequationElementEquationEnum, 69 69 FlowequationIshutterEnum, 70 FlowequationIsmacayealEnum, 70 71 FlowequationIsl1l2Enum, 71 FlowequationIs macayealpattynEnum,72 FlowequationIspattynEnum, 72 73 FlowequationIsstokesEnum, 73 74 FlowequationFeStokesEnum, -
issm/trunk-jpl/src/c/shared/Enum/EnumToStringx.cpp
r15492 r15504 76 76 case FlowequationElementEquationEnum : return "FlowequationElementEquation"; 77 77 case FlowequationIshutterEnum : return "FlowequationIshutter"; 78 case FlowequationIsmacayealEnum : return "FlowequationIsmacayeal"; 78 79 case FlowequationIsl1l2Enum : return "FlowequationIsl1l2"; 79 case FlowequationIs macayealpattynEnum : return "FlowequationIsmacayealpattyn";80 case FlowequationIspattynEnum : return "FlowequationIspattyn"; 80 81 case FlowequationIsstokesEnum : return "FlowequationIsstokes"; 81 82 case FlowequationFeStokesEnum : return "FlowequationFeStokes"; -
issm/trunk-jpl/src/c/shared/Enum/StringToEnumx.cpp
r15492 r15504 76 76 else if (strcmp(name,"FlowequationElementEquation")==0) return FlowequationElementEquationEnum; 77 77 else if (strcmp(name,"FlowequationIshutter")==0) return FlowequationIshutterEnum; 78 else if (strcmp(name,"FlowequationIsmacayeal")==0) return FlowequationIsmacayealEnum; 78 79 else if (strcmp(name,"FlowequationIsl1l2")==0) return FlowequationIsl1l2Enum; 79 else if (strcmp(name,"FlowequationIs macayealpattyn")==0) return FlowequationIsmacayealpattynEnum;80 else if (strcmp(name,"FlowequationIspattyn")==0) return FlowequationIspattynEnum; 80 81 else if (strcmp(name,"FlowequationIsstokes")==0) return FlowequationIsstokesEnum; 81 82 else if (strcmp(name,"FlowequationFeStokes")==0) return FlowequationFeStokesEnum; … … 136 137 else if (strcmp(name,"InversionTao")==0) return InversionTaoEnum; 137 138 else if (strcmp(name,"InversionIncompleteAdjoint")==0) return InversionIncompleteAdjointEnum; 138 else if (strcmp(name,"InversionMaxParameters")==0) return InversionMaxParametersEnum;139 139 else stage=2; 140 140 } 141 141 if(stage==2){ 142 if (strcmp(name,"InversionMaxiterPerStep")==0) return InversionMaxiterPerStepEnum; 142 if (strcmp(name,"InversionMaxParameters")==0) return InversionMaxParametersEnum; 143 else if (strcmp(name,"InversionMaxiterPerStep")==0) return InversionMaxiterPerStepEnum; 143 144 else if (strcmp(name,"InversionMinParameters")==0) return InversionMinParametersEnum; 144 145 else if (strcmp(name,"InversionNsteps")==0) return InversionNstepsEnum; … … 259 260 else if (strcmp(name,"GiaMantleViscosity")==0) return GiaMantleViscosityEnum; 260 261 else if (strcmp(name,"GiaLithosphereThickness")==0) return GiaLithosphereThicknessEnum; 261 else if (strcmp(name,"Thickness")==0) return ThicknessEnum;262 262 else stage=3; 263 263 } 264 264 if(stage==3){ 265 if (strcmp(name,"TimesteppingStartTime")==0) return TimesteppingStartTimeEnum; 265 if (strcmp(name,"Thickness")==0) return ThicknessEnum; 266 else if (strcmp(name,"TimesteppingStartTime")==0) return TimesteppingStartTimeEnum; 266 267 else if (strcmp(name,"TimesteppingFinalTime")==0) return TimesteppingFinalTimeEnum; 267 268 else if (strcmp(name,"TimesteppingCflCoefficient")==0) return TimesteppingCflCoefficientEnum; … … 382 383 else if (strcmp(name,"Riftfront")==0) return RiftfrontEnum; 383 384 else if (strcmp(name,"RiftfrontType")==0) return RiftfrontTypeEnum; 384 else if (strcmp(name,"Segment")==0) return SegmentEnum;385 385 else stage=4; 386 386 } 387 387 if(stage==4){ 388 if (strcmp(name,"SegmentRiftfront")==0) return SegmentRiftfrontEnum; 388 if (strcmp(name,"Segment")==0) return SegmentEnum; 389 else if (strcmp(name,"SegmentRiftfront")==0) return SegmentRiftfrontEnum; 389 390 else if (strcmp(name,"SpcDynamic")==0) return SpcDynamicEnum; 390 391 else if (strcmp(name,"SpcStatic")==0) return SpcStaticEnum; … … 505 506 else if (strcmp(name,"TaylorHood")==0) return TaylorHoodEnum; 506 507 else if (strcmp(name,"SaveResults")==0) return SaveResultsEnum; 507 else if (strcmp(name,"BoolElementResult")==0) return BoolElementResultEnum;508 508 else stage=5; 509 509 } 510 510 if(stage==5){ 511 if (strcmp(name,"BoolExternalResult")==0) return BoolExternalResultEnum; 511 if (strcmp(name,"BoolElementResult")==0) return BoolElementResultEnum; 512 else if (strcmp(name,"BoolExternalResult")==0) return BoolExternalResultEnum; 512 513 else if (strcmp(name,"DoubleElementResult")==0) return DoubleElementResultEnum; 513 514 else if (strcmp(name,"DoubleExternalResult")==0) return DoubleExternalResultEnum; -
issm/trunk-jpl/src/m/classes/flowequation.m
r15455 r15504 6 6 classdef flowequation 7 7 properties (SetAccess=public) 8 ismacayealpattyn = 0; 9 ishutter = 0; 10 isl1l2 = 0; 11 isstokes = 0; 12 fe_stokes = 0; 13 fe_ssa = 0; 14 vertex_equation = NaN; 15 element_equation = NaN; 16 bordermacayeal = NaN; 17 borderpattyn = NaN; 18 borderstokes = NaN; 8 ismacayeal = 0; 9 ispattyn = 0; 10 ishutter = 0; 11 isl1l2 = 0; 12 isstokes = 0; 13 fe_stokes = 0; 14 fe_ssa = 0; 15 vertex_equation = NaN; 16 element_equation = NaN; 17 bordermacayeal = NaN; 18 borderpattyn = NaN; 19 borderstokes = NaN; 19 20 end 20 21 methods … … 34 35 if ismember(DiagnosticHorizAnalysisEnum(),analyses), 35 36 36 md = checkfield(md,'flowequation.ismacayealpattyn','numel',[1],'values',[0 1]);37 37 md = checkfield(md,'flowequation.ishutter','numel',[1],'values',[0 1]); 38 md = checkfield(md,'flowequation.ismacayeal','numel',[1],'values',[0 1]); 38 39 md = checkfield(md,'flowequation.isl1l2','numel',[1],'values',[0 1]); 40 md = checkfield(md,'flowequation.ispattyn','numel',[1],'values',[0 1]); 39 41 md = checkfield(md,'flowequation.isstokes','numel',[1],'values',[0 1]); 40 42 md = checkfield(md,'flowequation.bordermacayeal','size',[md.mesh.numberofvertices 1],'values',[0 1]); … … 48 50 md = checkfield(md,'flowequation.element_equation','size',[md.mesh.numberofelements 1],'values',[0:8]); 49 51 end 50 if ~(obj.ismacayeal pattyn || obj.ishutter || obj.isstokes || obj.isl1l2),51 md = checkmessage(md,['no element types set for this model . At least one of ismacayealpattyn, ishutter or isstokes need to be =1']);52 if ~(obj.ismacayeal || obj.ispattyn || obj.ishutter || obj.isstokes || obj.isl1l2), 53 md = checkmessage(md,['no element types set for this model']); 52 54 end 53 55 end … … 64 66 disp(sprintf(' flow equation parameters:')); 65 67 66 fielddisplay(obj,'ismacayealpattyn','is the macayeal or pattyn approximation used ?');67 68 fielddisplay(obj,'ishutter','is the shallow ice approximation used ?'); 69 fielddisplay(obj,'ismacayeal','is the macayeal approximation used ?'); 68 70 fielddisplay(obj,'isl1l2','is the l1l2 approximation used ?'); 71 fielddisplay(obj,'ispattyn','is the pattyn approximation used ?'); 69 72 fielddisplay(obj,'isstokes','are the Full-Stokes equations used ?'); 70 73 fielddisplay(obj,'fe_ssa','Finite Element for SSA 0: Lagrange P1 (linear), 1: Lagrange P2 (quadratic)'); … … 77 80 end % }}} 78 81 function marshall(obj,md,fid) % {{{ 79 WriteData(fid,'object',obj,'fieldname','ismacayealpattyn','format','Boolean');80 82 WriteData(fid,'object',obj,'fieldname','ishutter','format','Boolean'); 83 WriteData(fid,'object',obj,'fieldname','ismacayeal','format','Boolean'); 81 84 WriteData(fid,'object',obj,'fieldname','isl1l2','format','Boolean'); 85 WriteData(fid,'object',obj,'fieldname','ispattyn','format','Boolean'); 82 86 WriteData(fid,'object',obj,'fieldname','isstokes','format','Boolean'); 83 87 WriteData(fid,'object',obj,'fieldname','fe_stokes','format','Integer'); -
issm/trunk-jpl/src/m/classes/flowequation.py
r15455 r15504 16 16 def __init__(self): # {{{ 17 17 18 self.ismacayealpattyn = 019 18 self.ishutter = 0 19 self.ismacayeal = 0 20 20 self.isl1l2 = 0 21 self.ispattyn = 0 21 22 self.isstokes = 0 22 23 self.fe_stokes = 0 … … 35 36 string=' flow equation parameters:' 36 37 37 string="%s\n%s"%(string,fielddisplay(self,'ismacayealpattyn',"is the macayeal or pattyn approximation used ?"))38 38 string="%s\n%s"%(string,fielddisplay(self,'ishutter',"is the shallow ice approximation used ?")) 39 string="%s\n%s"%(string,fielddisplay(self,'ismacayeal',"is the macayeal approximation used ?")) 39 40 string="%s\n%s"%(string,fielddisplay(self,'isl1l2',"are l1l2 equations used ?")) 41 string="%s\n%s"%(string,fielddisplay(self,'ispattyn',"is the pattyn approximation used ?")) 40 42 string="%s\n%s"%(string,fielddisplay(self,'isstokes',"are the Full-Stokes equations used ?")) 41 43 string="%s\n%s"%(string,fielddisplay(self,'fe_ssa',"Finite Element for SSA 0: Lagrange P1 (linear), 1: Lagrange P2 (quadratic)")) … … 53 55 54 56 if DiagnosticHorizAnalysisEnum() in analyses: 55 md = checkfield(md,'flowequation.ismacayealpattyn','numel',[1],'values',[0,1])56 57 md = checkfield(md,'flowequation.ishutter','numel',[1],'values',[0,1]) 58 md = checkfield(md,'flowequation.ismacayeal','numel',[1],'values',[0,1]) 57 59 md = checkfield(md,'flowequation.isl1l2','numel',[1],'values',[0,1]) 60 md = checkfield(md,'flowequation.ispattyn','numel',[1],'values',[0,1]) 58 61 md = checkfield(md,'flowequation.isstokes','numel',[1],'values',[0,1]) 59 62 md = checkfield(md,'flowequation.bordermacayeal','size',[md.mesh.numberofvertices],'values',[0,1]) … … 66 69 md = checkfield(md,'flowequation.vertex_equation','size',[md.mesh.numberofvertices],'values',numpy.arange(0,7+1)) 67 70 md = checkfield(md,'flowequation.element_equation','size',[md.mesh.numberofelements],'values',numpy.arange(0,7+1)) 68 if not (self.ismacayeal pattyn or self.ishutter or self.isstokes or self.isl1l2):69 md.checkmessage("no element types set for this model . At least one of ismacayealpattyn, ishutter or isstokes need to be =1")71 if not (self.ismacayeal or self.ispattyn or self.ishutter or self.isstokes or self.isl1l2): 72 md.checkmessage("no element types set for this model") 70 73 71 74 if DiagnosticHutterAnalysisEnum() in analyses: … … 77 80 # }}} 78 81 def marshall(self,md,fid): # {{{ 79 WriteData(fid,'object',self,'fieldname','ismacayealpattyn','format','Boolean')80 82 WriteData(fid,'object',self,'fieldname','ishutter','format','Boolean') 83 WriteData(fid,'object',self,'fieldname','ismacayeal','format','Boolean') 81 84 WriteData(fid,'object',self,'fieldname','isl1l2','format','Boolean') 85 WriteData(fid,'object',self,'fieldname','ispattyn','format','Boolean') 82 86 WriteData(fid,'object',self,'fieldname','isstokes','format','Boolean') 83 87 WriteData(fid,'object',self,'fieldname','fe_stokes','format','Integer') -
issm/trunk-jpl/src/m/classes/model/model.m
r15459 r15504 882 882 if isfield(structmd,'artificial_diffusivity'), md.balancethickness.stabilization=structmd.artificial_diffusivity; end 883 883 if isfield(structmd,'dhdt'), md.balancethickness.thickening_rate=structmd.dhdt; end 884 if isfield(structmd,'ismacayealpattyn'), md.flowequation.ismacayealpattyn=structmd.ismacayealpattyn; end885 884 if isfield(structmd,'ishutter'), md.flowequation.ishutter=structmd.ishutter; end 886 885 if isfield(structmd,'isstokes'), md.flowequation.isstokes=structmd.isstokes; end -
issm/trunk-jpl/src/m/enum/EnumDefinitions.py
r15492 r15504 835 835 return StringToEnum('FlowequationIshutter')[0] 836 836 837 def FlowequationIsmacayealEnum(): 838 """ 839 FLOWEQUATIONISMACAYEALENUM - Enum of FlowequationIsmacayeal 840 841 WARNING: DO NOT MODIFY THIS FILE 842 this file has been automatically generated by src/c/shared/Enum/Synchronize.sh 843 Please read src/c/shared/Enum/README for more information 844 845 Usage: 846 macro=FlowequationIsmacayealEnum() 847 """ 848 849 return StringToEnum('FlowequationIsmacayeal')[0] 850 837 851 def FlowequationIsl1l2Enum(): 838 852 """ … … 849 863 return StringToEnum('FlowequationIsl1l2')[0] 850 864 851 def FlowequationIs macayealpattynEnum():852 """ 853 FLOWEQUATIONIS MACAYEALPATTYNENUM - Enum of FlowequationIsmacayealpattyn854 855 WARNING: DO NOT MODIFY THIS FILE 856 this file has been automatically generated by src/c/shared/Enum/Synchronize.sh 857 Please read src/c/shared/Enum/README for more information 858 859 Usage: 860 macro=FlowequationIs macayealpattynEnum()861 """ 862 863 return StringToEnum('FlowequationIs macayealpattyn')[0]865 def FlowequationIspattynEnum(): 866 """ 867 FLOWEQUATIONISPATTYNENUM - Enum of FlowequationIspattyn 868 869 WARNING: DO NOT MODIFY THIS FILE 870 this file has been automatically generated by src/c/shared/Enum/Synchronize.sh 871 Please read src/c/shared/Enum/README for more information 872 873 Usage: 874 macro=FlowequationIspattynEnum() 875 """ 876 877 return StringToEnum('FlowequationIspattyn')[0] 864 878 865 879 def FlowequationIsstokesEnum(): … … 7903 7917 """ 7904 7918 7905 return 56 37906 7919 return 564 7920 -
issm/trunk-jpl/src/m/enum/MaximumNumberOfEnums.m
r15492 r15504 9 9 % macro=MaximumNumberOfEnums() 10 10 11 macro=56 3;11 macro=564; -
issm/trunk-jpl/src/m/parameterization/setflowequation.m
r13058 r15504 283 283 %figure out solution types 284 284 md.flowequation.ishutter=double(any(md.flowequation.element_equation==1)); 285 md.flowequation.ismacayealpattyn=double(any(md.flowequation.element_equation==2 | md.flowequation.element_equation==3)); 285 md.flowequation.ismacayeal=double(any(md.flowequation.element_equation==2)); 286 md.flowequation.ispattyn=double(any(md.flowequation.element_equation==3)); 287 md.flowequation.isl1l2=double(any(md.flowequation.element_equation==8)); 286 288 md.flowequation.isstokes=double(any(md.flowequation.element_equation==4)); 287 md.flowequation.isl1l2=double(any(md.flowequation.element_equation==8));288 289 289 290 return -
issm/trunk-jpl/src/m/parameterization/setflowequation.py
r14211 r15504 275 275 #figure out solution types 276 276 md.flowequation.ishutter=any(md.flowequation.element_equation==1) 277 md.flowequation.ismacayeal pattyn=bool(numpy.any(numpy.logical_or(md.flowequation.element_equation==2,md.flowequation.element_equation==3)))277 md.flowequation.ismacayeal=any(md.flowequation.element_equation==2) 278 278 md.flowequation.isl1l2=any(md.flowequation.element_equation==8) 279 md.flowequation.ispattyn=any(md.flowequation.element_equation==3) 279 280 md.flowequation.isstokes=any(md.flowequation.element_equation==4) 280 281 -
issm/trunk-jpl/src/m/qmu/qmuresponse.m
r13646 r15504 29 29 m_ds=models.ds; 30 30 ishutter=m_dhu.parameters.ishutter; 31 ismacayealpattyn=m_dh.parameters.ismacayealpattyn; 31 ismacayeal=m_dh.parameters.ismacayeal; 32 ispattyn=m_dh.parameters.ispattyn; 32 33 isstokes=m_ds.parameters.isstokes; 33 34 if ishutter, … … 57 58 end 58 59 59 elseif ismacayeal pattyn,60 elseif ismacayeal || ispattyn, 60 61 61 62 % for now, separate all segments from double array for parallel to make cells
Note:
See TracChangeset
for help on using the changeset viewer.