|
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);
==> 9328550649646806586050879370407792273683313858088196200391526919634452410\
9889844387451271811127085665925/10679935179604550411975108530847760573013\
52261178326384973520803911109862890320275011481043468288
|
|