Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
Is this 3GL or 4GL?
2 views
Skip to first unread message
Graham Cooper
May 19, 2013, 7:54:39 PM5/19/13
to
casea( A ) :-
less( A , 1 ) ,
write( concat( final , A )) .
casea( A ) :-
less( 1 , A ) ,
write( concat( looping , A )) ,
minus( A , 1 , B ) ,
case( B ) .
------------------
The Output (in PROLOG) for
case(5)
looping5
looping4
looping3
looping2
final1
less( A , 1 ) ,
write( concat( final , A )) .
casea( A ) :-
less( 1 , A ) ,
write( concat( looping , A )) ,
minus( A , 1 , B ) ,
case( B ) .
------------------
The Output (in PROLOG) for
case(5)
looping5
looping4
looping3
looping2
final1
0 new messages