Update Dpram.hs