; File: simple_routine.pro
; Author: Erik Brisson

function foo, x
    x = 2 * x
    return, max(x)
end     

pro simple
    x = [1, 2]
    print, x
    y = foo(x)
    print, x
    print, y
end