Lapack documentation: Purpose ======= construct givens plane rotation. =====================================================================
function drotg input Real a; input Real b; output Real c; output Real s; output Real r = a; end drotg;