|
D.12.1.4 wurzel
Procedure from library aksaka.lib (see aksaka_lib).
- Usage:
- wurzel(r);
- Assume:
- characteristic of basering is 0, r>=0
- Return:
- number, square root of r
Example:
| LIB "aksaka.lib";
ring R = 0,x,dp;
wurzel(7629412809180100);
==> 3441627728253432342460392959727860033763217944264409977345966987271065114\
312760850623650284932735229349074748323911534788709/394020061963947488731\
0930496924529625235904640577500136590247553938718380047885857477203365136\
5116713597626097705736
|
|