|
 |
 |
 |
 |
 |
 |
 |
 |
 |
D.12.2.13 wUnit
Procedure from libraryatkins.lib (see atkins_lib).
- Usage:
- wUnit(D);
- Return:
- the number of roots of unity in the quadratic order of discriminant D
- Assume:
- D<0 a discriminant kongruent to 0 or 1 modulo 4
LIB "atkins.lib"; bigint D=-3; wUnit(D); ==> 6 |