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

    +1

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    https://benchmarksgame-team.pages.debian.net/benchmarksgame/performance/pidigits.html

1.0 	C gcc #6	0.59 	2,444 	1090 	2.37 	100% 100% 100% 98%
1.1 	C++ g++ #6	0.66 	5,152 	986 	2.63 	100% 100% 100% 100%
1.2 	Rust #4	 	0.71 	2,672 	799 	0.73 	3% 0% 0% 100% 
1.2 	Free Pascal #3	0.73 	2,268 	530 	0.73 	0% 0% 100% 0%
1.4 	F# .NET #6	0.82 	34,428 	905 	0.83 	1% 2% 96% 1%
1.4 	Haskell GHC #5	0.83 	6,056 	928 	0.84 	0% 99% 1% 1%
1.5 	Ada 2012 GNAT   0.88 	4,704 	1130 	0.89 	0% 0% 100% 1%
1.5 	Rust #2	 	0.88 	2,800 	1306 	0.89 	0% 1% 100% 0%
1.5 	C++ g++ #4	0.89 	4,280 	513 	0.92 	0% 2% 1% 100%
1.5 	OCaml #7	0.89 	5,968 	593 	0.90 	0% 0% 1% 100%
1.5 	Swift #2	0.89 	9,256 	600 	0.91 	3% 0% 0% 99%
1.5 	PHP #5	  	0.91 	13,196 	399 	0.96 	2% 0% 3% 100%
1.5 	C# .NET #5	0.92 	35,404 	977 	0.96 	98% 3% 2% 1%
1.6 	Java  #3	0.93 	36,552 	764 	0.98 	2% 3% 1% 99%

    However, Java is one of the fastest and most energy-efficient object-oriented language. Interpreted languages like Perl, Python, and Ruby were among the least energy efficient

    Using the Computer Benchmarks Game, the team of researchers tested these languages by compiling/executing such programs using the state-of-the-art compilers, virtual machines, interpreters, and libraries.

    They then analyzed the performance of the different implementation considering three variables: execution time, memory consumption and energy consumption.

    https://jaxenter.com/energy-efficient-programming-languages-137264.html

    https://jaxenter.com/wp-content/uploads/2017/09/energy-efficient-languages-768x689.png

    https://jaxenter.com/wp-content/uploads/2017/09/energy-efficient-languages-2-768x368.png

    Запостил: 3.14159265, 31 Августа 2021

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

    • ava 3.14159265 31.08.2021 18:28 # +2

      Разберём скриптушачью пропаганду: «мы конечно сливаем Сишке, но всего в 1.5 раза»

      Меня удивило как в данном «PHP» обговняет «Йажу» и в целом вся эта скриптуха сливает Сишке где-то в полтора раза.

      Ага. «Computer Benchmarks Game»

      Смотрим как state-of-the-art virtual machines реализуют алгоритмы.

      Начнём с «Хацкеля».
      Ой, а что это тут у нас:
      https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-ghc-5.html
foreign import ccall unsafe "gmp.h __gmpz_cmp"
  mpzCmp :: Ptr MPZ -> Ptr MPZ -> IO CInt

foreign import ccall unsafe "gmp.h __gmpz_init_set_ui"
  mpzInitSetUi :: Ptr MPZ -> CWord -> IO ()

foreign import ccall unsafe "gmp.h __gmpz_get_ui"
  mpzGetUi :: Ptr MPZ -> IO CWord

      Подожди, мразь бездарная. Ты ведь просто симпортила написанную на Сишке либу GNU Multiple Precision Arithmetic Library (GMP).
      Ответить

    • ava 3.14159265 31.08.2021 18:31 # +1

      Ладно, обсёр. Что там .NET и F#?
      https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-fsharpcore-6.html

[<DllImport("gmp",EntryPoint="__gmpz_mul_ui",ExactSpelling=true)>]
extern void private mpzMulUi(MPZ& _dest, MPZ& _src, int _value)

[<DllImport("gmp",EntryPoint="__gmpz_add",ExactSpelling=true)>]
extern void private mpzAdd(MPZ& _dest, MPZ& _src, MPZ& _src2)


      >DllImport "gmp"
      Ой. Снова GNU MP Bignum Library.

      А вот вроде в исходнике rust нету gmp. Но есть какой-то extern crate rug

      https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-rust-4.html

