Refactoring
Refactoring main.rkt
Finished refactoring for now