module TPatternMatch where


g (Nothing, _) = 1