1c
2c     xc params
3c
4      double precision pi
5      parameter(pi = 3.14159265358979323846d0)
6c $Id$
7