Changeset 100

Timestamp:

04/28/09 15:26:41 (16 years ago)

Author:

Eric.Larour

Message:

Added velocity extrusin capability

Location:

issm/trunk/src/c/DataSet

Files:

• DataSet.cpp (modified) (4 diffs)
• DataSet.h (modified) (1 diff)

issm/trunk/src/c/DataSet/DataSet.cpp

@@ -731 +731 @@
         Element* element=NULL;
         Load* load=NULL;
+        Node* node=NULL;
 
         for ( object=objects.begin() ; object < objects.end(); object++ ){
@@ -736 +737 @@
                 if(EnumIsElement((*object)->Enum())){
 
-
                         element=(Element*)(*object);
-
                         element->Configure(loads,nodes,materials);
                 }
@@ -746 +745 @@
 
                         load->Configure(elements,nodes,materials);
+                }
+
+                if((*object)->Enum()==NodeEnum()){
+                        node=(Node*)(*object);
+                        node->Configure(nodes);
                 }
 
@@ -1069 +1073 @@
 
 }
+                
+void  DataSet::VelocityExtrude(Vec ug,double* ug_serial){
+
+        vector<Object*>::iterator object;
+        Penta* penta=NULL;
+
+        for ( object=objects.begin() ; object < objects.end(); object++ ){
+                
+                if((*object)->Enum()==PentaEnum()){
+
+                        penta=(Penta*)(*object);
+                        penta->VelocityExtrude(ug,ug_serial);
+
+                }
+        }
+
+}

issm/trunk/src/c/DataSet/DataSet.h

@@ -75 +75 @@
                 void  Gradj(Vec grad_g,double*  u_g,double* lambda_g,ParameterInputs* inputs,int analysis_type,char* control_type);
                 void  Misfit(double* pJ, double* u_g,double* u_g_obs,ParameterInputs* inputs,int analysis_type);
+                void  VelocityExtrude(Vec ug,double* ug_serial);