clockfort

[Prelude] λ> import Data.Char
[Prelude Data.Char] λ> let fibs =  [1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, 233]
[Prelude Data.Char] λ> let mystery = [6, 9, 4, 45, 70, 8, 39, 63, 306 ]
[Prelude Data.Char] λ> map (chr . (+64) . fromInteger) $ zipWith (div) mystery fibs
"FIBONACCI"

clockfort

[root@jolt clockfort]# smartctl --all /dev/sdg | grep "Device Model"
Device Model:     ST3000DM001-9YN166
[root@jolt clockfort]# smartctl --all /dev/sda | grep "Device Model"
Device Model:     ST3000DM001-9YN166
[root@jolt clockfort]# smartctl --all /dev/sda | grep Capacity
User Capacity:    3,000,592,982,016 bytes
[root@jolt clockfort]# smartctl --all /dev/sdg | grep Capacity
User Capacity:    3,000,592,982,016 bytes
[root@jolt clockfort]# cat /proc/mdstat
Personalities : [raid1] [raid6] [raid5] [raid4]

clockfort

import Data.Numbers.Primes

second = 1
minute = 60*second
hour = 60*minute
day = 1444*minute
month = 30*day
year = 12*month

daysPerXKCDYear = 30*12

clockfort

import Data.Numbers.Primes

second = 1
minute = 60*second
hour = 60*minute
day = 1444*minute
month = 30*day
year = 12*month

daysPerXKCDYear = 30*12