From fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 Mon Sep 17 00:00:00 2001 From: Joseph Hunkeler Date: Wed, 8 Jul 2015 20:46:52 -0400 Subject: Initial commit --- math/slalib/doc/vn.hlp | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 math/slalib/doc/vn.hlp (limited to 'math/slalib/doc/vn.hlp') diff --git a/math/slalib/doc/vn.hlp b/math/slalib/doc/vn.hlp new file mode 100644 index 00000000..17b7b3ba --- /dev/null +++ b/math/slalib/doc/vn.hlp @@ -0,0 +1,27 @@ +.help vn Jun99 "Slalib Package" +.nf + + SUBROUTINE slVN (V, UV, VM) + + - - - + V N + - - - + + Normalizes a 3-vector also giving the modulus (single precision) + + Given: + V real(3) vector + + Returned: + UV real(3) unit vector in direction of V + VM real modulus of V + + If the modulus of V is zero, UV is set to zero as well + + 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 -- cgit