refactoring to f90 and remove implicit variables