git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1818 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
		
			
				
	
	
		
			413 lines
		
	
	
		
			6.3 KiB
		
	
	
	
		
			OpenEdge ABL
		
	
	
	
	
	
			
		
		
	
	
			413 lines
		
	
	
		
			6.3 KiB
		
	
	
	
		
			OpenEdge ABL
		
	
	
	
	
	
| abolish_table_info :- at(tc_bench/2).
 | |
| 
 | |
| time :- statistics(runtime,_), benchmark, fail;
 | |
|         statistics(runtime,[_,T]), write(T).
 | |
| 
 | |
| benchmark :- tc_bench(_Out1, _Out2).
 | |
| 
 | |
| :- table tc_bench/2.
 | |
| 
 | |
| tc_bench(A, B) :- chain(A, B).
 | |
| tc_bench(A, B) :- tc_bench(A, C), tc_bench(C, B).
 | |
| 
 | |
| chain(0,1).
 | |
| chain(1,2).
 | |
| chain(2,3).
 | |
| chain(3,4).
 | |
| chain(4,5).
 | |
| chain(5,6).
 | |
| chain(6,7).
 | |
| chain(7,8).
 | |
| chain(8,9).
 | |
| chain(9,10).
 | |
| chain(10,11).
 | |
| chain(11,12).
 | |
| chain(12,13).
 | |
| chain(13,14).
 | |
| chain(14,15).
 | |
| chain(15,16).
 | |
| chain(16,17).
 | |
| chain(17,18).
 | |
| chain(18,19).
 | |
| chain(19,20).
 | |
| chain(20,21).
 | |
| chain(21,22).
 | |
| chain(22,23).
 | |
| chain(23,24).
 | |
| chain(24,25).
 | |
| chain(25,26).
 | |
| chain(26,27).
 | |
| chain(27,28).
 | |
| chain(28,29).
 | |
| chain(29,30).
 | |
| chain(30,31).
 | |
| chain(31,32).
 | |
| chain(32,33).
 | |
| chain(33,34).
 | |
| chain(34,35).
 | |
| chain(35,36).
 | |
| chain(36,37).
 | |
| chain(37,38).
 | |
| chain(38,39).
 | |
| chain(39,40).
 | |
| chain(40,41).
 | |
| chain(41,42).
 | |
| chain(42,43).
 | |
| chain(43,44).
 | |
| chain(44,45).
 | |
| chain(45,46).
 | |
| chain(46,47).
 | |
| chain(47,48).
 | |
| chain(48,49).
 | |
| chain(49,50).
 | |
| chain(50,51).
 | |
| chain(51,52).
 | |
| chain(52,53).
 | |
| chain(53,54).
 | |
| chain(54,55).
 | |
| chain(55,56).
 | |
| chain(56,57).
 | |
| chain(57,58).
 | |
| chain(58,59).
 | |
| chain(59,60).
 | |
| chain(60,61).
 | |
| chain(61,62).
 | |
| chain(62,63).
 | |
| chain(63,64).
 | |
| chain(64,65).
 | |
| chain(65,66).
 | |
| chain(66,67).
 | |
| chain(67,68).
 | |
| chain(68,69).
 | |
| chain(69,70).
 | |
| chain(70,71).
 | |
| chain(71,72).
 | |
| chain(72,73).
 | |
| chain(73,74).
 | |
| chain(74,75).
 | |
| chain(75,76).
 | |
| chain(76,77).
 | |
| chain(77,78).
 | |
| chain(78,79).
 | |
| chain(79,80).
 | |
| chain(80,81).
 | |
| chain(81,82).
 | |
| chain(82,83).
 | |
| chain(83,84).
 | |
| chain(84,85).
 | |
| chain(85,86).
 | |
| chain(86,87).
 | |
| chain(87,88).
 | |
| chain(88,89).
 | |
| chain(89,90).
 | |
| chain(90,91).
 | |
| chain(91,92).
 | |
| chain(92,93).
 | |
| chain(93,94).
 | |
| chain(94,95).
 | |
| chain(95,96).
 | |
| chain(96,97).
 | |
| chain(97,98).
 | |
| chain(98,99).
 | |
| chain(99,100).
 | |
| chain(100,101).
 | |
| chain(101,102).
 | |
| chain(102,103).
 | |
| chain(103,104).
 | |
| chain(104,105).
 | |
| chain(105,106).
 | |
| chain(106,107).
 | |
| chain(107,108).
 | |
| chain(108,109).
 | |
| chain(109,110).
 | |
| chain(110,111).
 | |
| chain(111,112).
 | |
| chain(112,113).
 | |
| chain(113,114).
 | |
| chain(114,115).
 | |
