Nuprl Definition : map2

map2(f;as;bs)
==r if as Ax then [] otherwise if bs Ax then [] otherwise let a,more_as as 
                                                              in let b,more_bs bs 
                                                                 in eval in
                                                                    eval map2(f;more_as;more_bs) in
                                                                      [x L]

map2(f;as;bs) ==
  fix((λmap2,as,bs. if as Ax then [] otherwise if bs Ax then [] otherwise let a,more_as as 
                                                                              in let b,more_bs bs 
                                                                                 in eval in
                                                                                    eval map2 more_as more_bs in
                                                                                      [x L])) 
  as 
  bs



Definitions occuring in Statement :  cons: [a b] nil: [] callbyvalue: callbyvalue isaxiom: if Ax then otherwise b apply: a fix: fix(F) lambda: λx.A[x] spread: spread def
Definitions occuring in definition :  fix: fix(F) lambda: λx.A[x] isaxiom: if Ax then otherwise b nil: [] spread: spread def callbyvalue: callbyvalue apply: a cons: [a b]
FDL editor aliases :  map2
Latex:
map2(f;as;bs)
==r  if  as  =  Ax  then  []
        otherwise  if  bs  =  Ax  then  []  otherwise  let  a,more$_{as}$  =  as 
                                                                                      in  let  b,more$_{bs}$  =  bs 
                                                                                            in  eval  x  =  f  a  b  in
                                                                                                  eval  L  =  map2(f;more$_{as}$;mor\000Ce$_{bs}$)  in
                                                                                                      [x  /  L]


Latex:
map2(f;as;bs)  ==
    fix((\mlambda{}map2,as,bs.  if  as  =  Ax  then  []
                                        otherwise  if  bs  =  Ax  then  []  otherwise  let  a,more$_{as}$  =  a\000Cs 
                                                                                                                      in  let  b,more$_{bs}$  \000C=  bs 
                                                                                                                            in  eval  x  =  f  a  b  in
                                                                                                                                  eval  L  =  map2  more$_{as\000C}$  more$_{bs}$  in
                                                                                                                                      [x  /  L])) 
    as 
    bs



Date html generated: 2016_05_14-AM-06_42_53
Last ObjectModification: 2015_12_03-PM-02_06_40

Theory : list_0


Home Index