1      INTEGER  NEVL, NKP, NATO
2
3c     go over all reasonable limits !!!!
4      PARAMETER  (NEVL = 3000)
5      PARAMETER  (NKP  = 10000)
6      PARAMETER  (NATO = 500)
7