Added main method to singleNodePing.hs
adding source to Marlow's examples