say multiply(5, 6)

::routine multiply
    use arg x, y
    return x *y