123456789101112131415161718 |
- (
- (let source (DataSource '"yt" '"plato"))
- (let sink (DataSink '"yt" '"plato"))
- (let r (Read! world source (Key '('table (String '"Input"))) (Void) '()))
- (let world (Left! r))
- (let input (Right! r))
- (let world (Write! world sink (Key '('table (String 'Output))) input '('('mode 'append))))
- (let r (Read! world source (Key '('table (String '"Input"))) (Void) '()))
- (let world (Left! r))
- (let input (Right! r))
- (let world (Write! world sink (Key '('table (String 'Output))) input '('('mode 'renew))))
- (let world (Commit! world sink))
- (return world)
- )
|