Host-004.lan 2025-5-15:14:21:59

This commit is contained in:
oskar 2025-05-15 14:21:59 +02:00
parent 4198d7b94d
commit d1b2560949

View File

@ -35,13 +35,13 @@ procedure ORDREK(x,y,v)
end if end if
y=x y=x
while y<n do while y<n do
y=y+1 y=y+1
if deg[y] <k then if deg[y] <k then
INSERT(x,y) INSERT(x,y)
ORDREK(x,y,v) ORDREK(x,y,v)
DELETE(x,y) DELETE(x,y)
end if end if
end while end while
return return
end procedure end procedure
``` ```