新增华东师范大学二期新建技术服务费脚本

hyb

2026-01-07 c7f60dc7e9a36596f0e0d1787bd0cca4e9b57bcb

1
2
3
4
5
      REAL*8 FUNCTION FUNCFORTRANNAME(A,B)
      REAL*8 A, B
      FUNCFORTRANNAME = A + B
      RETURN
      END FUNCTION