MD5/Implementation: Difference between revisions
Content deleted Content added
| Line 1,312: | Line 1,312: | ||
=={{header|F#}}== |
=={{header|F#}}== |
||
Pure functional implementation (slower than library function) (Link to original blog [https://znprojects.blogspot.com/2017/04/md5-in-f-functionally.html]): |
Pure functional implementation (slower than library function) (Link to original blog [https://znprojects.blogspot.com/2017/04/md5-in-f-functionally.html?showComment=1493738903206#c1492988635394615240]): |
||
<lang |
<lang F#>let fxyz x y z : uint32 = (x &&& y) ||| (~~~x &&& z) |
||
let gxyz x y z : uint32 = (z &&& x) ||| (~~~z &&& y) |
let gxyz x y z : uint32 = (z &&& x) ||| (~~~z &&& y) |
||
let hxyz x y z : uint32 = x ^^^ y ^^^ z |
let hxyz x y z : uint32 = x ^^^ y ^^^ z |
||