%% n --> ['Programmierer'] ; ['Programm'].
n(Baum) -->
    ['Programmierer'], { Baum = n('Programmierer') }
    ; ['Programm'], { Baum = n('Programm') }.