fortran迭代欧拉算法