vpr calc