Update B12FinalProject.f90

Fixed the values of the functions