You are not logged in.
Pages: 1
{ sgn=((z)->iferr(sign(z),E,my(r=norm(z)^(1/2));if(r,z/r,0),errname(E)=="e_TYPE")); csgn=((z)->lex(z,0)); }
Elliptic functionsQuaternions
Last edited by lanxiyu (Today 15:31:06)
Offline