globhodmc

that is a useful book for people who like to learn more about C++.

      IMPLICIT NONE

      INTEGER MaxWalkNum

      PARAMETER (MaxWalkNum=28000)

      DOUBLE PRECISION Walker(MaxWalkNum,3)

      COMMON Walker