[Nettime-bold] http://meta.am/ - abstract machine

[m e t a <meta@meta.am>]

//


http://meta.am/image/still/

                            rot.spk  -  abstract machine








\noboundingbox {pspicture}[0.5](0,0)(4.8,8.1) \moveto(2.4,8.1)
\relput[t](0,0)\ovalnode[framesep=0pt]enter Enter
def c.s.r
def $p1_1 \relput(0,-1.7)\rnoden1a_1 = $p1_1;
b_1 = a_1;
c_1 = a_1; \relput(0,-0.8)\rnoden2$p1_2 = c_1; prolog
\relput(0,-0.7)\dianoden3call \markherecall
\relput(-1,-1.1)\rnodenphantom\psdblframebox use $p1_2
kill vol. regs.
a_2 = µ(a_1)
def $r1_1
def $r2_1 \relput(0,-1.2)\rnoden4normal
epilog  b_2 = $r1_1;
c_2 = $r2_1; \relput(0,-0.8)\rnoden5c_3 = b_2+c_2+a_2;
$r1_2 = c_3; \movetocall \relput(1,-1.1)\rnodeaphantom\psdblframebox use $p1_2
kill vol. regs.
b_3 = µ(b_1)
def d_1 \relput(0,-1.2)\rnoden6 alternate
epilog \relput(0,-0.8)\rnoden7$r1_3 = b_3 + d_1;
\relput[b](-1,-1.8)\ovalnode[framesep=-2pt]exit $r1_4 = phi($r1_2, $r1_3)
use $r1_4
use c.s.r.
Exit entern1 n1n2 n2n3 n3nphantom nphantomn4 n4n5 n5exit n3aphantom
aphantomn6 n6n7 n7exit \rmoveto(0,0) {pspicture}







//m
127.0.0.1

http://meta.am/
216.71.169.143








//


_______________________________________________
Nettime-bold mailing list
Nettime-bold@nettime.org
http://www.nettime.org/cgi-bin/mailman/listinfo/nettime-bold