[cig-commits] r12989 - in long/3D/SNAC/trunk: . Snac/libSnac/src Snac/tests

ces74 at geodynamics.org ces74 at geodynamics.org
Fri Oct 3 09:53:01 PDT 2008


Author: ces74
Date: 2008-10-03 09:53:00 -0700 (Fri, 03 Oct 2008)
New Revision: 12989

Removed:
   long/3D/SNAC/trunk/StGermain/
Modified:
   long/3D/SNAC/trunk/Snac/libSnac/src/Context.c
   long/3D/SNAC/trunk/Snac/tests/basic.xml
Log:
This version of StGermain (rev. 4222) conflicts with SNAC.
-- planning to go back to rev. 3890, which is known to work.



Modified: long/3D/SNAC/trunk/Snac/libSnac/src/Context.c
===================================================================
--- long/3D/SNAC/trunk/Snac/libSnac/src/Context.c	2008-10-03 04:04:11 UTC (rev 12988)
+++ long/3D/SNAC/trunk/Snac/libSnac/src/Context.c	2008-10-03 16:53:00 UTC (rev 12989)
@@ -348,6 +348,7 @@
 
 	/* Add boundary condition managers */
 	velocityBCsDict = Dictionary_Entry_Value_AsDictionary( Dictionary_Get( self->dictionary, "velocityBCs" ) );
+
 	self->velocityBCs = CompositeVC_New( "velocityBC", self->variable_Register, self->condFunc_Register, velocityBCsDict, self->mesh );
 
 	/* Parallelisation information */
@@ -645,7 +646,10 @@
 	Build( self->elementICs, 0, False );
 	Journal_Printf( self->verbose, "elementICs:\n" );
 	VariableCondition_PrintConcise( self->elementICs, self->verbose );
+
+	fprintf(stderr,"About to build velocityBCs...\n");
 	Build( self->velocityBCs, 0, False );
+	fprintf(stderr,"velocityBCs has been built: %d\n",self->velocityBCs->indexCount);
 	Journal_Printf( self->verbose, "velocityBCs\n" );
 	VariableCondition_PrintConcise( self->velocityBCs, self->verbose );
 
@@ -684,7 +688,9 @@
 	VariableCondition_Apply( self->elementICs, self );
 
 	/* Apply the velocity boundary conditions ... these are considered part of initial conditions */
+	fprintf(stderr,"velocityBCs has been built (2): %d\n",self->velocityBCs->indexCount);
 	VariableCondition_Apply( self->velocityBCs, self );
+	fprintf(stderr,"velocityBCs has been built (3): %d\n",self->velocityBCs->indexCount);
 }
 
 void _Snac_Context_InitializeMaterialProperties( void* context ) {
@@ -955,7 +961,9 @@
 
 	_Snac_Context_DumpPhaseIndex( self );
 
-	KeyCall( self, self->syncK, EntryPoint_VoidPtr_CallCast* )( KeyHandle(self,self->syncK), self );
+	fprintf(stderr,"velocityBCs has been built (4): %d\n",self->velocityBCs->indexCount);
+	KeyCall( self, self->syncK, EntryPoint_Class_VoidPtr_CallCast* )( KeyHandle(self,self->syncK), self );
+	/* _Snac_Context_Sync( self ); */
 }
 
 
@@ -1133,6 +1141,8 @@
 	    strain_inert=1.0e-5f & vbc_max=3.0e-10f */
 	vmax=0.0f;
 	vlb = 3.0e-11f; /* ~1 mm/yr */
+
+	fprintf(stderr,"velocityBCs has been built (5): %x\n",self);
 	for( index = 0; index < self->velocityBCs->indexCount; index++ ) {
 		Snac_Node* node;
 		node_dI = self->velocityBCs->indexTbl[index];

Modified: long/3D/SNAC/trunk/Snac/tests/basic.xml
===================================================================
--- long/3D/SNAC/trunk/Snac/tests/basic.xml	2008-10-03 04:04:11 UTC (rev 12988)
+++ long/3D/SNAC/trunk/Snac/tests/basic.xml	2008-10-03 16:53:00 UTC (rev 12989)
@@ -21,6 +21,7 @@
 	<list name="plugins">
 	</list>
 
+	<param name="journal.verbose"> on </param>
 	<param name="journal.debug"> on </param>
 	<param name="journal.debug.Context"> on </param>
 	<param name="journal.debug.Snac_Parallel"> on </param>



More information about the cig-commits mailing list