Finished first version of 1main.f90

Finished first translation version...