
% function that returns a FOPTD model with process lag = input
% and gives an approximate initial controller gain kc0
%                                   writen by: Chriss Grimholt


function [gp kc0] = model(tp)

s=tf('s');

gp = 1/(tp*s+1);
        
gp.outputd = 1;        
        
kc0 = tp/2;

end