function r = gasconstant
% GASCONSTANT  Get the universal gas constant in J/kmol-K.
% r = gasconstant
% :return:
%     The universal gas constant in J/kmol-K.
%

r = 8314.4621;