Main.r added

preliminary non functional version of executing svr