wtp.gmnl function

Compute Willingness-to-pay