Logiweb(TM)

Logiweb aspects of let1 ( " ) in pyk

Up Help

The "pyk" aspect

Define pyk of let1 ( asterisk ) as "let1 ( "! )" end define

The "value" aspect

define value of let1 ( x ) as norm { x is val : LET x zeroth BE { t IN LET x first BE { s IN LET x second BE { c IN LET t first BE { u IN LET t second BE { v IN LET t third BE { w IN LET stateexpand ( u , s , c ) BE { u IN LET stateexpand ( v , s , c ) BE { v IN LET stateexpand ( w , s , c ) BE { w IN LET make-prime ( make-var ( t ) ) BE { x IN LET let2 ( x , u , w , c ) BE { w IN make-let ( quote asterisk end quote , v , w ) } } } } } } } } } } } } end define

The pyk compiler, version 0.1.9 by Klaus Grue,
GRD-2007-07-12.UTC:20:10:57.067491 = MJD-54293.TAI:20:11:30.067491 = LGT-4690987890067491e-6