Nächste |
|
Peter Pein schrieb:
> ...
> Wie dem auch sei, ich schlage
>
> Clear@mo;
> mo[z_]:=If[FreeQ[z,Power[2,Rational[1,2]]],Mod[z,5],
> z/.a_. + b_.*Sqrt[2] :> Mod[{a,b},5].{1,Sqrt[2]}]
> vor.
> ...
Dies hat mich dermaßen verwirrt, dass ich nicht mehr an
mo=Mod[#,5]&
dachte.
.. das Alter ....
|
Nächste |