Changeset 1144 for trunk/source/radius_next.cpp

Timestamp:

05/21/07 20:25:16 (20 months ago)

Author:

gary

Message:

most files, remove dead code, correct comments

init_coreload.cpp - start of reorganizing punch commands

Files:

• trunk/source/radius_next.cpp (modified) (3 diffs)

trunk/source/radius_next.cpp

@@ -567 +567 @@
 
         /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
-        /* check whether change in wind velocity constrains DRAD */
-        /*>>chng 04 may 25,
-         *  WJH 22 May 2004: disable when we are near the sonic point since
+        /* check whether change in wind velocity constrains DRAD 
+         * WJH 22 May 2004: disable when we are near the sonic point since
          * the velocity may be jumping all over the place but we just want
          * to push through it as quickly as we can */
@@ -575 +574 @@
         {
                 double v = fabs(wind.windv);
-                /* this is fractional accel over length */
+                /* this is fractional acceleration over length */
                 dVeldRad = fabs(wind.windv-OldWindVelocity)/
                         MAX2(v,0.1*timesc.sound_speed_isothermal)/radius.drad;
@@ -1615 +1614 @@
                 {
                         fprintf( punch.ipDRout, 
-                                "Wind, dVeldRad=%10.3e\n", 
-                           dVeldRad );
+                                "Wind, dVeldRad=%.3e windv=%.3e\n", 
+                           dVeldRad ,
+                           wind.windv);
                 }