[cig-commits] r4303 - mc/1D/hc/trunk

[becker at geodynamics.org]

Author: becker
Date: 2006-08-17 10:41:17 -0700 (Thu, 17 Aug 2006)
New Revision: 4303

Modified:
   mc/1D/hc/trunk/Makefile
   mc/1D/hc/trunk/prem_util.c
Log:
Minor changes to prem utility and Makefile



Modified: mc/1D/hc/trunk/Makefile
===================================================================
--- mc/1D/hc/trunk/Makefile	2006-08-16 05:52:47 UTC (rev 4302)
+++ mc/1D/hc/trunk/Makefile	2006-08-17 17:41:17 UTC (rev 4303)
@@ -173,7 +173,6 @@
 
 # C function prototyper
 hc_auto_proto.h: 
-	rm hc_auto_proto.h;\
 	cproto  $(INC_FLAGS)-DGENERATE_PROTO  -f 2 -p *.c  | \
 		grep -v "void main("  | grep -v "int main(" > hc_auto_proto.h
 
@@ -195,7 +194,7 @@
 	fi
 
 clean:
-	rm $(ODIR)/*.o hc_auto_proto.h
+	rm $(ODIR)/*.o 
 #
 # library
 #

Modified: mc/1D/hc/trunk/prem_util.c
===================================================================
--- mc/1D/hc/trunk/prem_util.c	2006-08-16 05:52:47 UTC (rev 4302)
+++ mc/1D/hc/trunk/prem_util.c	2006-08-17 17:41:17 UTC (rev 4303)
@@ -212,7 +212,7 @@
   *vph = prem_compute_pval(x,(prem->cvph+os),prem->np,1e3);
   *vsv = prem_compute_pval(x,(prem->cvsv+os),prem->np,1e3);
   *vsh = prem_compute_pval(x,(prem->cvsh+os),prem->np,1e3);
-  /* anisotropy */
+  /* anisotropy ellipticity factor */
   *eta = prem_compute_pval(x,(prem->ceta+os),prem->np,1.0);
   /* q factors */
   *qmu = prem_compute_pval(x,   (prem->cqmu   +ilayer),1,1.0);