Reverse(L) if L= null or next[L] = null then return L else R <- Reverse(next[L]) next[next[L]] <- L next[L] <- null; Return R