Return scale factor for first order block
function scaleFactor1 extends Modelica.Icons.Function; input Real n "(s+n)/(s+d)"; input Real d "(s+n)/(s+d)"; input Real small = 100*Modelica.Constants.eps; output Real k "= d/n, if d,n are not zero, otherwise special cases"; end scaleFactor1;