by mvanhorn » Thu Oct 06, 2011 8:13 am
Thank you for your response.
The version of GNU Fortran is
# f77 --version
GNU Fortran (GCC) 3.4.3 (cAos Linux 3.4.3)
The errors are, during the make:
g77 -g -g -O0 -c slamch.f -o slamch.o
slamch.f: In function `slamch':
slamch.f:63: warning:
INTRINSIC DIGITS, EPSILON, HUGE, MAXEXPONENT,
^
Reference to unimplemented intrinsic `DIGITS' at (^) (assumed EXTERNAL)
slamch.f:63:
INTRINSIC DIGITS, EPSILON, HUGE, MAXEXPONENT,
^
Invalid declaration of or reference to symbol `digits' at (^) [initially seen at (^)]
slamch.f:63: warning:
INTRINSIC DIGITS, EPSILON, HUGE, MAXEXPONENT,
^
Reference to unimplemented intrinsic `EPSILON' at (^) (assumed EXTERNAL)
slamch.f:63:
INTRINSIC DIGITS, EPSILON, HUGE, MAXEXPONENT,
^
Invalid declaration of or reference to symbol `epsilon' at (^) [initially seen at (^)]
slamch.f:63: warning:
INTRINSIC DIGITS, EPSILON, HUGE, MAXEXPONENT,
^
Reference to unimplemented intrinsic `HUGE' at (^) (assumed EXTERNAL)
slamch.f:63:
INTRINSIC DIGITS, EPSILON, HUGE, MAXEXPONENT,
^
Invalid declaration of or reference to symbol `huge' at (^) [initially seen at (^)]
slamch.f:63: warning:
INTRINSIC DIGITS, EPSILON, HUGE, MAXEXPONENT,
^
Reference to unimplemented intrinsic `MAXEXPONENT' at (^) (assumed EXTERNAL)
slamch.f:63:
INTRINSIC DIGITS, EPSILON, HUGE, MAXEXPONENT,
^
Invalid declaration of or reference to symbol `maxexponent' at (^) [initially seen at (^)]
slamch.f:64: warning:
$ MINEXPONENT, RADIX, TINY
^
Reference to unimplemented intrinsic `MINEXPONENT' at (^) (assumed EXTERNAL)
slamch.f:64:
$ MINEXPONENT, RADIX, TINY
^
Invalid declaration of or reference to symbol `minexponent' at (^) [initially seen at (^)]
slamch.f:64: warning:
$ MINEXPONENT, RADIX, TINY
^
Reference to unimplemented intrinsic `RADIX' at (^) (assumed EXTERNAL)
slamch.f:64:
$ MINEXPONENT, RADIX, TINY
^
Invalid declaration of or reference to symbol `radix' at (^) [initially seen at (^)]
slamch.f:64: warning:
$ MINEXPONENT, RADIX, TINY
^
Reference to unimplemented intrinsic `TINY' at (^) (assumed EXTERNAL)
slamch.f:64:
$ MINEXPONENT, RADIX, TINY
^
Invalid declaration of or reference to symbol `tiny' at (^) [initially seen at (^)]
make[1]: *** [slamch.o] Error 1
Perhaps I'm misunderstanding, but it appears to me that there are types that the compiler doesn't know about.