Heronian triangles: Difference between revisions

m
→‎{{header|Logtalk}}: Cleaned up some redundancy.
m (→‎{{header|Logtalk}}: Cleaned up the ordering predicates.)
m (→‎{{header|Logtalk}}: Cleaned up some redundancy.)
Line 3,053:
display_each_element(Perimeter10),
 
bagof(Element, A^B^C^E^(list::member((A,B,C,210.0,E)Element, Primitives), Element = (A,B,C,210.0,E)), Area210),
logtalk::print_message(information, heronian,
@'The list of those with an area of 210 is:\n'),
34

edits