CanonSharp/OpenSet/08_add2.pas