七対子の向聴数を求めるコードを追加した。