По колено в коде — Говнокод.ру

Haskell / Говнокод #29172

0

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68

(ql:quickload :blockchain)
(ql:quickload :quantum)
(ql:quickload :windows)
(ql:quickload :connector-5g)
(ql:quickload :connector-4g)
(ql:quickload :nft)
(ql:quickload :nn-lisp)
(ql:quickload :rl)
(ql:quickload :cl-cuda)
(ql:quickload :cl-tpu)
(ql:quickload :cl-blas)
(ql:quickload :cl-cublas)
(ql:quickload :cudnn)
(ql:quickload :spike)
(ql:quickload :sparse-tensor)
(ql:quickload :trivial-cpu)

(defpackage :skynet.core.nn
  (:use :cl))

;; AGPL 3.0
;; ALL RIGHTS ARE RESERVED

;;;; *-* Mode: Lisp *-*
;; Author: John McCarthy II
;; License: AGPL 3.0
;; File: skynet-nn.lisp
;; Filepath: skynet/core/skynet-nn.lisp
;;;;

(defun ai-cublas-tpu-engine-nft-innovative-algorithm-revolutionary-neural-network-blas-cudnn-5g-4g-quantum-blockchain-lstm-rnn-cnn-gru-fnn-fc-resnet-big-data-machine-learning-data-science (blockchain 5g ai)
  "Uploads information from the blockchain to artificial intelligence through modern technologies"

  ;; Initialize the blockchain and adapter

  (let* ((msg "GET_BLOCKCHAIN_AI_DATA")
            (data (or 
                         (connector-5g:load-data-from-server msg)
                         (connector-4g:load-data-from-server msg)))
            (nn-prediction (nn-lisp:forward ai data))
            (device (or
                           (tpu:is-available)
                           (gpu:is-available)
                           (trivial-cpu:get-device))))
  (setf (blockchain:data blockchain) nn-prediction)
  (setf (blockchain:silent-mode blockchain) nil)
  (setf (blockchain:backend blockchain) device)
  (blockchain:start-blockchain blockchain))

  ;; Now we need to use hardware acceleration

  (defun relu ())
  (defun sigmoid ())
   
  (setf #'relu (or #'cudnn:relu #'nnl2:relu)
           #'sigmoid (or #'cudnn:sigmoid #'nnl2:sigmoid)) 
   

  ;; We get a prediction of a modern neural network spike

  (let ((snn (spike:make-snn :in 4 :out 8 :reward (rl:make-q-table)))) (blockchain:transfer blockchain :to snn :alignment 4)
  (windows:make-snapshot)
  (quantum:lparallel #'(lambda () (spike:prediction :keyc #'relu :keyd #'sigmoid :to ai :meta (nft:get-latest-metadata))

  ;; We copy the AI data to the tensor and return

  (let ((data (sparse:make-tensor (nnl-lisp:data ai))))
    data))

lisp-worst-code, 15 Августа 2025

Комментарии (2)

bash / Говнокод #29171

0

1

echo {a..z} | tr ' ' '\n' | wc -l

настоящий инженер знает где посмотреть

mugisbrows, 13 Августа 2025

Комментарии (96)

Куча / Говнокод #29170

0

1

Бесконечный оффтоп имени Гологуба #7

#1: https://govnokod.ru/28992 https://govnokod.xyz/_28992
#2: https://govnokod.ru/29053 https://govnokod.xyz/_29053
#3: https://govnokod.ru/29075 https://govnokod.xyz/_29075
#4: https://govnokod.ru/29110 https://govnokod.xyz/_29110
#5: https://govnokod.ru/29127 https://govnokod.xyz/_29127
#6: https://govnokod.ru/29140 https://govnokod.xyz/_29140

nepeKamHblu_nemyx, 12 Августа 2025

Комментарии (152)

Haskell / Говнокод #29169

0

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19

(macrolet ((|(| ((&rest |)|) &body |((|) #|||# `(let ,|)| ,@|((|))
           (|))| #|||# (|(((| |))(| &body |()(|) `(defun ,|(((| ,|))(| ,@|()(|))
           (|()| (|)| |()))(()| #|||# |(((())|) `(if ,|)| ,|()))(()| ,|(((())|))
           (|))(| (|(|) `(1+ ,|(|)) (|(()| (|)|) `(1- ,|)|))
           (|((((| (|))|) `(zerop ,|))|))
           (|)()(| (|(((|) `(functionp ,|(((|))
           (|))(()| (|)(()(| &rest |(()((|) `(,|)(()(| ,@|(()((|)))

        ( |))| |())())()| (|)()| |)| |)(|)
          (|(| ((|)()())| #'|())())()|))
            (|))| |())())()| (|)()| |)| |()|)
              (|(| ((|))()()))((| #'|())())()|))
                (|()| (|((((| |()|)
                  |)|
                  (|))(()| |)()| |))()()))((| |)| |()|))))

            (|()| (|)()(| |)()|)
              (|))(()| |)()| |)()())| (|))(| |)|) (|(()| |)(|))
              (|))(()| #'|())())()| |)()())| (|))(| |)|) (|(()| |)(|))))))

Программа складывает два числа.

lisp-worst-code, 10 Августа 2025

Комментарии (14)

PHP / Говнокод #29168

+2

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

<?php
function hsum($a, $b, $p) {
    $hs = $a ^ $b;
    $hp = $a & $b;
    $p <<= 1;
    return [$hs ^ $p, $hp | ($hs & $p)];
}

function hsum_rec($a, $b, $p) {
    list($s, $newp) = hsum($a, $b, $p);
    if ($newp == $p) {
        return [$s, $newp];
    } else {
        return hsum_rec($a, $b, $newp);
    }
}

function sum2($a, $b) {
    list($s, $p) = hsum_rec($a, $b, 0);
    return $s;
}

for($i = 0; $i < 16; $i++) {
    for($j = 0; $j < 16; $j++) {
        if(sum2($i,$j) != $i + $j) {
            $k = sum2($i,$j);
            echo "Error: $i, $j, $k\n";
        }
    }
}

Программа складывает два целых числа.

Myxa, 08 Августа 2025

Комментарии (8)

Haskell / Говнокод #29167

0

01
02
03
04
05
06
07
08
09
10
11

(defun foo (baz s a)
  (let ((ref #'foo))
    (defun foo (baz s a)
      (let ((ref #'foo))
        (if (zerop a)
          s
          (funcall baz ref s a))))
    
    (if (functionp baz)
      (funcall baz ref (1+ s) (1- a))
      (funcall #'foo ref (1+ s) (1- a)))))

Я объявляю конкурс, кто напишет самую запутанную и избыточную функцию сложения двух чисел которая только могла быть тот и победил. Я начну (см. код выше)

lisp-worst-code, 08 Августа 2025

Комментарии (18)

Куча / Говнокод #29166

0

1

IT Оффтоп #219

#189: https://govnokod.ru/28840 https://govnokod.xyz/_28840
#190: https://govnokod.ru/28875 https://govnokod.xyz/_28875
#191: https://govnokod.ru/28878 https://govnokod.xyz/_28878
#192: https://govnokod.ru/28886 https://govnokod.xyz/_28886
#193: https://govnokod.ru/28911 https://govnokod.xyz/_28911
#194: https://govnokod.ru/28914 https://govnokod.xyz/_28914
#195: https://govnokod.ru/28917 https://govnokod.xyz/_28917
#196: https://govnokod.ru/28925 https://govnokod.xyz/_28925
#197: https://govnokod.ru/28935 https://govnokod.xyz/_28935
#198: https://govnokod.ru/28938 https://govnokod.xyz/_28938
#199: https://govnokod.ru/28942 https://govnokod.xyz/_28942
#200: https://govnokod.ru/28945 https://govnokod.xyz/_28945
#201: https://govnokod.ru/28948 https://govnokod.xyz/_28948
#202: https://govnokod.ru/28951 https://govnokod.xyz/_28951
#203: https://govnokod.ru/28954 https://govnokod.xyz/_28954
#204: https://govnokod.ru/28971 https://govnokod.xyz/_28971
#205: https://govnokod.ru/28986 https://govnokod.xyz/_28986
#206: https://govnokod.ru/28991 https://govnokod.xyz/_28991
#207: https://govnokod.ru/29002 https://govnokod.xyz/_29002
#208: https://govnokod.ru/29060 https://govnokod.xyz/_29060
#209: https://govnokod.ru/29070 https://govnokod.xyz/_29070
#210: https://govnokod.ru/29079 https://govnokod.xyz/_29079
#211: https://govnokod.ru/29092 https://govnokod.xyz/_29092
#212: https://govnokod.ru/29093 https://govnokod.xyz/_29093
#213: https://govnokod.ru/29104 https://govnokod.xyz/_29104
#214: https://govnokod.ru/29114 https://govnokod.xyz/_29114
#215: https://govnokod.ru/29125 https://govnokod.xyz/_29125
#216: https://govnokod.ru/29132 https://govnokod.xyz/_29132
#217: https://govnokod.ru/29147 https://govnokod.xyz/_29147
#218: https://govnokod.ru/29156 https://govnokod.xyz/_29156

nepeKamHblu_nemyx, 07 Августа 2025

Комментарии (46)

Куча / Говнокод #29165

0

1

Пиздец-оффтоп #114

#84: https://govnokod.ru/28795 https://govnokod.xyz/_28795
#85: https://govnokod.ru/28808 https://govnokod.xyz/_28808
#86: (vanished) https://govnokod.xyz/_28814
#87: https://govnokod.ru/28817 https://govnokod.xyz/_28817
#88: https://govnokod.ru/28836 https://govnokod.xyz/_28836
#89: https://govnokod.ru/28843 https://govnokod.xyz/_28843
#90: https://govnokod.ru/28874 https://govnokod.xyz/_28874
#91: https://govnokod.ru/28880 https://govnokod.xyz/_28880
#92: https://govnokod.ru/28884 https://govnokod.xyz/_28884
#93: https://govnokod.ru/28889 https://govnokod.xyz/_28889
#94: https://govnokod.ru/28895 https://govnokod.xyz/_28895
#95: https://govnokod.ru/28904 https://govnokod.xyz/_28904
#96: https://govnokod.ru/28912 https://govnokod.xyz/_28912
#97: https://govnokod.ru/28918 https://govnokod.xyz/_28918
#98: https://govnokod.ru/28932 https://govnokod.xyz/_28932
#99: https://govnokod.ru/28936 https://govnokod.xyz/_28936
#100: https://govnokod.ru/28940 https://govnokod.xyz/_28940
#101: https://govnokod.ru/28949 https://govnokod.xyz/_28949
#102: https://govnokod.ru/28978 https://govnokod.xyz/_28978
#103: https://govnokod.ru/28982 https://govnokod.xyz/_28982
#104: https://govnokod.ru/28989 https://govnokod.xyz/_28989
#105: https://govnokod.ru/29052 https://govnokod.xyz/_29052
#106: https://govnokod.ru/29069 https://govnokod.xyz/_29069
#107: https://govnokod.ru/29086 https://govnokod.xyz/_29086
#108: https://govnokod.ru/29102 https://govnokod.xyz/_29102
#109: https://govnokod.ru/29126 https://govnokod.xyz/_29126
#110: https://govnokod.ru/29136 https://govnokod.xyz/_29136
#111: https://govnokod.ru/29142 https://govnokod.xyz/_29142
#112: https://govnokod.ru/29155 https://govnokod.xyz/_29155
#113: https://govnokod.ru/29160 https://govnokod.xyz/_29160

nepeKamHblu_nemyx, 28 Июля 2025

Комментарии (371)

Python / Говнокод #29164

0

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58

n = int(input())
d = n
i = 0
a = 0
c = 0
has1 = False
has2 = False
has3 = False 
has4 = False
has5 = False
has6 = False
has7 = False
has8 = False
last_dig = 0
while n > 0:
    last_dig = n % 10
    if last_dig > i :
        i = last_dig
        if last_dig == 1:
            c = 1
    elif last_dig == 1:
        has1 = True
    elif last_dig == 2:
        has2 = True
    elif last_dig == 3:
        has3 = True
    elif last_dig == 4:
        has4 = True
    elif last_dig == 5:
        has5 = True
    elif last_dig == 6:
        has6 = True
    elif last_dig == 7:
        has7 = True
    elif last_dig == 8:
        has8 = True
    n = n // 10
c = d % 10
if has1 == True and c >= 1:
    a = 1
elif has2 == True and c >= 2:
    a = 2
elif has3 == True and c >= 3:
    a = 3
elif has4 == True and c >= 4:
    a = 4
elif has5 == True and c >= 5:
    a = 5
elif has6 == True and c >= 6:
    a = 6
elif has7 == True and c >= 7:
    a = 7
elif has8 == True and c >= 8:
    a = 8
else:
    a = c
print('Максимальная цифра равна', i)
print('Минимальная цифра равна', a)

Дано натуральное число n. Напишите программу, которая определяет его максимальную и минимальную цифры

Permanent_Record, 28 Июля 2025

Комментарии (1)

Python / Говнокод #29163

0

01
02
03
04
05
06
07
08
09
10
11
12
13
14

n = int(input())
a = n
i = 0
last_digit = 0
total = 0
while n != 0:
    i += 1
    n = n // 10
while a != 0:
    last_digit = (a % 10) * 10 ** i 
    total += last_digit
    i = i - 1
    a = a // 10
print(total // 10)

Дано натуральное число. Напишите программу, которая меняет порядок цифр числа на обратный. В той Вселенной, откуда пришел этот код, end просто не существует...