haskell DES and 3DES primitives