Logiweb(TM)

Logiweb aspects of expand ( " , " ) in pyk

Up Help

The "pyk" aspect

Define pyk of expand ( asterisk , asterisk ) as "expand ( "! , "! )" end define

The "value" aspect

define value of expand ( d , x ) as norm { d is val : { x is val : LET x zeroth BE { t IN LET zip ( d first tail , t tail ) BE { s IN stateexpand ( substitute ( t , d second , s ) , x first , x second ) } } } } 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