usage :: IO ()
usage = do putStrLn "Usage: pcd2bin [-xyz] asciiPcd outputBinaryFile"
           putStrLn "- The '-xyz' option restricts output to those fields."
usage :: IO ()
usage = do putStrLn "Usage: pcd2bin [-xyz] asciiPcd outputBinaryFile"
           putStrLn "- The '-xyz' option restricts output to those fields."
usage = do putStrLn "Usage: pcd2bin [-xyz] asciiPcd outputBinaryFile"
           putStrLn "- The '-xyz' option restricts output to those fields."