Create Problem13-Jack.hs