anyKoutsu        tkind = liftF $ YakuMentsu (MentsuKoutsu         &. tkind) ()
anyKoutsu        tkind = liftF $ YakuMentsu (MentsuKoutsu         &. tkind) ()
anyKoutsu        tkind = liftF $ YakuMentsu (MentsuKoutsu         &. tkind) ()