Update RprGD2.hs