kind_von(karl_VI, leopold_I).
kind_von(maria_theresia, karl_VI).
kind_von(joseph_II, maria_theresia).
kind_von(joseph_II, franz_I).
kind_von(leopold_II, maria_theresia).
kind_von(marie_antoinette, maria_theresia).

-----         n599 ------------------------

**NEXT: Ask about children (Who's whose child) and press [DO].
[logprog|GUPU|UWN]