Vocabulary
sequences

Inputs and outputs

seq	a sequence
n	a non-negative integer

Generic word contract
Outputs the length of the sequence. All sequences support this operation.

Definition

IN: sequences

GENERIC: length ( seq -- n ) flushable

Methods

USING: accessors sequences
specialized-arrays.instances.elf.Elf32_Phdr ;

M: Elf32_Phdr-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.elf.Elf32_Shdr ;

M: Elf32_Shdr-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.elf.Elf32_Sym ;

M: Elf32_Sym-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.elf.Elf64_Phdr ;

M: Elf64_Phdr-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.elf.Elf64_Shdr ;

M: Elf64_Shdr-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.elf.Elf64_Sym ;

M: Elf64_Sym-array length length>> ; inline

USING: accessors grouping.private kernel math math.order
sequences ;

M: abstract-clumps length
[ seq>> length 1 + ] [ n>> ] bi [-] ; inline

USING: accessors grouping.private kernel math sequences ;

M: abstract-groups length
[ seq>> length ] [ n>> ] bi [ + 1 - ] keep /i ; inline

USING: accessors arrays sequences ;

M: array length length>> ; inline

USING: accessors bit-arrays sequences ;

M: bit-array length length>> ; inline

USING: accessors math.bits sequences ;

M: bits length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.benchmark.nbody-simd.body ;

M: body-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.gpu.demos.bunny.bunny-vertex-struct
;

M: bunny-vertex-struct-array length length>> ; inline

USING: accessors byte-arrays sequences ;

M: byte-array length length>> ; inline

USING: kernel math.vectors.simd sequences ;

M: char-16 length drop 16 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.char ;

M: char-array length length>> ; inline

USING: accessors grouping sequences ;

M: circular-clumps length seq>> length ; inline

USING: accessors grouping kernel math sequences ;

M: circular-slice length [ to>> ] [ from>> ] bi - ; inline

USING: accessors circular sequences ;

M: circular length seq>> length ; inline

USING: accessors sequences tools.memory ;

M: code-blocks length blocks>> length ; inline

USING: accessors columns sequences ;

M: column length seq>> length ;

USING: accessors math sequences sequences.complex-components ;

M: complex-components length seq>> length 1 shift ;

USING: accessors math sequences sequences.complex ;

M: complex-sequence length seq>> length -1 shift ;

USING: accessors kernel math sequences ;

M: compose length [ first>> length ] [ second>> length ] bi + ;

USING: accessors kernel math sequences sequences.cords ;

M: cord length [ head>> length ] [ tail>> length ] bi + ;
inline

USING: accessors sequences
specialized-arrays.instances.chipmunk.ffi.cpContact ;

M: cpContact-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.chipmunk.ffi.cpPolyShapeAxis ;

M: cpPolyShapeAxis-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.chipmunk.ffi.cpVect ;

M: cpVect-array length length>> ; inline

USING: accessors kernel math sequences ;

M: curry length quot>> length 1 + ;

USING: accessors alien.data.map.private sequences ;

M: data-map-param length iter-count>> ; inline

USING: kernel math.vectors.simd sequences ;

M: double-2 length drop 2 ; inline

USING: accessors sequences
specialized-arrays.instances.math.vectors.simd.cords.double-4 ;

M: double-4-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.double ;

M: double-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.unix.linux.epoll.epoll-event ;

M: epoll-event-array length length>> ; inline

USING: kernel sequences ;

M: f length drop 0 ; inline

USING: accessors sequences
specialized-arrays.instances.macho.fat_arch ;

M: fat_arch-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.math.vectors.simd.float-4 ;

M: float-4-array length length>> ; inline

USING: kernel math.vectors.simd sequences ;

M: float-4 length drop 4 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.float ;

M: float-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.game.loop.benchmark.game-loop-benchmark
;

M: game-loop-benchmark-array length length>> ; inline

USING: accessors growable sequences ;

M: growable length length>> ; inline

USING: accessors circular sequences ;

M: growing-circular length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.math.floats.half.half ;

M: half-array length length>> ; inline

USING: accessors game.models.util sequences ;

M: indexed-seq length iseq>> length ; inline

USING: kernel sequences sequences.inserters ;

M: inserter length drop 0 ; inline

USING: kernel math.vectors.simd sequences ;

M: int-4 length drop 4 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.int ;

M: int-array length length>> ; inline

USING: accessors sequences ;

M: iota length n>> ; inline

