Program works, rev1