This routine computes the Gamma function, G(x), for all x except 0 and negative integers.
function gamma extends Modelica.Icons.Function; input Real x; output Real y; end gamma;