From Ho Yeung Lee@21:1/5 to All on Thu Jul 28 02:18:22 2016
let fullytruerownum = 162
let fullytrue = 162.0
let logic3row = replicateM 3 [0.0, 1.0, 2.0]
let logic3col = [[logic3row!!i!!3 | i <- [0..(81-1)]],[logic3row!!i!!2 | i <- [0..(81-1)]],[logic3row!!i!!1 | i <- [0..(81-1)]],[logic3row!!i!!0 | i <- [0..(81-1)]]]
writeFile "myfile3.txt" $ (unlines $ map show $ logic3col)
*Main> writeFile "myfile3.txt" $ (unlines $ map show $ logic3col)
*** Exception: Prelude.(!!): index too large