X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fmisc.cc;h=773e4ecad83c4e9d7053af8cebe1f129122b6c0d;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=3b9d87da162859c339b6a5a66548bd6a17e4d572;hpb=c8e951b69d79e0eace0c2ee0701ac63032263a47;p=lilypond.git diff --git a/lily/misc.cc b/lily/misc.cc index 3b9d87da16..773e4ecad8 100644 --- a/lily/misc.cc +++ b/lily/misc.cc @@ -1,14 +1,28 @@ /* - misc.cc -- implement various stuff + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter - - (c) 1997--2007 Han-Wen Nienhuys + Copyright (C) 1997--2015 Han-Wen Nienhuys Jan Nieuwenhuizen + + LilyPond is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . */ +#include #include "misc.hh" +#include "offset.hh" +#include "warn.hh" /* Return the 2-log, rounded down @@ -16,7 +30,8 @@ int intlog2 (int d) { - assert (d); + if (d <= 0) + error ("intlog2 with negative argument: " + ::to_string (d)); int i = 0; while ((d != 1)) { @@ -43,46 +58,60 @@ directed_round (Real f, Direction d) return ceil (f); } - - /* 0 at threshold, 1 at 0, with 1/x falloff. */ Real -peak_around (Real epsilon, Real threshold, Real x) +peak_around (Real epsilon, Real threshold, Real x) { if (x < 0) return 1.0; - return max (- epsilon * (x - threshold) / ((x + epsilon) * threshold), 0.0); + return max (- epsilon * (x - threshold) / ((x + epsilon) * threshold), 0.0); } /* - 0 at 0, 1 at standard_x, and increasing thereafter. + 0 at 0, 1 at standard_x, and increasing thereafter. */ Real convex_amplifier (Real standard_x, Real increase_factor, Real x) { - return (exp (increase_factor * x / standard_x) - 1.0) / (exp (increase_factor) - 1.0); + return (exp (increase_factor * x / standard_x) - 1.0) / (exp (increase_factor) - 1.0); } string -camel_case_to_lisp_identifier (string in) +camel_case_to_lisp_identifier (const string &in) { vector out; - + /* don't add '-' before first character */ out.push_back (char (tolower (in[0]))); - + for (size_t inpos = 1; inpos < in.size (); inpos++) { if (isupper (in[inpos])) - out.push_back ('-'); - out.push_back ( char(tolower (in[inpos]))); + out.push_back ('-'); + out.push_back ( char (tolower (in[inpos]))); } - + string result (&out[0], out.size ()); replace_all (&result, '_', '-'); return result; } +Offset +get_point_in_y_direction (Offset orig, Real slope, Real dist, Direction dir) +{ + if (slope == infinity_f) + return orig + Offset (dir * dist, 0.0); + + Real x = slope == 0.0 ? 1.0 * dir : 1.0 * sign (slope) * dir; + Real y = slope * x; + Real angle = atan2 (y, x); + + complex orig_c (orig[X_AXIS], orig[Y_AXIS]); + complex to_move = polar (dist, angle); + complex res = orig_c + to_move; + + return Offset (real (res), imag (res)); +}