The root mimic of all the sequences in the system.

Mimics
Inactive cells
Active cells
Specs
Inactive cells (details)
kind = "Sequence"
Active cells (details)
%(inbetween)

nil

[ show source ]

method(inbetween, 
  Sequence Interpose create(@, inbetween))
&(right)

nil

[ show source ]

method(right, 
  Sequence Interleave create(@, right))
+(other)

nil

[ show source ]

method(other, 
  Sequence Combination create(@, other))
collected(...)

nil

[ show source ]

macro(
  Sequence Map create(@, call ground, call arguments))
consed(consSize 2)

nil

[ show source ]

method(consSize 2, 
  Sequence Cons create(@, Ground, [], consSize))
dropped(howManyToDrop)

nil

[ show source ]

method(howManyToDrop, 
  Sequence Drop create(@, Ground, [], howManyToDrop))
droppedWhile(...)

nil

[ show source ]

macro(
  Sequence DropWhile create(@, call ground, call arguments))
each(...)

nil

[ show source ]

macro(
  argCount = call arguments length 
  cond(
    argCount ==(
      1), 
    
    chain = call arguments [](
        0) 
    
    while(next?, 
      chain evaluateOn(call ground, next) 
      ) 
    @, 
    argCount ==(
      2), 
    
    argumentName = call arguments [](
        0) 
    code = call arguments [](
        1) 
    
    lexicalCode = LexicalBlock createFrom(list(argumentName, code), call ground) 
    while(next?, 
      lexicalCode call(next) 
      ) 
    @, 
    argCount ==(
      3), 
    
    indexArgumentName = call arguments [](
        0) 
    argumentName = call arguments [](
        1) 
    code = call arguments [](
        2) 
    
    lexicalCode = LexicalBlock createFrom(list(indexArgumentName, argumentName, code), call ground) 
    index = 0 
    while(next?, 
      lexicalCode call(index, next) 
      ++(index) 
      ) 
    @ 
    , 
    error!(Condition Error Invocation NoMatch, message: call message, context: call currentContext)) 
  )
filtered(...)

nil

[ show source ]

macro(
  Sequence Filter create(@, call ground, call arguments))
grepped(...)

nil

[ show source ]

macro(
  argCount = call arguments length 
  cond(
    argCount ==(
      1), 
    
    toGrepAgainst = call argAt(
        0) 
    
    Sequence Grep create(@, Ground, [], toGrepAgainst), 
    argCount ==(
      3), 
    
    toGrepAgainst = call argAt(
        0) 
    argName = call arguments [](
        1) 
    theCode = call arguments [](
        2) 
    
    Sequence Grep create(@, call ground, [](argName, theCode), toGrepAgainst) 
    , 
    error!(Condition Error Invocation NoMatch, message: call message, context: call currentContext)) 
  )
indexed(from: 0, step: 1)

nil

[ show source ]

method(from: 0, step: 1, 
  Sequence Index create(@, Ground, [], from, step))
infinity(from: 0, step: 1)

Returns a new sequence that starts from zero and steps forever

[ show source ]

method(from: 0, step: 1, 
  fn(n, [](n +(step))) iterate(from) mapped(first))
interleave(right)

nil

[ show source ]

method(right, 
  Sequence Interleave create(@, right))
interpose(inbetween)

nil

[ show source ]

method(inbetween, 
  Sequence Interpose create(@, inbetween))
mapped(...)

nil

[ show source ]

macro(
  Sequence Map create(@, call ground, call arguments))
rejected(...)

nil

[ show source ]

macro(
  Sequence Reject create(@, call ground, call arguments))
selected(...)

nil

[ show source ]

macro(
  Sequence Filter create(@, call ground, call arguments))
sliced(sliceSize 2)

nil

[ show source ]

method(sliceSize 2, 
  Sequence Slice create(@, Ground, [], sliceSize))
zipped(+toZipAgainst)

nil

[ show source ]

method(+toZipAgainst, 
  Sequence Zip create(@, Ground, [], *(toZipAgainst)))
ω()

Returns a new sequence of all the natural numbers

[ show source ]

method(
  fn(n, [](n +(1))) iterate(0) mapped(first))
ℕ()

Returns a new sequence of all the natural numbers

[ show source ]

method(
  fn(n, [](n +(1))) iterate(0) mapped(first))