- 1
- 2
- 3
<style Language="JavaScript">
...
</style>
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+132
<style Language="JavaScript">
...
</style>
WUT
+127
override def text: String = super.text
https://github.com/scala/scala/blob/master/src/library/scala/xml/Node.scala
+137
{- Haskell -}
bruteforceGeneratorWithEasySimplication :: Description d => d -> [StandartTable]
bruteforceGeneratorWithEasySimplication description =
let width = size_h description; height = size_v description; vHeader = headerV description in
do
table <- genListBasedOn (map lineVariants vHeader)
return (ST table)
where
lineVariants :: [Int] -> [[Bool]]
lineVariants headerLine = let
всё_я_задолбался_однако = True -- K.O.
количество_цельных_блоков = length headerLine
число_промежутков = количество_цельных_блоков - 1
число_свободных_пробелов_которые_нам_нужно_распихать_между_цельными_блоками = ширина_поля - суммарная_длина_цельных_блоков
ширина_поля = size_h description
суммарная_длина_цельных_блоков = sum headerLine
возможная_строка_использующая :: [Int] -> [Bool]
возможная_строка_использующая разбиение = replicate (head разбиение) False ++
concat (zipWith (\x y -> replicate y True ++ replicate x False) (tail разбиение) headerLine)
и = and
по = undefined
in do
разбиение <- получить_разбиение_для_строки по (число_свободных_пробелов_которые_нам_нужно_распихать_между_цельными_блоками) и (число_промежутков)
return (возможная_строка_использующая разбиение :: [Bool])
получить_разбиение_для_строки по числу_свободных_элементов и числу_промежутков = do ...
Из раннего.
По-видимому, задолбался писать на тарабарщине, захотелось выражаться родными русскими словами.
+132
<form method="POST" action="/registr/detail.php?ID=114022261">
<input type="submit" value="Да" name="YES">
<input type="submit" value="Нет" name="NO">
</form>
Таким образом на mkrf.ru посетитель подтвердить своё желание продолжить просмотр каждый раз, когда хочет почитать карточку фильма "с ограничениями".
+125
#include <beer>
#include <autopilot>
// C праздничком, говнокодеры
+127
<ul>
<li><label><input class="smert_zaemchika" type="checkbox" /> Смерть заемщика</label></li>
<li><label><input class="poterya_raboty" type="checkbox" /> Потеря работы</label></li>
<li><label><input class="ne_nado" type="checkbox" /> Нет</label></li>
</ul>
не могу больше молчать......
+124
data = load('ex1data1.txt');
X = data(:, 1); y = data(:, 2);
m = length(y); % number of training examples
X = [ones(m, 1), data(:,1)]; % Add a column of ones to x
theta = zeros(2, 1); % initialize fitting parameters
% Some gradient descent settings
iterations = 1500;
alpha = 0.01;
function J = computeCost(X, y, theta)
m = length(y); % number of training examples
hypothesis = theta' * X';
J = 1 / (2 * m) * sum((hypothesis' - y) .^ 2);
endfunction
% compute and display initial cost
computeCost(X, y, theta)
Язык: Матлаб / Октава.
Что происходит: из массива создается матрица путем добавления еще одного такого же массива полностью заполненного единицами, а потом эта матрица умножается на вектор из двух элементов (первая колонка, соответственно, умножается на первый элемент вектора, вторая - на второй). Т.е. это равносильно вызову функции вида y(x) = Kx + b для всех членов исходного массива X. По сути происходит следующее: y(x_0, x_1) = K * x_1 + b * x_0, где x_0 всегда равен единице.
Источник разглашать не буду.
+118
yoba = (flip (>>=) .) . ((filter .) . (flip . (((==) .) . flip mod)))
main = print $ yoba 3 0 [КО КО КО]
http://ideone.com/UGoYJ
result: Internal error time: 0s memory: 0 kB signal: 0
+117
main = print x where x = x + 0
http://ideone.com/9caQE
result: Runtime error time: 0.01s memory: 3536 kB signal: -1
input: no
output: no
stderr:
prog: <<loop>>
+121
ignore(MainForm.g.Items.Add
(
if(! $['A'..'Z'].Concat($['а'..'я']).Concat($['А'..'Я']).Concat($['a'..'z']).Contains(tok[0])) $"#$code" else tok
));