pour_A.sce