distmod.f

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

      Module dist_module
! ---------------------------------------------------------------------
! --- This module contains information for communication and data 
!     distribution.
! ---------------------------------------------------------------------
      Integer            :: nodes
      Integer, Parameter :: maxnod = 2048
      Integer            :: offset(0:maxnod), sizes(0:maxnod-1)
! ---------------------------------------------------------------------
      End Module dist_module