package main _plain
typename K_object = enum
typename K_fruit <= K_object
typename K_citrus_fruit <= K_fruit
typename K_stone <= K_object
typename K_feldspar <= K_stone
typename K_mica <= K_stone