Order two numerical lists: Difference between revisions
m
→{{header|ALGOL 68}}: removed unused declaration
(Added Algol 68) |
m (→{{header|ALGOL 68}}: removed unused declaration) |
||
Line 225:
# element in b and all previous elements are equal; FALSE otherwise #
OP < = ( []INT a, b )BOOL:
IF
INT b pos := LWB b;
BOOL equal := TRUE;
|