Nuprl Definition : A-loop
A-loop(AType;lo;hi;body) ==
  fix((λA-loop,hi. if hi ≤z lo
                  then A-null(AType)
                  else A-bind(array-model(AType)) (A-loop (hi - 1)) (λx.(body (hi - 1)))
                  fi )) 
  hi
Definitions occuring in Statement : 
A-null: A-null(AType), 
A-bind: A-bind(AModel), 
array-model: array-model(AType), 
le_int: i ≤z j, 
ifthenelse: if b then t else f fi , 
apply: f a, 
fix: fix(F), 
lambda: λx.A[x], 
subtract: n - m, 
natural_number: $n
Definitions occuring in definition : 
fix: fix(F), 
ifthenelse: if b then t else f fi , 
le_int: i ≤z j, 
A-null: A-null(AType), 
A-bind: A-bind(AModel), 
array-model: array-model(AType), 
lambda: λx.A[x], 
apply: f a, 
subtract: n - m, 
natural_number: $n
FDL editor aliases : 
A-loop
Latex:
A-loop(AType;lo;hi;body)  ==
    fix((\mlambda{}A-loop,hi.  if  hi  \mleq{}z  lo
                                    then  A-null(AType)
                                    else  A-bind(array-model(AType))  (A-loop  (hi  -  1))  (\mlambda{}x.(body  (hi  -  1)))
                                    fi  )) 
    hi
Date html generated:
2016_05_15-PM-02_19_25
Last ObjectModification:
2015_09_23-AM-07_38_40
Theory : monads
Home
Index