Changeset 4273

Timestamp:

06/28/10 15:10:14 (15 years ago)

Author:

Mathieu Morlighem

Message:

fixed bug in extrude

File:

• issm/trunk/src/c/objects/Elements/Penta.cpp (modified) (3 diffs)

issm/trunk/src/c/objects/Elements/Penta.cpp

@@ -4139 +4139 @@
 
         Penta* penta=NULL;
-        Input* this_input=NULL;
+        Input* original_input=NULL;
+
+        /*Make a copy of the original input: */
+        original_input=(Input*)this->inputs->GetInput(enum_type);
 
         /*recover parameters: */
@@ -4152 +4155 @@
 
                 penta=this;
-                this_input=this->inputs->GetInput(enum_type);
-                if(!this_input)ISSMERROR("%s%s"," could not find input with enum:",EnumAsString(enum_type));
+                original_input=(Input*)this->inputs->GetInput(enum_type);
+                if(!original_input) ISSMERROR("%s%s"," could not find input with enum:",EnumAsString(enum_type));
 
                 for(;;){
@@ -4161 +4164 @@
 
                         /*Add input of the basal element*/
-                        penta->inputs->AddInput(this_input);
+                        Input* copy=NULL;
+                        copy=(Input*)original_input->copy();
+                        inputs->AddObject((Input*)copy);
+
 
                         /*Stop if we have reached the surface*/
                         if (penta->IsOnSurface()) break;
+                        ISSMASSERT(penta->Id()!=this->id);
 
                 }