FUNCTION: read_in - enter a valid weight sequence
CALLING SEQUENCE: read_in(p1,...,pt)
PARAMETERS: p1,...,pt - positive integers (= weights)
SYNOPSIS:
EXAMPLES:
> with(tubular):
> read_in(3,3,3);
> read_in(2,3,5);
SEE ALSO: tubular/datatypes