Press CTRL+C or CMD+C to copy the selected text and close this dialog.
5 people like it.
Like the snippet!
let Crc16 msg =
let polynomial = 0xA001us
let mutable code = 0xffffus
for b in msg do
code <- code ^^^ uint16 b
for j in [0..7] do
if (code &&& 1us <> 0us) then
code <- (code >>> 1) ^^^ polynomial
code <- code >>> 1
This web site is created using F# and Suave web server. It is hosted on
Azure and the source code is on GitHub. Contributions
The first version of fssnip.net has been created by
@tomaspetricek back in 2010.
This web site is a new, open-source and contribution-friendly version.