[cig-commits] r14514 - seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab

carltape at geodynamics.org carltape at geodynamics.org
Fri Mar 27 22:04:21 PDT 2009


Author: carltape
Date: 2009-03-27 22:04:21 -0700 (Fri, 27 Mar 2009)
New Revision: 14514

Added:
   seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/SAVE
Modified:
   seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/socal_tomo_plots.m
Log:
Links to directories now corrected.


Added: seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/SAVE
===================================================================
--- seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/SAVE	                        (rev 0)
+++ seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/SAVE	2009-03-28 05:04:21 UTC (rev 14514)
@@ -0,0 +1 @@
+link /home/carltape/ADJOINT_TOMO/ADJOINT_TOMO_OUTPUT/model_plot_matlab_OUTPUT
\ No newline at end of file


Property changes on: seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/SAVE
___________________________________________________________________
Name: svn:special
   + *

Modified: seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/socal_tomo_plots.m
===================================================================
--- seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/socal_tomo_plots.m	2009-03-28 04:58:04 UTC (rev 14513)
+++ seismo/3D/ADJOINT_TOMO/iterate_adj/model_plot/matlab/socal_tomo_plots.m	2009-03-28 05:04:21 UTC (rev 14514)
@@ -16,20 +16,20 @@
 close all
 format short, format compact
 
-dir0 = '/net/denali/raid1/carltape/svn/cig/seismo/3D/ADJOINT_TOMO/';
-pdir = [dir0 'iterate_adj/model_plot'];
+% USER OUTPUT DIRECTORIES
+dir0 = '/net/denali/raid1/carltape/svn/cig/seismo/3D/ADJOINT_TOMO/ADJOINT_TOMO_OUTPUT/';
+pdir = [dir0 'model_plot_matlab_OUTPUT/'];
 mdir = [dir0 'OUTPUT_SUBSPACE_m16/'];
-%mdir = [dir0 'iterate_adj/matlab_work/OUTPUT_SUBSPACE/'];
 
-% KEY: do you want vertical and/or horizontal cross-sections
-ivert = 0;
-iplot_vert = 1;
+% KEY: vertical or horizontal cross-sections
+ivert = 1;
+iplot_vert = 0;
 
 ihorz = 0;
 iplot_horz = 0;
 iplot_horz_coverage = 0;
 
-iwrite = 1;
+iwrite = 0;
 ifigure = 0;
 
 %-----------------------------------
@@ -54,6 +54,10 @@
 % HORIZONTAL CROSS-SECTIONS
 
 if ihorz == 1
+    
+    irun = 1;
+    dir1 = [pdir 'horz_' sprintf('%2.2i',irun) '/'];
+    
     % horizontal grid
     numx = 300;         % key command for resolution
     xvec = linspace(xmin,xmax,numx);
@@ -121,7 +125,7 @@
     [junk1,eid,junk2,junk3,sdep,junk5,junk6,slon,slat] = textread(srcfile,'%f%f%s%s%f%f%f%f%f');
 
     irun = 3;   % KEY: which set of cross-sections to make
-    dir1 = [pdir 'SAVE/vert_' sprintf('%2.2i',irun) '/'];   % KEY COMMAND
+    dir1 = [pdir 'vert_' sprintf('%2.2i',irun) '/'];   % KEY COMMAND
     
     switch irun
         
@@ -289,7 +293,7 @@
     
     imin = 1; imax = nrays;
     %imin = 80; imax = nrays;
-    %imin = nrays; imax = imin;
+    imin = nrays; imax = imin;
     
     for ii = imin:imax
         
@@ -453,7 +457,7 @@
     %irun = 2; pmax = 32;
     irun = 3; pmax = 10;
     
-    dir1 = [pdir 'SAVE/vert_' sprintf('%2.2i',irun) '/'];
+    dir1 = [pdir 'vert_' sprintf('%2.2i',irun) '/'];
     smodel1 = 'm00';
     smodel2 = 'm16';
     modlab1 = 'vs';
@@ -591,8 +595,7 @@
     colors;
     
     irun = 1;
-    dir1 = [pdir 'SAVE/horz_' sprintf('%2.2i',irun) '/'];
-    %dir1 = [pdir 'SAVE/horz_full/'];
+    dir1 = [pdir 'horz_' sprintf('%2.2i',irun) '/'];
     smodel1 = 'm00';
     smodel2 = 'm16';    % m16, m01, etc
     modlab = 'vs';
@@ -735,8 +738,7 @@
     colors;
     
     irun = 1;
-    dir1 = [pdir 'SAVE/horz_' sprintf('%2.2i',irun) '/'];
-    %dir1 = [pdir 'SAVE/horz_full/'];
+    dir1 = [pdir 'horz_' sprintf('%2.2i',irun) '/'];
     modlab = 'vb';
     %smodeltag = [smodel2 '_' smodel1];
     



More information about the CIG-COMMITS mailing list