Actual source code: ex16f.F90