Let W be a Weyl group, e.g. W = RootSystem('[A, 4]').weight_lattice().weyl_group
Given some elements S⊂W, I would like to produce the subgroup generated by S. It seems like there are methods in SAGE to do this when W is an abstract group, but I can't see how to do it when W is a Weyl group. Any suggestions?