let create vars sa = { vars = vars; litterals = sa; array = ArrayAtom.of_satom sa; }