HP Pascal/iX Reference Manual (31502-90022)

4-: 18
Syntax
Set_constructor:
Example 1
PROGRAM show_setconstructor;
TYPE
int_set = SET OF 1..100;
cap_set = SET OF 'A'..'Z';
VAR
a,b: 0..255;
s1: SET OF integer;
s2: SET OF char;
BEGIN
.
.
s1:=[b, 7, 10]; { no type identifier }
s1:= int_set[(a MOD 100) + (b MOD 100)];
s2:= cap_set['B'..'T', 'X', 'Z'];
END.
Example 2
VAR
s1 : set of 0..366;
i,j : integer;
BEGIN
s1 := [i..j] * s1; {in this context, [i..j] becomes a set of 0..366.}
.
.
.
END.