PPT Slide

FLATTEN

/* FLATTEN ( Listin, Listout ) */

flatten3( [ ] , [ ] ) .

flatten3( [ X | Xs ] , Y ) : -

flatten3( X , XF ) ,

flatten3( Xs , XsF ) .

append3( XF , XsF , Y ) .

flatten3( X , [ X ] ) .

| ? - flatten3( [ [ a , b ] , c , [ d , [ e , f ] ] ] , Q1 ) .

| ? - flatten3( [ [ a , b ] , [ ] , c ] , Q2 ) .

P.34

Previous slide

Back to first slide

View graphic version