File: sequence.texi

package info (click to toggle)
gcl 2.6.14-19
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 60,804 kB
  • sloc: ansic: 177,407; lisp: 151,508; asm: 128,169; sh: 22,510; cpp: 11,923; tcl: 3,181; perl: 2,930; makefile: 2,360; sed: 334; yacc: 226; lex: 95; awk: 30; fortran: 24; csh: 23
file content (985 lines) | stat: -rwxr-xr-x 23,947 bytes parent folder | download | duplicates (17)
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
@node Sequences and Arrays and Hash Tables, Characters, Numbers, Top
@chapter Sequences and Arrays and Hash Tables

@defun VECTOR (&rest objects)
Package:LISP

Constructs a Simple-Vector from the given objects.


@end defun

@defun SUBSEQ (sequence start &optional (end (length sequence)))
Package:LISP

Returns a copy of a subsequence of SEQUENCE between START (inclusive) and
END (exclusive).


@end defun

@defun COPY-SEQ (sequence)
Package:LISP

Returns a copy of SEQUENCE.


@end defun

@defun POSITION (item sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the index of the first element in SEQUENCE that satisfies TEST with
ITEM; NIL if no such element exists.


@end defun

@defun ARRAY-RANK (array)
Package:LISP

Returns the number of dimensions of ARRAY.


@end defun

@defun SBIT (simple-bit-array &rest subscripts)
Package:LISP

Returns the bit from SIMPLE-BIT-ARRAY at SUBSCRIPTS.


@end defun

@defun STRING-CAPITALIZE (string &key (start 0) (end (length string)))
Package:LISP

Returns a copy of STRING with the first character of each word converted to
upper-case, and remaining characters in the word converted to lower case.


@end defun

@defun NSUBSTITUTE-IF-NOT (new test sequence &key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence of the same kind as SEQUENCE with the same elements

except that all elements not satisfying TEST are replaced with NEWITEM.
SEQUENCE may be destroyed.


@end defun

@defun FIND-IF (test sequence &key (from-end nil) (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the index of the first element in SEQUENCE that satisfies TEST; NIL if
no such element exists.


@end defun

@defun BIT-EQV (bit-array1 bit-array2 &optional (result-bit-array nil))
Package:LISP

Performs a bit-wise logical EQV  on the elements of BIT-ARRAY1 and BIT-ARRAY2.
Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.


@end defun

@defun STRING< (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

If STRING1 is lexicographically less than STRING2, then returns the longest
common prefix of the strings.  Otherwise, returns NIL.


@end defun

@defun REVERSE (sequence)
Package:LISP

Returns a new sequence containing the same elements as SEQUENCE but in
reverse order.


@end defun

@defun NSTRING-UPCASE (string &key (start 0) (end (length string)))
Package:LISP

Returns STRING with all lower case characters converted to uppercase.


@end defun

@defun STRING>= (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

If STRING1 is lexicographically greater than or equal to STRING2, then returns
the longest common prefix of the strings.  Otherwise, returns NIL.


@end defun

@defun ARRAY-ROW-MAJOR-INDEX (array &rest subscripts)
Package:LISP

Returns the index into the data vector of ARRAY for the element of ARRAY
specified by SUBSCRIPTS.


@end defun


@defun ARRAY-DIMENSION (array axis-number)
Package:LISP

Returns the length of AXIS-NUMBER of ARRAY.


@end defun

@defun FIND (item sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the first element in SEQUENCE satisfying TEST with ITEM; NIL if no
such element exists.


@end defun

@defun STRING-NOT-EQUAL (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

Similar to STRING=, but ignores cases.


@end defun

@defun STRING-RIGHT-TRIM (char-bag string)
Package:LISP

Returns a copy of STRING with the characters in CHAR-BAG removed from the
right end.


@end defun

@defun DELETE-IF-NOT (test sequence &key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence formed by destructively removing the elements not
satisfying TEST from SEQUENCE.


@end defun

@defun REMOVE-IF-NOT (test sequence &key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a copy of SEQUENCE with elements not satisfying TEST removed.


@end defun

@defun STRING= (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

Returns T if the two strings are character-wise CHAR=; NIL otherwise.


@end defun

@defun NSUBSTITUTE-IF (new test sequence &key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence of the same kind as SEQUENCE with the same elements
except that all elements satisfying TEST are replaced with NEWITEM.  SEQUENCE
may be destroyed.


@end defun

@defun SOME (predicate sequence &rest more-sequences)
Package:LISP

Returns T if at least one of the elements in SEQUENCEs satisfies PREDICATE;
NIL otherwise.


@end defun

@defun MAKE-STRING (size &key (initial-element #\Space))
Package:LISP

Creates and returns a new string of SIZE length whose elements are all
INITIAL-ELEMENT.


@end defun

@defun NSUBSTITUTE (newitem olditem sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence of the same kind as SEQUENCE with the same elements
except that OLDITEMs are replaced with NEWITEM.  SEQUENCE may be destroyed.


@end defun

@defun STRING-EQUAL (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

Given two strings (string1 and string2), and optional integers start1,
start2, end1 and end2, compares characters in string1 to characters in
string2 (using char-equal).


@end defun

@defun STRING-NOT-GREATERP (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

Similar to STRING<=, but ignores cases.


@end defun

@defun STRING> (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

If STRING1 is lexicographically greater than STRING2, then returns the
longest common prefix of the strings.  Otherwise, returns NIL.


@end defun

@defun STRINGP (x)
Package:LISP

Returns T if X is a string; NIL otherwise.


@end defun

@defun DELETE-IF (test sequence &key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence formed by removing the elements satisfying TEST
destructively from SEQUENCE.


@end defun

@defun SIMPLE-STRING-P (x)
Package:LISP

Returns T if X is a simple string; NIL otherwise.


@end defun

@defun REMOVE-IF (test sequence &key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a copy of SEQUENCE with elements satisfying TEST removed.


@end defun

@defun HASH-TABLE-COUNT (hash-table)
Package:LISP

Returns the number of entries in the given Hash-Table.


@end defun

@defun ARRAY-DIMENSIONS (array)
Package:LISP

Returns a list whose elements are the dimensions of ARRAY


@end defun

@defun SUBSTITUTE-IF-NOT (new test sequence &key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence of the same kind as SEQUENCE with the same elements
except that all elements not satisfying TEST are replaced with NEWITEM.


@end defun

@defun ADJUSTABLE-ARRAY-P (array)
Package:LISP

Returns T if ARRAY is adjustable; NIL otherwise.


@end defun

@defun SVREF (simple-vector index)
Package:LISP

Returns the INDEX-th element of SIMPLE-VECTOR.


@end defun

@defun VECTOR-PUSH-EXTEND (new-element vector &optional (extension (length vector)))
Package:LISP

Similar to VECTOR-PUSH except that, if the fill pointer gets too large,
extends VECTOR rather then simply returns NIL.


@end defun

@defun DELETE (item sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence formed by removing the specified ITEM destructively from
SEQUENCE.


@end defun

@defun REMOVE (item sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a copy of SEQUENCE with ITEM removed.


@end defun

@defun STRING (x)
Package:LISP

Coerces X into a string.  If X is a string, then returns X itself.  If X is a
symbol, then returns X's print name.  If X is a character, then returns a one
element string containing that character.  Signals an error if X cannot be
coerced into a string.


@end defun

@defun STRING-UPCASE (string &key (start 0) (end (length string)))
Package:LISP

Returns a copy of STRING with all lower case characters converted to
uppercase.


@end defun

@defun GETHASH (key hash-table &optional (default nil))
Package:LISP

Finds the entry in HASH-TABLE whose key is KEY and returns the associated
value and T, as multiple values.  Returns DEFAULT and NIL if there is no
such entry.


@end defun

@defun MAKE-HASH-TABLE (&key (test 'eql) (size 1024) (rehash-size 1.5) (rehash-threshold 0.7))
Package:LISP

Creates and returns a hash table.


@end defun

@defun STRING/= (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

Returns NIL if STRING1 and STRING2 are character-wise CHAR=.  Otherwise,
returns the index to the longest common prefix of the strings.


@end defun

@defun STRING-GREATERP (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

Similar to STRING>, but ignores cases.


@end defun

@defun ELT (sequence index)
Package:LISP

Returns the INDEX-th element of SEQUENCE.


@end defun

@defun MAKE-ARRAY (dimensions &key (element-type t) initial-element (initial-contents nil) (adjustable nil) (fill-pointer nil) (displaced-to nil) (displaced-index-offset 0) static)
Package:LISP

Creates an array of the specified DIMENSIONS.  The default for INITIAL-
ELEMENT depends on ELEMENT-TYPE.
MAKE-ARRAY will always try to find the `best' array to
accommodate the element-type specified.   For example on a SUN element-type
(mod 1) --> bit
(integer 0 10) --> unsigned-char
(integer -3 10) --> signed-char
si::best-array-element-type is the function doing this.  It
is also used by the compiler, for coercing array element types.
If you are going to declare an array you should use the same
element type as was used in making it.  eg
(setq my-array (make-array 4 :element-type '(integer 0 10)))
(the (array (integer 0 10)) my-array)
    When wanting to optimize references to an array you need to
declare the array eg: (the (array (integer -3 10)) my-array) if ar
were constructed using the (integer -3 10) element-type.  You could of
course have used signed-char, but since the ranges may be
implementation dependent it is better to use -3 10 range.  MAKE-ARRAY
needs to do some calculation with the element-type if you don't
provide a primitive data-type.  One way of doing this in a machine
independent fashion:

  (defvar *my-elt-type* #.
      (array-element-type (make-array 1 :element-type '(integer -3 10))))

Then calls to (make-array n :element-type *my-elt-type*) will not have to go
through a type inclusion computation.  The keyword STATIC (GCL specific) if non
nil, will cause the array body to be non relocatable.



@end defun

@defun NSTRING-DOWNCASE (string &key (start 0) (end (length string)))
Package:LISP
 Returns STRING with all upper case
characters converted to lowercase.


@end defun

@defun ARRAY-IN-BOUNDS-P (array &rest subscripts)
Package:LISP
 Returns T if SUBSCRIPTS are valid subscripts for
ARRAY; NIL otherwise.


@end defun

@defun SORT  (sequence predicate &key (key #'identity))
Package:LISP
 Destructively sorts SEQUENCE.
PREDICATE should return non-NIL if its first argument is to precede
its second argument.


@end defun

@defun HASH-TABLE-P  (x)
Package:LISP

Returns T if X is a hash table object; NIL
otherwise.


@end defun

@defun COUNT-IF-NOT  (test sequence &key (from-end nil) (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the number of elements in SEQUENCE not satisfying TEST.


@end defun

@defun FILL-POINTER (vector)
Package:LISP

Returns the fill pointer of VECTOR.


@end defun


@defun ARRAYP (x)
Package:LISP

Returns T if X is an array; NIL otherwise.


@end defun

@defun REPLACE (sequence1 sequence2 &key (start1 0) (end1 (length sequence1)) (start2 0) (end2 (length sequence2)))
Package:LISP

Destructively modifies SEQUENCE1 by copying successive elements into it from
SEQUENCE2.


@end defun

@defun BIT-XOR (bit-array1 bit-array2 &optional (result-bit-array nil))
Package:LISP

Performs a bit-wise logical XOR on the elements of BIT-ARRAY1 and BIT-ARRAY2.
Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.


@end defun

@defun CLRHASH (hash-table)
Package:LISP

Removes all entries of HASH-TABLE and returns the hash table itself.


@end defun

@defun SUBSTITUTE-IF (newitem test sequence &key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence of the same kind as SEQUENCE with the same elements
except that all elements satisfying TEST are replaced with NEWITEM.


@end defun

@defun MISMATCH (sequence1 sequence2 &key (from-end nil) (test #'eql) test-not (start1 0) (start2 0) (end1 (length sequence1)) (end2 (length sequence2)) (key #'identity))
Package:LISP

The specified subsequences of SEQUENCE1 and SEQUENCE2 are compared
element-wise.  If they are of equal length and match in every element, the
result is NIL.  Otherwise, the result is a non-negative integer, the index
within SEQUENCE1 of the leftmost position at which they fail to match; or, if
one is shorter than and a matching prefix of the other, the index within
SEQUENCE1 beyond the last position tested is returned.


@end defun

@defvr {Constant} ARRAY-TOTAL-SIZE-LIMIT 
Package:LISP
The exclusive upper bound on the total number of elements of an array.


@end defvr

@defun VECTOR-POP (vector)
Package:LISP

Attempts to decrease the fill-pointer of VECTOR by 1 and returns the element
pointed to by the new fill pointer.  Signals an error if the old value of
the fill pointer is 0.


@end defun

@defun SUBSTITUTE (newitem olditem sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (count most-positive-fixnum) (key #'identity))
Package:LISP

Returns a sequence of the same kind as SEQUENCE with the same elements
except that OLDITEMs are replaced with NEWITEM.


@end defun

@defun ARRAY-HAS-FILL-POINTER-P (array)
Package:LISP

Returns T if ARRAY has a fill pointer; NIL otherwise.


@end defun

@defun CONCATENATE (result-type &rest sequences)
Package:LISP

Returns a new sequence of the specified RESULT-TYPE, consisting of all
elements in SEQUENCEs.


@end defun

@defun VECTOR-PUSH (new-element vector)
Package:LISP

Attempts to set the element of ARRAY designated by its fill pointer to
NEW-ELEMENT and increments the fill pointer by one.  Returns NIL if the fill
pointer is too large.  Otherwise, returns the new fill pointer value.


@end defun

@defun STRING-TRIM (char-bag string)
Package:LISP

Returns a copy of STRING with the characters in CHAR-BAG removed from both
ends.


@end defun

@defun ARRAY-ELEMENT-TYPE (array)
Package:LISP

Returns the type of the elements of ARRAY


@end defun

@defun NOTANY (predicate sequence &rest more-sequences)
Package:LISP

Returns T if none of the elements in SEQUENCEs satisfies PREDICATE; NIL
otherwise.


@end defun

@defun BIT-NOT (bit-array &optional (result-bit-array nil))
Package:LISP

Performs a bit-wise logical NOT in the elements of BIT-ARRAY.
Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
BIT-ARRAY if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.


@end defun

@defun BIT-ORC1 (bit-array1 bit-array2 &optional (result-bit-array nil))
Package:LISP

Performs a bit-wise logical ORC1 on the elements of BIT-ARRAY1 and BIT-ARRAY2.
Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.


@end defun

@defun COUNT-IF (test sequence &key (from-end nil) (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the number of elements in SEQUENCE satisfying TEST.


@end defun

@defun MAP (result-type function sequence &rest more-sequences)
Package:LISP

FUNCTION must take as many arguments as there are sequences provided.  The 
result is a sequence such that the i-th element is the result of applying
FUNCTION to the i-th elements of the SEQUENCEs.


@end defun

@defvr {Constant} ARRAY-RANK-LIMIT 
Package:LISP
The exclusive upper bound on the rank of an array.


@end defvr

@defun COUNT (item sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the number of elements in SEQUENCE satisfying TEST with ITEM.


@end defun

@defun BIT-VECTOR-P (x)
Package:LISP

Returns T if X is a bit vector; NIL otherwise.


@end defun

@defun NSTRING-CAPITALIZE (string &key (start 0) (end (length string)))
Package:LISP

Returns STRING with the first character of each word converted to upper-case,
and remaining characters in the word converted to lower case.


@end defun

@defun ADJUST-ARRAY (array dimensions &key (element-type (array-element-type array)) initial-element (initial-contents nil) (fill-pointer nil) (displaced-to nil) (displaced-index-offset 0))
Package:LISP

Adjusts the dimensions of ARRAY to the given DIMENSIONS.  The default value
of INITIAL-ELEMENT depends on ELEMENT-TYPE.


@end defun

@defun SEARCH (sequence1 sequence2 &key (from-end nil) (test #'eql) test-not (start1 0) (start2 0) (end1 (length sequence1)) (end2 (length sequence2)) (key #'identity))
Package:LISP

A search is conducted for the first subsequence of SEQUENCE2 which
element-wise matches SEQUENCE1.  If there is such a subsequence in SEQUENCE2,
the index of the its leftmost element is returned; otherwise, NIL is
returned.


@end defun

@defun SIMPLE-BIT-VECTOR-P (x)
Package:LISP

Returns T if X is a simple bit-vector; NIL otherwise.


@end defun

@defun MAKE-SEQUENCE (type length &key initial-element)
Package:LISP

Returns a sequence of the given TYPE and LENGTH, with elements initialized
to INITIAL-ELEMENT.  The default value of INITIAL-ELEMENT depends on TYPE.


@end defun

@defun BIT-ORC2 (bit-array1 bit-array2 &optional (result-bit-array nil))
Package:LISP

Performs a bit-wise logical ORC2 on the elements of BIT-ARRAY1 and BIT-ARRAY2.
Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.


@end defun

@defun NREVERSE (sequence)
Package:LISP

Returns a sequence of the same elements as SEQUENCE but in reverse order.
SEQUENCE may be destroyed.


@end defun

@defvr {Constant} ARRAY-DIMENSION-LIMIT 
Package:LISP
The exclusive upper bound of the array dimension.


@end defvr

@defun NOTEVERY (predicate sequence &rest more-sequences)
Package:LISP

Returns T if at least one of the elements in SEQUENCEs does not satisfy
PREDICATE; NIL otherwise.


@end defun

@defun POSITION-IF-NOT (test sequence &key (from-end nil) (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the index of the first element in SEQUENCE that does not satisfy TEST;
NIL if no such element exists.


@end defun

@defun STRING-DOWNCASE (string &key (start 0) (end (length string)))
Package:LISP

Returns a copy of STRING with all upper case characters converted to
lowercase.


@end defun

@defun BIT (bit-array &rest subscripts)
Package:LISP

Returns the bit from BIT-ARRAY at SUBSCRIPTS.


@end defun

@defun STRING-NOT-LESSP (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

Similar to STRING>=, but ignores cases.


@end defun

@defun CHAR (string index)
Package:LISP

Returns the INDEX-th character in STRING.


@end defun

@defun AREF (array &rest subscripts)
Package:LISP

Returns the element of ARRAY specified by SUBSCRIPTS.


@end defun

@defun FILL (sequence item &key (start 0) (end (length sequence)))
Package:LISP

Replaces the specified elements of SEQUENCE all with ITEM.


@end defun

@defun STABLE-SORT (sequence predicate &key (key #'identity))
Package:LISP

Destructively sorts SEQUENCE.  PREDICATE should return non-NIL if its first
argument is to precede its second argument.


@end defun

@defun BIT-IOR (bit-array1 bit-array2 &optional (result-bit-array nil))
Package:LISP

Performs a bit-wise logical IOR on the elements of BIT-ARRAY1 and BIT-ARRAY2.
Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.


@end defun

@defun REMHASH (key hash-table)
Package:LISP

Removes any entry for KEY in HASH-TABLE.  Returns T if such an entry
existed; NIL otherwise.


@end defun

@defun VECTORP (x)
Package:LISP

Returns T if X is a vector; NIL otherwise.


@end defun

@defun STRING<= (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

If STRING1 is lexicographically less than or equal to STRING2, then returns
the longest common prefix of the two strings.  Otherwise, returns NIL.


@end defun

@defun SIMPLE-VECTOR-P (x)
Package:LISP

Returns T if X is a simple vector; NIL otherwise.


@end defun

@defun STRING-LEFT-TRIM (char-bag string)
Package:LISP

Returns a copy of STRING with the characters in CHAR-BAG removed from the
left end.


@end defun

@defun ARRAY-TOTAL-SIZE (array)
Package:LISP

Returns the total number of elements of ARRAY.


@end defun

@defun FIND-IF-NOT (test sequence &key (from-end nil) (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the index of the first element in SEQUENCE that does not satisfy
TEST; NIL if no such element exists.


@end defun

@defun DELETE-DUPLICATES (sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns a sequence formed by removing duplicated elements destructively from
SEQUENCE.


@end defun

@defun REMOVE-DUPLICATES (sequence &key (from-end nil) (test #'eql) test-not (start 0) (end (length sequence)) (key #'identity))
Package:LISP

The elements of SEQUENCE are examined, and if any two match, one is discarded.
Returns the resulting sequence.


@end defun

@defun POSITION-IF (test sequence &key (from-end nil) (start 0) (end (length sequence)) (key #'identity))
Package:LISP

Returns the index of the first element in SEQUENCE that satisfies TEST; NIL
if no such element exists.


@end defun

@defun MERGE (result-type sequence1 sequence2 predicate &key (key #'identity))
Package:LISP

SEQUENCE1 and SEQUENCE2 are destructively merged into a sequence of type
RESULT-TYPE using PREDICATE to order the elements.


@end defun

@defun EVERY (predicate sequence &rest more-sequences)
Package:LISP

Returns T if every elements of SEQUENCEs satisfy PREDICATE; NIL otherwise.


@end defun

@defun REDUCE (function sequence &key (from-end nil) (start 0) (end (length sequence)) initial-value)
Package:LISP

Combines all the elements of SEQUENCE using a binary operation FUNCTION.
If INITIAL-VALUE is supplied, it is logically placed before the SEQUENCE.


@end defun

@defun STRING-LESSP (string1 string2 &key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))
Package:LISP

Similar to STRING<, but ignores cases.


@end defun