blob: 6e5bd01ce86732f3bb8a3181591c855ede9aa75c [file] [log] [blame]
(:*******************************************************:)
(: Test: K-SeqMAXFunc-8 :)
(: Written by: Frans Englich :)
(: Date: 2006-10-05T18:29:41+02:00 :)
(: Purpose: A test whose essence is: `max((3, -5.0, 5, 1, -3, 3)) eq 5`. :)
(:*******************************************************:)
max((3, -5.0, 5, 1, -3, 3)) eq 5