竹内関数
#原始再帰的関数