Problem Solving with Fortran 90 door