nroff: getting V.2 man macros for 58lines/page

[kak at asgb.UUCP]

I have been having a terrible time trying to get the 
man macros to work right for 58 lines/page, using the
UNIX V release 2 nroff.  The problem seems to occur
BETWEEN the time a "TH" macro is exited and when the
next item is executed.  I pulled out the TH macro, 
put it in a seperate file, and made up a test case, as shown 
in the fragments below: ( using nroff -can Fix foo.2 | col >foo.t )
------------------------Fix:
.pl 58
F01 \n(.p
.deTH
F02 \n(.p
.pl 58
	.
	.
	.
.ift \{.bd S 3 3
F25 \n(.p
.hy14 \}
F26 \n(.p
..
F27 \n(.p
.pl 58
F28 \n(.p
------------------------------ foo.2
.pl 58
f1 \n(.p
.TH FOO 2 "test page"
f2 \n(.p
.SH NAME
f3 \n(.p
foo \- do foo with stuff
.SH SYNOPSIS
.nf
	.
	.
	.
------------------------------foo.t (output)
	  .
	  .
	  .

     F18 2320 F19 2320 F20 2320
	  F21 2320 F22 2320 F23	2320 F24 2320 F26 2320 f2 2640

     NNNNAAAAMMMMEEEE
	  f3 2640 foo - do foo with stuff
	  .
	  .
	  .

notice that the page length register seems to be fine at the end of the
macro, but is immediately wrong afterward.

Does anybody know how to fix this problem?  Any suggests on how to find 
a solution?

	Kris A. Kugel, ...ihnp4!sdcsvax!bmcg!asgb!kak
	Burroughs ASG
	(303) 530-3905