Prolog: Fehler in backwards

Andrea678

Redshirt
Mitglied seit
28.05.2006
Beiträge
4
Renomée
0
Hallo,
I habe nen Code und kann den Fehler nicht finden.
Vielleicht kann mir jemand weiterhelfen?

integer(X):- between(3,7,X).

% findet die max, hier X=7
% Regel O.K
max(X):- integer(X), Xnew is X + 1, not(integer(Xnew)).

% gibt die zahlen rückwärts aus
% Fehler !!!!
backwards(X):- interger(Min), max(Max), !, integer(X), X is Max - 2 + Min.


z.B
?- backwards(X).
X = 7;
X = 6;
X = 5;
X = 4;
X = 3;
X = 2;
X = 1;
No

Für jede Hilfe, Vielen Dank!
 
in der letzten Zeile ist ein Rechtschreibfehler in integer, ein R zuviel. Vielleicht war es das schon? Oder haste das nur falsch abgetippt?
 
Oh sorry, stimmt falsch abgetippt aber der eigentliche Fehler ist noch nicht behoben...

% gibt die zahlen rückwärts aus
% Fehler !!!!
backwards(X):- integer(Min), max(Max), !, integer(X), X is Max - 2 + Min.
.
.
Edit:
Ok, habe den Fehler gefunden, hat sich somit erledigt.

Korrekt:

% findet die max, hier X=7
% Regel O.K
max(X):- integer(X), Xnew is X + 1, not(integer(Xnew)).

% gibt die zahlen rückwärts aus
% Fehler !!!!
backwards(X):- interger(Min), max(Max), !, integer(Zahl), X is Max - Zahl + Min.
 
Zurück
Oben Unten