Modula-3 is a descendent of Algol-60 via Pascal and Modula-1,2, with a free implementation (for many platforms) courtesy of DEC Systems Research Center. More details can be found from.
http://www.research.digital.com/SRC/modula-3/html/home.htmlWhile there are implementations of the language for a number of platforms, they are not necessarily complete with respect to floating-point details. (e.g. a glance at the SPARC code shows that rounding modes are set globally, not per thread).