doc/external-cwl-workflow.scm


1
2
3
4
5
6
7
8
9
10
11
12

(define echo
  (cwl-workflow "echo.cwl"))

(define string-length
  (command #:inputs file
           #:run "wc" "--chars"
           #:outputs (length #:type stdout)
           #:stdin file))

(workflow ((message #:type string))
  (pipe (echo #:message message)
        (string-length #:file output)))