SCALAPACK 2.2.2
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches

◆ pgcd()

Int pgcd ( Int  a,
Int  b 
)

Definition at line 120 of file pgemraux.c.

121{
122 Int aux;
123 if (a < b)
124 return pgcd(b, a);
125 else {
126 aux = a % b;
127 if (aux == 0)
128 return b;
129 else
130 return pgcd(b, aux);
131 }
132}
#define Int
Definition Bconfig.h:22
Int pgcd(Int a, Int b)
Definition pgemraux.c:120
Here is the call graph for this function:
Here is the caller graph for this function: