fortran sum函数用法