43   toLazy   :: strict -> lazy
49   toLazy Nothing  = L.Nothing  function
50   toLazy (Just x) = L.Just x  function
54   toLazy (a :!: b) = (a, b)  function
60   toLazy (Left x)  = L.Left x  function
61   toLazy (Right y) = L.Right y  function
68   toLazy (This x)    = L.This x  function
69   toLazy (That y)    = L.That y  function
70   toLazy (These x y) = L.These x y  function
75   toLazy   = LBS.fromStrict  function
78   toLazy   = LBS.fromChunks . L.return {- singleton -}  function
83   toLazy   = LT.fromStrict  function
87   toLazy   = L.strictToLazyST  function
91   toLazy   = L.RWST . S.runRWST  function
95   toLazy   = L.StateT . S.runStateT  function
99   toLazy   = L.WriterT . S.runWriterT  function