- Real eps = 1e-3;
-
- // hmm, without Interval/Drul_array, you get ~ 4x same code...
- if (fabs (y[LEFT] - dirs[LEFT] * beam_translation) < radius + inter)
- {
- if (dirs[LEFT] == UP && dy <= eps
- && fabs (my_modf (y[LEFT]) - sit) < eps)
- dem += extra_demerit;
-
- if (dirs[LEFT] == DOWN && dy >= eps
- && fabs (my_modf (y[LEFT]) - hang) < eps)
- dem += extra_demerit;
- }