### R code from vignette source 'q32.Rnw'

###################################################
### code chunk number 1: q32.Rnw:25-28
###################################################
options(continue = "  ", digits = 3, width = 60, useFancyQuotes = FALSE)
pv <- packageVersion("PMwR")
pv <- gsub("(.*)[.](.*)", "\\1-\\2", pv)


###################################################
### code chunk number 2: q32.Rnw:42-43
###################################################
require("PMwR")


###################################################
### code chunk number 3: q32.Rnw:54-55
###################################################
quote32(100 + 17.5/32)


###################################################
### code chunk number 4: q32.Rnw:60-63
###################################################
q32("100'105") + 1/32
q32("100'10+") + 1/32
q32("100'10+") + 0.5/32