PPT Slide

cas = ys

| v :: vr => let var ur in

it = v :: ur;

append(vr,ws,ur)

end

::

::

::

::

1

2

3

[]

(vs,ws,us) =>

case vs of []

=> us = ws

| v :: vr

=> let var ur in

us = v :: ur;

append(vr,ws,ur)

end

it

Previous slide

Next slide

Back to first slide

View graphic version