用Fortran科学计算语言计算三次样条插值函数