%***************** Compute profit from a vector of capital levels ****************/
function res = profit(k)

res = log(k);