Changeset 18939

Timestamp:

12/04/14 15:20:41 (10 years ago)

Author:

Eric.Larour

Message:

CHG: issue with size of tape stats, hopefully fixed.

File:

• issm/trunk-jpl/src/c/cores/ad_core.cpp (modified) (3 diffs)

issm/trunk-jpl/src/c/cores/ad_core.cpp

@@ -28 +28 @@
         bool    isautodiff       = false;
         char   *driver           = NULL;
-        size_t  tape_stats[11];
+        size_t  tape_stats[15];
 
         /*state variables: */
@@ -45 +45 @@
                         /*First, stop tracing: */
                         trace_off();
-                
-                        /*retrieve parameters: */
-                        femmodel->parameters->FindParam(&num_dependents,AutodiffNumDependentsEnum);
-                        femmodel->parameters->FindParam(&num_independents,AutodiffNumIndependentsEnum);
-        
-                        /*if no dependents, no point in running a driver: */
-                        if(!(num_dependents*num_independents)) return;
-
-                        /*for adolc to run in parallel, we 0 out on rank~=0:*/
-                        if (my_rank!=0){
-                                num_dependents=0; num_independents=0;
-                        }
                         
                         /*Print tape statistics so that user can kill this run if something is off already:*/
@@ -101 +89 @@
                         } /*}}}*/
 
+                        /*retrieve parameters: */
+                        femmodel->parameters->FindParam(&num_dependents,AutodiffNumDependentsEnum);
+                        femmodel->parameters->FindParam(&num_independents,AutodiffNumIndependentsEnum);
+        
+                        /*if no dependents, no point in running a driver: */
+                        if(!(num_dependents*num_independents)) return;
+
+                        /*for adolc to run in parallel, we 0 out on rank~=0:*/
+                        if (my_rank!=0){
+                                num_dependents=0; num_independents=0;
+                        }
+                        
                         /*retrieve state variable: */
                         femmodel->parameters->FindParam(&axp,&dummy,AutodiffXpEnum);