Added string_join example
This commit is contained in:
parent
1fdda010eb
commit
84de156184
|
@ -0,0 +1,11 @@
|
|||
?(?-) (This example joins two tokens.)
|
||||
|
||||
<> (join (?a) (?*)) (join reverse (?a) List (?*))
|
||||
<> (join List () List ?*) (?*)
|
||||
<> (join List (?x ?y) List ?z) (join List ?y List (?x ?z))
|
||||
|
||||
<> (reverse List ()) (List)
|
||||
<> (reverse (?*)) (reverse List (?*) ())
|
||||
<> (reverse List (?x ?y) ?z) (reverse List ?y (?x ?z))
|
||||
|
||||
join (foo) (bar)
|
Loading…
Reference in New Issue