Fortran表格查询函数