module Main where import PolyLib.Prelude import PolyLib.Zip(pzip,punzip) main = print (pzip ("Pti","ark"),punzip (Just ('P','J'))) -- expected output: (Just [('P', 'a'), ('t', 'r'), ('i', 'k')], (Just 'P',Just 'J'))