View.Set ("graphics:max,max")

function tax (cost : real) : real

    if cost > 4 then
        result cost * 1.14
    else
        result cost * 1.06
    end if
put "that is alot"

end tax

put tax(9.99):0:2