Changeset 4073
- Timestamp:
- 06/21/10 11:29:00 (15 years ago)
- Location:
- issm/trunk/src/c
- Files:
-
- 17 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/Makefile.am
r4070 r4073 516 516 ./modules/FieldDepthAveragex/FieldDepthAveragex.cpp\ 517 517 ./modules/FieldDepthAveragex/FieldDepthAveragex.h\ 518 ./modules/ DepthAverageInputx/DepthAverageInputx.cpp\519 ./modules/ DepthAverageInputx/DepthAverageInputx.h\518 ./modules/InputDepthAveragex/InputDepthAveragex.cpp\ 519 ./modules/InputDepthAveragex/InputDepthAveragex.h\ 520 520 ./modules/VecExtrudex/VecExtrudex.cpp\ 521 521 ./modules/VecExtrudex/VecExtrudex.h\ … … 1030 1030 ./modules/FieldDepthAveragex/FieldDepthAveragex.cpp\ 1031 1031 ./modules/FieldDepthAveragex/FieldDepthAveragex.h\ 1032 ./modules/ DepthAverageInputx/DepthAverageInputx.cpp\1033 ./modules/ DepthAverageInputx/DepthAverageInputx.h\1032 ./modules/InputDepthAveragex/InputDepthAveragex.cpp\ 1033 ./modules/InputDepthAveragex/InputDepthAveragex.h\ 1034 1034 ./modules/VecExtrudex/VecExtrudex.cpp\ 1035 1035 ./modules/VecExtrudex/VecExtrudex.h\ -
issm/trunk/src/c/modules/InputDepthAveragex/InputDepthAveragex.cpp
r4072 r4073 1 /*!\file DepthAverageInputx1 /*!\file InputDepthAveragex 2 2 * \brief: average field throfieldh thickness 3 3 */ 4 4 5 #include "./ DepthAverageInputx.h"5 #include "./InputDepthAveragex.h" 6 6 #include "../InputExtrudex/InputExtrudex.h" 7 7 #include "../../shared/shared.h" … … 10 10 #include "../../EnumDefinitions/EnumDefinitions.h" 11 11 12 void DepthAverageInputx( DataSet* elements,DataSet* nodes, DataSet* vertices, DataSet* loads, DataSet* materials, Parameters* parameters,int enum_type,int average_enum_type){12 void InputDepthAveragex( DataSet* elements,DataSet* nodes, DataSet* vertices, DataSet* loads, DataSet* materials, Parameters* parameters,int enum_type,int average_enum_type){ 13 13 14 14 /*Intermediary*/ … … 22 22 for (i=0;i<elements->Size();i++){ 23 23 element=(Element*)elements->GetObjectByOffset(i); 24 element-> DepthAverageInputAtBase(enum_type,average_enum_type);24 element->InputDepthAverageAtBase(enum_type,average_enum_type); 25 25 } 26 26 -
issm/trunk/src/c/modules/InputDepthAveragex/InputDepthAveragex.h
r4072 r4073 1 /*!\file: DepthAverageInputx.h1 /*!\file: InputDepthAveragex.h 2 2 * \brief header file for averaging a field throfieldh thickness 3 3 */ … … 9 9 10 10 /* local prototypes: */ 11 void DepthAverageInputx( DataSet* elements,DataSet* nodes, DataSet* vertices, DataSet* loads, DataSet* materials, Parameters* parameters,int enum_type,int average_enum_type);11 void InputDepthAveragex( DataSet* elements,DataSet* nodes, DataSet* vertices, DataSet* loads, DataSet* materials, Parameters* parameters,int enum_type,int average_enum_type); 12 12 13 13 #endif /* _DEPTHAVERAGEINPUTX_H */ -
issm/trunk/src/c/modules/modules.h
r4070 r4073 62 62 #include "./BamgConvertMeshx/BamgConvertMeshx.h" 63 63 #include "./SplitSolutionVectorx/SplitSolutionVectorx.h" 64 #include "./ DepthAverageInputx/DepthAverageInputx.h"64 #include "./InputDepthAveragex/InputDepthAveragex.h" 65 65 #include "./InputExtrudex/InputExtrudex.h" 66 66 #include "./InputToResultx/InputToResultx.h" -
issm/trunk/src/c/objects/Elements/Beam.h
r4070 r4073 62 62 void UpdateInputsFromConstant(bool constant, int name){ISSMERROR("Not implemented yet!");} 63 63 void UpdateInputsFromSolution(double* solution); 64 void DepthAverageInputAtBase(int enum_type,int average_enum_type){ISSMERROR("not implemented yet");};64 void InputDepthAverageAtBase(int enum_type,int average_enum_type){ISSMERROR("not implemented yet");}; 65 65 void InputToResult(int enum_type,int step,double time); 66 66 void ProcessResultsUnits(void); -
issm/trunk/src/c/objects/Elements/Element.h
r4070 r4073 43 43 virtual double CostFunction(void)=0; 44 44 virtual double SurfaceArea(void)=0; 45 virtual void DepthAverageInputAtBase(int enum_type,int average_enum_type)=0;45 virtual void InputDepthAverageAtBase(int enum_type,int average_enum_type)=0; 46 46 virtual void ComputeBasalStress(Vec sigma_b)=0; 47 47 virtual void ComputePressure(Vec p_g)=0; -
issm/trunk/src/c/objects/Elements/Penta.cpp
r4070 r4073 3367 3367 } 3368 3368 /*}}}*/ 3369 /*FUNCTION Penta:: DepthAverageInputAtBase{{{1*/3370 void Penta:: DepthAverageInputAtBase(int enum_type,int average_enum_type){3369 /*FUNCTION Penta::InputDepthAverageAtBase{{{1*/ 3370 void Penta::InputDepthAverageAtBase(int enum_type,int average_enum_type){ 3371 3371 ISSMERROR("Not implemented yet (see Penta::InputExtrude and Node::FieldDepthAverageAtBase)"); 3372 3372 } -
issm/trunk/src/c/objects/Elements/Penta.h
r4070 r4073 112 112 void VecExtrude(Vec vector,double* vector_serial,int iscollapsed); 113 113 void InputExtrude(int enum_type); 114 void DepthAverageInputAtBase(int enum_type,int average_enum_type);114 void InputDepthAverageAtBase(int enum_type,int average_enum_type); 115 115 void ComputeBasalStress(Vec sigma_bg); 116 116 void ComputePressure(Vec p_gg); -
issm/trunk/src/c/objects/Elements/Sing.h
r4070 r4073 62 62 void UpdateInputsFromConstant(bool constant, int name){ISSMERROR("Not implemented yet!");} 63 63 void UpdateInputsFromSolution(double* solutiong); 64 void DepthAverageInputAtBase(int enum_type,int average_enum_type){ISSMERROR("not implemented yet");};64 void InputDepthAverageAtBase(int enum_type,int average_enum_type){ISSMERROR("not implemented yet");}; 65 65 void InputToResult(int enum_type,int step,double time); 66 66 void ProcessResultsUnits(void); -
issm/trunk/src/c/objects/Elements/Tria.cpp
r4070 r4073 5016 5016 } 5017 5017 /*}}}*/ 5018 /*FUNCTION Tria:: DepthAverageInputAtBase {{{1*/5019 void Tria:: DepthAverageInputAtBase(int enum_type,int average_enum_type){5018 /*FUNCTION Tria::InputDepthAverageAtBase {{{1*/ 5019 void Tria::InputDepthAverageAtBase(int enum_type,int average_enum_type){ 5020 5020 5021 5021 /*New input*/ -
issm/trunk/src/c/objects/Elements/Tria.h
r4070 r4073 55 55 int MyRank(void); 56 56 void SetClone(int* minranks); 57 void DepthAverageInputAtBase(int enum_type,int average_enum_type);57 void InputDepthAverageAtBase(int enum_type,int average_enum_type); 58 58 void* SpawnSing(int g0); 59 59 void* SpawnBeam(int g0, int g1); -
issm/trunk/src/c/solutions/balancedthickness2_core.cpp
r4057 r4073 26 26 27 27 _printf_("depth averaging velocity...\n"); 28 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VxEnum,VxAverageEnum);29 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VyEnum,VyAverageEnum);30 if(dim==3) DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VzEnum,VzAverageEnum);28 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VxEnum,VxAverageEnum); 29 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VyEnum,VyAverageEnum); 30 if(dim==3) InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VzEnum,VzAverageEnum); 31 31 32 32 -
issm/trunk/src/c/solutions/balancedthickness_core.cpp
r4064 r4073 26 26 27 27 _printf_("depth averaging velocity...\n"); 28 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VxEnum,VxAverageEnum);29 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VyEnum,VyAverageEnum);30 if(dim==3) DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VzEnum,VzAverageEnum);28 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VxEnum,VxAverageEnum); 29 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VyEnum,VyAverageEnum); 30 if(dim==3) InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VzEnum,VzAverageEnum); 31 31 32 32 _printf_("call computational core:\n"); -
issm/trunk/src/c/solutions/balancedvelocities_core.cpp
r4064 r4073 25 25 26 26 _printf_("depth averaging velocity...\n"); 27 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VxEnum,VxAverageEnum);28 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VyEnum,VyAverageEnum);29 if(dim==3) DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VzEnum,VzAverageEnum);27 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VxEnum,VxAverageEnum); 28 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VyEnum,VyAverageEnum); 29 if(dim==3) InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VzEnum,VzAverageEnum); 30 30 31 31 _printf_("call computational core:\n"); -
issm/trunk/src/c/solutions/prognostic_core.cpp
r4064 r4073 23 23 24 24 _printf_("depth averaging velocity...\n"); 25 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VxEnum,VxAverageEnum);26 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VyEnum,VyAverageEnum);25 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VxEnum,VxAverageEnum); 26 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,VyEnum,VyAverageEnum); 27 27 28 28 _printf_("call computational core:\n"); -
issm/trunk/src/c/solutions/steadystate_core.cpp
r4063 r4073 34 34 35 35 if(verbose)_printf_("%s\n","computing depth average temperature"); 36 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,TemperatureEnum,TemperatureAverageEnum);36 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,TemperatureEnum,TemperatureAverageEnum); 37 37 38 38 if(verbose)_printf_("%s\n","computing new velocity"); -
issm/trunk/src/c/solutions/transient3d_core.cpp
r4055 r4073 43 43 44 44 if(verbose)_printf_("%s\n","computing depth average temperature"); 45 DepthAverageInputx(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,TemperatureEnum,TemperatureAverageEnum);45 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,TemperatureEnum,TemperatureAverageEnum); 46 46 47 47 if(verbose)_printf_("%s\n","computing new velocity");
Note:
See TracChangeset
for help on using the changeset viewer.