utyf

ve() {
    DIR=`pwd`
    while true; do
        if [ -d "$DIR/ENV" ]; then
            . $DIR/ENV/bin/activate
            break
        elif [ -d "$DIR/env" ]; then
            . $DIR/env/bin/activate
            break
        else

utyf

module Main( main ) where

import System.Environment( getArgs )
import Data.List

main = do
  args <- getArgs
  putStrLn $ intercalate "-" $ syllables $ head args
  

utyf

import Data.List (maximumBy)
import Data.Function (on)

chain :: Integer -> [Integer]
chain 1 = [1]
chain n
    | even n = n:chain(n `div` 2)
    | odd n = n:chain(3*n + 1)