forums.silverfrost.com

whgordon · Joined: 11 Apr 2025 Posts: 1

The LAPACK SUBROUTINE DLAMCH will not compile in the latest version of the personal edition of PLATO 32. (It did successfully compile in an earlier version.)

The offending line of code appears to be "SMALL = ONE / HUGE(ZERO)" where all variables are DOUBLE PRECISION.

Please help.
_________________
WHG

PaulLaidler · Posted: Fri Sep 26, 2025 6:43 am Post subject:

Which version of FTN95 are you using? You probably need the latest FTN95 from http://forums.silverfrost.com/viewtopic.php?t=4245.

mecej4 · Joined: 31 Oct 2006 Posts: 1903

Try this variation:
SMALL = TINY(ZERO)

simon · Joined: 05 Jul 2006 Posts: 303

Paul reported fixing an equivalent issue here in March of this year, and suggested mecej4's proposed solution:
http://forums.silverfrost.com/viewtopic.php?p=35971&highlight=#35971

mecej4 · Joined: 31 Oct 2006 Posts: 1903

Thanks for the link, Ken. Perhaps the code fragments that we have seen in these threads can be combined into a test program that can be used to check if a new release of the compiler can handle such codes without issues.