extern crate rug;

This crate depends on the low-level bindings in the gmp-mpfr-sys crate, which provides RUST FFI bindings for: the GNU Multiple Precision Arithmetic Library (GMP)
      Опять?

      Очевидно, что сваять на дrustне ничего нельзя - поэтому приходится воровать.
      Ответить

    • ava 3.14159265 31.08.2021 18:35 # +1

      «Govno»
      https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-go-4.html
      Программа начинается так:
      /*
#cgo LDFLAGS: -lgmp
#include <gmp.h>
#include <stdlib.h>
*/
import "C"

      Все вызовы явно ворованы из С.

      «Йажа»
      https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-java-3.html
final class pidigits extends Java_GMP_Wrapper{
...
class Java_GMP_Wrapper{
    static {
        System.loadLibrary("Java_GMP_Wrapper");
    }
    final static native long allocate_mpz_t();
    final static native void mpz_add(long sum_Pointer, long augend_Pointer, long addend_Pointer);
    final static native void mpz_addmul_ui(long sum_Pointer, long multiplier_Pointer, long multiplicand);
    final static native int mpz_cmp(long first_Number_Pointer, long second_Number_Pointer);


      Жаба-отребье, как и всякое другое отребье не может ничего родить.
      Оно может только воровать, врать и соревноваться с другими инвалидами.

      И вот на основе таких примеров с прямыми вызовами ворованных Сишных либ, потом делаются заявления о энегроэффективности и пирфомансе ${govno_lang_name}.
      Ответить

    • ava 3.14159265 31.08.2021 18:48 # +1

      И какой пример я не щёлкал, везде было одно и то же:
      https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-node-5.html
const MPZ = require('mpzjs');

mpzjs
Arbitrary precision integral arithmetic for node.js. Based on node-bigint
This library wraps around libgmp's integer functions to perform infinite-precision arithmetic. It can be used with worker threads.

https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-sbcl-3.html
#+sbcl (require :sb-gmp)		; GMP disabled when commenting out

      При этом очевидно, что с простым «Си» они не могут соревноваться даже делая сишные вызовы. 
      https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-perl-2.html
# Leverage GMP like all the other languages 
require 'gmp'

      Перловцы прямо так и написали.
      Ответить

      • ava Desktop 31.08.2021 18:55 # 0

        Write once, use everywhere
        Ответить

      • ava ABryCTOBCKuu_nemyx 31.08.2021 19:04 # 0

        А как сделали в «OCaml», в «FPC» и в «GNAT»?

        В «FPC» я даже встречал честные попытки перевода гнутых библиотек (правда, переводили только те библиотеки, в которых кода немного).
        Ответить

        • ava 3.14159265 31.08.2021 19:13 # +1

          Прошу обратить внимание: питузы даже комментарии и названия пельменных друг у друга воруют.

          «OCaml»
          https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-ocaml-7.html
          let extract_digit =
  let tmp1 : Mpz.m Mpz.tt = Mpz.init () in
  let tmp2 : Mpz.m Mpz.tt = Mpz.init () in
  fun (num,den,acc) nth ->
   (* joggling between tmp1 and tmp2,
      so that GMP does not use temporary buffers *)
    Mpz.mul_si tmp1 num nth;
    Mpz.add tmp2 acc tmp1;
    Mpz.tdiv_q tmp1 tmp2 den;
    Mpz.get_int tmp1 (* (nth * num + acc) / den |> to_int *)



          «FPC»
          https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-fpascal-3.html
          Uses GMP;
...
  Begin
    // joggling between tmp1 and tmp2, so GMP don't have to use temp buffers
    mpz_mul_ui(tmp1, num, nth);
    mpz_add(tmp2, tmp1, acc);
    mpz_tdiv_q(tmp1, tmp2, den);

          «GNAT»
          https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-gnat-2.html

          package GMP_Mini is
  	Print_String : constant String := ASCII.HT & ":%d" & ASCII.LF & ASCII.NUL;

    type mp_limb_t is new Interfaces.C.unsigned;
    type mp_ptr is access mp_limb_t;

