File: BUTLAST.html

package info (click to toggle)
acl2 3.1-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 36,712 kB
  • ctags: 38,396
  • sloc: lisp: 464,023; makefile: 5,470; sh: 86; csh: 47; cpp: 25; ansic: 22
file content (34 lines) | stat: -rw-r--r-- 1,310 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
<html>
<head><title>BUTLAST.html  --  ACL2 Version 3.1</title></head>
<body text=#000000 bgcolor="#FFFFFF">
<h2>BUTLAST</h2>all but a final segment of a list
<pre>Major Section:  <a href="PROGRAMMING.html">PROGRAMMING</a>
</pre><p>

<code>(Butlast l n)</code> is the list obtained by removing the last <code>n</code>
elements from the true list <code>l</code>.  The following is a theorem
(though it takes some effort, including lemmas, to get ACL2 to prove
it).

<pre>
(implies (and (integerp n)
              (&lt;= 0 n)
              (true-listp l))
         (equal (length (butlast l n))
                (if (&lt; n (length l))
                    (- (length l) n)
                  0)))
</pre>

For related functions, see <a href="TAKE.html">take</a> and see <a href="NTHCDR.html">nthcdr</a>.
<p>
The <a href="GUARD.html">guard</a> for <code>(butlast l n)</code> requires that <code>n</code> is a nonnegative
integer and <code>lst</code> is a true list.<p>

<code>Butlast</code> is a Common Lisp function.  See any Common Lisp
documentation for more information.  Note:  In Common Lisp the
second argument of <code>butlast</code> is optional, but in ACL2 it is
required.
<br><br><br><a href="acl2-doc.html"><img src="llogo.gif"></a> <a href="acl2-doc-index.html"><img src="index.gif"></a>
</body>
</html>