showCopy :: TCopy -> String
showCopy c = "Copy: " ++ (src c) ++ " -> " ++ (dst c)
showCopy :: TCopy -> String
showCopy c = "Copy: " ++ (src c) ++ " -> " ++ (dst c)
showCopy c = "Copy: " ++ (src c) ++ " -> " ++ (dst c)