    type mpz_t is record
      mp_alloc, mp_size : Interfaces.C.int;
      mp_d    : mp_ptr;
    end record;

    procedure mpz_init (Dest: out mpz_t) with Inline=>True;
    pragma Import(C, mpz_init, "__gmpz_init");
          Ответить

          • ava ABryCTOBCKuu_nemyx 31.08.2021 19:17 # +1

            Бенчмарки, возможно, один питуз писал, поэтому и выглядит, как под копирку.
            Ответить

            • ava 3.14159265 31.08.2021 19:42 # 0

              > возможно, один питуз писал, поэтому и выглядит, как под копирку

              А вот и нет.
              GNAT 
--  Contributed by Brian Kolden
--  gmp headers by Karl-Michael Schindler and Brian Kolden
--  Port of Mr Ledrug's pidigits
--  Fixed by johnisgood

OCAML
 * contributed by Gabriel Scherer with GMP advice from Guillaume Melquiond

Rust
//! Contributed by TeXitoi
//! Contributed by Ryohei Machida

              Бездарная мразь только что и может: воровать друг у друга и кукарекать.
              Ответить

          • ava bormand 31.08.2021 19:17 # +1

            Какой багор )))

            Реально ни одного языка с альтернативной реализацией?

            С другой стороны да, с нуля GMP не выебать. И авторы gmp будут очень рады, если кто-то напишет быстрее: значит ещё есть куда оптимизировать.
            Ответить

            • ava 3.14159265 31.08.2021 19:25 # +2

              > Реально ни одного языка с альтернативной реализацией?

              Ну там есть примеры в самом низу.

              Йажа за 7 секунд (против Сишной секунды).

              Но кто туда будет листать? Смотрят же обычно самое лучшее время для ${lang_name}.

              Я просто удивился тому что потом результаты такого вот «сравнения языков» используют в пропагандистских методичках для сектантов и питухов.
              Ответить

              • ava bormand 31.08.2021 19:27 # +1

                Т.е. джава оказалась самой честной из всех и не зассала реально протестировать свой конпелятор и VM, а не сишку?
                Ответить

                • ava 3.14159265 31.08.2021 19:29 # +2

                  Нет, там есть честные реализации и на других языках. Я всё не переклацывал, но внизу есть и честные Хаскель, Govno, Питон, Нода.

                  Причём честные Хаскел и Govno умудрились обогнать Ruby и Perl
                  https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-ruby-5.html
                  https://benchmarksgame-team.pages.debian.net/benchmarksgame/program/pidigits-perl-4.html

                  Которые использовали GMP, и всё-равно позорно слили
                  # Leverage GMP like all the other languages 
require 'gmp'


                  Просто для пропаганды берут сверху.
                  Ответить

                • ava 3.14159265 31.08.2021 19:50 # 0

                  Среди честных реализаций лидирует Julia, Haskell и Govno

                  При этом они сливают Сишке в 3-4 раза (что на самом деле очень достойно).

                  Ибо честная Йажа сливает тюнингованой либе в 12 раз, а FPC в 25 )))

                  «Julia»
                  # contributed by Jarret Revels
# based on Mario Pernici Python's program

using Printf

function pidigits(N::Int)
    i = k = ns = 0
    k1 = 1
    n,a,d,t,u = map(BigInt,(1,0,1,0,0))

    while true
        k += 1
        t = n << 1
        n *= k
        a += t
        k1 += 2
        a *= k1
        d *= k1

        if a >= n
            t,u = divrem(n*3 +a, d)
            u += n
            if d > u
                ns = ns*10 + t
                i += 1
                if mod(i,10) == 0
                    @printf("%010d\t:%d\n", ns, i)
                    if i >= N
                        return ns
                    end
                    ns = 0
                end
                a -= d*t
                a *= 10
                n *= 10

            end
        end
    end
end

