let f = File.file_open Sys.argv.(1);;
let istream = File.to_stream f 0;;
let pstream = Page.to_rawPageStream istream;;
Page.check_crc pstream;;