533   mpz_set (h, a);  in spectral_test()
534   mpz_set (hp, m);  in spectral_test()
537   mpz_set (r, a);  in spectral_test()
590 	  mpz_set (s, tmp1);	/* s = u^2 + v^2 */  in spectral_test()
591 	  mpz_set (hp, h);	/* hp = h */  in spectral_test()
592 	  mpz_set (h, u);	/* h = u */  in spectral_test()
593 	  mpz_set (pp, p);	/* pp = p */  in spectral_test()
594 	  mpz_set (p, v);	/* p = v */  in spectral_test()
609       mpz_set (s, tmp1);	/* s = u^2 + v^2 */  in spectral_test()
610       mpz_set (hp, u);  in spectral_test()
611       mpz_set (pp, v);  in spectral_test()
618   mpz_set (U[0][1], p);  in spectral_test()
620   mpz_set (U[1][1], pp);  in spectral_test()
622   mpz_set (V[0][0], pp);  in spectral_test()
623   mpz_set (V[0][1], hp);  in spectral_test()
646       mpz_set (V[ui_t][ui_t], m); /* V: Last col in new row. */  in spectral_test()
670 	mpz_set (s, tmp1);  in spectral_test()
711 			mpz_set (s, tmp1);  in spectral_test()
794 		mpz_set (s, tmp1);  in spectral_test()