Update main.f90

Small bug detected at line 14. Deleted command "common /forprof/..."