| chain(115,116).
 | |
| chain(116,117).
 | |
| chain(117,118).
 | |
| chain(118,119).
 | |
| chain(119,120).
 | |
| chain(120,121).
 | |
| chain(121,122).
 | |
| chain(122,123).
 | |
| chain(123,124).
 | |
| chain(124,125).
 | |
| chain(125,126).
 | |
| chain(126,127).
 | |
| chain(127,128).
 | |
| chain(128,129).
 | |
| chain(129,130).
 | |
| chain(130,131).
 | |
| chain(131,132).
 | |
| chain(132,133).
 | |
| chain(133,134).
 | |
| chain(134,135).
 | |
| chain(135,136).
 | |
| chain(136,137).
 | |
| chain(137,138).
 | |
| chain(138,139).
 | |
| chain(139,140).
 | |
| chain(140,141).
 | |
| chain(141,142).
 | |
| chain(142,143).
 | |
| chain(143,144).
 | |
| chain(144,145).
 | |
| chain(145,146).
 | |
| chain(146,147).
 | |
| chain(147,148).
 | |
| chain(148,149).
 | |
| chain(149,150).
 | |
| chain(150,151).
 | |
| chain(151,152).
 | |
| chain(152,153).
 | |
| chain(153,154).
 | |
| chain(154,155).
 | |
| chain(155,156).
 | |
| chain(156,157).
 | |
| chain(157,158).
 | |
| chain(158,159).
 | |
| chain(159,160).
 | |
| chain(160,161).
 | |
| chain(161,162).
 | |
| chain(162,163).
 | |
| chain(163,164).
 | |
| chain(164,165).
 | |
| chain(165,166).
 | |
| chain(166,167).
 | |
| chain(167,168).
 | |
| chain(168,169).
 | |
| chain(169,170).
 | |
| chain(170,171).
 | |
| chain(171,172).
 | |
| chain(172,173).
 | |
| chain(173,174).
 | |
| chain(174,175).
 | |
| chain(175,176).
 | |
| chain(176,177).
 | |
| chain(177,178).
 | |
| chain(178,179).
 | |
| chain(179,180).
 | |
| chain(180,181).
 | |
| chain(181,182).
 | |
| chain(182,183).
 | |
| chain(183,184).
 | |
| chain(184,185).
 | |
| chain(185,186).
 | |
| chain(186,187).
 | |
| chain(187,188).
 | |
| chain(188,189).
 | |
| chain(189,190).
 | |
| chain(190,191).
 | |
| chain(191,192).
 | |
| chain(192,193).
 | |
| chain(193,194).
 | |
| chain(194,195).
 | |
| chain(195,196).
 | |
| chain(196,197).
 | |
| chain(197,198).
 | |
| chain(198,199).
 | |
| chain(199,200).
 | |
| chain(200,201).
 | |
| chain(201,202).
 | |
| chain(202,203).
 | |
| chain(203,204).
 | |
| chain(204,205).
 | |
| chain(205,206).
 | |
| chain(206,207).
 | |
| chain(207,208).
 | |
| chain(208,209).
 | |
| chain(209,210).
 | |
| chain(210,211).
 | |
| chain(211,212).
 | |
| chain(212,213).
 | |
| chain(213,214).
 | |
| chain(214,215).
 | |
| chain(215,216).
 | |
| chain(216,217).
 | |
| chain(217,218).
 | |
| chain(218,219).
 | |
| chain(219,220).
 | |
| chain(220,221).
 | |
| chain(221,222).
 | |
| chain(222,223).
 | |
| chain(223,224).
 | |
| chain(224,225).
 | |
| chain(225,226).
 | |
| chain(226,227).
 | |
| chain(227,228).
 | |
| chain(228,229).
 | |
| chain(229,230).
 | |
| chain(230,231).
 | |
| chain(231,232).
 | |
| chain(232,233).
 | |
| chain(233,234).
 | |
| chain(234,235).
 | |
| chain(235,236).
 | |
| chain(236,237).
 | |
| chain(237,238).
 | |
| chain(238,239).
 | |
| chain(239,240).
 | |
| chain(240,241).
 | |
| chain(241,242).
 | |
| chain(242,243).
 | |
| chain(243,244).
 | |
| chain(244,245).
 | |
| chain(245,246).
 | |
| chain(246,247).
 | |
| chain(247,248).
 | |
| chain(248,249).
 | |
| chain(249,250).
 | |
| chain(250,251).
 | |
| chain(251,252).
 | |
| chain(252,253).
 | |
| chain(253,254).
 | |
| chain(254,255).
 | |
| chain(255,256).
 | |
| chain(256,257).
 | |
