aboutsummaryrefslogtreecommitdiff
path: root/math/slalib/doc/dbjin.hlp
diff options
context:
space:
mode:
authorJoe Hunkeler <jhunkeler@gmail.com>2015-08-11 16:51:37 -0400
committerJoe Hunkeler <jhunkeler@gmail.com>2015-08-11 16:51:37 -0400
commit40e5a5811c6ffce9b0974e93cdd927cbcf60c157 (patch)
tree4464880c571602d54f6ae114729bf62a89518057 /math/slalib/doc/dbjin.hlp
downloadiraf-osx-40e5a5811c6ffce9b0974e93cdd927cbcf60c157.tar.gz
Repatch (from linux) of OSX IRAF
Diffstat (limited to 'math/slalib/doc/dbjin.hlp')
-rw-r--r--math/slalib/doc/dbjin.hlp52
1 files changed, 52 insertions, 0 deletions
diff --git a/math/slalib/doc/dbjin.hlp b/math/slalib/doc/dbjin.hlp
new file mode 100644
index 00000000..017333dd
--- /dev/null
+++ b/math/slalib/doc/dbjin.hlp
@@ -0,0 +1,52 @@
+.help dbjin Jun99 "Slalib Package"
+.nf
+
+ SUBROUTINE slDBJI (STRING, NSTRT, DRESLT, J1, J2)
+
+ - - - - - -
+ D B J I
+ - - - - - -
+
+ Convert free-format input into double precision floating point,
+ using DFLTIN but with special syntax extensions.
+
+ The purpose of the syntax extensions is to help cope with mixed
+ FK4 and FK5 data. In addition to the syntax accepted by DFLTIN,
+ the following two extensions are recognized by DBJIN:
+
+ 1) A valid non-null field preceded by the character 'B'
+ (or 'b') is accepted.
+
+ 2) A valid non-null field preceded by the character 'J'
+ (or 'j') is accepted.
+
+ The calling program is notified of the incidence of either of these
+ extensions through an supplementary status argument. The rest of
+ the arguments are as for DFLTIN.
+
+ Given:
+ STRING char string containing field to be decoded
+ NSTRT int pointer to 1st character of field in string
+
+ Returned:
+ NSTRT int incremented
+ DRESLT double result
+ J1 int DFLTIN status: -1 = -OK
+ 0 = +OK
+ +1 = null field
+ +2 = error
+ J2 int syntax flag: 0 = normal DFLTIN syntax
+ +1 = 'B' or 'b'
+ +2 = 'J' or 'j'
+
+ Called: slDFLI
+
+ For details of the basic syntax, see slDFLI.
+
+ P.T.Wallace Starlink 23 November 1995
+
+ Copyright (C) 1995 Rutherford Appleton Laboratory
+ Copyright (C) 1995 Association of Universities for Research in Astronomy Inc.
+
+.fi
+.endhelp