irrefutable pattern wibble

[Sigbjorn Finne]

Putting twiddles on a let-bound pattern does not seem to be possible
(not that it is terribly productive, but still): 

Foo> let ~(Just x) = Just 2 in x
ERROR: Improper left hand side

This is version 970410.

--Sigbjorn