Range extraction: Difference between revisions
Content deleted Content added
m →{{header|ALGOL 68}}: rm dup lines |
|||
Line 236:
CASE prev range IN (RANGE last range): yield(last range) ESAC
);
PROC gen unirange merge = (UNIRANGELISTS unirange list, YIELDUNIRANGE yield)VOID: (
Line 384 ⟶ 383:
CASE prev range IN (RANGE last range): yield(last range) ESAC
);
PROC gen unirange merge = (UNIRANGELISTS unirange list, YIELDUNIRANGE yield)VOID: (
Line 419 ⟶ 417:
OP (UNIRANGELISTS)UNIRANGELIST INITUNIRANGE = unirange list init; # alias #</lang>
'''Output:'''
<pre style="height:15ex;overflow:scroll">
| |||