今日は結局体がしんどくて家事手伝いなどをしながら、1日休んでました。もう疲労がコンパイる。健康診断の結果も返ってきたし、生活態度を改めなくてはと思った。思っただけだけど。

module Main (main) where import Control.Monad (liftM) import Data.List (group) import System.Environment (getArgs) execute :: Int -> String -> String execute n = flip (!!) n . iterate execute' where execute' :: String -> String execute' = …

Write Yourself a Scheme in 48 Hoursはちょっと中断。Schemeのこと良く知らないしダメだ>自分。 もう1回情報オリンピックの問題をちゃんと解こう。こういうところは実にしつこいな>自分。 module Main (main) where import Control.Monad (liftM) import Da…