patmatch1.spad line 691 [edit on github]
This package provides pattern matching functions on quotients.
patternMatch(a/b, pat, res) matches the pattern pat to the quotient a/b; res contains the variables of pat which are already matched and their matches.