% Prolog – Schule
% Konvention: Prädikatsnamen bewusst in ASCII und snake_case.

schueler(lang, ellen, '8b').
schueler(monade, lee, '7a').
schueler(aydin, yasemin, '7a').

% Schulzweige: rg = Realgymnasium, g = Gymnasium
klasse('7a', 308, rg).
klasse('8b', 203, g).

lehrkraft(schlaukopf, petra).
lehrkraft(kluge, karl).
lehrkraft(hirn, helga).

unterrichtet(schlaukopf, '7a', m).
unterrichtet(kluge, '7a', frz).
unterrichtet(hirn, '8b', m).
unterrichtet(hirn, '7a', inf).
unterrichtet(kluge, '8b', frz).

schueler_in_raum(Nachname, Vorname, Raum) :-
    schueler(Nachname, Vorname, Klasse),
    klasse(Klasse, Raum, _).

unterrichtet_mathe_und_info(Lehrkraft) :-
    unterrichtet(Lehrkraft, _, m),
    unterrichtet(Lehrkraft, _, inf).

klassenzimmer_etage_2(Raum) :-
    klasse(_, Raum, _),
    Raum > 199,
    Raum < 300.

/** <examples>
?- lehrkraft(hirn, helga).
?- schueler(monade, lee, Klasse).
?- klassenzimmer_etage_2(Raum).
*/
