nk1=-1 for first observation of series, used for saved
partials logic.  nk1 set = 0 at end of first call to partl
for a series and further incremented in fermtr for proper
handling of quasi-vlbi partials

determine klans1 for a second observed body (ncodf.gt.20)
klans1 is largely a flag to indicate tape reading
for a second object - the object itself is nps1
note:  there are two other ways to set up klans1.
(1) ncodf=7,8,9,13,14, spot names second object.
see below at label=1460
(2) ksite.gt.0, second object is on planet ksite
(this logic works only for ncodf=1,2,3,4,5,6,
19, and 20.)
see below at label=1400