| chain(257,258).
 | |
| chain(258,259).
 | |
| chain(259,260).
 | |
| chain(260,261).
 | |
| chain(261,262).
 | |
| chain(262,263).
 | |
| chain(263,264).
 | |
| chain(264,265).
 | |
| chain(265,266).
 | |
| chain(266,267).
 | |
| chain(267,268).
 | |
| chain(268,269).
 | |
| chain(269,270).
 | |
| chain(270,271).
 | |
| chain(271,272).
 | |
| chain(272,273).
 | |
| chain(273,274).
 | |
| chain(274,275).
 | |
| chain(275,276).
 | |
| chain(276,277).
 | |
| chain(277,278).
 | |
| chain(278,279).
 | |
| chain(279,280).
 | |
| chain(280,281).
 | |
| chain(281,282).
 | |
| chain(282,283).
 | |
| chain(283,284).
 | |
| chain(284,285).
 | |
| chain(285,286).
 | |
| chain(286,287).
 | |
| chain(287,288).
 | |
| chain(288,289).
 | |
| chain(289,290).
 | |
| chain(290,291).
 | |
| chain(291,292).
 | |
| chain(292,293).
 | |
| chain(293,294).
 | |
| chain(294,295).
 | |
| chain(295,296).
 | |
| chain(296,297).
 | |
| chain(297,298).
 | |
| chain(298,299).
 | |
| chain(299,300).
 | |
| chain(300,301).
 | |
| chain(301,302).
 | |
| chain(302,303).
 | |
| chain(303,304).
 | |
| chain(304,305).
 | |
| chain(305,306).
 | |
| chain(306,307).
 | |
| chain(307,308).
 | |
| chain(308,309).
 | |
| chain(309,310).
 | |
| chain(310,311).
 | |
| chain(311,312).
 | |
| chain(312,313).
 | |
| chain(313,314).
 | |
| chain(314,315).
 | |
| chain(315,316).
 | |
| chain(316,317).
 | |
| chain(317,318).
 | |
| chain(318,319).
 | |
| chain(319,320).
 | |
| chain(320,321).
 | |
| chain(321,322).
 | |
| chain(322,323).
 | |
| chain(323,324).
 | |
| chain(324,325).
 | |
| chain(325,326).
 | |
| chain(326,327).
 | |
| chain(327,328).
 | |
| chain(328,329).
 | |
| chain(329,330).
 | |
| chain(330,331).
 | |
| chain(331,332).
 | |
| chain(332,333).
 | |
| chain(333,334).
 | |
| chain(334,335).
 | |
| chain(335,336).
 | |
| chain(336,337).
 | |
| chain(337,338).
 | |
| chain(338,339).
 | |
| chain(339,340).
 | |
| chain(340,341).
 | |
| chain(341,342).
 | |
| chain(342,343).
 | |
| chain(343,344).
 | |
| chain(344,345).
 | |
| chain(345,346).
 | |
| chain(346,347).
 | |
| chain(347,348).
 | |
| chain(348,349).
 | |
| chain(349,350).
 | |
| chain(350,351).
 | |
| chain(351,352).
 | |
| chain(352,353).
 | |
| chain(353,354).
 | |
| chain(354,355).
 | |
| chain(355,356).
 | |
| chain(356,357).
 | |
| chain(357,358).
 | |
| chain(358,359).
 | |
| chain(359,360).
 | |
| chain(360,361).
 | |
| chain(361,362).
 | |
| chain(362,363).
 | |
| chain(363,364).
 | |
| chain(364,365).
 | |
| chain(365,366).
 | |
| chain(366,367).
 | |
| chain(367,368).
 | |
| chain(368,369).
 | |
| chain(369,370).
 | |
| chain(370,371).
 | |
| chain(371,372).
 | |
| chain(372,373).
 | |
| chain(373,374).
 | |
| chain(374,375).
 | |
| chain(375,376).
 | |
| chain(376,377).
 | |
| chain(377,378).
 | |
| chain(378,379).
 | |
| chain(379,380).
 | |
| chain(380,381).
 | |
| chain(381,382).
 | |
| chain(382,383).
 | |
| chain(383,384).
 | |
| chain(384,385).
 | |
| chain(385,386).
 | |
| chain(386,387).
 | |
| chain(387,388).
 | |
| chain(388,389).
 | |
| chain(389,390).
 | |
| chain(390,391).
 | |
| chain(391,392).
 | |
| chain(392,393).
 | |
| chain(393,394).
 | |
| chain(394,395).
 | |
| chain(395,396).
 | |
| chain(396,397).
 | |
| chain(397,398).
 | |
| chain(398,399).
 | |
| chain(399,400).
 |