P-Adic numbers, basic: Difference between revisions

m
no edit summary
mNo edit summary
mNo edit summary
Line 278:
sub padic.add (byref a as padic, byref b as padic)
dim i as integer, r as padic
dim as long q, c = 0
with r
.v = min(a.v, b.v)
Line 293:
sub padic.cmpt (byref a as padic)
dim i as integer, r as padic
dim as long q, c = 1
with r
.v = a.v