f <- function( x){
        x + rnorm(1)
}

g <- function(x){}
h <- function(x){}