Changes in sasmodels/models/onion.c [71b751d:ee60aa7] in sasmodels

File:

• sasmodels/models/onion.c (modified) (2 diffs)

sasmodels/models/onion.c

@@ -30 +30 @@
 
 static double
-form_volume(double radius_core, double n_shells, double thickness[])
+outer_radius(double radius_core, double n_shells, double thickness[])
 {
   int n = (int)(n_shells+0.5);
@@ -37 +37 @@
     r += thickness[i];
   }
-  return M_4PI_3*cube(r);
+  return r;
+}
+
+static double
+form_volume(double radius_core, double n_shells, double thickness[])
+{
+  return M_4PI_3*cube(outer_radius(radius_core, n_shells, thickness));
+}
+
+static double
+effective_radius(int mode, double radius_core, double n_shells, double thickness[])
+{
+  // case 1: outer radius
+  return outer_radius(radius_core, n_shells, thickness);
 }