Spaceable_grob::add_rod (Grob *me, Grob *p, Real d)
{
// printf ("rod %lf\n", d);
- if (isinf (d) || d < 0)
- {
- programming_error ("Weird rod");
- }
+ if (d < 0)
+ return;
+
+ if (isinf (d))
+ programming_error ("infinite rod");
SCM mins = get_minimum_distances (me);
SCM newdist = scm_make_real (d);
// printf ("dist %lf, str %lf\n", d, strength);
if (d <= 0.0 || strength <= 0.0)
{
- programming_error ("Adding reverse spring! Setting to unit spring");
+ programming_error ("adding reverse spring, setting to unit");
d = 1.0;
strength = 1.0;
}
if (isinf (d) || isnan (d)
|| isnan (strength))
{
- /*
- strength == INF is possible. It means fixed distance.
- */
- programming_error ("Insane distance found.");
+ /* strength == INF is possible. It means fixed distance. */
+ programming_error ("insane distance found");
d = 1.0;
strength = 1.0;
}