USING: accessors game.input.dinput.keys-array sequences ;

M: keys-array length length>> ;

USING: accessors sequences
specialized-arrays.instances.libusb.libusb_iso_packet_descriptor
;

M: libusb_iso_packet_descriptor-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.long ;

M: long-array length length>> ; inline

USING: kernel math.vectors.simd sequences ;

M: longlong-2 length drop 2 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.longlong ;

M: longlong-array length length>> ; inline

USING: kernel math.matrices.simd sequences ;

M: matrix4 length drop 4 ; inline

USING: accessors kernel math math.order sequences
sequences.merged ;

M: merged length
seqs>> [ [ length ] [ min ] map-reduce ] [ length ] bi * ;
inline

USING: accessors sequences sequences.modified ;

M: modified length seq>> length ;

USING: accessors nibble-arrays sequences ;

M: nibble-array length length>> ;

USING: accessors sequences
specialized-arrays.instances.macho.nlist ;

M: nlist-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.macho.nlist_64 ;

M: nlist_64-array length length>> ; inline

USING: accessors kernel math sequences sequences.inserters ;

M: offset-growable length
[ underlying>> length ] [ offset>> ] bi - ; inline

USING: accessors sequences
specialized-arrays.instances.fluids.particle_t ;

M: particle_t-array length length>> ; inline

USING: accessors persistent.vectors sequences ;

M: persistent-vector length count>> ;

USING: accessors benchmark.tuple-arrays sequences ;

M: point-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.benchmark.struct-arrays.point ;

M: point-array length length>> ; inline

USING: accessors sequences sequences.product ;

M: product-sequence length lengths>> product ;

USING: accessors quotations sequences ;

M: quotation length array>> length ;

USING: accessors math.ranges sequences ;

M: range length length>> ; inline

USING: accessors sequences sequences.repeating ;

M: repeating length len>> ;

USING: accessors sequences ;

M: repetition length len>> ; inline

USING: accessors sequences ;

M: reversed length seq>> length ; inline

USING: accessors project-euler.059.private sequences ;

M: rollover length n>> ;

USING: accessors sequences
specialized-arrays.instances.macho.section ;

M: section-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.macho.section_64 ;

M: section_64-array length length>> ; inline

USING: kernel math.vectors.simd sequences ;

M: short-8 length drop 8 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.short ;

M: short-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.size_t ;

M: size_t-array length length>> ; inline

USING: accessors kernel math sequences ;

M: slice length [ to>> ] [ from>> ] bi - ; inline

USING: accessors grouping sequences ;

M: sliced-circular-clumps length seq>> length ; inline

USING: accessors sequences strings ;

M: string length length>> ; inline

USING: accessors math.order sequences sequences.modified ;

M: summed length seqs>> [ length ] [ max ] map-reduce ;

USING: accessors kernel sequences xml.data ;

M: tag length [ children>> ] call \ length execute ;

USING: accessors sequences
specialized-arrays.instances.ogg.theora.th-quant-ranges ;

M: th-quant-ranges-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.unix.time.timeval ;

M: timeval-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.math.vectors.simd.uchar-16 ;

M: uchar-16-array length length>> ; inline

USING: kernel math.vectors.simd sequences ;

M: uchar-16 length drop 16 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.uchar ;

M: uchar-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.tools.disassembler.udis.ud_operand
;

M: ud_operand-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.math.vectors.simd.uint-4 ;

M: uint-4-array length length>> ; inline

USING: kernel math.vectors.simd sequences ;

M: uint-4 length drop 4 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.uint ;

M: uint-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.uintptr_t ;

M: uintptr_t-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.ulong ;

M: ulong-array length length>> ; inline

USING: kernel math.vectors.simd sequences ;

M: ulonglong-2 length drop 2 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.ulonglong ;

M: ulonglong-array length length>> ; inline

USING: kernel math.vectors.simd sequences ;

M: ushort-8 length drop 8 ; inline

USING: accessors sequences
specialized-arrays.instances.alien.c-types.ushort ;

M: ushort-array length length>> ; inline

USING: accessors sequences vlists ;

M: vlist length length>> ;

USING: accessors sequences
specialized-arrays.instances.alien.c-types.void* ;

M: void*-array length length>> ; inline

USING: accessors kernel sequences xml.data ;

M: xml-chunk length [ seq>> ] call \ length execute ;

USING: accessors kernel sequences xml.data ;

M: xml length [ body>> ] call \ length execute ;