Source code in the transd programming language

#lang transd

MainModule: {
    _start: (λ 
        (textout (max 9 6 2 11 3 4) " ")
        (with v [1, 45, 7, 274, -2, 34]
            (textout (max-element v) " ") 
            (textout (max-element-idx v))
    ))
}