|  |  D.12.1.4 wurzel Procedure from libraryaksaka.lib(see  aksaka_lib).
 
Example:Usage:
wurzel(r);
Assume:
characteristic of basering is 0, r>=0
Return:
number, square root of r
 |  | LIB "aksaka.lib";
ring R = 0,x,dp;
wurzel(7629412809180100);
==> 3441627728253432342460123298897595164661535507549430119821503875373993001\
   950914732024064729050404203240063089015829737039655/394020061963944792122\
   7904010014361380507973927046544666794829340424572177149721061141426625488\
   4915640806627990306816
 | 
 
 |