— Function File: pvl (r, n, p)

Return the present value of an investment that will pay off p in one lump sum at the end of n periods, given the interest rate r.

Note that the rate r is specified as a fraction (i.e., 0.05, not 5 percent).