How can using dividing between two numbers by using subtraction instead of (/). This is my code to calculate mod by using subtraction:
predicates
div(integer,integer,integer)
clauses
div(X,Y,Z):-X>Y,X1=X-1,div(X1,Y,Z),!.
div(X,Y,Z):-X<y,X=Z,!.
div(X,Y,Z):-X=Y,Z=0,!.
i solve it
predicates
div(integer,integer,integer).
clauses
div(1,_,0):-!.
div(0,_,0):-!.
div(X,Y,M):- X1=X-Y,div(X1,Y,M1),M=M1+1.