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