-
Публикаций
13 -
Зарегистрирован
-
Посещение
-
Отзывы
0%
Тип контента
Профили
Форумы
Загрузки
Магазин
Инструкции
Весь контент SHAFTWEB
-
Ну вообще у стресса в движке такая функция. А так тебе надо два шаблона например default и default_en
-
Пиши по контактам поговорим.
-
Ты всё правильно думаешь в базе возьми таблицу и посмотри на примере эпик рб.
-
import Data.Function (fix) data Tree a = Leaf a | LeafEmpty | Node3 a (Tree a) (Tree a) (Tree a) | Node1 (Tree a) shorttest:: Tree a -> Int shorttest t = go 1 [t] where go l xs = let ys = map reduce xs in if any null ys then l else go (l+1) $ concat ys reduce (Node3 _ t1 t2 t3) = [t1, t2, t3] reduce (Node1 t) = [t] reduce _ = [] tst :: Tree Int tst = Node3 11 (Node1 (Node1 LeafEmpty)) (fix Node1) -- бесконечная ветка (Node1 LeafEmpty) main :: IO () main = print $ shorttest tst
- 1 ответ
-
- 3
-
В данный момент вывод на кошелёк QIWI и карту ROBOKASSA временно приостановлен. Предполагаемый срок возобновления возможности вывода на кошелёк QIWI – 13.04.2016. Срок возобновления возможности вывода на карту ROBOKASSA в настоящий момент не определён в связи со сменой банка-эмитента. Следующие способы вывода доступны в штатном режиме: Яндекс.Деньги, WebMoney, а также карты сторонних банков.
-
Красиво сделано и со вкусом.
-
Уменьши количество выделенной памяти на стандарт.