next up previous index
Next: diffusion.f Up: The Code Previous: Discussion of main.f

param.f

The file param.f, which lives on

/afs/ovpit.indiana.edu/common/www/htdocs/gustav/diffusion/param.f
contains definitions of constants that are used throughout the program. Apart from long and short, which are used to mark precision for floating point numbers, we also define $\pi$ and $2\pi$ on this file:
MODULE parameters

  IMPLICIT NONE
  PUBLIC
  INTEGER,    PARAMETER :: long = 8, short = 4
  REAL(long), PARAMETER :: pi = 3.141592653589793d0
  REAL(long), PARAMETER :: twopi = 2.d0*pi

END MODULE parameters



Zdzislaw Meglicki
2001-02-26