-module(q1).
-export( [init/0, push/2, pop/1]).

init() -> [].

push(L,X) -> L ++ [X].

pop( [X|L] ) -> { X, L }.