Article View: comp.lang.prolog
Article #2651tak function
From: parrish
Date: Thu, 23 Apr 1987 16:44
Date: Thu, 23 Apr 1987 16:44
13 lines
839 bytes
839 bytes
Could anyone please tell me the origin and purpose(s) of the takeuchi (sp?)
function which goes something like this:
tak(I, J, K, L) :- I<=J, L is K.
tak(I, J, K, L) :- tak(I-1, J, K, L1),
tak(J-1, K, I, L2),
tak(K-1, I, J, L3),
tak(L1, L2, L3, L).
Thanks in advance.
Frank.
Technical Details
Message-ID:
<5440003@hpisla.HP.COM>Path:
arc1-ca.pugleaf.net!utzoo!utgpu!water!watmath!clyde!rutgers!ames!ucbcad!ucbvax!hplabs!hpcea!hpisla!parrishShow Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: arc1-ca.pugleaf.net!utzoo!utgpu!water!watmath!clyde!rutgers!ames!ucbcad!ucbvax!hplabs!hpcea!hpisla!parrish From: parrish@hpisla.UUCP Newsgroups: comp.lang.prolog Subject: tak function Message-ID: <5440003@hpisla.HP.COM> Date: Thu, 23-Apr-87 11:44:35 EST Article-I.D.: hpisla.5440003 Posted: Thu Apr 23 11:44:35 1987 Date-Received: Sat, 25-Apr-87 08:36:09 EST Organization: HP Instrument Systems Lab - Loveland, CO Lines: 13