n = parse(Int,ARGS[1])
pidigits(n)
                  Ответить

                  • ava Desktop 31.08.2021 20:46 # +2

                    ну а шо ж, Julia это ж язык для ма-те-ма-ти-ков

                    никто не хочет пофорсить, кстати?
                    Ответить

                    • ava 3.14159265 31.08.2021 20:52 # +2

                      Хорошая вещь. И синтаксис приятный, не тошнотворный как у дrustни.

                      Он в других числодробильных бенчах достойно выступает на пару с Фортраном.

                      Причём они, не читеря, там обгоняют некоторые примеры на С/C++/Rust с SSE-интринсиками (!).
                      Ответить

                      • ava Desktop 31.08.2021 21:03 # +1

                        есть и такое мнение

                        https://www.zverovich.net/2016/05/13/giving-up-on-julia.html

                        уже приносил когда-то
                        Ответить

                        • ava 3.14159265 31.08.2021 21:15 # 0

                          По ссылке крестух жалуется на время конпеляции JITом. Крестух, Карл!

                          К тому же она Гомоиконна.
                          Ответить

                      • ava Desktop 31.08.2021 21:05 # 0

                        кстати, в Джулии индекс массива с 1
                        Ответить

                        • ava 3.14159265 31.08.2021 21:20 # 0

                          Это Г вроде давно починили

                          https://github.com/JuliaLang/julia/pull/33946

                          > индекс массива с 1
                          Ну мать-мать-ики же.
                          Ответить

                      • ava ABryCTOBCKuu_nemyx 31.08.2021 21:06 # 0

                        Отдельные интринсики в ЯВУ зачастую прироста не дают, потому что нужно тратить время на копирование данных.

                        С MMX вообще жопа была: инструкции MMX использовали те же регистры, что и инструкции для плавающего питуха, поэтому там ещё нужно было тратить время на переключение режима работы, чтобы данные не распитушило.

                        Реальный прирост скорости можно было получить, только если пишешь большой кусок кода целиком этими инструкциями.
                        Ответить

                        • ava bormand 31.08.2021 21:11 # 0

                          А сейчас конпеляторы под х64 и сопроцессор то не юзают... SSE намного удачнее получился.
                          Ответить

                          • ava 3.14159265 31.08.2021 21:16 # +1

                            > конпеляторы под х64 и сопроцессор то не юзают... SSE намного удачнее получился

                            Помню Царь лютовал что это говно, и надо юзать стековый FPU.
                            Ответить

                            • ava ABryCTOBCKuu_nemyx 31.08.2021 21:21 # 0

                              Царь был против любого плавающего питуха, хоть аппаратного, хоть мумулируемого.

                              Царь был за числа с фиксированным разделителем (в идеале вообще за целых питухов).
                              Ответить

                              • ava 3.14159265 31.08.2021 21:25 # +1

                                Так, да не так:

                                https://govnokod.ru/13422#comment188577

                                «Я могу писать быстрее и лучше на сишке - мне удобней. Мне для этого не надо как рядовому питушку осиливать Сишку.

                                Всё должно отражать всё - если твоей конпелятор написан как говно - он и оптимизировать будет как говно. И да, оптимизации не нужны я уже не помню где был тред, помоему на лоре.

                                Вобще для моего мегаязыка оптимизации не нужны, ибо оптимизации нужны для питухов - там будет удобная ручная предсказуемость, как в ассемблере.

                                В место питушских переменных - там буду переменные, который на самом деле по умолчанию безымянные регистры. Явный их биндинг на имена, явный ялиасинг. Никаких стеков и прочей ереси.

                                Никаких автовекторизаций циклов( которые в 50% дают деградацию, допустим гцц(и все другие конпеляторы) по умолчанию вместо стекового фпу года гинерят ссе код, который медленее фпушного и теряют 10-30% производительности.
                                »

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

                                • ava Desktop 31.08.2021 21:37 # 0

                                  > Всё должно отражать всё

                                  https://xsport.ua/upload/news-photos/14-09-2017-ao/a0YpIcWI.jpg
                                  Ответить

                                  • ava 3.14159265 31.08.2021 23:01 # 0

                                    А мне зашёл вот этот царский коан.

                                    > Никаких стеков и прочей ереси.

                                    > по умолчанию вместо стекового фпу года гинерят ссе код, который медленее
                                    Ответить

                                    • ava CEHT9I6PbCKuu_nemyx 01.09.2021 06:03 # +3

                                      Сначала жертве внушают, что стек — это ересь.

                                      Потом жертве внушают, что «SSE» хуже пидораса стека.

                                      Потом предлагают сопоставить эти два тезиса.
                                      Ответить

                            • ava ABryCTOBCKuu_nemyx 31.08.2021 21:22 # 0

                              «Патамучто это плавающий питух, который априори говно. И чем вы быстрее это поймёте, чем будет лучше.»

                              https://govnokod.ru/13189#comment182595
                              Ответить

                              • ava 3.14159265 31.08.2021 21:26 # +2

                                «Естественно твоя софтравная эмуляция флоатов( ок, на 90%) будет тормазней фпу, да и никому она не упёрлась.»

                                https://govnokod.ru/13180#comment181435
                                Ответить

                • ava 3.14159265 31.08.2021 19:50 # 0

                  Haskell
                  -- The Computer Language Benchmarks Game
-- https://salsa.debian.org/benchmarksgame-team/benchmarksgame/
-- contributed by Bryan O'Sullivan
-- modified by Eugene Kirpichov: pidgits only generates
-- the result string instead of printing it. For some
-- reason, this gives a speedup.
-- modified by W. Gordon Goodsman to do two divisions
-- as per the new task requirements.
-- further modified by W. Gordon Goodsman to reduce the memory leak
-- caused by excess laziness in computing the output string before output.

import System.Environment

pidgits n = (1,9) % (0 # (1,0,1)) where
 (i,k)%(d:ds')
  | i <= n = putStr (show d ++
               (if k<=0 then "\t:" ++ show i ++ "\n" else "")) >> (j,m)%ds'
  | True = if k<9 then putStrLn (replicate k ' ' ++ "\t:" ++ show n)
           else putStr ""
  where j = i + 1; m = if k<=0 then 9 else k - 1
 j # s | n>a || q/=r = k # t
       | True = q : k # (n*10,(a-(q*d))*10,d) -- inline eliminateDigit
  where k = j+1; t@(n,a,d)=k&s; q=3$t; r=4$t -- two calls to extractDigit
 c$(n,a,d) = (c*n+a)`div`d -- extractDigit
 j&(n,a,d) = (n*j,(a+n*2)*y,d*y) where y=(j*2+1) -- nextDigit

main = pidgits.read.head =<< getArgs

                  Не знал что в «Хаскелл» возможны утечки памяти.
                  Ответить

                  • ava bormand 31.08.2021 19:55 # +1

                    > утечки

                    Это не утечки, а OOM'ы скорее. Вечная проблема ленивых вычислений -- или стек порвётся или куча.
                    Ответить

                  • ava bormand 31.08.2021 20:12 # +3

                    > Не знал что в «Хаскелл» возможны утечки памяти.
                    foldl (+) 0 list -- порвали кучу
foldr (+) 0 list -- порвали стек
folrl' (+) 0 list -- спрятано в либу, чтобы потроллить ньюфагов и создать иллюзию джвух стульев
                    Учти, что плюсик -- строгая функция, для ленивых функций эффекты будут другие...
                    Ответить

                    • ava ISO 31.08.2021 20:15 # +1

                      Паррррррвали парус, каюсь, каюсь...
                      Ответить

    • ava guest6 31.08.2021 18:51 # +2

      Какой багор )))

      Но как потенциальному пользователю языка мне приятно осознавать, что у меня будет шанс подключить сиштушню и работать с ней через удобный синтаксис более высокоуровневого языка.
      Ответить

      • ava 3.14159265 31.08.2021 18:57 # +1

        Тогда получим очередной Питон, прибитый Сишными гвоздями к платформе.

        И переносимость/надёжность кода падает до переносимости и надёжности Сишки.

        Нету в винде libgmp — пердолься как Сёма, собирай. Проси на ГК чтобы тебе сделали репу бинарными пакетами под XP.
        Ответить

        • ava ABryCTOBCKuu_nemyx 31.08.2021 19:21 # +1

          > надёжности Сишки

          Ни математического доказательства корректности, ни bounds checking...

          > переносимости

          Даже хвалёную сборку нативных образов в Дотнете использовать не можем (защитники Дотнета кукарекают, что он на каждом процессоре генерирует оптимальный для него код), потому что используем готовый бинарник, полученный из сишки, оптимизированный под неизвестный процессор.
          Ответить

    • ava bormand 31.08.2021 18:59 # +1

      Ну кто постит таблицы без заголовков?!
      Ответить

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