length ( seq -- n ) - Factor Documentation

length ( seq -- n )
Virtual sequence protocol

Next: virtual-exemplar ( seq -- seq' )

Vocabulary
sequences

Inputs

seq a sequence

Outputs

n a non-negative integer

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

Examples

USING: prettyprint sequences ; { 1 "a" { 2 3 } f } length .
4

USING: prettyprint sequences ; "Hello, world!" length .
13

Definition

IN: sequences

GENERIC: length ( seq -- n ) flushable

Methods

USING: accessors sequences sequences.modified ;

M: 1modified length seq>> length ;

USING: accessors sequences
specialized-arrays.instances.raylib.BoneInfo ;

M: BoneInfo-array length length>> ; inline

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 sequences
specialized-arrays.instances.raylib.Material ;

M: Material-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.raylib.MaterialMap ;

M: MaterialMap-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.raylib.Matrix ;

M: Matrix-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.raylib.Mesh ;

M: Mesh-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.raylib.Vector2 ;

M: Vector2-array length length>> ; inline

USING: kernel raylib sequences ;

M: Vector2 length drop 2 ; inline

USING: accessors sequences
specialized-arrays.instances.raylib.Vector3 ;

M: Vector3-array length length>> ; inline

USING: kernel raylib sequences ;

M: Vector3 length drop 3 ; inline

USING: kernel raylib sequences ;

M: Vector4 length drop 4 ; 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 math.blas.matrices sequences ;

M: blas-matrix-rowcol-sequence length length>> ;

USING: accessors math.blas.vectors sequences ;

M: blas-vector-base length length>> ;

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: accessors sequences
specialized-arrays.instances.alien.c-types.c-string ;

M: c-string-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 grouping kernel math math.order sequences ;

M: clumps length
dup seq>> length
[ drop 0 ] [ swap [ 1 + ] [ n>> ] bi* [-] ] if-zero ; inline

USING: accessors sequences tools.memory ;

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

USING: accessors math.combinatorics sequences ;

M: combinations length length>> ; inline

USING: accessors math sequences sequences.complex-components ;

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

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

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

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

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

USING: accessors math sequences sequences.complex ;

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

USING: accessors kernel math sequences ;

M: composed 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: curried length quot>> length 1 + ;

USING: accessors sequences sequences.repeating ;

M: cycles length length>> ;

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 kernel math sequences sequences.repeating ;

M: element-repeats length [ seq>> length ] [ times>> ] bi * ;

USING: accessors assocs sequences ;

M: enumerated length seq>> length ; inline

USING: accessors math sequences sequences.extras ;

M: evens length seq>> length 1 + 2/ ; 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.fftw.ffi.fftw_complex ;

M: fftw_complex-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: gap-buffer kernel math sequences ;

M: gb length [ buffer-length ] [ gap-length ] bi - ;

USING: accessors grouping kernel math sequences ;

M: groups length
[ seq>> length ] [ n>> ] bi [ + 1 - ] keep /i ; 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
specialized-arrays.instances.alien.c-types.int32_t ;

M: int32_t-array length length>> ; inline

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

M: interleaved length seq>> length dup 1 - + 0 max ;

USING: accessors sequences ;

M: iota length n>> ; inline

USING: accessors math.combinatorics sequences ;

M: k-permutations length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.io.files.acls.macos.ffi.kauth_ace ;

M: kauth_ace-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.unix.kqueue.kevent ;

M: kevent-array length length>> ; 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 math math.matrices.laplace.private sequences ;

M: missing length seq>> length 1 - ;

USING: classes.tuple.private named-tuples sequences ;

M: named-tuple length tuple-size ;

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 math sequences sequences.extras ;

M: odds length seq>> length 2/ ; inline

USING: accessors kernel math sequences sequences.inserters ;

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

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

M: padded length [ underlying>> length ] [ length>> ] bi max ;

USING: accessors sequences
specialized-arrays.instances.papier.map.papier-vertex-struct ;

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

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

M: particle_t-array length length>> ; inline

USING: accessors math.combinatorics sequences ;

M: permutations 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 math sequences sequences.prefixed ;

M: prefixed length seq>> length 1 + ;

USING: accessors grouping.extras sequences ;

M: prefixes length seq>> length ;

USING: accessors gml.types sequences ;

M: proc length array>> length ;

USING: accessors sequences sequences.product ;

M: product-sequence length lengths>> product ;

USING: accessors quotations sequences ;

M: quotation length array>> length ;

USING: accessors ranges sequences ;

M: range length length>> ; inline

USING: accessors sequences ;

M: repetition length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.rlgl.rlDrawCall ;

M: rlDrawCall-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.rlgl.rlVertexBuffer ;

M: rlVertexBuffer-array length 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: accessors arrays.shaped sequences ;

M: shaped-array length underlying>> length ; inline

USING: accessors sequences sequences.shifted ;

M: shifted length underlying>> length ;

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 kernel math.order sequences sequences.snipped ;

M: snipped length [ seq>> length ] [ length>> ] bi [-] ;

USING: accessors sequences
specialized-arrays.instances.unix.statfs.macos.statfs64 ;

M: statfs64-array length length>> ; inline

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

M: step-slice length
[ to>> ] [ from>> - ] [ step>> ] tri dup 0 <
[ [ neg 0 max ] dip neg ] when /mod zero? [ 1 + ] unless ;
inline

USING: accessors sequences strings ;

M: string length length>> ; inline

USING: accessors math sequences sequences.suffixed ;

M: suffixed length seq>> length 1 + ;

USING: accessors grouping.extras sequences ;

M: suffixes length seq>> length ;

USING: accessors sequences sequences.modified ;

M: summed length seqs>> longest length ;

USING: accessors kernel sequences xml.data ;

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

USING: accessors sequences tensors ;

M: tensor length vec>> length ;

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

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

USING: accessors calendar.ranges sequences ;

M: timestamp-range length length>> ;

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

M: timeval-array length length>> ; inline

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

M: u16-array length length>> ; inline

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

M: u32-array length length>> ; inline

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

M: u64-array length length>> ; inline

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

M: u8-array length length>> ; inline

USING: accessors sequences
specialized-arrays.instances.alien.endian.ube32 ;

M: ube32-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.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.uint16_t ;

M: uint16_t-array length length>> ; inline

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

M: uint32_t-array length length>> ; inline

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

M: uint64_t-array length length>> ; inline

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

M: uint8_t-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 sequences.extras ;

M: virtual-zip-index length seq>> 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 sequences sequences.windowed ;

M: windowed-sequence length sequence>> length ; inline

USING: accessors sequences ;

M: wrapped-sequence length seq>> 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 ;

USING: accessors math sequences zim ;

M: zim-cluster length offsets>> length 1 - ;

USING: accessors sequences zim ;

M: zim length header>> entry-count>> ;

USING: accessors kernel sequences sequences.zipped ;

M: zipped length [ keys>> ] [ values>> ] bi min-length ;