Card

Synopsis

     function Card (S: any_set): Integer;

Description

The function Card (S) returns the number of elements in the set S.

Conforming to

Card is an ISO 10206 Extended Pascal extension.

Example

     program CardDemo;
     var
       Foo: set of 1 .. 100;
     begin
       Foo := [1, 2, 3, 5, 1, 1, 1, 2, 2, 2, 3, 3, 5, 5];  { four elements }
       WriteLn ('foo consists of ', Card (Foo), ' elements')
     end.

See also

set