|
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);
==> 1865710129929361317210322057510562162708718527523839496863278734077262480\
50411994482808890692946129926517/2135987035920910082395021706169552114602\
704522356652769947041607822219725780640550022962086936576
|
|