Random number simulation in R

I have been going through some random number simulation equations while i found out that as Pareto dosent have an inbuilt function. RPareto is found as

rpareto <- function(n,a,l){
rp <- l*((1-runif(n))^(-1/a)-1)
rp
}

can someone explain the intuitive meaning behind this.