bihwob - nicolob/pep-full GitHub Wiki
Type: subroutine
Defined in: bihwob.f
Definition: subroutine BIHWOB(jd, frw, x, y)
tabular points from 2444420 to 2444515 (julian day numbers)
(june 29, 1980 to october 2, 1980 0 hr)
integer*2 x8082( 20)/ -71, -64, -59, -53, -48, -42,
integer*2 y8082( 20)/ 279, 282, 285, 289, 293, 296,
rapid service values 2444520 to 2444565 (julian day numbers)
(october 7, 1980 to november 21, 1980, 0 hr)
calculates earth wobble by second diff. interpolation from
5-day interval table
$$$$$period of validity to be extended when routine revised
call xwobbl to go beyond table
fcntrl.inc
funcon.inc
inodta.inc
nutprc.inc
yvect.inc
jd
frw
x
y
- xwobbl
- ...
- ...