[cig-commits] r5297 - mc/3D/CitcomS/trunk/lib

[tan2 at geodynamics.org]

Author: tan2
Date: 2006-11-15 18:07:00 -0800 (Wed, 15 Nov 2006)
New Revision: 5297

Modified:
   mc/3D/CitcomS/trunk/lib/Sphere_harmonics.c
Log:
Declared function prototype at the top

Modified: mc/3D/CitcomS/trunk/lib/Sphere_harmonics.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Sphere_harmonics.c	2006-11-16 01:52:25 UTC (rev 5296)
+++ mc/3D/CitcomS/trunk/lib/Sphere_harmonics.c	2006-11-16 02:07:00 UTC (rev 5297)
@@ -7,6 +7,8 @@
 #include "global_defs.h"
 #include <stdlib.h>
 
+static void compute_sphereh_table(struct All_variables *);
+
 /*   ======================================================================
      ======================================================================  */
 
@@ -15,7 +17,6 @@
 
 {
     int m,node,ll,mm,i,j;
-    static void compute_sphereh_table();
 
     i=0;
     for (ll=0;ll<=E->output.llmax;ll++)
@@ -330,10 +331,3 @@
 
     return (angle);
 }
-
-
-#if 0
-
-
-
-#endif