Main.r updated

not functional