pub fn write_head<W>(writer: W, head: &[u8]) -> Result<()>where W: Write,
Writes only the sequence header.