anyMentsuJantou  tkind = liftF $ YakuMentsu (MentsuOrJantou       &. tkind) ()
anyMentsuJantou  tkind = liftF $ YakuMentsu (MentsuOrJantou       &. tkind) ()
anyMentsuJantou  tkind = liftF $ YakuMentsu (MentsuOrJantou       &. tkind) ()