|
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);
==> 3441627728253432342460123298897595164661535507549430119821503875373993001\
950914732024064729050404203240063089015829737039655/394020061963944792122\
7904010014361381564406654825053825400540342702533768187927301888970262525\
6103703372648906289928
|
|