pub fn pmode(atoms: &[SAtom]) -> &SAtom