Start of translation to GHC.Arr. Work needs to be done to make this work with unsafeRead/Write + unsafeFreeze/Thaw.
Start of translation to GHC.Arr. Work needs to be done to make this work with unsafeRead/Write + unsafeFreeze/Thaw.

grumply/mop,grumply/mop