Public Function myfn(arg As Double) As Double
    myfn = arg + Rnd()
End Function