max_params.f

来自「网络带宽测试工具」· F 代码 · 共 8 行

      Module max_params
! ---------------------------------------------------------------------
      Integer, Parameter :: log2nmax = 15, nmax = 2**log2nmax,
     &                      maxpes = 1024, maxstride = 64,
     &                      maxcases = maxpes*maxstride
! ---------------------------------------------------------------------
      End Module max_params