diff options
| author | Joe Hunkeler <jhunkeler@gmail.com> | 2015-08-11 16:51:37 -0400 |
|---|---|---|
| committer | Joe Hunkeler <jhunkeler@gmail.com> | 2015-08-11 16:51:37 -0400 |
| commit | 40e5a5811c6ffce9b0974e93cdd927cbcf60c157 (patch) | |
| tree | 4464880c571602d54f6ae114729bf62a89518057 /math/slalib/doc/kbj.hlp | |
| download | iraf-osx-40e5a5811c6ffce9b0974e93cdd927cbcf60c157.tar.gz | |
Repatch (from linux) of OSX IRAF
Diffstat (limited to 'math/slalib/doc/kbj.hlp')
| -rw-r--r-- | math/slalib/doc/kbj.hlp | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/math/slalib/doc/kbj.hlp b/math/slalib/doc/kbj.hlp new file mode 100644 index 00000000..519868a7 --- /dev/null +++ b/math/slalib/doc/kbj.hlp @@ -0,0 +1,28 @@ +.help kbj Jun99 "Slalib Package" +.nf + + SUBROUTINE slKBJ (JB, E, K, J) + + - - - - + K B J + - - - - + + Select epoch prefix 'B' or 'J' + + Given: + JB int slDBJI prefix status: 0=none, 1='B', 2='J' + E dp epoch - Besselian or Julian + + Returned: + K char 'B' or 'J' + J int status: 0=OK + + If JB=0, B is assumed for E < 1984D0, otherwise J. + + P.T.Wallace Starlink 31 July 1989 + + Copyright (C) 1995 Rutherford Appleton Laboratory + Copyright (C) 1995 Association of Universities for Research in Astronomy Inc. + +.fi +.endhelp |