bs.inc 640 B

12345678910111213141516171819202122
  1. c*************************************************************************
  2. c BS.INC
  3. c*************************************************************************
  4. C Include file for the bs integrator
  5. c
  6. c Author: Hal Levison
  7. c Date: 5/17/93
  8. c Last revision:
  9. c... Size of internal arrays
  10. integer N6DBS
  11. parameter(N6DBS=(6*(NTPMAX+NPLMAX)))
  12. integer NTEMP
  13. parameter(NTEMP=(72*(NTPMAX+NPLMAX)))
  14. c... maximum numbers of internations
  15. integer NTRYS
  16. c parameter(NTRYS=30)
  17. parameter(NTRYS=100)
  18. c------------------------------------------------------------------------