Exemple #1
0
int
f2c_crotg(complex* CA,
          complex* CB,
          complex* C,
          real* S)
{
    crotg_(CA, CB, C, S);
    return 0;
}
void crotg(complex *A, complex *B, float *C, complex *S)
{
    crotg_(A, B, C, S);
}