function [psi] = Steadypsi(c, k, ki, h, theta, phi)
%UNTITLED7 Summary of this function goes here

psi = (c*(1-theta-phi)*(k^theta)*(ki^phi))/((h^(theta+phi))*(1-h));


end