[cig-commits] commit: Cleanup

Mercurial hg at geodynamics.org
Tue Mar 13 05:41:02 PDT 2012


changeset:   89:b3ac581506e0
tag:         tip
user:        Walter Landry <wlandry at caltech.edu>
date:        Tue Mar 13 05:40:49 2012 -0700
files:       compute_v_on_interface.cxx
description:
Cleanup


diff -r 1d7092563af8 -r b3ac581506e0 compute_v_on_interface.cxx
--- a/compute_v_on_interface.cxx	Mon Mar 12 20:15:23 2012 -0700
+++ b/compute_v_on_interface.cxx	Tue Mar 13 05:40:49 2012 -0700
@@ -83,14 +83,10 @@ double compute_dv_yy(const double z[][ny
   double dv_yy_p;
   if(j==0)
     {
-      // dv_yy_p=(vel(z,log_eta,i+1,j+1) - 2*vel(z,log_eta,i+1,j)
-      //          - vel(z,log_eta,i+1,ny-1))/(h*h);
       dv_yy_p=(vel(z,log_eta,i+1,j+1) - vel(z,log_eta,i+1,j))/(h*h);
     }
   else if(j==ny-1)
     {
-      // dv_yy_p=(-vel(z,log_eta,i+1,0) - 2*vel(z,log_eta,i+1,j)
-      //          + vel(z,log_eta,i+1,j-1))/(h*h);
       dv_yy_p=(-vel(z,log_eta,i+1,j) + vel(z,log_eta,i+1,j-1))/(h*h);
     }
   else
@@ -102,14 +98,10 @@ double compute_dv_yy(const double z[][ny
   double dv_yy_m;
   if(j==0)
     {
-      // dv_yy_m=(vel(z,log_eta,i,j+1) - 2*vel(z,log_eta,i,j)
-      //          - vel(z,log_eta,i,ny-1))/(h*h);
       dv_yy_m=(vel(z,log_eta,i,j+1) - vel(z,log_eta,i,j))/(h*h);
     }
   else if(j==ny-1)
     {
-      // dv_yy_m=(-vel(z,log_eta,i,0) - 2*vel(z,log_eta,i,j)
-      //          + vel(z,log_eta,i,j-1))/(h*h);
       dv_yy_m=(-vel(z,log_eta,i,j) + vel(z,log_eta,i,j-1))/(h*h);
     }
   else



More information about the CIG-COMMITS mailing list