[cig-commits] r21029 - seismo/3D/FAULT_SOURCE/branches/new_fault_db/EXAMPLES/tpv15
percygalvez at geodynamics.org
percygalvez at geodynamics.org
Tue Nov 13 01:32:15 PST 2012
Author: percygalvez
Date: 2012-11-13 01:32:14 -0800 (Tue, 13 Nov 2012)
New Revision: 21029
Modified:
seismo/3D/FAULT_SOURCE/branches/new_fault_db/EXAMPLES/tpv15/tpv15.py
Log:
Deleting redundant lines for tpv15
Modified: seismo/3D/FAULT_SOURCE/branches/new_fault_db/EXAMPLES/tpv15/tpv15.py
===================================================================
--- seismo/3D/FAULT_SOURCE/branches/new_fault_db/EXAMPLES/tpv15/tpv15.py 2012-11-13 09:32:04 UTC (rev 21028)
+++ seismo/3D/FAULT_SOURCE/branches/new_fault_db/EXAMPLES/tpv15/tpv15.py 2012-11-13 09:32:14 UTC (rev 21029)
@@ -229,39 +229,13 @@
Ad = [5,14] # A_down
faultA = fault_input(1,Au,Ad)
-quads_Aup,quads_Adp = save_cracks(faultA.name,faultA.surface_u,faultA.surface_d)
-#Unpacking list.
-quads_Au=unpack_list(quads_Aup)
-quads_Ad=unpack_list(quads_Adp)
-print 'len(Au):',len(quads_Au)
-print 'len(Ad):',len(quads_Ad)
-
-if not (len(quads_Au)==len(quads_Ad)):
- print 'Number of elements for each fauld side up and down do not concide'
- sys.exit('goodbye')
-
-save_elements_nodes(faultA.name,quads_Au,quads_Ad)
-
####### Branch Fault##############################################################################
Bu = [4] # B_up
Bd = [15] # B_down
faultB = fault_input(2,Bu,Bd)
-quads_Bup,quads_Bdp = save_cracks(faultB.name,faultB.surface_u,faultB.surface_d)
-#Unpacking list.
-quads_Bu=unpack_list(quads_Bup)
-quads_Bd=unpack_list(quads_Bdp)
-print 'len(Au):',len(quads_Bu)
-print 'len(Ad):',len(quads_Bd)
-
-if not (len(quads_Bu)==len(quads_Bd)):
- print 'Number of elements for each fauld side up and down do not concide'
- sys.exit('goodbye')
-
-save_elements_nodes(faultB.name,quads_Bu,quads_Bd)
-
## FOR THE BULK (Seismic wave propagation part for SESAME)
####### This is boundary_definition.py of GEOCUBIT
More information about the CIG-COMMITS
mailing list