Nuprl Definition : mFO-dest-connective

let a,b dest-knd(fmla) in
F[a; b] ==
  if mFOconnect?(fmla) ∧b mFOconnect-knd(fmla) =a knd
  then F[mFOconnect-left(fmla); mFOconnect-right(fmla)]
  else inr ⋅ 
  fi 



Definitions occuring in Statement :  mFOconnect-right: mFOconnect-right(v) mFOconnect-left: mFOconnect-left(v) mFOconnect-knd: mFOconnect-knd(v) mFOconnect?: mFOconnect?(v) band: p ∧b q ifthenelse: if then else fi  eq_atom: =a y it: inr: inr 
FDL editor aliases :  mFO-dest-connective
let  a,b  =  dest-knd(fmla)  in
F[a;  b]  ==
    if  mFOconnect?(fmla)  \mwedge{}\msubb{}  mFOconnect-knd(fmla)  =a  knd
    then  F[mFOconnect-left(fmla);  mFOconnect-right(fmla)]
    else  inr  \mcdot{} 
    fi 



Date html generated: 2015_07_17-AM-07_53_59
Last ObjectModification: 2012_09_04-AM-00_26_51

Home Index