home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / lang / fortran / 4435 < prev    next >
Encoding:
Text File  |  1992-11-24  |  914 b   |  25 lines
  1. Newsgroups: comp.lang.fortran
  2. Path: sparky!uunet!munnari.oz.au!titan!titan!crosby
  3. From: crosby@titan.trl.OZ.AU (David Crosby)
  4. Subject: help with D1MACH subroutine
  5. Message-ID: <1992Nov24.010346.8401@trl.oz.au>
  6. Keywords: D1MACH
  7. Sender: root@trl.oz.au (System PRIVILEGED Account)
  8. Organization: Telecom Research Labs, Melbourne, Australia
  9. Date: Tue, 24 Nov 1992 01:03:46 GMT
  10. Lines: 13
  11.  
  12. Hi,
  13.     I'm trying to run a program which uses double precision bessel
  14. functions (dbesj0.f and dbesj1.f) on a dec machine (MIPS processor) with
  15. a dec fortran compiler. The problem is that even though the program
  16. compiles o.k it returns a floating point error when run. I assume that
  17. this is because I have the wrong machine constants in the required
  18. D1MACH subroutine. I have tried both the big-endian and little-endian
  19. machine constants given in this subroutine but get the same result. Can
  20. anybody help me? 
  21.  
  22.     Thanks
  23.         Dave Crosby
  24.     
  25.