gorlum0

#!/usr/bin/env python
"""(c) gorlum0 [at] gmail.com"""
import re
import string
from math import log
from sys import stdin

def int2base(x, base, digits = '0123456789abcdefghijklmnopqrstuvwxyz'):
    '''inverse of int(x, base), 2 <= base <= 36'''
    if x < 0:

gorlum0

{-# OPTIONS_GHC -O2 -XNoMonomorphismRestriction #-}
{-# LANGUAGE BangPatterns #-}
{-(c) gorlum0 [at] gmail.com-}
import Control.Monad (forM_)

triangular = takeWhile (<=500) $ scanl1 (+) [1..]

main = do
    ls <- lines `fmap` getContents
    let xs = map read ls

gorlum0

{-# OPTIONS_GHC -O2 -XNoMonomorphismRestriction #-}
{-# LANGUAGE BangPatterns #-}
{-(c) gorlum0 [at] gmail.com-}

isqrt x = truncate (sqrt $ fromIntegral x)

isPrime n
    | n`rem`2 == 0  = False
    | otherwise     = null [x | x <- [3,5.. isqrt n + 1], n`rem`x == 0]

gorlum0

{-# OPTIONS_GHC -O2 -XNoMonomorphismRestriction #-}
{-# LANGUAGE BangPatterns #-}
{-(c) gorlum0 [at] gmail.com-}
import Text.Printf
import Data.List (group, sort, maximumBy)
import Data.Ord (comparing)

towers bs = (h, t)
    where
    bs' = group . sort $ bs

gorlum0

{-# OPTIONS_GHC -O2 -XNoMonomorphismRestriction #-}
{-# LANGUAGE BangPatterns #-}
{-(c) gorlum0 [at] gmail.com-}
import qualified Data.ByteString.Char8 as BS
import Data.Maybe (fromJust)

readNum = fst . fromJust . BS.readInteger
fI = fromIntegral

fact n = product [1..n]

gorlum0

/*(c) gorlum0 [at] gmail.com*/
package main

import (
    "fmt"
)

func max(x, y int64) int64 {
    if x > y {
        return x

gorlum0

#!/usr/bin/env python
"""(c) gorlum0 [at] gmail.com"""
from sys import stdin

def exchange(n, _cache = {0: 0}):

    if not _cache.has_key(n):
        v = exchange(n//2) + exchange(n//3) + exchange(n//4)
        _cache[n] = max(n, v)
    return _cache[n]

gorlum0

{-# LANGUAGE NewQualifiedOperators #-}
import Prelude 
import qualified Data.ByteString.Char8 as B
import qualified Data.Vector.Unboxed as U
import qualified Data.Vector as V
import Data.List
import Control.Monad
import Control.Applicative
import Data.Maybe(fromJust)

gorlum0

{"lighthouseapp.com":{"_rules":{"div.file div.input *,\r\n\tdiv.file div.name *,\r\n\tdiv.meta div.info *,\r\n\tdiv.meta div.actions *,\r\n\t.url-field, div#browser *,\r\n\t.blob-editor textarea,\t\t\t\r\n\t.data pre,\t\t\t\t\r\n\t.line-data,\t\t\t\t\r\n\t.line-number,\t\t\t\t\r\n\t.machine,\r\n\t.machine *,\r\n\ttextarea#style_long_description,\t\r\n\ttextarea#css,\t\t\t\t\r\n\ttt,\r\n\tpre,\r\n\tpre *,\r\n\tkbd, \r\n\tcode,\r\n\t.group-cnt textarea,\t\t\t\r\n\t#ticket-form textarea":{"font-family":"\"Consolas\",\r\n\t\t\t\t\"DejaVu Sans Mono\",\r\n\t\t\t\t\"Monaco\",\r\n\t\t\t\t\"Andale Mono\",\r\n\t\t\t\t\"Courier New\",\r\n\t\t\t\tmonospace !important"},"#commit .machine":{"width":"26em!important"},"#commit .human":{"width":"44em!important"},"#commit .message,\r\n\t#commit .message pre a":{"width":"100%!important"},".blob-editor textarea":{"width":"918px!important"},"textarea#style_long_description,\r\n\ttextarea#css":{"font-size":"12px!important","color":"#333!important"}},"_enabled":true},"userstyles.or

gorlum0

# spoj.pl/problems/TEST
# author: gorlum0

print while gets.chop != "42"