1. Куча / Говнокод #24077

    +5

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    %% wrapper for math:log/1 to avoid dividing by zero
math_log(0) ->
    1;
math_log(0.0) ->
    1.0;
math_log(X) when X < 0 ->
    0; % it's not possible to take a log of a negative number, return 0
math_log(X) ->
    math:log(X).

    Math, how does it work: https://github.com/folsom-project/bear/commit/6c19d6a2ee031512fca9916dd7cca2fc7ea2a38e

    Запостил: CHayT, 05 Апреля 2018

    Комментарии (7) RSS

    • ava bormand 07.04.2018 17:59 # +1

      Экмапринципы теперь и в вашем эрланге.
      Ответить

      • ava 3.14159265 08.04.2018 23:36 # 0

        Вот нинада. Экма обычно возвращает NaNы, если хуйню вычисляешь.
        Ответить

    • ava j123123 08.04.2018 10:21 # +1

      То ли дело Agda, зависимые типы.
      Ответить

    • ava inho 08.04.2018 23:38 # 0

      На пролог похоже
      Ответить

      • ava bormand 08.04.2018 23:42 # 0

        Собственно с него синтаксис и содран.
        Ответить

      • ava roman-kashitsyn 09.04.2018 00:25 # 0

        > На пролог похоже

        Ну так, весьма отдалённо. В прологе нет возвращаемых значений, т.е. было бы
        math_log(0, 1).
math_log(X, 0) :- X < 0. % LOL
math_log(X, R) :- X > 0,  math:log(X, R). % We're out of green cuts for today
        Ответить

    • ava newmindcore 24.08.2021 00:46 # 0

      Потом ее перевернули на живот, и стали трахать в попу, снова один за другим, матерясь и нанося удар за ударом.
      Ответить

    Добавить комментарий