FORTRAN self-learning code example