let V be CTLModel; :: thesis: for Kai being Function of atomic_WFF, the BasicAssign of V
for f being Function of CTL_WFF, the carrier of V holds f is-PreEvaluation-for 0 ,Kai

let Kai be Function of atomic_WFF, the BasicAssign of V; :: thesis: for f being Function of CTL_WFF, the carrier of V holds f is-PreEvaluation-for 0 ,Kai
let f be Function of CTL_WFF, the carrier of V; :: thesis: f is-PreEvaluation-for 0 ,Kai
for H being CTL-formula st len H <= 0 holds
( ( H is atomic implies f . H = Kai . H ) & ( H is negative implies f . H = the Compl of V . (f . (the_argument_of H)) ) & ( H is conjunctive implies f . H = the L_meet of V . ((f . (the_left_argument_of H)),(f . (the_right_argument_of H))) ) & ( H is ExistNext implies f . H = the EneXt of V . (f . (the_argument_of H)) ) & ( H is ExistGlobal implies f . H = the EGlobal of V . (f . (the_argument_of H)) ) & ( H is ExistUntill implies f . H = the EUntill of V . ((f . (the_left_argument_of H)),(f . (the_right_argument_of H))) ) ) by Lm10;
hence f is-PreEvaluation-for 0 ,Kai by Def27; :: thesis: verum