Fixed SH toy example

genmod/toy_example_elastic_start.c

@@ -260,11 +260,6 @@ void model_elastic(float  **  rho, float **  pi, float **  u){
 	sprintf(modfile,"%s_vp_it0.bin.%i%i",INV_MODELFILE,POS[1],POS[2]);
 	remove(modfile);
 		
-	
-	
-	
-	free_vector(pts,1,L);
-	 
 }
 
 

genmod/toy_example_elastic_true.c

@@ -179,9 +179,7 @@ void model_elastic(float  **  rho, float **  pi, float **  u){
 	free_vector(flrho,1,nodes);
 	free_vector(flvp,1,nodes);
 	free_vector(flvs,1,nodes);
-	
-	free_vector(pts,1,L);
-	 
+
 }
 
 

par/run_toy_example_SH.sh

@@ -6,7 +6,7 @@
 
 # compiling all libraries and  DENISE
 make clean
-make denise MODEL=../genmod/toy_example_true.c
+make denise MODEL=../genmod/toy_example_true.c MODEL_EL=../genmod/toy_example_elastic_true.c
 
 # starting DENISE for forward modeling
 # (depending on the MPI package you maybe have to adjust the following programme call, 
@@ -16,8 +16,6 @@ mpirun -np 4 ../bin/denise in_and_out/toy_example/toy_example_FW_SH.json | tee i
 
 # the forward modeled data have to be renamed for the inversion
 for (( i=1; i <= 5; i++ )) ; do
-     mv su/measured_data/toy_example_vx.su.shot${i}.it1 su/measured_data/toy_example_x.su.shot${i}
-     mv su/measured_data/toy_example_vy.su.shot${i}.it1 su/measured_data/toy_example_y.su.shot${i}
      mv su/measured_data/toy_example_vz.su.shot${i}.it1 su/measured_data/toy_example_z.su.shot${i}
 
 done
@@ -29,7 +27,7 @@ done
 
 # compiling DENISE
 make clean
-make denise MODEL=../genmod/toy_example_start.c
+make denise MODEL=../genmod/toy_example_start.c MODEL_EL=../genmod/toy_example_elastic_start.c
 
 # starting DENISE
 #lamboot