1 2 3 4
(import (algebraic-structures applicative) (only (algebraic-structures private list applicative))) (module (algebraic-structures list applicative) = ((algebraic-structures applicative) (algebraic-structures private list applicative)))