1 2 3 4 5 6 7
(* $Id$ *) (* Syntax for list concatenation *) Require PolyList. Infix RIGHTA 7 "^" app.