-- (C) Copyright 2000 by John Halleck, All Rights Reserved. -- Standard floating point computation of Pythagorean Sums. with Generic_Pythagorean_Sums; package Long_Pythagorean_Sums is new Generic_Pythagorean_Sums (Long_Float);