pf/pf.ss
#lang scheme/base

(define-struct pf (free p k))