diff --git a/.deps/sla.Plo b/.deps/sla.Plo index fd3c40b5559a461a3be9b2588969623133c67ab7..6e9e4821f1a5961e60ca99bbdb9c6ea8a06ae6c6 100644 --- a/.deps/sla.Plo +++ b/.deps/sla.Plo @@ -2,7 +2,7 @@ sla.lo: sla.c /usr/include/stdc-predef.h f77.h /usr/include/stdlib.h \ /usr/include/features.h /usr/include/sys/cdefs.h \ /usr/include/bits/wordsize.h /usr/include/gnu/stubs.h \ /usr/include/gnu/stubs-64.h \ - /pbs/software/x86_64_el7/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/include/stddef.h \ + /usr/lib/gcc/x86_64-redhat-linux/4.8.5/include/stddef.h \ /usr/include/bits/waitflags.h /usr/include/bits/waitstatus.h \ /usr/include/endian.h /usr/include/bits/endian.h \ /usr/include/bits/byteswap.h /usr/include/bits/types.h \ @@ -35,7 +35,7 @@ f77.h: /usr/include/gnu/stubs-64.h: -/pbs/software/x86_64_el7/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/include/stddef.h: +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/include/stddef.h: /usr/include/bits/waitflags.h: diff --git a/.gitlab-ci.yml b/.gitlab-ci.yml index 415e26b7ad45fa43dd0e2d98e0630eba1d76ef2e..8e0084f4e33f2c50cf051d7b7d7361113922cbe2 100644 --- a/.gitlab-ci.yml +++ b/.gitlab-ci.yml @@ -1,5 +1,5 @@ image: docker.km3net.de/base/centos-full:7 build: script: - - ./configure + - ./configure --without-stardocs - make clean && make diff --git a/README.md b/README.md index bf21042e55fdac0182f868ae89b663312e8fb146..128bb9587a3fa6c4ebdde374d457b63030fb4f06 100644 --- a/README.md +++ b/README.md @@ -8,6 +8,6 @@ They needed for GENHEN installation. To compile type - ./compile + ./compile --without-stardocs make diff --git a/config.log b/config.log index 743710e5cdaa7160e083c8ab6aa22840ccfa0c83..9c6d15db20c05760929430e845f23120c5e3a973 100644 --- a/config.log +++ b/config.log @@ -4,17 +4,17 @@ running configure, to aid debugging if configure makes a mistake. It was created by sla configure 2.5-4, which was generated by Starlink Autoconf 2.59. Invocation command line was - $ ./configure + $ ./configure --without-stardocs ## --------- ## ## Platform. ## ## --------- ## -hostname = cca008 +hostname = b3ff940482a4 uname -m = x86_64 -uname -r = 3.10.0-957.1.3.el7.x86_64 +uname -r = 4.9.93-linuxkit-aufs uname -s = Linux -uname -v = #1 SMP Thu Nov 29 14:49:43 UTC 2018 +uname -v = #1 SMP Wed Jun 6 16:55:56 UTC 2018 /usr/bin/uname -p = x86_64 /bin/uname -X = unknown @@ -27,38 +27,13 @@ hostinfo = unknown /usr/bin/oslevel = unknown /bin/universe = unknown -PATH: /pbs/software/centos-7-x86_64/root/5.34.23//bin -PATH: /afs/in2p3.fr/cernlib/@sys/pro/bin -PATH: /sps/km3net/users/kulikovs/data_processing/genhentrunk -PATH: /afs/in2p3.fr/cernlib/@sys/pro/bin -PATH: /sps/km3net/users/kulikovs/data_processing/genhentrunk -PATH: /sps/km3net/users/kulikovs/.pyenv/shims -PATH: /sps/km3net/users/kulikovs/.pyenv/bin -PATH: /pbs/software/x86_64_el7/gcc/5.5.0/bin -PATH: /pbs/throng/km3net/share/geant/v10.01.p03/bin -PATH: /afs/in2p3.fr/throng/km3net/i3-tools/root-v5.28.00c//bin -PATH: /pbs/throng/km3net/bin -PATH: /afs/in2p3.fr/throng/km3net/i3-tools/root-v5.28.00c//bin -PATH: /opt/sge/bin/lx-amd64 -PATH: /usr/afsws/bin -PATH: /opt/bin -PATH: /opt/treqs2-client//prod/bin -PATH: /pbs/software/centos-7-x86_64/shift/prod/bin -PATH: /pbs/software/centos-7-x86_64/oracle/12.2.0/instantclient/bin -PATH: /pbs/software/centos-7-x86_64/ninja/1.8.2/bin -PATH: /pbs/software/centos-7-x86_64/curl/7.60.0/bin -PATH: /pbs/software/centos-7-x86_64/cmake/3.11.0/bin -PATH: /usr/lib64/qt-3.3/bin -PATH: /opt/puppetlabs/bin -PATH: /opt/dell/srvadmin/bin +PATH: /usr/local/root/bin +PATH: /usr/local/sbin +PATH: /usr/local/bin PATH: /usr/sbin PATH: /usr/bin PATH: /sbin PATH: /bin -PATH: /usr/local/bin -PATH: /usr/local/shared/bin -PATH: /pbs/home/k/kulikovs/bin -PATH: . ## ----------- ## @@ -79,11 +54,11 @@ configure:2018: result: x86_64-unknown-linux-gnu configure:2038: checking for style of include used by make configure:2066: result: GNU configure:2137: checking for gcc -configure:2153: found /pbs/software/x86_64_el7/gcc/5.5.0/bin/gcc +configure:2153: found /usr/bin/gcc configure:2163: result: gcc configure:2407: checking for C compiler version configure:2410: gcc --version </dev/null >&5 -gcc (GCC) 5.5.0 +gcc (GCC) 4.8.5 20150623 (Red Hat 4.8.5-36) Copyright (C) 2015 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. @@ -92,17 +67,17 @@ configure:2413: $? = 0 configure:2415: gcc -v </dev/null >&5 Using built-in specs. COLLECT_GCC=gcc -COLLECT_LTO_WRAPPER=/pbs/software/x86_64_el7/gcc/5.5.0/libexec/gcc/x86_64-unknown-linux-gnu/5.5.0/lto-wrapper -Target: x86_64-unknown-linux-gnu -Configured with: ../configure --prefix=/pbs/software/centos-7-x86_64/gcc/5.5.0 --enable-shared --enable-threads=posix --disable-multilib +COLLECT_LTO_WRAPPER=/usr/libexec/gcc/x86_64-redhat-linux/4.8.5/lto-wrapper +Target: x86_64-redhat-linux +Configured with: ../configure --prefix=/usr --mandir=/usr/share/man --infodir=/usr/share/info --with-bugurl=http://bugzilla.redhat.com/bugzilla --enable-bootstrap --enable-shared --enable-threads=posix --enable-checking=release --with-system-zlib --enable-__cxa_atexit --disable-libunwind-exceptions --enable-gnu-unique-object --enable-linker-build-id --with-linker-hash-style=gnu --enable-languages=c,c++,objc,obj-c++,java,fortran,ada,go,lto --enable-plugin --enable-initfini-array --disable-libgcj --with-isl=/builddir/build/BUILD/gcc-4.8.5-20150702/obj-x86_64-redhat-linux/isl-install --with-cloog=/builddir/build/BUILD/gcc-4.8.5-20150702/obj-x86_64-redhat-linux/cloog-install --enable-gnu-indirect-function --with-tune=generic --with-arch_32=x86-64 --build=x86_64-redhat-linux Thread model: posix -gcc version 5.5.0 (GCC) +gcc version 4.8.5 20150623 (Red Hat 4.8.5-36) (GCC) configure:2418: $? = 0 configure:2420: gcc -V </dev/null >&5 gcc: error: unrecognized command line option '-V' gcc: fatal error: no input files compilation terminated. -configure:2423: $? = 1 +configure:2423: $? = 4 configure:2446: checking for C compiler default output file name configure:2449: gcc conftest.c >&5 configure:2452: $? = 0 @@ -218,8 +193,7 @@ configure:3489: Starlink tree located at /home/vmwareshare/rhel30linux_i386/buil configure:3563: checking whether we need any library fixups configure:3690: result: no configure:3801: checking for pax -configure:3819: found /usr/bin/pax -configure:3831: result: /usr/bin/pax +configure:3834: result: no configure:3842: checking for gnutar configure:3875: result: no configure:3842: checking for tar @@ -263,6 +237,8 @@ configure:4225: gcc -E conftest.c configure:4231: $? = 0 configure:4263: gcc -E conftest.c conftest.c:11:28: fatal error: ac_nonexistent.h: No such file or directory + #include <ac_nonexistent.h> + ^ compilation terminated. configure:4269: $? = 1 configure: failed program was: @@ -282,6 +258,8 @@ configure:4332: gcc -E conftest.c configure:4338: $? = 0 configure:4370: gcc -E conftest.c conftest.c:11:28: fatal error: ac_nonexistent.h: No such file or directory + #include <ac_nonexistent.h> + ^ compilation terminated. configure:4376: $? = 1 configure: failed program was: @@ -395,15 +373,9 @@ configure:6952: test -s conftest.o configure:6955: $? = 0 configure:7044: gcc -o conftest -g -O2 conftest.c >&5 conftest.c: In function 'main': -conftest.c:28:7: warning: implicit declaration of function 'exit' [-Wimplicit-function-declaration] +conftest.c:28:7: warning: incompatible implicit declaration of built-in function 'exit' [enabled by default] exit(2); ^ -conftest.c:28:7: warning: incompatible implicit declaration of built-in function 'exit' -conftest.c:28:7: note: include '<stdlib.h>' or provide a declaration of 'exit' -conftest.c:29:3: warning: incompatible implicit declaration of built-in function 'exit' - exit (0); - ^ -conftest.c:29:3: note: include '<stdlib.h>' or provide a declaration of 'exit' configure:7047: $? = 0 configure:7049: ./conftest configure:7052: $? = 0 @@ -505,11 +477,11 @@ configure:7244: result: yes configure:7279: checking for dlfcn.h configure:7286: result: yes configure:7351: checking for g++ -configure:7367: found /pbs/software/x86_64_el7/gcc/5.5.0/bin/g++ +configure:7367: found /usr/bin/g++ configure:7377: result: g++ configure:7393: checking for C++ compiler version configure:7396: g++ --version </dev/null >&5 -g++ (GCC) 5.5.0 +g++ (GCC) 4.8.5 20150623 (Red Hat 4.8.5-36) Copyright (C) 2015 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. @@ -518,17 +490,17 @@ configure:7399: $? = 0 configure:7401: g++ -v </dev/null >&5 Using built-in specs. COLLECT_GCC=g++ -COLLECT_LTO_WRAPPER=/pbs/software/x86_64_el7/gcc/5.5.0/libexec/gcc/x86_64-unknown-linux-gnu/5.5.0/lto-wrapper -Target: x86_64-unknown-linux-gnu -Configured with: ../configure --prefix=/pbs/software/centos-7-x86_64/gcc/5.5.0 --enable-shared --enable-threads=posix --disable-multilib +COLLECT_LTO_WRAPPER=/usr/libexec/gcc/x86_64-redhat-linux/4.8.5/lto-wrapper +Target: x86_64-redhat-linux +Configured with: ../configure --prefix=/usr --mandir=/usr/share/man --infodir=/usr/share/info --with-bugurl=http://bugzilla.redhat.com/bugzilla --enable-bootstrap --enable-shared --enable-threads=posix --enable-checking=release --with-system-zlib --enable-__cxa_atexit --disable-libunwind-exceptions --enable-gnu-unique-object --enable-linker-build-id --with-linker-hash-style=gnu --enable-languages=c,c++,objc,obj-c++,java,fortran,ada,go,lto --enable-plugin --enable-initfini-array --disable-libgcj --with-isl=/builddir/build/BUILD/gcc-4.8.5-20150702/obj-x86_64-redhat-linux/isl-install --with-cloog=/builddir/build/BUILD/gcc-4.8.5-20150702/obj-x86_64-redhat-linux/cloog-install --enable-gnu-indirect-function --with-tune=generic --with-arch_32=x86-64 --build=x86_64-redhat-linux Thread model: posix -gcc version 5.5.0 (GCC) +gcc version 4.8.5 20150623 (Red Hat 4.8.5-36) (GCC) configure:7404: $? = 0 configure:7406: g++ -V </dev/null >&5 g++: error: unrecognized command line option '-V' g++: fatal error: no input files compilation terminated. -configure:7409: $? = 1 +configure:7409: $? = 4 configure:7412: checking whether we are using the GNU C++ compiler configure:7436: g++ -c conftest.cc >&5 configure:7442: $? = 0 @@ -690,6 +662,8 @@ configure:7804: g++ -E conftest.cc configure:7810: $? = 0 configure:7842: g++ -E conftest.cc conftest.cc:25:28: fatal error: ac_nonexistent.h: No such file or directory + #include <ac_nonexistent.h> + ^ compilation terminated. configure:7848: $? = 1 configure: failed program was: @@ -723,6 +697,8 @@ configure:7911: g++ -E conftest.cc configure:7917: $? = 0 configure:7949: g++ -E conftest.cc conftest.cc:25:28: fatal error: ac_nonexistent.h: No such file or directory + #include <ac_nonexistent.h> + ^ compilation terminated. configure:7955: $? = 1 configure: failed program was: @@ -856,7 +832,7 @@ configure:9183: checking if gcc static flag works configure:9211: result: yes configure:9229: checking if gcc supports -fno-rtti -fno-exceptions configure:9247: gcc -c -g -O2 -fno-rtti -fno-exceptions conftest.c >&5 -cc1: warning: command line option '-fno-rtti' is valid for C++/ObjC++ but not for C +cc1: warning: command line option '-fno-rtti' is valid for C++/ObjC++ but not for C [enabled by default] configure:9251: $? = 0 configure:9264: result: no configure:9279: checking for gcc option to produce PIC @@ -979,7 +955,7 @@ Configured with: ../configure --prefix=/usr --mandir=/usr/share/man --infodir=/u Thread model: posix gcc version 4.8.5 20150623 (Red Hat 4.8.5-36) (GCC) COLLECT_GCC_OPTIONS='-o' 'conftest' '-g' '-O2' '-v' '-shared-libgcc' '-mtune=generic' '-march=x86-64' - /usr/libexec/gcc/x86_64-redhat-linux/4.8.5/f951 conftest.f -ffixed-form -quiet -dumpbase conftest.f -mtune=generic -march=x86-64 -auxbase conftest -g -O2 -version -fintrinsic-modules-path /usr/lib/gcc/x86_64-redhat-linux/4.8.5/finclude -o /scratch/users/k/kulikovs/cch15JNH.s + /usr/libexec/gcc/x86_64-redhat-linux/4.8.5/f951 conftest.f -ffixed-form -quiet -dumpbase conftest.f -mtune=generic -march=x86-64 -auxbase conftest -g -O2 -version -fintrinsic-modules-path /usr/lib/gcc/x86_64-redhat-linux/4.8.5/finclude -o /tmp/ccFA7DUQ.s GNU Fortran (GCC) version 4.8.5 20150623 (Red Hat 4.8.5-36) (x86_64-redhat-linux) compiled by GNU C version 4.8.5 20150623 (Red Hat 4.8.5-36), GMP version 6.0.0, MPFR version 3.1.1, MPC version 1.0.1 GGC heuristics: --param ggc-min-expand=100 --param ggc-min-heapsize=131072 @@ -987,15 +963,15 @@ GNU Fortran (GCC) version 4.8.5 20150623 (Red Hat 4.8.5-36) (x86_64-redhat-linux compiled by GNU C version 4.8.5 20150623 (Red Hat 4.8.5-36), GMP version 6.0.0, MPFR version 3.1.1, MPC version 1.0.1 GGC heuristics: --param ggc-min-expand=100 --param ggc-min-heapsize=131072 COLLECT_GCC_OPTIONS='-o' 'conftest' '-g' '-O2' '-v' '-shared-libgcc' '-mtune=generic' '-march=x86-64' - as -v --64 -o /scratch/users/k/kulikovs/ccLeRNYq.o /scratch/users/k/kulikovs/cch15JNH.s -GNU assembler version 2.27 (x86_64-redhat-linux) using BFD version version 2.27-34.base.el7 + as -v --64 -o /tmp/ccufW89t.o /tmp/ccFA7DUQ.s +GNU assembler version 2.25.1 (x86_64-redhat-linux) using BFD version version 2.25.1-31.base.el7 Reading specs from /usr/lib/gcc/x86_64-redhat-linux/4.8.5/libgfortran.spec rename spec lib to liborig COLLECT_GCC_OPTIONS='-o' 'conftest' '-g' '-O2' '-v' '-shared-libgcc' '-mtune=generic' '-march=x86-64' -COMPILER_PATH=/usr/libexec/gcc/x86_64-redhat-linux/4.8.5/:/usr/libexec/gcc/x86_64-redhat-linux/:/usr/lib/gcc/x86_64-redhat-linux/4.8.5/:/usr/lib/gcc/x86_64-redhat-linux/ +COMPILER_PATH=/usr/libexec/gcc/x86_64-redhat-linux/4.8.5/:/usr/libexec/gcc/x86_64-redhat-linux/4.8.5/:/usr/libexec/gcc/x86_64-redhat-linux/:/usr/lib/gcc/x86_64-redhat-linux/4.8.5/:/usr/lib/gcc/x86_64-redhat-linux/ LIBRARY_PATH=/usr/lib/gcc/x86_64-redhat-linux/4.8.5/:/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/:/lib/../lib64/:/usr/lib/../lib64/:/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../:/lib/:/usr/lib/ COLLECT_GCC_OPTIONS='-o' 'conftest' '-g' '-O2' '-v' '-shared-libgcc' '-mtune=generic' '-march=x86-64' - /usr/libexec/gcc/x86_64-redhat-linux/4.8.5/collect2 --build-id --no-add-needed --eh-frame-hdr --hash-style=gnu -m elf_x86_64 -dynamic-linker /lib64/ld-linux-x86-64.so.2 -o conftest /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crti.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtbegin.o -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. /scratch/users/k/kulikovs/ccLeRNYq.o -lgfortran -lm -lgcc_s -lgcc -lquadmath -lm -lgcc_s -lgcc -lc -lgcc_s -lgcc /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtend.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crtn.o + /usr/libexec/gcc/x86_64-redhat-linux/4.8.5/collect2 --build-id --no-add-needed --eh-frame-hdr --hash-style=gnu -m elf_x86_64 -dynamic-linker /lib64/ld-linux-x86-64.so.2 -o conftest /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crti.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtbegin.o -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. /tmp/ccufW89t.o -lgfortran -lm -lgcc_s -lgcc -lquadmath -lm -lgcc_s -lgcc -lc -lgcc_s -lgcc /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtend.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crtn.o configure:22856: result: -v configure:22858: checking for Fortran libraries of f95 configure:22879: f95 -o conftest -g -O2 -v conftest.f >&5 @@ -1007,7 +983,7 @@ Configured with: ../configure --prefix=/usr --mandir=/usr/share/man --infodir=/u Thread model: posix gcc version 4.8.5 20150623 (Red Hat 4.8.5-36) (GCC) COLLECT_GCC_OPTIONS='-o' 'conftest' '-g' '-O2' '-v' '-shared-libgcc' '-mtune=generic' '-march=x86-64' - /usr/libexec/gcc/x86_64-redhat-linux/4.8.5/f951 conftest.f -ffixed-form -quiet -dumpbase conftest.f -mtune=generic -march=x86-64 -auxbase conftest -g -O2 -version -fintrinsic-modules-path /usr/lib/gcc/x86_64-redhat-linux/4.8.5/finclude -o /scratch/users/k/kulikovs/cc6r5pzT.s + /usr/libexec/gcc/x86_64-redhat-linux/4.8.5/f951 conftest.f -ffixed-form -quiet -dumpbase conftest.f -mtune=generic -march=x86-64 -auxbase conftest -g -O2 -version -fintrinsic-modules-path /usr/lib/gcc/x86_64-redhat-linux/4.8.5/finclude -o /tmp/ccy1UbsX.s GNU Fortran (GCC) version 4.8.5 20150623 (Red Hat 4.8.5-36) (x86_64-redhat-linux) compiled by GNU C version 4.8.5 20150623 (Red Hat 4.8.5-36), GMP version 6.0.0, MPFR version 3.1.1, MPC version 1.0.1 GGC heuristics: --param ggc-min-expand=100 --param ggc-min-heapsize=131072 @@ -1015,19 +991,19 @@ GNU Fortran (GCC) version 4.8.5 20150623 (Red Hat 4.8.5-36) (x86_64-redhat-linux compiled by GNU C version 4.8.5 20150623 (Red Hat 4.8.5-36), GMP version 6.0.0, MPFR version 3.1.1, MPC version 1.0.1 GGC heuristics: --param ggc-min-expand=100 --param ggc-min-heapsize=131072 COLLECT_GCC_OPTIONS='-o' 'conftest' '-g' '-O2' '-v' '-shared-libgcc' '-mtune=generic' '-march=x86-64' - as -v --64 -o /scratch/users/k/kulikovs/cczBuPgD.o /scratch/users/k/kulikovs/cc6r5pzT.s -GNU assembler version 2.27 (x86_64-redhat-linux) using BFD version version 2.27-34.base.el7 + as -v --64 -o /tmp/ccQRBLOA.o /tmp/ccy1UbsX.s +GNU assembler version 2.25.1 (x86_64-redhat-linux) using BFD version version 2.25.1-31.base.el7 Reading specs from /usr/lib/gcc/x86_64-redhat-linux/4.8.5/libgfortran.spec rename spec lib to liborig COLLECT_GCC_OPTIONS='-o' 'conftest' '-g' '-O2' '-v' '-shared-libgcc' '-mtune=generic' '-march=x86-64' -COMPILER_PATH=/usr/libexec/gcc/x86_64-redhat-linux/4.8.5/:/usr/libexec/gcc/x86_64-redhat-linux/:/usr/lib/gcc/x86_64-redhat-linux/4.8.5/:/usr/lib/gcc/x86_64-redhat-linux/ +COMPILER_PATH=/usr/libexec/gcc/x86_64-redhat-linux/4.8.5/:/usr/libexec/gcc/x86_64-redhat-linux/4.8.5/:/usr/libexec/gcc/x86_64-redhat-linux/:/usr/lib/gcc/x86_64-redhat-linux/4.8.5/:/usr/lib/gcc/x86_64-redhat-linux/ LIBRARY_PATH=/usr/lib/gcc/x86_64-redhat-linux/4.8.5/:/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/:/lib/../lib64/:/usr/lib/../lib64/:/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../:/lib/:/usr/lib/ COLLECT_GCC_OPTIONS='-o' 'conftest' '-g' '-O2' '-v' '-shared-libgcc' '-mtune=generic' '-march=x86-64' - /usr/libexec/gcc/x86_64-redhat-linux/4.8.5/collect2 --build-id --no-add-needed --eh-frame-hdr --hash-style=gnu -m elf_x86_64 -dynamic-linker /lib64/ld-linux-x86-64.so.2 -o conftest /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crti.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtbegin.o -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. /scratch/users/k/kulikovs/cczBuPgD.o -lgfortran -lm -lgcc_s -lgcc -lquadmath -lm -lgcc_s -lgcc -lc -lgcc_s -lgcc /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtend.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crtn.o + /usr/libexec/gcc/x86_64-redhat-linux/4.8.5/collect2 --build-id --no-add-needed --eh-frame-hdr --hash-style=gnu -m elf_x86_64 -dynamic-linker /lib64/ld-linux-x86-64.so.2 -o conftest /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crti.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtbegin.o -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. /tmp/ccQRBLOA.o -lgfortran -lm -lgcc_s -lgcc -lquadmath -lm -lgcc_s -lgcc -lc -lgcc_s -lgcc /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtend.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crtn.o configure:23040: result: -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath configure:23055: checking for alternate main to link with Fortran libraries configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1073,7 +1049,7 @@ configure: failed program was: | return 0; | } configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1119,7 +1095,7 @@ configure: failed program was: | return 0; | } configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1165,7 +1141,7 @@ configure: failed program was: | return 0; | } configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1211,7 +1187,7 @@ configure: failed program was: | return 0; | } configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1257,7 +1233,7 @@ configure: failed program was: | return 0; | } configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1303,7 +1279,7 @@ configure: failed program was: | return 0; | } configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1349,7 +1325,7 @@ configure: failed program was: | return 0; | } configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1395,7 +1371,7 @@ configure: failed program was: | return 0; | } configure:23092: gcc -o conftest -g -O2 conftest.c -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath >&5 -/lib/../lib64/crt1.o: In function `_start': +/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crt1.o: In function `_start': (.text+0x20): undefined reference to `main' collect2: error: ld returned 1 exit status configure:23098: $? = 1 @@ -1446,9 +1422,10 @@ configure:23258: result: -v configure:23260: checking for Fortran libraries of f95 configure:23442: result: -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath configure:23461: checking if f95 is in strict f2c compatible mode -configure:23541: result: no +configure:23541: result: configure:23572: checking for star2html configure:23604: result: star2html +configure:23618: WARNING: not installing docs sun67 configure:23749: creating ./config.status ## ---------------------- ## @@ -1464,7 +1441,7 @@ generated by Starlink Autoconf 2.59. Invocation command line was CONFIG_COMMANDS = $ ./config.status -on cca008 +on b3ff940482a4 config.status:762: creating Makefile config.status:762: creating component.xml @@ -1542,7 +1519,6 @@ ac_cv_header_unistd_h=yes ac_cv_host=x86_64-unknown-linux-gnu ac_cv_host_alias=x86_64-unknown-linux-gnu ac_cv_objext=o -ac_cv_path_PAX=/usr/bin/pax ac_cv_path_STAR2HTML=star2html ac_cv_path_TAR=/usr/bin/tar ac_cv_path_install='/usr/bin/install -c' @@ -1603,22 +1579,22 @@ lt_lt_cv_sys_global_symbol_pipe='"sed -n -e '\''s/^.*[ ]\\([ABCDGIRSTW][ABCDGIR lt_lt_cv_sys_global_symbol_to_c_name_address='"sed -n -e '\''s/^: \\([^ ]*\\) \$/ {\\\"\\1\\\", (lt_ptr) 0},/p'\'' -e '\''s/^[BCDEGRST] \\([^ ]*\\) \\([^ ]*\\)\$/ {\"\\2\", (lt_ptr) \\&\\2},/p'\''"' lt_lt_cv_sys_global_symbol_to_cdecl='"sed -n -e '\''s/^. .* \\(.*\\)\$/extern int \\1;/p'\''"' star_cv_cnf_compatible_symbols= -star_cv_cnf_f2c_compatible=no +star_cv_cnf_f2c_compatible= star_cv_restfp_fixup=no ## ----------------- ## ## Output variables. ## ## ----------------- ## -ACLOCAL='${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run aclocal-1.9' +ACLOCAL='${SHELL} /slalib/missing --run aclocal-1.9' AMDEPBACKSLASH='\' AMDEP_FALSE='#' AMDEP_TRUE='' -AMTAR='${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run tar' +AMTAR='${SHELL} /slalib/missing --run tar' AR='ar' -AUTOCONF='${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run autoconf' -AUTOHEADER='${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run autoheader' -AUTOMAKE='${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run automake-1.9' +AUTOCONF='${SHELL} /slalib/missing --run autoconf' +AUTOHEADER='${SHELL} /slalib/missing --run autoheader' +AUTOMAKE='${SHELL} /slalib/missing --run automake-1.9' AWK='gawk' CC='gcc' CCDEPMODE='depmode=gcc3' @@ -1658,14 +1634,14 @@ INSTALL_DATA='${INSTALL} -m 644' INSTALL_PROGRAM='${INSTALL}' INSTALL_SCRIPT='${INSTALL}' INSTALL_STRIP_PROGRAM='${SHELL} $(install_sh) -c -s' -LATEX2DVI='$$LATEX "\\batchmode\\input $$1" && $$LATEX "\\batchmode\\input $$1"' +LATEX2DVI='' LDFLAGS='' LIBOBJS='' LIBS='' LIBTOOL='$(SHELL) $(top_builddir)/libtool' LN_S='ln -s' LTLIBOBJS='' -MAKEINFO='${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run makeinfo' +MAKEINFO='${SHELL} /slalib/missing --run makeinfo' NOPIC_FALSE='' NOPIC_TRUE='#' OBJEXT='o' @@ -1680,7 +1656,7 @@ PACKAGE_VERSION_MAJOR='2' PACKAGE_VERSION_MINOR='5' PACKAGE_VERSION_RELEASE='4' PATH_SEPARATOR=':' -PAX='/usr/bin/pax' +PAX='' PREDIST='#' RANLIB='ranlib' REAL_FUNCTION_TYPE='float' @@ -1694,7 +1670,7 @@ STAR_DEPENDENCIES_CHILDREN='<sourceset>star2html</sourceset>' STAR_DOCUMENTATION=' sun67' STAR_FCFLAGS='-I/home/vmwareshare/rhel30linux_i386/build/build-root/include ' STAR_FFLAGS='-I/home/vmwareshare/rhel30linux_i386/build/build-root/include ' -STAR_LATEX_DOCUMENTATION=' sun67.tex sun67.ps sun67.htx_tar' +STAR_LATEX_DOCUMENTATION='' STAR_LDFLAGS='-L/home/vmwareshare/rhel30linux_i386/build/build-root/lib' STAR_MANIFEST_DIR='$(prefix)/manifests' STRIP='strip' @@ -1731,7 +1707,7 @@ host_os='linux-gnu' host_vendor='unknown' includedir='${prefix}/include' infodir='${prefix}/info' -install_sh='/sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/install-sh' +install_sh='/slalib/install-sh' libdir='${exec_prefix}/lib' libexecdir='${exec_prefix}/libexec' libsla_la_version_info='7:0:0' diff --git a/config.status b/config.status index 449a975dab71135182bd9e8928eaab2d757056a7..bfac464c0c42952c7e2430b3a22fc65470acbec0 100755 --- a/config.status +++ b/config.status @@ -304,7 +304,7 @@ Report bugs to <bug-autoconf@gnu.org>." ac_cs_version="\ sla config.status 2.5-4 configured by ./configure, generated by Starlink Autoconf 2.59, - with options \"\" + with options \"'--without-stardocs'\" Copyright (C) 2003 Free Software Foundation, Inc. This config.status script is free software; the Free Software Foundation @@ -383,8 +383,8 @@ if $ac_cs_silent; then fi if $ac_cs_recheck; then - echo "running /bin/sh ./configure " $ac_configure_extra_args " --no-create --no-recursion" >&6 - exec /bin/sh ./configure $ac_configure_extra_args --no-create --no-recursion + echo "running /bin/sh ./configure " '--without-stardocs' $ac_configure_extra_args " --no-create --no-recursion" >&6 + exec /bin/sh ./configure '--without-stardocs' $ac_configure_extra_args --no-create --no-recursion fi # @@ -493,12 +493,12 @@ s,@INSTALL_DATA@,${INSTALL} -m 644,;t t s,@CYGPATH_W@,echo,;t t s,@PACKAGE@,sla,;t t s,@VERSION@,2.5-4,;t t -s,@ACLOCAL@,${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run aclocal-1.9,;t t -s,@AUTOCONF@,${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run autoconf,;t t -s,@AUTOMAKE@,${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run automake-1.9,;t t -s,@AUTOHEADER@,${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run autoheader,;t t -s,@MAKEINFO@,${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run makeinfo,;t t -s,@install_sh@,/sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/install-sh,;t t +s,@ACLOCAL@,${SHELL} /slalib/missing --run aclocal-1.9,;t t +s,@AUTOCONF@,${SHELL} /slalib/missing --run autoconf,;t t +s,@AUTOMAKE@,${SHELL} /slalib/missing --run automake-1.9,;t t +s,@AUTOHEADER@,${SHELL} /slalib/missing --run autoheader,;t t +s,@MAKEINFO@,${SHELL} /slalib/missing --run makeinfo,;t t +s,@install_sh@,/slalib/install-sh,;t t s,@STRIP@,strip,;t t s,@ac_ct_STRIP@,strip,;t t s,@INSTALL_STRIP_PROGRAM@,${SHELL} $(install_sh) -c -s,;t t @@ -506,7 +506,7 @@ s,@mkdir_p@,mkdir -p --,;t t s,@AWK@,gawk,;t t s,@SET_MAKE@,,;t t s,@am__leading_dot@,.,;t t -s,@AMTAR@,${SHELL} /sps/km3net/users/kulikovs/data_processing/sla-2.5.4-CentOS7/missing --run tar,;t t +s,@AMTAR@,${SHELL} /slalib/missing --run tar,;t t s,@am__tar@,${AMTAR} chof - "$$tardir",;t t s,@am__untar@,${AMTAR} xf -,;t t s,@STARLINK@,/home/vmwareshare/rhel30linux_i386/build/build-root,;t t @@ -554,7 +554,7 @@ s,@PACKAGE_VERSION_RELEASE@,4,;t t s,@PACKAGE_VERSION_INTEGER@,2005004,;t t s,@STAR_MANIFEST_DIR@,$(prefix)/manifests,;t t s,@PREDIST@,#,;t t -s,@PAX@,/usr/bin/pax,;t t +s,@PAX@,,;t t s,@TAR@,/usr/bin/tar,;t t s,@CPP@,gcc -E,;t t s,@FPPFLAGS_F@,,;t t @@ -594,8 +594,8 @@ s,@LIBOBJS@,,;t t s,@FCLIBS@, -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.. -lgfortran -lm -lgcc_s -lquadmath,;t t s,@REAL_FUNCTION_TYPE@,float,;t t s,@STAR2HTML@,star2html,;t t -s,@LATEX2DVI@,$$LATEX "\\batchmode\\input $$1" && $$LATEX "\\batchmode\\input $$1",;t t -s,@STAR_LATEX_DOCUMENTATION@, sun67.tex sun67.ps sun67.htx_tar,;t t +s,@LATEX2DVI@,,;t t +s,@STAR_LATEX_DOCUMENTATION@,,;t t s,@LTLIBOBJS@,,;t t CEOF diff --git a/libtool b/libtool index aa918c1d4bece46d214d956089e997b7c210d38b..f24062bf924385aae78e2b888c66e62b9be0dd03 100755 --- a/libtool +++ b/libtool @@ -44,7 +44,7 @@ available_tags=" CXX F77" # ### BEGIN LIBTOOL CONFIG -# Libtool was configured on host cca008: +# Libtool was configured on host b3ff940482a4: # Shell to use when invoking shell scripts. SHELL="/bin/sh" @@ -322,10 +322,10 @@ variables_saved_for_relink="PATH LD_RUN_PATH GCC_EXEC_PREFIX COMPILER_PATH LIBR link_all_deplibs=unknown # Compile-time system search path for libraries -sys_lib_search_path_spec=" /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../x86_64-unknown-linux-gnu/lib/x86_64-unknown-linux-gnu/5.5.0/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../x86_64-unknown-linux-gnu/lib/../lib64/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../x86_64-unknown-linux-gnu/5.5.0/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../lib64/ /lib/x86_64-unknown-linux-gnu/5.5.0/ /lib/../lib64/ /usr/lib/x86_64-unknown-linux-gnu/5.5.0/ /usr/lib/../lib64/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../x86_64-unknown-linux-gnu/lib/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../ /lib/ /usr/lib/" +sys_lib_search_path_spec=" /usr/lib/gcc/x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/../lib64/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/ /lib/x86_64-redhat-linux/4.8.5/ /lib/../lib64/ /usr/lib/x86_64-redhat-linux/4.8.5/ /usr/lib/../lib64/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../ /lib/ /usr/lib/" # Run-time system search path for libraries -sys_lib_dlsearch_path_spec="/lib /usr/lib /usr/lib/atlas /usr/lib64/atlas /usr/lib64/dyninst /usr/lib64/mysql /usr/lib/qt-3.3/lib /usr/lib64/qt-3.3/lib /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-idrac /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-idrac7 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-isvc /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64/openmanage/smpop /opt/dell/srvadmin/lib64 /usr/lib/tcl8.5 /usr/lib64/tcl8.5 /usr/lib/xulrunner /usr/lib64/xulrunner " +sys_lib_dlsearch_path_spec="/lib /usr/lib " # Fix the shell variable $srcfile for the compiler. fix_srcfile_path="" @@ -6849,7 +6849,7 @@ build_old_libs=`case $build_libtool_libs in yes) $echo no;; *) $echo yes;; esac` # End: # ### BEGIN LIBTOOL TAG CONFIG: CXX -# Libtool was configured on host cca008: +# Libtool was configured on host b3ff940482a4: # Shell to use when invoking shell scripts. SHELL="/bin/sh" @@ -7028,11 +7028,11 @@ striplib="strip --strip-unneeded" # Dependencies to place before the objects being linked to create a # shared library. -predep_objects="/lib/../lib64/crti.o /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/crtbeginS.o" +predep_objects="/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crti.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtbeginS.o" # Dependencies to place after the objects being linked to create a # shared library. -postdep_objects="/pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/crtendS.o /lib/../lib64/crtn.o" +postdep_objects="/usr/lib/gcc/x86_64-redhat-linux/4.8.5/crtendS.o /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/crtn.o" # Dependencies to place before the objects being linked to create a # shared library. @@ -7044,7 +7044,7 @@ postdeps="-lstdc++ -lm -lgcc_s -lc -lgcc_s" # The library search path used internally by the compiler when linking # a shared library. -compiler_lib_search_path="-L/pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0 -L/pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../.." +compiler_lib_search_path="-L/usr/lib/gcc/x86_64-redhat-linux/4.8.5 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64 -L/lib/../lib64 -L/usr/lib/../lib64 -L/usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../.." # Method to check whether dependent libraries are shared objects. deplibs_check_method="pass_all" @@ -7124,10 +7124,10 @@ variables_saved_for_relink="PATH LD_LIBRARY_PATH LD_RUN_PATH GCC_EXEC_PREFIX COM link_all_deplibs=unknown # Compile-time system search path for libraries -sys_lib_search_path_spec=" /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../x86_64-unknown-linux-gnu/lib/x86_64-unknown-linux-gnu/5.5.0/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../x86_64-unknown-linux-gnu/lib/../lib64/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../x86_64-unknown-linux-gnu/5.5.0/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../lib64/ /lib/x86_64-unknown-linux-gnu/5.5.0/ /lib/../lib64/ /usr/lib/x86_64-unknown-linux-gnu/5.5.0/ /usr/lib/../lib64/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../../x86_64-unknown-linux-gnu/lib/ /pbs/software/centos-7-x86_64/gcc/5.5.0/lib/gcc/x86_64-unknown-linux-gnu/5.5.0/../../../ /lib/ /usr/lib/" +sys_lib_search_path_spec=" /usr/lib/gcc/x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/../lib64/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/ /lib/x86_64-redhat-linux/4.8.5/ /lib/../lib64/ /usr/lib/x86_64-redhat-linux/4.8.5/ /usr/lib/../lib64/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../ /lib/ /usr/lib/" # Run-time system search path for libraries -sys_lib_dlsearch_path_spec="/lib /usr/lib /usr/lib/atlas /usr/lib64/atlas /usr/lib64/dyninst /usr/lib64/mysql /usr/lib/qt-3.3/lib /usr/lib64/qt-3.3/lib /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-idrac /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-idrac7 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-isvc /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64/openmanage/smpop /opt/dell/srvadmin/lib64 /usr/lib/tcl8.5 /usr/lib64/tcl8.5 /usr/lib/xulrunner /usr/lib64/xulrunner " +sys_lib_dlsearch_path_spec="/lib /usr/lib " # Fix the shell variable $srcfile for the compiler. fix_srcfile_path="" @@ -7151,7 +7151,7 @@ include_expsyms="" # ### BEGIN LIBTOOL TAG CONFIG: F77 -# Libtool was configured on host cca008: +# Libtool was configured on host b3ff940482a4: # Shell to use when invoking shell scripts. SHELL="/bin/sh" @@ -7432,7 +7432,7 @@ link_all_deplibs=unknown sys_lib_search_path_spec=" /usr/lib/gcc/x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/../lib64/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../x86_64-redhat-linux/4.8.5/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../lib64/ /lib/x86_64-redhat-linux/4.8.5/ /lib/../lib64/ /usr/lib/x86_64-redhat-linux/4.8.5/ /usr/lib/../lib64/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../../x86_64-redhat-linux/lib/ /usr/lib/gcc/x86_64-redhat-linux/4.8.5/../../../ /lib/ /usr/lib/" # Run-time system search path for libraries -sys_lib_dlsearch_path_spec="/lib /usr/lib /usr/lib/atlas /usr/lib64/atlas /usr/lib64/dyninst /usr/lib64/mysql /usr/lib/qt-3.3/lib /usr/lib64/qt-3.3/lib /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-idrac /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-idrac7 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/srvadmin-isvc /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64 /opt/dell/srvadmin/lib64/openmanage /opt/dell/srvadmin/lib64/openmanage/smpop /opt/dell/srvadmin/lib64 /usr/lib/tcl8.5 /usr/lib64/tcl8.5 /usr/lib/xulrunner /usr/lib64/xulrunner " +sys_lib_dlsearch_path_spec="/lib /usr/lib " # Fix the shell variable $srcfile for the compiler. fix_srcfile_path="" diff --git a/sun67.htx_tar b/sun67.htx_tar deleted file mode 100644 index 742ca571e1b04e7a1c0aa516b44fd06091228087..0000000000000000000000000000000000000000 Binary files a/sun67.htx_tar and /dev/null differ diff --git a/sun67.ps b/sun67.ps deleted file mode 100644 index f4d811619322f3acb2f1c8db1c710b6330225528..0000000000000000000000000000000000000000 --- a/sun67.ps +++ /dev/null @@ -1,16439 +0,0 @@ -%!PS-Adobe-2.0 -%%Creator: dvips(k) 5.86 Copyright 1999 Radical Eye Software -%%Title: sun67.dvi -%%Pages: 224 -%%PageOrder: Ascend -%%BoundingBox: 0 0 596 842 -%%EndComments -%DVIPSWebPage: (www.radicaleye.com) -%DVIPSCommandLine: dvips -o sun67.ps sun67.dvi -%DVIPSParameters: dpi=600, compressed -%DVIPSSource: TeX output 2007.06.27:0143 -%%BeginProcSet: texc.pro -%! -/TeXDict 300 dict def TeXDict begin/N{def}def/B{bind def}N/S{exch}N/X{S -N}B/A{dup}B/TR{translate}N/isls false N/vsize 11 72 mul N/hsize 8.5 72 -mul N/landplus90{false}def/@rigin{isls{[0 landplus90{1 -1}{-1 1}ifelse 0 -0 0]concat}if 72 Resolution div 72 VResolution div neg scale isls{ -landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div hsize -mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul TR[ -matrix currentmatrix{A A round sub abs 0.00001 lt{round}if}forall round -exch round exch]setmatrix}N/@landscape{/isls true N}B/@manualfeed{ -statusdict/manualfeed true put}B/@copies{/#copies X}B/FMat[1 0 0 -1 0 0] -N/FBB[0 0 0 0]N/nn 0 N/IEn 0 N/ctr 0 N/df-tail{/nn 8 dict N nn begin -/FontType 3 N/FontMatrix fntrx N/FontBBox FBB N string/base X array -/BitMaps X/BuildChar{CharBuilder}N/Encoding IEn N end A{/foo setfont}2 -array copy cvx N load 0 nn put/ctr 0 N[}B/sf 0 N/df{/sf 1 N/fntrx FMat N -df-tail}B/dfs{div/sf X/fntrx[sf 0 0 sf neg 0 0]N df-tail}B/E{pop nn A -definefont setfont}B/Cw{Cd A length 5 sub get}B/Ch{Cd A length 4 sub get -}B/Cx{128 Cd A length 3 sub get sub}B/Cy{Cd A length 2 sub get 127 sub} -B/Cdx{Cd A length 1 sub get}B/Ci{Cd A type/stringtype ne{ctr get/ctr ctr -1 add N}if}B/id 0 N/rw 0 N/rc 0 N/gp 0 N/cp 0 N/G 0 N/CharBuilder{save 3 -1 roll S A/base get 2 index get S/BitMaps get S get/Cd X pop/ctr 0 N Cdx -0 Cx Cy Ch sub Cx Cw add Cy setcachedevice Cw Ch true[1 0 0 -1 -.1 Cx -sub Cy .1 sub]/id Ci N/rw Cw 7 add 8 idiv string N/rc 0 N/gp 0 N/cp 0 N{ -rc 0 ne{rc 1 sub/rc X rw}{G}ifelse}imagemask restore}B/G{{id gp get/gp -gp 1 add N A 18 mod S 18 idiv pl S get exec}loop}B/adv{cp add/cp X}B -/chg{rw cp id gp 4 index getinterval putinterval A gp add/gp X adv}B/nd{ -/cp 0 N rw exit}B/lsh{rw cp 2 copy get A 0 eq{pop 1}{A 255 eq{pop 254}{ -A A add 255 and S 1 and or}ifelse}ifelse put 1 adv}B/rsh{rw cp 2 copy -get A 0 eq{pop 128}{A 255 eq{pop 127}{A 2 idiv S 128 and or}ifelse} -ifelse put 1 adv}B/clr{rw cp 2 index string putinterval adv}B/set{rw cp -fillstr 0 4 index getinterval putinterval adv}B/fillstr 18 string 0 1 17 -{2 copy 255 put pop}for N/pl[{adv 1 chg}{adv 1 chg nd}{1 add chg}{1 add -chg nd}{adv lsh}{adv lsh nd}{adv rsh}{adv rsh nd}{1 add adv}{/rc X nd}{ -1 add set}{1 add clr}{adv 2 chg}{adv 2 chg nd}{pop nd}]A{bind pop} -forall N/D{/cc X A type/stringtype ne{]}if nn/base get cc ctr put nn -/BitMaps get S ctr S sf 1 ne{A A length 1 sub A 2 index S get sf div put -}if put/ctr ctr 1 add N}B/I{cc 1 add D}B/bop{userdict/bop-hook known{ -bop-hook}if/SI save N @rigin 0 0 moveto/V matrix currentmatrix A 1 get A -mul exch 0 get A mul add .99 lt{/QV}{/RV}ifelse load def pop pop}N/eop{ -SI restore userdict/eop-hook known{eop-hook}if showpage}N/@start{ -userdict/start-hook known{start-hook}if pop/VResolution X/Resolution X -1000 div/DVImag X/IEn 256 array N 2 string 0 1 255{IEn S A 360 add 36 4 -index cvrs cvn put}for pop 65781.76 div/vsize X 65781.76 div/hsize X}N -/p{show}N/RMat[1 0 0 -1 0 0]N/BDot 260 string N/Rx 0 N/Ry 0 N/V{}B/RV/v{ -/Ry X/Rx X V}B statusdict begin/product where{pop false[(Display)(NeXT) -(LaserWriter 16/600)]{A length product length le{A length product exch 0 -exch getinterval eq{pop true exit}if}{pop}ifelse}forall}{false}ifelse -end{{gsave TR -.1 .1 TR 1 1 scale Rx Ry false RMat{BDot}imagemask -grestore}}{{gsave TR -.1 .1 TR Rx Ry scale 1 1 false RMat{BDot} -imagemask grestore}}ifelse B/QV{gsave newpath transform round exch round -exch itransform moveto Rx 0 rlineto 0 Ry neg rlineto Rx neg 0 rlineto -fill grestore}B/a{moveto}B/delta 0 N/tail{A/delta X 0 rmoveto}B/M{S p -delta add tail}B/b{S p tail}B/c{-4 M}B/d{-3 M}B/e{-2 M}B/f{-1 M}B/g{0 M} -B/h{1 M}B/i{2 M}B/j{3 M}B/k{4 M}B/w{0 rmoveto}B/l{p -4 w}B/m{p -3 w}B/n{ -p -2 w}B/o{p -1 w}B/q{p 1 w}B/r{p 2 w}B/s{p 3 w}B/t{p 4 w}B/x{0 S -rmoveto}B/y{3 2 roll p a}B/bos{/SS save N}B/eos{SS restore}B end - -%%EndProcSet -TeXDict begin 39158280 55380996 1000 600 600 (sun67.dvi) -@start -%DVIPSBitmapFont: Fa cmtt10 10 35 -/Fa 35 115 df<147814FCAF007FB612F0B712F8A46C15F0C700FCC7FCAF147825267DAB -2C>43 D<121FEA3F80EA7FC0EAFFE0A5EA7FC0EA3F80EA1F000B0B708A2C>46 -D<1307497EA2131FA2133F137F13FF5A1207127FB5FC13DF139FEA7C1F1200B3AE007FB5 -12E0B612F0A36C14E01C3477B32C>49 D<EB0FF890387FFF8048B512E00007804814FC39 -1FF80FFE393FE001FF903880007F48C7EA3F80007E141F00FE15C0150F6C15E01507A312 -7E123CC8FCA2150F16C0151F1680153F16005D15FE4A5A14034A5A4A5A4A5A4A5AECFF80 -4948C7FC495A495A495AEB3FE0EB7F8049C8FC485A4848EB03C04848EB07E0EA1FE0485A -48B6FCB7FCA36C15C023347CB32C>I<EB0FFC90387FFF8048B512E0000714F84880391F -F807FEEBC0004848137F6D7F1680151FA26C5A6CC7FCC8FC153F16005D15FE14014A5AEC -1FF890381FFFF0495BA215F86D7F90380007FEEC00FF81ED3F80ED1FC0150FA216E01507 -A2123C127EB4FC150F16C0A248141F007FEC3F806DEB7F006C6C5B391FF807FE6CB55A6C -5C6C14E0C66C1380D90FFCC7FC23357CB32C>I<14FE497EA4497FA214EFA2130781A214 -C7A2010F7FA314C390381F83F0A590383F01F8A490387E00FCA549137E90B512FEA34880 -A29038F8003FA34848EB1F80A4000715C049130FD87FFEEBFFFC6D5AB514FE6C15FC497E -27347EB32C>65 D<007FB512E015F8B612FE6C8016C03903F0003FED0FE0ED07F01503A2 -ED01F8A6ED03F0A21507ED0FE0ED1FC0EDFF8090B612005D5D15FF16C09039F0001FE0ED -07F0ED03F81501ED00FCA216FE167EA616FE16FC1501ED03F8150FED3FF0007FB612E016 -C0B712806CECFE0015F027337FB22C>I<02FF13700107EBE0F84913F9013F13FD4913FF -EBFF813901FE007F4848131FD807F0130F1507485A491303485A150148C7FCA25A007EEC -00F01600A212FE5AAB7E127EA3007F15F06CEC01F8A26C7EA26C6C13036D14F06C6C1307 -16E0D803FC131F6C6CEB3FC03A00FF81FF806DB512006D5B010F5B6D13F0010013802535 -7DB32C>I<007FB5FCB612C015F0816C803907E003FEEC00FFED7F80153FED1FC0ED0FE0 -A2150716F0150316F81501A4ED00FCACED01F8A3150316F0A2150716E0150FED1FC0153F -ED7F80EDFF00EC03FE007FB55AB65A5D15C06C91C7FC26337EB22C>I<007FB612F0B712 -F8A37E3903F00001A7ED00F01600A4EC01E04A7EA490B5FCA5EBF003A46E5A91C8FCA516 -3C167EA8007FB612FEB7FCA36C15FC27337EB22C>I<007FB612F8B712FCA37ED803F0C7 -FCA716781600A515F04A7EA490B5FCA5EBF001A46E5A92C7FCAD387FFFE0B5FC805C7E26 -337EB22C>I<D87FFEEBFFFCB54813FEA36C486C13FCD807E0EB0FC0B190B6FCA59038E0 -000FB3D87FFEEBFFFCB54813FEA36C486C13FC27337EB22C>72 D<007FB512F8B612FCA3 -6C14F839000FC000B3B3A5007FB512F8B612FCA36C14F81E3379B22C>I<0107B5128049 -14C0A36D148090390003F000B3AF1218127EA2B4FCA24A5A48130F007F131F9038C07FC0 -6CB55A6C91C7FC6C5B000313F838007FC022347BB22C>I<387FFFE0B57EA36C5BD803F0 -C8FCB3AE16F0ED01F8A8007FB6FCB7FCA36C15F025337DB22C>76 -D<D87FE0EB0FFC486CEB1FFEA26D133F007F15FC000F15E001BC137BA4019E13F3A3EB9F -01A2018F13E3A21483A2018713C314C7A201831383A214EFA201811303A214FFEB80FEA3 -147C14381400ACD87FF0EB1FFC486CEB3FFEA36C48EB1FFC27337EB22C>I<D87FF0EB7F -FC486CEBFFFEA27F007FEC7FFCD807FEEB07C013DEA213DF13CFA2148013C714C0A213C3 -14E0A213C114F0A213C014F8A2147CA3143EA2141E141FA2140F1587A2140715C7A21403 -15E71401A215F71400A215FFD87FFC137F487E153FA26C48EB1F8027337EB22C>I<EB7F -FF0003B512E0000F14F848804880EBE003EB800048C7127FA2007E80A300FE158048141F -B3A86C143FA2007E1500A3007F5CA26C6C13FEEBF00790B5FC6C5C6C5C000314E0C66C90 -C7FC21357BB32C>I<007FB512C0B612F88115FF6C15802603F00013C0153FED0FE0ED07 -F0A2150316F81501A6150316F01507A2ED0FE0ED3FC015FF90B61280160015FC5D15C001 -F0C8FCB0387FFF80B57EA36C5B25337EB22C>I<EB7FFF0003B512E0000F14F848804880 -EBF007EB800048C7127FA2007E80A300FE158048141FB3A7EB01F0EB03F800FE143F267E -01FC1300A2EB00FE007F5C147FD83F8013FEEBF03F90B5FC6C5C6C5C000314E0C67E9038 -0007F0A26E7EA26E7EA26E7EA2157FA2153E21407BB32C>I<387FFFFCB67E15E015F86C -803907E007FE1401EC007F6F7E151FA26F7EA64B5AA2153F4BC7FCEC01FE140790B55A5D -15E081819038E007FCEC01FE1400157F81A8160FEE1F80A5D87FFEEB1FBFB5ECFF00815E -6C486D5AC8EA01F029347EB22C>I<007FB612FCB712FEA43AFC007E007EA70078153CC7 -1400B3AF90383FFFFCA2497F6D5BA227337EB22C>84 D<D87FF0EB07FF486C491380A36C -486D1300001FC8127CA46C6C5CA76C6C495AA4143E147FA33A03E0FF83E0A214F7A201E1 -13C3A3000101E35BA201F113C701F313E7A314C1A200005DA201F713F71480A301FF13FF -017F91C7FC4A7EA4013E133E29347FB22C>87 D<3801FFF0000713FE001F6D7E15E04880 -9038C01FF81407EC01FC381F80000006C77EC8127EA3ECFFFE131F90B5FC1203120F48EB -807E383FF800EA7FC090C7FC12FE5AA47E007F14FEEB8003383FE01F6CB612FC6C15FE6C -14BF0001EBFE1F3A003FF007FC27247CA32C>97 D<903803FFE0011F13F8017F13FE48B5 -FC48804848C6FCEA0FF0485A49137E4848131890C9FC5A127EA25AA8127EA2127F6C140F -6DEB1F806C7E6D133F6C6CEB7F003907FE03FF6CB55A6C5C6C6C5B011F13E0010390C7FC -21247AA32C>99 D<EC0FFE4A7EA380EC003FAAEB07F8EB3FFE90B512BF4814FF5A3807FC -0F380FF00348487E497E48487F90C7FC007E80A212FE5AA87E007E5CA2007F5C6C7E5C6C -6C5A380FF0073807FC1F6CB612FC6CECBFFE6C143FEB3FFC90390FF01FFC27337DB22C> -I<EB03FE90381FFFC0017F13F048B57E48803907FE03FE390FF800FFD81FE0EB3F805B48 -48EB1FC090C7120F5A007E15E015075AB7FCA416C000FCC9FC7E127EA2127F6CEC03C06D -EB07E06C7ED80FF0130F6C6CEB3FC001FF13FF000190B512806C1500013F13FC010F13F0 -0101138023247CA32C>I<EA7FF0487EA3127F1201AAEC1FE0EC7FFC9038F9FFFE01FB7F -90B6FC9138F03F80ECC01F02807FEC000F5B5BA25BB3267FFFE0B5FCB500F11480A36C01 -E0140029337FB22C>104 D<1307EB1FC0A2497EA36D5AA20107C7FC90C8FCA7387FFFC0 -80B5FC7EA2EA0007B3A8007FB512FCB612FEA36C14FC1F3479B32C>I<387FFFE0B57EA3 -7EEA0003B3B3A5007FB61280B712C0A36C158022337BB22C>108 -D<397FF01FE039FFF87FFC9038F9FFFE01FB7F6CB6FC00019038F03F80ECC01F02807FEC -000F5B5BA25BB3267FFFE0B5FCB500F11480A36C01E0140029247FA32C>110 -D<EB07FCEB1FFF017F13C048B512F048803907FC07FC390FF001FE48486C7E0180133F00 -3F158090C7121F007EEC0FC0A348EC07E0A76C140F007E15C0A2007F141F6C15806D133F -6C6CEB7F006D5B6C6C485A3907FC07FC6CB55A6C5C6C6C13C0011F90C7FCEB07FC23247C -A32C>I<397FF01FE039FFF8FFF801FB13FE90B6FC6C158000019038F07FC09138801FE0 -91380007F049EB03F85BED01FC491300A216FE167EA816FE6D14FCA2ED01F86D13036DEB -07F0150F9138801FE09138E07FC091B51280160001FB5B01F813F8EC3FC091C8FCAD387F -FFE0B57EA36C5B27367FA32C>I<903903FC078090391FFF0FC0017F13CF48B512EF4814 -FF3807FE07380FF00148487E49137F4848133F90C7FC48141F127E150F5AA87E007E141F -A26C143F7F6C6C137F6D13FF380FF0033807FC0F6CB6FC6C14EF6C6C138F6D130FEB07F8 -90C7FCAD0203B5FC4A1480A36E140029367DA32C>I<D87FFEEB3FC0B53801FFF0020713 -F8021F13FC6C5B39003F7FE1ECFF019138FC00F84A13704A13005CA25C5CA391C8FCAF00 -7FB512E0B67EA36C5C26247EA32C>I E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fb cmr10 10 23 -/Fb 23 118 df<146014E0EB01C0EB0380EB0700130E131E5B5BA25B485AA2485AA21207 -5B120F90C7FCA25A121EA2123EA35AA65AB2127CA67EA3121EA2121F7EA27F12077F1203 -A26C7EA26C7E1378A27F7F130E7FEB0380EB01C0EB00E01460135278BD20>40 -D<12C07E12707E7E7E120F6C7E6C7EA26C7E6C7EA21378A2137C133C133E131EA2131F7F -A21480A3EB07C0A6EB03E0B2EB07C0A6EB0F80A31400A25B131EA2133E133C137C1378A2 -5BA2485A485AA2485A48C7FC120E5A5A5A5A5A13527CBD20>I<B712C016F816FE000190 -398001FF806C90C7EA3FE0EE0FF0EE03F8707E707E177FA2EF3F8018C0171F18E0170F18 -F0A3EF07F8A418FCAC18F8A4EF0FF0A218E0A2171F18C0EF3F80A2EF7F0017FE4C5A4C5A -EE0FF0EE3FE0486DEBFF80B8C7FC16F816C036397DB83F>68 D<013FB512E0A39039001F -FC00EC07F8B3B3A3123FEA7F80EAFFC0A44A5A1380D87F005B0070131F6C5C6C495A6C49 -C7FC380781FC3801FFF038007F80233B7DB82B>74 D<B5933807FFF86E5DA20001F0FC00 -2600DFC0ED1BF8A2D9CFE01533A3D9C7F01563A3D9C3F815C3A2D9C1FCEC0183A3D9C0FE -EC0303A2027F1406A36E6C130CA36E6C1318A26E6C1330A36E6C1360A26E6C13C0A39139 -01FC0180A3913900FE0300A2ED7F06A3ED3F8CA2ED1FD8A3ED0FF0A3486C6D5A487ED80F -FC6D48497EB500C00203B512F8A2ED018045397DB84C>77 D<EB1FE0EBFFFC3803E03F39 -07000F80390F8007E0486C6C7E13E06E7EA26E7E6C5A6C5AC8FCA4147FEB07FFEB3FE0EB -FE00EA03F8EA0FF0EA1FC0123F485A90C7FC160C12FEA31401A26C13036CEB077C903980 -063E18383FC01E3A0FE0781FF03A03FFF00FE03A007F8007C026277DA52A>97 -D<EB03FC90381FFF8090387E03E03901F80070484813F83907E001FC380FC003A2EA1F80 -123F90380001F848EB00F01500A2127E12FEAA127E127FA26C14067F001F140E6D130C00 -0F141C6C6C13386C6C13706C6C13E039007C07C090381FFF00EB07F81F277DA525>99 -D<ED0FC0EC03FFA3EC003F150FB0EB03F8EB1FFF90387E078F9038F801EF3903F0007F48 -48133F4848131FA24848130F123F90C7FC5AA2127E12FEAA127E127FA27EA26C6C131FA2 -6C6C133F6C6C137F6C6CEBEFF03A01F801CFFF39007C078F90381FFE0FD907F813C0283B -7DB92E>I<EB07F8EB1FFF90387C0FC03901F803E03903F001F0D807E013F8380FC00048 -48137CA248C7127E153E5A153F127E12FEA3B7FCA248C8FCA5127EA2127FA26C14037F00 -1F14076C6C13060007140E6D131CD801F013386C6C137090387E03E090381FFF80903803 -FC0020277EA525>I<147E903803FF8090380FC1E0EB1F8790383F0FF0137EA213FCA239 -01F803C091C7FCADB512FCA3D801F8C7FCB3AB487E387FFFF8A31C3B7FBA19>I<ED03F0 -90390FF00FF890393FFC3C3C9039F81F707C3901F00FE03903E007C03A07C003E010000F -ECF000A248486C7EA86C6C485AA200075C6C6C485A6D485A6D48C7FC38073FFC38060FF0 -000EC9FCA4120FA213C06CB512C015F86C14FE6CECFF804815C03A0F80007FE048C7EA0F -F0003E140348140116F8481400A56C1401007C15F06CEC03E0003F1407D80F80EB0F80D8 -07E0EB3F003901FC01FC39007FFFF0010790C7FC26387EA52A>I<EA03F012FFA3120F12 -03B0EC0FF0EC3FFCECF03F9039F1C01F809039F3800FC0EBF70013FE496D7EA25BA35BB3 -A3486C497EB500C1B51280A3293A7EB92E>I<EA0380EA0FE0487EA56C5AEA0380C8FCAA -EA03F012FFA312071203B3AA487EB512C0A312387EB717>I<EB01C0EB07F0EB0FF8A5EB -07F0EB01C090C7FCAAEB01F813FFA313071301B3B3A2123C127E00FF13F01303A214E038 -FE07C0127C383C0F00EA0FFEEA03F8154984B719>I<EA03F012FFA3120F1203B3B3AD48 -7EB512C0A3123A7EB917>108 D<2703F00FF0EB1FE000FFD93FFCEB7FF8913AF03F01E0 -7E903BF1C01F83803F3D0FF3800FC7001F802603F70013CE01FE14DC49D907F8EB0FC0A2 -495CA3495CB3A3486C496CEB1FE0B500C1B50083B5FCA340257EA445>I<3903F00FF000 -FFEB3FFCECF03F9039F1C01F803A0FF3800FC03803F70013FE496D7EA25BA35BB3A3486C -497EB500C1B51280A329257EA42E>I<EB03FE90380FFF8090383E03E09038F800F84848 -137C48487F48487F4848EB0F80001F15C090C712074815E0A2007EEC03F0A400FE15F8A9 -007E15F0A2007F14076C15E0A26C6CEB0FC0000F15806D131F6C6CEB3F006C6C137EC66C -13F890387E03F090381FFFC0D903FEC7FC25277EA52A>I<3903F01FE000FFEB7FF89038 -F1E07E9039F3801F803A0FF7000FC0D803FEEB07E049EB03F04914F849130116FC150016 -FEA3167FAA16FEA3ED01FCA26DEB03F816F06D13076DEB0FE001F614C09039F7803F0090 -38F1E07E9038F0FFF8EC1FC091C8FCAB487EB512C0A328357EA42E>I<3807E01F00FFEB -7FC09038E1E3E09038E387F0380FE707EA03E613EE9038EC03E09038FC0080491300A45B -B3A2487EB512F0A31C257EA421>114 D<EBFF03000313E7380F80FF381E003F487F487F -00707F12F0A2807EA27EB490C7FCEA7FE013FF6C13E06C13F86C7F00037FC67F01071380 -EB007F141F00C0EB0FC01407A26C1303A37E15806C13077EEC0F00B4131E38F3C07C38E1 -FFF038C03F801A277DA521>I<1318A51338A31378A313F8120112031207001FB5FCB6FC -A2D801F8C7FCB215C0A93800FC011580EB7C03017E13006D5AEB0FFEEB01F81A347FB220 ->I<D803F0EB07E000FFEB01FFA3000FEB001F00031407B3A4150FA3151F12016D133F00 -00EC77F86D9038E7FF8090383F03C790381FFF87903A03FC07E00029267EA42E>I -E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fc cmti10 10 9 -/Fc 9 84 df<EE01C01603A21607160FA2161F83163FA2167F16FF16EF150116CFED038F -A2ED070FA2150E151E151C1538A203707FA2EDE007A2EC01C014031580EC0700A2140EA2 -5CA25C027FB5FCA291B6FC9139E00007F849481303A2495A130791C7FC5B130E5BA25B13 -78137013F0EA03F8486C4A7EB56C48B512F0A3343C7BBB3E>65 D<0107B612FCEFFF8018 -C0903B000FF0001FF04BEB07F81703021F15FC17014B14FEA2023F1400A24B1301A2147F -18FC92C7120318F84A140718F04AEC0FE0EF1FC00101ED3F80EF7F004AEB01FEEE07F849 -B612E05F9139F80007F0EE01FC01076E7E177F4AEC3F80A2010F16C0171F5CA2131F173F -5CA2133FEF7F805C1800017F5D4C5A91C7485A5F49140FEE1FE0494A5A00014AB45AB748 -C7FC16F816C037397BB83A>I<DB03FE130E92393FFF801E92B5EAE03C913903FE01F091 -3A0FF000787CDA3FC0EB3CFC4AC7EA1FF802FE140FEB03FC49481407494815F049481403 -495A5C49C813E05B485A5B000317C0485AA2485A1880485A94C7FCA2485AA3127F5BA312 -FF90CBFCA41738A217784816707E17F06C5E16015F16036C6C4A5A94C7FC001F150E6D14 -1E000F5D6D5C6C6C495A6C6CEB03C0D801FEEB0F8027007F807EC8FC6DB45A010F13E001 -0090C9FC373D74BA3B>I<0103B512F8A390390007F8005DA2140FA25DA2141FA25DA214 -3FA25DA2147FA292C7FCA25CA25CA21301A25CA21303A25CA21307A25CA2130FA25CA213 -1FA25CA2133FA25CA2137FA291C8FC497EB6FCA25C25397CB820>73 -D<0207B512F0A391390007FC006F5AA215075EA3150F5EA3151F5EA3153F5EA3157F93C7 -FCA35D5DA314015DA314035DA31407A25DA2140FA2003F5C5A141F485CA24A5A12FC00E0 -49C8FC14FE00705B495A6C485A381E0FC06CB4C9FCEA01F82C3B78B82C>I<0107B512FC -A25E9026000FF8C7FC5D5D141FA25DA2143FA25DA2147FA292C8FCA25CA25CA21301A25C -A21303A25CA21307A25CA2130F170C4A141CA2011F153C17384A1478A2013F157017F04A -14E01601017F140317C091C71207160F49EC1F80163F4914FF000102071300B8FCA25E2E -397BB834>76 D<902607FFF8923807FFF0614F13E0D9000FEFF0004F5AA2021F167FF1EF -C0141DDA1CFCEC01CF023C16DF9538039F800238ED071FA20278ED0E3F97C7FC0270151C -A202F04B5AF0707E14E0037E14E0010117FE4D485A02C0EC0380A20103ED070161028014 -0EA20107ED1C0305385B14006F137049160705E05B010EEC01C0A2011E913803800F6101 -1CEC0700A2013C020E131F4C5C1338ED1FB80178163F04F091C8FC01705CA201F04A5B18 -7E00015DD807F816FEB500C09039007FFFFC151E150E4C397AB84A>I<0107B612F817FF -1880903B000FF0003FE04BEB0FF0EF03F8141FEF01FC5DA2023F15FEA25DA2147FEF03FC -92C7FCA24A15F817074A15F0EF0FE01301EF1FC04AEC3F80EFFE0001034A5AEE0FF091B6 -12C04CC7FCD907F8C9FCA25CA2130FA25CA2131FA25CA2133FA25CA2137FA291CAFCA25B -A25B1201B512FCA337397BB838>80 D<92383FC00E913901FFF01C020713FC91391FC07E -3C91393F001F7C027CEB0FF84A130749481303495A4948EB01F0A2495AA2011F15E091C7 -FCA34915C0A36E90C7FCA2806D7E14FCECFF806D13F015FE6D6D7E6D14E0010080023F7F -14079138007FFC150F15031501A21500A2167C120EA3001E15FC5EA3003E4A5AA24B5AA2 -007F4A5A4B5A6D49C7FC6D133ED8F9F013FC39F8FC03F839F07FFFE0D8E01F138026C003 -FCC8FC2F3D7ABA2F>83 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fd cmti9 9 17 -/Fd 17 122 df<DB1FF013C09238FFFC010203EBFF03913A0FF00F878091393F8003CF91 -39FE0001EF4948EB00FFD903F01500D90FE080495A49488091C8123E137E13FE485A4848 -153CA2485AA248481538A2485A94C7FC123F5BA3127F90CBFCA412FEA2EE03C0A25F127E -160794C7FC5E160E007F151E6C5D5E6C6C147016F06C6C495A6C6CEB07C06C6C49C8FC6C -6C133E6CB413FC90387FFFF0011F13C0D903FEC9FC323775B437>67 -D<010FB51280A216009038003FC05DA292C7FCA25CA2147EA214FEA25CA21301A25CA213 -03A25CA21307A25CA2130FA25CA2131FA25CA2133FA291C8FCA25BA2137EA213FEA25B12 -01B512F8A25C21337BB21E>73 D<0107B512FE49ECFFC017F0903A003F8007F8EE01FCEE -007E92C7127F835C1880147EA214FEEF7F005CA2010115FE5F4A13015F01034A5AEE0FC0 -4A495A04FEC7FC49B512F016C09138E003E0ED01F8010F6D7E167C4A137EA2131FA25CA2 -013F14FEA291C7FCA24913015E137EEF01C001FE150318805B00011607277FFFF0001400 -B5ECFE0EEE7E1CC9EA1FF8EE07E032357BB238>82 D<913901FC018091380FFF03023F13 -C791387E07EF903A01F801FF0049487E4A7F495A4948133E131F91C7FC5B013E143CA313 -7E1638A293C7FC137FA26D7E14E014FE90381FFFC06D13F86D7F01017F6D6C7E020F7F14 -00153F6F7E150FA4120EA2001E5D121CA2151F003C92C7FCA2003E143E5D127E007F5C6D -485A9038C007E039F3F80FC000F0B5C8FC38E03FFC38C00FF029377AB42B>I<EB03F0EB -0FF890383E1C6090387C0FF0EBF807EA01F0EA03E00007EB03E0EA0FC0A2381F800715C0 -EA3F00A2140F481480127EA2141F00FE14005A1506EC3F07EC3E0F150E147E007C141EEC -FE1CEB01FCD83C03133C393E07BE38391F0E1E783907FC0FF03901F003C0202278A027> -97 D<14FCEB07FF90381F078090383E03C0EBFC013801F8033803F0073807E00F13C012 -0F391F80070091C7FC48C8FCA35A127EA312FE5AA4007C14C0EC01E0A2EC03C06CEB0F80 -EC1F006C137C380F81F03803FFC0C648C7FC1B2278A023>99 D<EB03F8EB0FFEEB3E0F90 -38F807803801F003EA03E0EA07C0120FEA1F801407D83F0013005C007E133EEB03F8387F -FFE04848C7FC00FCC8FCA45AA4EC0180EC03C0A2007CEB0780EC1F00003C133E6C13F838 -0F03E03807FF80D801FCC7FC1A2277A023>101 D<151FED7FC0EDF0E0020113F0EC03E3 -A2EC07C316E0EDC1C091380FC0005DA4141F92C7FCA45C143E90381FFFFEA3D9007EC7FC -147CA414FC5CA513015CA413035CA413075CA3130FA25CA3131F91C8FCA35B133E1238EA -7E3CA2EAFE7812FC485AEA78E0EA3FC0000FC9FC244582B418>I<EB0180EB07E0A2130F -EB07C0EB038090C7FCABEA01F0EA03FCEA0F1E120E121C123C1238EA783E1270A2137EEA -F07CEA60FCC65AA212015BA212035BA2000713C0EBC1E0000F13C01381A21383EB038013 -071400130E131EEA07F8EA01F013337AB118>105 D<133FEA07FF5A13FEEA007EA3137C -A213FCA213F8A21201A213F0A21203A213E0A21207A213C0A2120FA21380A2121FA21300 -A25AA2123EA2127EA2127C1318EAFC1C133CEAF838A21378137012F013F0EAF8E01279EA -3FC0EA0F00103579B314>108 D<2703C003F8137F3C0FF00FFE01FFC03C1E783C1F07C1 -E03C1C7CF00F8F01F03B3C3DE0079E0026383FC001FC7FD97F805B007001005B5E137ED8 -F0FC90380FC00100E05FD860F8148012000001021F130360491400A200034A1307604901 -3E130FF081800007027EEC83C0051F138049017C1403A2000F02FC1407053E130049495C -EF1E0E001F01015D183C010049EB0FF0000E6D48EB03E03A227AA03F>I<3903C007F039 -0FF01FFC391E787C1E391C7CF01F393C3DE00F26383FC01380EB7F8000781300EA707EA2 -D8F0FC131F00E01500EA60F8120000015C153E5BA20003147E157C4913FCEDF818000715 -3C0201133801C013F0A2000F1578EDE070018014F016E0001FECE1C015E390C7EAFF0000 -0E143E26227AA02B>I<14FCEB07FF90381F07C090383E03E09038FC01F0EA01F83903F0 -00F8485A5B120F484813FCA248C7FCA214014814F8127EA2140300FE14F05AA2EC07E0A2 -007CEB0FC01580141FEC3F006C137E5C381F01F0380F83E03803FF80D800FCC7FC1E2278 -A027>I<3903C00FC0390FF03FF0391E78F078391C7DE03C393C3FC0FC00381380EB7F00 -007814F8D8707E13701500EAF0FC12E0EA60F812001201A25BA21203A25BA21207A25BA2 -120FA25BA2121FA290C8FC120E1E227AA020>114 D<EB03F0EB1FFCEB3C1EEB780FEBF0 -07EA01E0140F0003131F13C0A2EBE00414007FEBFF8014E06C13F06C13F8EB7FFC1307EB -00FE147E143E123800FC133CA3147C00F013784813F0EAF001387803E0383C0F80381FFE -00EA03F818227AA01F>I<1303EB0F80A3131FA21400A25BA2133EA2137EA2137C387FFF -F8A2B5FC3800F800A21201A25BA21203A25BA21207A25BA2120FA25B1460001F13F014E0 -1300130114C01303001E1380EB07005BEA0F1EEA07F8EA01E015307AAE19>I<13F0D803 -FC1307D80F1E130F000E141F121C123C0038143FD8783E133E1270A2017E137ED8F07C13 -7CEA60FCC65A15FC000114F85BA21401000314F013E0A2140315E0EA07C0A20003130715 -C0EBE00F141F0001133F9038F07F8038007FEFEB1F8FEB001F1500A25C003E133E007E13 -7E147C5C007C5BEA7001495A38380780D83C1FC7FCEA0FFCEA07F020317AA025>121 -D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fe cmbx8 8 1 -/Fe 1 49 df<EB0FFC90387FFF8048B512E03903FC0FF03907F003F848486C7E48486C7E -A2003F80A2497F007F1580A400FF15C0B0007F1580A46C6CEBFF00A2001F5CEBE001000F -5C6C6C485A3903FC0FF06CB55A6C6C1380D90FFCC7FC222D7DAB29>48 -D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Ff cmmi8 8 23 -/Ff 23 120 df<EB01FCEB0FFF90383F07C090387C03E03A01F801F00CEA03F03907E000 -F84848141C49EBFC18001F147C48C713381630481570007E156016E016C000FE147D48EC -7F801600157EA2157CA2127C15FE0203130C6CEB073E6C011E131C3A0F81F81F383A03FF -E00FF03A00FE0003C0261F7D9D2D>11 D<EB03FE90380FFFE090380E3FF0EB1C0F903818 -03E0EC00C01500131CA2131E131F6D7EA2806D7E8013036D7EEB0FFCEB3EFE13783801F0 -7E3803E07F48487EEA0F80A248487E5A123E127E127CA300FC131E48133EA3143C147CA2 -007813785C127C383C01E06C485A6C485A6CB4C7FCEA00FC1C307DAE1F>14 -D<90383FFFFCA2903800FE00A25CA21301A25CA21303A25CA21307A25CA2130FA25CA213 -1FA25CA2133FA291C7FCA25BA2137EA213FEA25BA21201A25BA21203B512E0A21E2D7DAC -1F>73 D<000FB8FCA23B1FC003F8003F0100151F001C4A130E123C003801071406123000 -704A130EA20060010F140C12E0485CA2141FC715005DA2143FA292C8FCA25CA2147EA214 -FEA25CA21301A25CA21303A25CA21307A25C130F131F001FB512F0A2302D7FAC29>84 -D<EB07E0EB1FF890387C1CE0EBF80D3801F00F3803E007EA07C0120FD81F8013C0A2EA3F -00140F481480127EA2141F00FE14005AA2EC3F02EC3E06A25AEC7E0E007CEBFE0C14FC01 -01131C393E07BE18391F0E1E38390FFC0FF03903F003C01F1F7D9D25>97 -D<13F8121FA21201A25BA21203A25BA21207A25BA2120FEBC7E0EB9FF8EBB83C381FF01E -EBE01F13C09038800F80EA3F00A2123EA2007E131FA2127CA2143F00FC14005AA2147EA2 -147C14FC5C387801F01303495A383C0F806C48C7FCEA0FFCEA03F0192F7DAD1E>I<EB01 -F8EB0FFE90383E0780EB7C01D801F813C03803F0073807E00FEA0FC001801380121F48C8 -FCA25A127EA312FE5AA51560007C14E0EC01C0EC03806CEB0F00001E131C380F81F83807 -FFE0C648C7FC1B1F7D9D1F>I<EB03F8EB0FFE90383E0780EBF803D801F013C03803E001 -EA07C0000F1303D81F8013801407393F000F00141E387F01FCEBFFF091C7FC007EC8FC12 -FE5AA4127C156015E0EC01C06CEB0380EC0F006C131C380F81F83803FFE0C648C7FC1B1F -7D9D21>101 D<131FEA03FFA2EA003FA2133EA2137EA2137CA213FCA25BA21201143F90 -38F1FFC09038F3C1F03803FF0001FC7F5BA2485A5BA25B000F13015D1380A2001F13035D -1300140748ECC04016C0003E130F1580007E148191381F0180007C1403ED070000FCEB0F -06151E48EB07F80070EB01E0222F7DAD29>104 D<1307EB0F80EB1FC0A2EB0F80EB0700 -90C7FCA9EA01E0EA07F8EA0E3CEA1C3E123812301270EA607EEAE07C12C013FC485A1200 -12015B12035BA21207EBC04014C0120F13801381381F01801303EB0700EA0F06131EEA07 -F8EA01F0122E7EAC18>I<15E0EC01F01403A3EC01C091C7FCA9147CEB03FE9038078F80 -EB0E07131C013813C01330EB700F0160138013E013C0EB801F13001500A25CA2143EA214 -7EA2147CA214FCA25CA21301A25CA21303A25CA2130700385BEAFC0F5C49C7FCEAF83EEA -F0F8EA7FF0EA1F801C3B81AC1D>I<137CEA0FFCA21200A213F8A21201A213F0A21203A2 -13E0A21207A213C0A2120FA21380A2121FA21300A25AA2123EA2127EA2127CA2EAFC0813 -1812F8A21338133012F01370EAF860EA78E0EA3FC0EA0F000E2F7DAD15>108 -D<27078007F0137E3C1FE01FFC03FF803C18F0781F0783E03B3878E00F1E01263079C001 -B87F26707F8013B00060010013F001FE14E000E015C0485A4914800081021F130300015F -491400A200034A13076049133E170F0007027EEC8080188149017C131F1801000F02FCEB -3F03053E130049495C180E001F0101EC1E0C183C010049EB0FF0000E6D48EB03E0391F7E -9D3E>I<3907C007E0391FE03FF83918F8783E393879E01E39307B801F38707F00126013 -FEEAE0FC12C05B00815C0001143E5BA20003147E157C5B15FC0007ECF8081618EBC00115 -F0000F1538913803E0300180147016E0001F010113C015E390C7EAFF00000E143E251F7E -9D2B>I<EB01F8EB0FFF90383F078090387C03C0D801F813E03903F001F0EA07E0D80FC0 -13F8EB8000121F48C7FC14015A127EA2140300FE14F05AA2EC07E0A2EC0FC0A2007CEB1F -801500143E6C5B6C485A380F83E03803FF80D800FCC7FC1D1F7D9D22>I<90387C01F890 -38FE07FE3901CF8E0F3A03879C0780D907B813C0000713F000069038E003E0EB0FC0000E -1380120CA2D8081F130712001400A249130F16C0133EA2017EEB1F80A2017C14005D01FC -133E5D15FC6D485A3901FF03E09038FB87C0D9F1FFC7FCEBF0FC000390C8FCA25BA21207 -A25BA2120FA2EAFFFCA2232B829D24>I<903807E03090381FF87090387C1CF0EBF80D38 -01F00F3903E007E0EA07C0000F1303381F800715C0EA3F00A248130F007E1480A300FE13 -1F481400A35C143E5A147E007C13FE5C1301EA3E07EA1F0E380FFCF8EA03F0C7FC13015C -A313035CA21307A2EBFFFEA21C2B7D9D20>I<3807C01F390FF07FC0391CF8E0E0383879 -C138307B8738707F07EA607E13FC00E0EB03804848C7FCA2128112015BA21203A25BA212 -07A25BA2120FA25BA2121FA290C8FC120E1B1F7E9D20>I<EB07E0EB3FF8EB781EEBF006 -3801E0073803C00F141FA20007131E140CEBE00013F8EBFF806C13E06C13F06C13F8EB3F -FC13011300147C0078133C12FCA2147C48137800E013F814F0386001E0387807C0381FFF -00EA07F8181F7C9D21>I<130E131FA25BA2133EA2137EA2137CA213FCA2B512F8A23801 -F800A25BA21203A25BA21207A25BA2120FA25BA2001F1310143013001470146014E0381E -01C0EB0380381F0700EA0F0EEA07FCEA01F0152B7EA919>I<EA01E0D807F8130ED80E3C -131FD81C3E5B0038143E12301270D8607E137ED8E07C137C12C013FC484813FC00005C12 -015B140100035C13E0A2020313200007ECE06013C0A216E0020713C00003EB0FC09038E0 -1FC191383BE1803901F071E33A007FE0FF0090381F803C231F7E9D29>I<D801E01370D8 -07F813F8380E3C01D81C3E13FC1238003013000070147CEA607ED8E07C133812C013FC48 -5A0000143012015B1570000314605B15E015C01207EBC00115801403EC070000031306EB -E00E00015BEBF07838007FE0EB1F801E1F7E9D22>I<D801E01570D807F890381C01F8D8 -0E3C133ED81C3E017E13FC0038147C003015000070167CD8607E01FC1378D8E07C491338 -12C013FC3880F8010000163000015C13F0020314700003166001E05BA217E00007010714 -C001C0EBC00117801603000316006D486C5A160E3A01F01DF01C3A00F838F83890397FF0 -7FF090390FC00FC02E1F7E9D33>I E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fg cmmi12 14.4 12 -/Fg 12 123 df<ED3FE0913801FFFC020F13FF91393FE03FC09139FF000FE0D901FC6D6C -EB03C0D907F86D7E49486D6C148049488049480100140749486E140049C8FC48486F6C5A -0003180E5B4848EEC01E000F043F131C193C4848173819784848177019F0007F604916C1 -6118C300FFEFC7805B06CFC7FC18DEA290C913FC6060A26060A56C16FF6D4A7F003F5DDC -0F9F130E6C6CDA1F1F131E6C6CDA7C0F131C6C6CD901F8143C6C6C903A0FE007F078D801 -FE903AFF8003F8F83D007FFFFE0001FFF0011F01F06D13C0010390C8003FC7FC42357BB3 -4A>11 D<EF0FF8EF7FFF4CB512C0933907F00FF093390F8003F8043EC77E4C147E5EDB01 -E0804B5A4B48EC1F80A24BC8FC151E4B16C0A25D0370ED3F8015F05D14014B157F020317 -005D02075E92C95A4E5A5C020E4B5A61021E4B5A021C150FF01F80023C90267FF83FC7FC -DA3801B512FE4B14F89338801FF0027890B57E0270ECFEFE0300EBF07E93C77E02F0824A -6F7E180F8513014A150785A213035CA301078391C9FCA26149160F130EA3011E161F6113 -1CA2013C4C5AA2187F61017C4CC7FCA24D5A017E5E01FE4B5A01EE150701EF4B5A01E7ED -1FC000016D4A5AD9C3C04AC8FC6EEB01FED9C1F0EB07F82603C0FCEB3FE0D9803FB51280 -020F49C9FC020313E0000790CCFC90CDFCA35A120EA3121E121CA3123C1238A312781270 -A312F0A2426B7ED342>I<ED0FFC92383FFFE092B512FE4A14FF913803E07F913807800F -4B7E4A1301020EEB007E1718021E1400A3141FA36E7EA28181140781A26E7E81A26E7E81 -8082826F7EA26F7E4AB47E1407021F7F91387F8FFEECFE0F903803F807D907F07F49487E -D91FC0148049487EEB7F005B48486D13C05B12034848147FA2485AA2485A163F123F5BA2 -1780127F49147FA3170048C8FCA25E5EA26C14015EA24B5AA26C4A5A6D5C150F001F5D6D -495A6C6C49C7FC0007147ED803F85B6C6C485A6CB55A013F13C0010790C8FCEB00203057 -7CD434>14 D<013EEC0FF8D9FFC0EB7FFF00036D48B512C0903BC3F003F01FE03C0783F8 -0F800FF03C0F01FC1F0007F8000E023C1303001E6D4814FC001C5C6E5A003C5C00385CA2 -D8780390C7FC00705BA25CD8F007150718F800005BA2010F150FA24A15F0A2011F151FA2 -4A15E0A2013F153FA24A15C0A2017F157FA24A1580A201FF15FFA291C81300A2485DA249 -5DA200031503A2495DA216075B5FEA01E0C9120FA25FA2161FA25FA2163FA25FA2167FA2 -5FA216FFA294C7FCA35EA21678364D7DB33A>17 D<EB01FCECFF8015E09038001FF06E7E -6E7E811403A28180A28280A282157FA282153FA282151FA282150FA2821507A2821503A2 -8281A28381A283167FA283163FA283167F16FF4B7FED03EFED07CF92380F8FFCED1F0715 -3E037E7FEDFC03EC01F8DA03F07F4A487EEC0FC0021F814A487E4AC7FC02FE814948147F -495A0107824948143F495A4948814948141F49C8FC48834848150F485A48488248481507 -485A48488200FF1603498290C97E48701380007C177F39547AD244>21 -D<ED0380150793C8FCA7EEFFFEEFFF80033F14C09238FFE003020390B5128091260FF87F -130091391FF01FFCDA7FE0C8FC4A5A495B4990C9FC495A5C495A131F5C133F5CA3137F5C -A66D7EA36D7E130F9138F83FFE6DB67E0101816DEBC00392B55A010392C7FCD907E013FC -4948C9FC013FCAFC137E5B485A5B1203485A485AA2485AA248CBFCA2127EA312FE5AA37E -A37E7FA213E06C7E13FC6CB4FC6C13C014F86C13FF000314C06C14F86C6C13FE011FEBFF -C0010714F0010014FC023F7F02077F020080153F15071501ED007F163FA2161FA24CC7FC -14E002F8137E027C137C91383F80F891380FFFF002035BDA007FC8FC326B7DD233>24 -D<0103B812F8010F17FC133F5B90B9FC4818F84818E02907F800E000E0C7FC260FC00113 -01018013C0D81F005D003E1303003C15034814804813075A5FC7380F0007A35C141E160F -143EA25CA302FC131F5C1301A3495AA20107815C130FA283495AA2133F83495A8301FF14 -0F91C7FCA2705A5B0138EC03C03E347CB242>I<120FEA3FC0EA7FE012FF13F0A213F8A3 -127F123FEA0F381200A513781370A313F013E0A2120113C0120313801207EA0F00121EA2 -5A5A12300D23768B21>59 D<EC1FF0EB3FFF495BA3EB007F5D143F147FA25DA314FF92C9 -FCA35B5CA313035CA313075CA3130F5CED03FE92381FFFC0011F017F13F09139E0FC07F8 -9139E3E003FC9139E7C001FED93FEFC7FC02DE8014FC5C495A5CA25C495AA291C8FC5E48 -5E5BA2160300035E5BA2160700075E5B160F5F120F49141F5FA2001F033F13074915C016 -7FEF800F003F170E4914FFEF001E181C007F173C494A13381878187000FF17F090C8EB01 -E093387E03C093383F0F804892381FFF00EE0FFC0078ED03F0385479D243>104 -D<DA3F80EB3F80DAFFE0EBFFE00103D9F80313F8903B0FC0FC07C0FC903B1F007E0F001E -013CD93F1E137E4991389C01FF49ECBC0349EB1FF800014B5A485A4902E013FE120790C7 -003FEB03FC489238C000F0000E1700A2001E147FA2C85BA215FF93C8FCA35C5DA314035D -A314074B1470A3020F15F0000F17E0D83FC0491301007F17C0021F140300FF1780023F14 -07EF0F00D9807B141E90260073F85B00FC01F1147C277801E0FC13F03B3E07C07E07E06C -B4486CB45A270FFE000F90C7FCD801F8EB03F838357CB343>120 -D<EB0FE0D93FF815E0496CEC03F8D9F07E14073801E07F48486C140FD807806D14F0EA0F -00000E137F001E161F001C17E0123C003813FF92C7123F007817C0EA70015C00F0167F01 -03168000005B13074A14FF1800130F5C5E011F5D5CA21603013F5D5CA21607017F5D5CA2 -160F5FA3161F5F163F013F147FA26E495A011F13036D6C5A903807F81F903A03FFFE7F80 -010013F8EC1FE091C712FF94C7FCA25D5EA2D807E0495A487E001F4A5A123F4B5A4B5A5E -49495A018049C8FC003CC712FE4A5A6C495A6CEB0FF09038E03FC00003B5C9FCC613FCEB -3FE0354C7DB339>I<DA07C0EB01C0DA3FF01303DA7FFC148049486C1307496DEB0F0049 -EC801E5F49ECE07C903A1FC03FFFF8DA00075B013E01005B013CEC01C0013814034C5A90 -C848C7FC161E5E5E5E4B5A4B5AED0F80031EC8FC5D5D5D4A5A4A5A4A5A021FC9FC143C5C -5C495A494814184948143849C8FC011E15784915704915F0494A5A484814032603FFE049 -5A02FC131F489039FF80FF80D80F8090B5C7FC48487E001E6D5B486D5B486D13F000706D -5B00F00101138048D9007EC8FC32357BB336>I E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fh cmsy10 14.4 4 -/Fh 4 34 df<007FBA12FEBCFCA36C19FE4805769F5D>0 D<0070EF038000F8EF07C06C -170F6C171F007FEF3F806C6CEE7F006C6C16FE6C6C4B5A6C6C4B5A6C6C4B5A6C6C4B5A6C -6C4B5A017F4B5A6D6C4AC7FC6D6C14FE6D6C495A6D6C495A6D6C495A6D6C495A6D6C495A -027F495A6E6C48C8FC91381FC0FE91380FE1FC913807F3F86EB45A6E5B6E5B6F5A6FC9FC -4B7E4B7E4A7F4A7F913807F3F891380FE1FC91381FC0FE91383F807F4A486C7E02FE6D7E -49486D7E49486D7E49486D7E49486D7E49486D7E4948147F49C86C7E01FE6F7E48486F7E -48486F7E48486F7E48486F7E48486F7E4848167F48CAEA3F8000FEEF1FC048170F481707 -0070EF03803A3B6FBA5D>2 D<EE0380160783B3B2007FBB12F8BC12FCA36C1AF8C9D807 -C0C9FCB3AF007FBB12F8BC12FCA36C1AF84E5179CF5D>6 D<1B1E1B1FA4881B0FA2881B -07A2881B0388757EA2757E1C7EA288767E767E767E89F403FC767E9938007F80777EF51F -F0007FBE12FEC01280A36CF5FE00D0EA1FF0F53FC0535AE201FEC7FC525AF407F065525A -525A52C8FC1C7EA264515AA2515A641B0764A21B0F64A21B1F99C9FCA41B1E693F79BC78 ->33 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fi cmex10 10 3 -/Fi 3 114 df<EE01E01603EE07C0EE0F80161F1700163E5E5E15015E4B5A15074B5A5E -151F4BC7FC153E157E5DA24A5A14035D14075D140F5D141F5D143F92C8FC5C147E14FE5C -1301A25C13035C1307A25C130FA2495AA3495AA3137F91C9FCA25B5BA312015BA31203A2 -5BA21207A35BA2120FA35BA3121FA45BA2123FA75B127FAC90CAFC5AB3B3A27E7FAC123F -7FA7121FA27FA4120FA37FA31207A27FA31203A27FA21201A37F1200A37F7FA280133FA3 -6D7EA36D7EA2130780A2130380130180A2130080147E147F8081141F81140F8114078114 -038114016E7EA2157E153E153F6F7E150F826F7E15036F7E821500167C82821780160FEE -07C0EE03E016012BF86C8242>32 D<12F07E127C7E123F7E6C7E6C7E6C7E7F12016C7E7F -137E133E133F6D7E130F806D7EA26D7E80130180130080147E147F8081141F81140F8114 -0781A2140381140181A2140081A2157FA36F7EA382151FA282150FA3821507A382A21503 -A282A31501A282A31500A382A482A21780A7163F17C0AC161F17E0B3B3A217C0163FAC17 -80167FA71700A25EA45EA31501A35EA21503A35EA21507A25EA3150F5EA3151F5EA2153F -5EA34BC7FCA315FEA25D1401A25D14035D1407A25D140F5D141F5D143F92C8FC5C147E14 -FE5C13015C13035C495AA2495A5C131F49C9FC133E137E5B5B485A12035B485A485A48CA -FC5A123E5A5A5A2BF87E8242>I<1B301B78A21BF8A21BF01A01A21BE01A03A21BC01A07 -A21B801A0FA21B0062A21A1E1A3EA21A3C1A7CA21A781AF8A262A21901A2621903A26219 -07A262190FA297C7FC61A2191E193EA2193C197CA2197819F8A2611801A2611803A261A2 -1807A261180FA296C8FC60A2181E183EA2183C187C131001301678017016F813F8600001 -16011203486C5E000F1603121DD838FE5E00701607126000C05FEA407F0000160FA26D6C -92C9FC5FA2171E6D6C143EA2173C6D6C147CA2177817F86D7E5F16016D7E5F1603A26D6C -5C1607A26D6C5C160FA294CAFC027F5BA2161EEC3F80163EA2163C91381FC07CA2167891 -380FE0F8A25E15E1EC07F15E15F3EC03FB5E15FFA26E5BA36E90CBFCA35D157EA2157C15 -3C15384D96788353>113 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fj cmti12 14.4 4 -/Fj 4 117 df<EA07C0EA1FF0123FEA7FF8A312FF13F0A2EA7FE013C0EA1F000D0C738B -24>46 D<ED3FC0913801FFF8020F13FE91383FE07F91397F001F80D901FE130FD903F8EB -07C0494813034948131F4948133F4948137F137F49C7FC485A17804848EC3F0000071508 -4991C7FC120FA2485AA2123F5BA3127F5BA4485AA5127FA2EE0180EE03C01607003FED0F -80161FEE3F006C6C147E5E6C6CEB03F06C6CEB0FE06C6CEB3F802701FE03FEC7FC39007F -FFF8011F13E0D907FEC8FC2A3574B336>99 D<ED7F80913807FFF0021F7F91387F80FE90 -3901FE003FD907F87F49481480D91FC0130F495A137F49C7FC485A485A0007151F491500 -000F5D49147E001F15FE4B5A4848EB07F0ED7FE091387FFF8048B548C7FC15E00280C8FC -01C0C9FC12FF5BA590CAFCA66C1503EE0780160FEE1F006C6C5C167E001F5D6D495A000F -EC07E06C6CEB1FC06C6C017FC7FC3901FC07FC6CB512F0013F13C0D907FCC8FC293573B3 -36>101 D<140F4A7E143FA3147F92C7FCA35C5CA313015CA313035CA313075CA2007FB6 -1280B7FC1600A226000FE0C7FC131F5CA3133F5CA3137F91C8FCA35B5BA312015BA31203 -5BA312075BA3000F143C5B157C1578121F4913F85D14014A5A01805B14074A5A92C7FC38 -0FC03E5C3807E1F86CB45A6C13C0D8007EC8FC214C75CA27>116 -D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fk cmsy6 6 1 -/Fk 1 49 df<EA01E0EA03F0A4EA07E0A213C0120FA21380A2EA1F00A2121EA2123E123C -A25AA3127012F05A12600C1A7E9B12>48 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fl cmmi10 10.95 59 -/Fl 59 123 df<EC0FF0EC7FFE903801F81F903907E007C049486C6C13E0D93F80EBF001 -90267F000114C001FE14F84848EB00FC484815030007178049147E000FEE0700485A5F48 -48150E171E171C007F163C49153817785F00FF5E90C8127F5F5F94C7FCA248157EA2127E -007F15FE15016C4A7E92390F3F03806C6C131E6C6C9038781F070007D901E014003B03F0 -1F800F8E3B00FFFE0007FCD91FE0EB01F033297CA73A>11 D<EE7F80923801FFE0923807 -80F892381E003C03387F03F0131F4A48EB0F804A5A5D4AC7EA07C0140E021E140F141C14 -3C023815805C171F5C180001015D4A143E5F010315FC4A495A4C5A01079038FFE7C00203 -EBFF80DB807EC7FC92B57E49C6EBC7C0010E90380003E0160183011E81011C1400A28313 -3C1338A313781370A301F01401495DA3000115035F16075F0003150F5F4C5A6D4AC7FC00 -07157E01785C0138495A6DEB03E0D80F0FEB0FC0270E07C07FC8FC903801FFF89038007F -C0001E90CAFC121CA3123C1238A312781270A312F05AA432527EBF33>I<EC01C0EC0FFF -023F13E0027913F0ECE03F903801C00FEC8007ED01E0010390C7FCA280130180A280A26D -7E80A2147E147F6E7EA26E7E81140FEC7FF0903801F7F8EB07C790381F83FCEB3E03EB7C -0101F87F12013803F000485AA24848137E485AA2123F90C7FCA25A127EA300FE147C5A15 -FCA25D1401A25D007C13035DA26C495A4A5A6C91C7FC6C131E6C6C5A3803E0783800FFE0 -EB3F8024427CC028>14 D<EC1FF8903801FFFC010713F890381FF000EB3F8001FEC7FC48 -5A485A485A120F485AA2485AA2485AA290B512C0B6FC150090C8FCA35AA7127E127F7EA2 -6C7E000F14703907C001F03903E003E03901F81F8039007FFE00EB0FF01E287CA625>I< -EC01C014035DA5EDBFF0913801FFF8913803E03891380FFFF891381E3FE00238C7FC14F0 -495A495A495A49C8FC130E131E5B5B137013F0485AA2485A485AA248C9FCA25A121EA25A -A3127C1278A312F8A25AA57EA47EA27E127F7F6C7E13F86CB4FC6C13C06C13F8000113FF -6C6C13C0011F7F01037F9038007FF8140F14036E7E1400A2157C1578A35D131C6D485A90 -380783C06DB4C7FCEB007C25527CBE28>I<D801F0EB0FE0D803FCEB7FFC3A071F01F03E -3A0E0F03801F001E90398F000F80001C139E003C01FC14C000385B5C38781FE012705CA2 -00F049131F013F1580000090C7FCA2163F5B017E1500A25E13FE49147EA216FE1201495C -A215011203495CA215031207495CA21507120F495CEA0380C8120FA25EA2151FA25EA215 -3FA293C7FCA25DA2157EA3157C15382A3C7EA72D>I<15FCEC03FF91380F87C091383E03 -E0EC7C0102F813F01301903903F000F8495A010F14FC5C495A133F91C7FC4914FE13FEA2 -12015B12034913011207A25B000F15FC1503121F5BA21507003F15F890B6FCA33A7FC000 -0FF05BA2151F16E048C7FCA2ED3FC0A2481580157F1600A215FEA24A5AA24A5A007E5C14 -075D4A5A003E5C141F4AC7FC6C137E5C380F81F03807C3E03801FF80D8007EC8FC27417D -BF2B>I<133F14E0EB07F0EB03FC13016D7EA3147FA26E7EA36E7EA36E7EA36E7EA36E7E -A26E7EA36E7EA3157FA36F7E157F15FF4A7F5C913807CFE0EC0F8FEC1F0F91383E07F014 -7C14FC49486C7EEB03F0EB07E049486C7EEB1F80EB3F00496D7E13FE4848147F485A485A -4848EC3F80485A123F4848EC1FC048C8FC4816E048150F48ED07F0007015032C407BBE35 ->21 D<EB01C0496C14E00107EC03F0A3010F1407A24A14E0A2011F140FA24A14C0A2013F -141FA291C71380A249143FA2017E1500A201FE5CA249147EA2000115FE17074914FCA215 -010003160F923803F80EA200070207131E030F131C6D131F033C1338486C1370903AFF81 -E07C70903AC7FF803FE0903AC1FE000F80D81FC0C9FCA25BA2123FA290CAFCA25AA2127E -A212FEA25AA35A1270303C7EA737>I<017FEC01C0D83FFFEC03E016075B1200160F17C0 -5B161F00011680163F491500A20003157EA2495C150100075D4B5A49495AA2000F4A5A4B -5A4949C7FC157E001F147C5D49485AEC07E0003F495A4AC8FCEB003E14F848485AEB07C0 -D87E1FC9FC13FCEAFFE0138000F8CAFC2B287CA72D>I<EC01C014035DA5EDFFF04A13F8 -91383FE03891B512F8903901FC3FE0D907F8C7FC495A495A495A137F5C13FF91C8FCA25A -5BA612007F7F90383F9FFC6DB47E903807E00E90380FFFFE90383E3FF80178C8FC5B485A -485A485A48C9FCA2121E5AA25AA312F85AA37EA27E7E7E6C7E13E0EA3FF86CB4FC6C13C0 -6C13F8000113FE39007FFFC0010F13F001037F9038007FFCEC1FFE14031400157E153EA3 -153C010C137C010F1378903803C0F0903800FFC0023FC7FC25527EBE28>I<011FB612FE -017F15FF48B8FC5A4816FE3B0FC03801C000EA1F00003E1403003C01785B4813705AECF0 -075AC712E0010191C7FCA25DEB03C0A313071480A2010F5BA2EB1F0082A2133EA2137E82 -5B150F0001815B120315075BC648EB038030287DA634>I<ED1FC0EDFFF0913803E07C91 -380F803E4A487E023E14804AEB0FC05C494814E01303495A5C130F494814F0A2133F91C7 -FCEE1FE05B137EA201FE143F17C05BA20001ED7F80A24915005E00035D4B5AA24B5A486C -495A4B5A6D5C01EEEB3F80D80FE7017EC7FC9038E3C1F89038C1FFE0D9C07FC8FC001F90 -C9FCA25BA2123FA290CAFCA25AA2127EA212FEA25AA35A12702C3C7EA72F>I<020FB512 -FE027F14FF49B7FC1307011F15FE903A3FE03FE00090387F000F01FE6D7E484813034848 -8048481301485A5B121F5B123F90C7FC5A127EA2150300FE5D5AA24B5AA2150F5E4B5AA2 -007C4AC7FC157E157C6C5C001E495A001FEB07E0390F800F802603E07EC8FC3800FFF8EB -3FC030287DA634>I<16F0A25EA21501A25EA21503A25EA21507A293C7FCA25DA2150EA2 -151EA2151C4AB47E020F13F091387F3CFC903901F8381FD907E0EB0F80903A0F807807C0 -D93F00EB03E0017E90387001F04915F84848EBF000484815FC48485B4848157C1401EA1F -805DEA3F00020314FC5A007E5CA20207130100FE16F848140016034A14F01607020E14E0 -007CED0FC0141E007EED1F80003E011CEB3F00167E6C013C5B0180495A000F90383803E0 -D807E0EB0FC02701F0783FC7FC3900FC79FC90381FFFE0D903FEC8FCEB00F0A25CA21301 -A25CA21303A25CA21307A291C9FCA25BA22E527BBE36>30 D<EE01C0A21603A25FA21607 -A294C7FCA25EA2160EA2161EA2161CA2163CA21638A21678013E1670D9FF8090387001FC -2601C3E01403D8038102F013FE380701F0000E15E0121ED81C0301011301003C16000038 -4B137CEA78070070EBE003183CD8F00F5C02C0153800001407131F028090C71278187001 -3F5B1400030E14F04916E0017E011E130118C0031C130301FE168049013CEB07005F0338 -131E017C151C017E01785B5F03705B6D4A5A903A1F80F00780D90FC049C7FC903907E0E0 -3C903901FCE1F09039007FFFC0DA07FEC8FCEC01C0A21403A25DA21407A292C9FCA25CA2 -140EA2141EA2141CA237527EBE3B>32 D<0120ED01C00178ED07F001F8150F000117F85B -485A5B0007160749150348C9EA01F0A2121E1700121C003C023814E0003814FCA2007816 -01140100704A14C0A217034B148000F0130317074B14005F5D0207141E6F133E6C010F5C -4A7E6C013F5C007E9038FFF8033B7F87FDFF0FF0D9FFF8EBFFE06C495C4A6C5B6C496C90 -C7FC00079038001FFCD801F8EB03F035297EA739>I<011FB912F8017F18FC48BAFC5A48 -19F8260FC0F0C9EA070048C6481780D83E011703383C03C000785BEAF0074848CAFC010E -1406D8001E140E131C133C0138021E1407017818000170141C163C6101F0027C140E4917 -1E16FC03015DA2000102035D030715F8DB0FBC5C043C495A031F1403DB7E3E495A6C6CD9 -FC1E495A9027F801F81F013FC7FC9026FC0FF0EB80FE90B5486CB45A6D01C05C6DD90007 -5BD91FFC6D13C0D907E0D900FEC8FC46287DA64B>36 D<121EEA7F80A2EAFFC0A4EA7F80 -A2EA1E000A0A798919>58 D<121EEA7F8012FF13C0A213E0A3127FEA1E601200A413E013 -C0A312011380120313005A120E5A1218123812300B1C798919>I<183818FC1703EF0FF8 -EF3FE0EFFF80933803FE00EE0FF8EE3FE0EEFF80DB03FEC7FCED0FF8ED3FE0EDFF80DA03 -FEC8FCEC0FF8EC3FE0ECFF80D903FEC9FCEB0FF8EB3FE0EBFF80D803FECAFCEA0FF8EA3F -E0EA7F8000FECBFCA2EA7F80EA3FE0EA0FF8EA03FEC66C7EEB3FE0EB0FF8EB03FE903800 -FF80EC3FE0EC0FF8EC03FE913800FF80ED3FE0ED0FF8ED03FE923800FF80EE3FE0EE0FF8 -EE03FE933800FF80EF3FE0EF0FF8EF03FC17001838363678B147>I<ED0180ED03C01507 -A21680150FA216005DA2151E153EA2153C157CA2157815F8A25D1401A25D1403A25D1407 -A25D140FA24AC7FCA2141E143EA2143C147CA2147814F8A25C1301A25C1303A25C1307A2 -5C130FA291C8FC5BA2131E133EA25BA2137813F8A25B1201A25B1203A25B1207A25B120F -A290C9FC5AA2121E123EA2123C127CA2127812F8A25A1260225B7BC32D>I<126012F8B4 -FCEA7FC0EA1FF0EA07FCEA01FF38007FC0EB1FF0EB07FCEB01FF9038007FC0EC1FF0EC07 -FCEC01FF9138007FC0ED1FF0ED07FCED01FF9238007FC0EE1FF0EE07FCEE01FF9338007F -C0EF1FF0EF07F8EF01FCA2EF07F8EF1FF0EF7FC0933801FF00EE07FCEE1FF0EE7FC04B48 -C7FCED07FCED1FF0ED7FC04A48C8FCEC07FCEC1FF0EC7FC04948C9FCEB07FCEB1FF0EB7F -C04848CAFCEA07FCEA1FF0EA7FC048CBFC12FC1270363678B147>I<17075F84171FA217 -3F177FA217FFA25E5EA24C6C7EA2EE0E3F161E161C1638A21670A216E0ED01C084ED0380 -171FED07005D150E5DA25D157815705D844A5A170F4A5A4AC7FC92B6FC5CA2021CC7120F -143C14384A81A24A140713015C495AA249C8FC5B130E131E4982137C13FED807FFED1FFE -B500F00107B512FCA219F83E417DC044>65 D<49B712F818FF19E090260001FEC7EA3FF0 -F007F84B6E7E727E850203815D1A80A20207167F4B15FFA3020F17004B5C611803021F5E -4B4A5A180FF01FE0023F4B5A4B4A5ADD01FEC7FCEF07F8027FEC7FE092B6C8FC18E092C7 -EA07F84AEC01FE4A6E7E727E727E13014A82181FA213034A82A301075F4A153FA261010F -167F4A5E18FF4D90C7FC011F5E4A14034D5A013FED1FF04D5A4AECFFC0017F020790C8FC -B812FC17F094C9FC413E7DBD45>I<DC1FF81307923801FFFE030F9038FF800E923A7FF0 -07E01E4A48C7EAF03EDA03FCEC787EDA0FF0EC3CFCDA3FC0141F4A48140F4AC8FC4948ED -07F8EB07F849481503131F4A16F049481501495A13FF4890C913E05B1203485A19C0485A -A2485A95C7FC123F5BA2127F5BA312FF5BA590CCFC183CA21838A21878187018F06C6C5E -17014D5A003F5F6D15074DC7FC001F161E6C6C5D6D5D6C6C5D00034B5AD801FEEC07C06C -6C4AC8FCD97FC0137E90391FF803F80107B512E0010114809026001FF8C9FC40427BBF41 ->I<49B912C0A3D9000190C71201F0003F4B151F190F1A80020316075DA314075D1A00A2 -140F4B1307A24D5B021F020E130E4B92C7FC171EA2023F5C5D177CEE01FC4AB55AA3ED80 -0302FF6D5A92C7FCA3495D5C19380401147801034B13704A16F093C85AA2010716014A5E -180361010F16074A4BC7FCA260011F163E4A157E60013F15014D5A4A140F017F15FFB95A -A260423E7DBD43>69 D<49B9FCA3D9000190C7120718004B157F193F191E14035DA31407 -5D191CA2140F5D17074D133C021F020E13384B1500A2171E023F141C4B133C177C17FC02 -7FEB03F892B5FCA39139FF8003F0ED00011600A2495D5CA2160101035D5CA293C9FC1307 -5CA3130F5CA3131F5CA2133FA25C497EB612F8A3403E7DBD3A>I<49B6D8C03FB512F81B -F01780D900010180C7383FF00093C85B4B5EA2197F14034B5EA219FF14074B93C7FCA260 -140F4B5DA21803141F4B5DA21807143F4B5DA2180F4AB7FC61A20380C7121F14FF92C85B -A2183F5B4A5EA2187F13034A5EA218FF13074A93C8FCA25F130F4A5DA21703131F4A5DA2 -013F1507A24A5D496C4A7EB6D8E01FB512FCA2614D3E7DBD4C>72 -D<49B600C090387FFFF896B5FC5FD900010180C7000F130093C813F84B16E01A804FC7FC -0203163C4B15F84E5AF003C002074B5A4B021FC8FC183E1878020F5D4BEB03E0EF07804D -C9FC021F143E4B5B17F04C5A023F1307EDC00F4C7E163F027FEBFFF8ED81EFED83CF9238 -8F87FC9138FF9F0792383C03FE15784B6C7E4913E0158092C77F5C01036F7E5C717EA213 -074A6E7EA2717E130F4A6E7EA284011F15035C717E133F855C496C4A13E0B600E0017F13 -FFA34D3E7DBD4D>75 D<49B612F0A3D900010180C7FC93C8FC5DA314035DA314075DA314 -0F5DA3141F5DA3143F5DA3147F5DA314FF92C9FCA35B5C180C181E0103161C5C183C1838 -13074A1578187018F0130F4AEC01E0A21703011FED07C04A140F171F013FED3F8017FF4A -1303017F021F1300B9FCA25F373E7DBD3E>I<49B56C93B512C050148062D90001F18000 -704B90C7FC03DF5F1A0E1A1D1403039FEE39FC1A711A739126078FE015E3030F5FF101C3 -F10387140F020E93380707F0A2F10E0F021E161C91261C07F05E1938F1701F143C023804 -E05BA2953801C03F0278ED038091267003F85EF00700060E137F14F002E04B91C8FCA24E -5B01015E4A6C6C5D60943801C00113030280DA03805BA294380700030107150E91C700FE -5D5F1907495D010E4B5CA24D130F011E6E5A011C60705A013C171F017C92C7FC01FE027E -5DD803FF4D7EB500FC017C017FB512E0167804385E5A3E7CBD58>I<49B712F018FF19C0 -D9000190C76C7EF00FF84BEC03FC1801020382727E5DA214071A805DA2140F4E13005DA2 -021F5E18034B5D1807023F5E4E5A4B4A5A4E5A027F4B5A06FEC7FC4BEB03FCEF3FF091B7 -12C005FCC8FC92CBFCA25BA25CA21303A25CA21307A25CA2130FA25CA2131FA25CA2133F -A25C497EB612E0A3413E7DBD3A>80 D<48B912FCA25A913A0003FE000F01F84A1301D807 -E0EE00F8491307491778000F5D90C7FC001E140FA2001C4B1470123C0038141FA200785D -1270033F15F000F018E0485DC81600157FA25EA215FFA293C9FCA25CA25DA21403A25DA2 -1407A25DA2140FA25DA2141FA25DA2143FA25DA2147FA214FF497F001FB612FCA25E3E3D -7FBC35>84 D<027FB5D88007B512C091B6FCA2020101F8C7EBF8009126007FE0EC7F804C -92C7FC033F157C701478616F6C495A4E5A6F6C495A4EC8FC180E6F6C5B606F6C5B601701 -6F6C485A4D5A6F018FC9FC179E17BCEE7FF85F705AA3707EA283163F167FEEF7FCED01E7 -EEC3FEED0383ED070392380E01FF151E4B6C7F5D5D4A486D7E4A5A4A486D7E92C7FC140E -4A6E7E5C4A6E7E14F0495A49486E7E1307D91F806E7ED97FC014072603FFE0EC1FFF007F -01FC49B512FEB55CA24A3E7EBD4B>88 D<EC1F80ECFFE0903903F0707090390FC039F890 -381F801D90383F000F017E5C5B00011407485A48485CA2485A001F140F5E485AA2151F00 -7F5D5BA2153F00FF92C7FC90C7FCA25D92387E03805AA215FEEDFC07007E010114001403 -5E6C0107130E140E3A1F801C7C1C000F13783A07C1F03E383A01FFC01FF03A007F0007C0 -29297DA730>97 D<EB1FC0EA0FFF5CA2EA003FA291C8FCA25BA2137EA213FEA25BA21201 -A25BA21203A25BEC3F800007EBFFE09038F3C1F849C67E01FE137E4848133E49133F5B49 -1480001F141F5B5BED3FC0123FA290C7FCA248147F1680127EA215FF00FE15005AA24A5A -A25D1403485C1407007C5C4A5A5D003C495A003E49C7FC001E137E6C13F8380783F03803 -FFC0C648C8FC22407CBE27>I<EC07F0EC7FFE903801FC0F903907E0038090390FC001C0 -D93F8013E090387F000701FE131F485A485A16C0485A000F15804990C7FC121F485AA312 -7F5BA312FF90C9FCA6007E1560007F15E01501ED03C06CEC07806DEB0F00001F141E6C6C -137C3907E001F03901F01FC06CB5C7FCEB1FF023297DA727>I<EE07F0ED03FF17E0A2ED -000FA217C0A2161FA21780A2163FA21700A25EA2167EA216FEA25EEC1F80ECFFE1903803 -F07190390FC039F890381F801D90383F000F137E495C00011407485A485A5E485A001F14 -0FA248485CA2151F127F495CA2153F12FF90C790C7FCA25DEE038048147EA215FE160700 -7ED901FC130014035E6C0107130E140E3A1F801C7C1C000F13783A07C1F03E383A01FFC0 -1FF03A007F0007C02C407DBE2F>I<EC1FE0ECFFFC903803F01E90380FC00F90393F8007 -80D97E0013C0491303EA03F8120749130748481480121F49130F003FEC1F00153E397F80 -01FCEC1FF090B51280B500F8C7FC90C9FCA45AA616C01501007E1403ED07806CEC0F0015 -1E6C5C6C6C13F83907C003E03903E03F802600FFFEC7FCEB3FE022297CA72A>I<163EEE -FFC0923803E1E0923807C0F0ED0F811687ED1F8F160F153FA217E092387E038093C7FCA4 -5DA514015DA30103B512FCA390260003F0C7FCA314075DA4140F5DA5141F5DA4143F92C8 -FCA45C147EA414FE5CA413015CA4495AA35CEA1E07127F5C12FF495AA200FE90C9FCEAF8 -1EEA703EEA7878EA1FF0EA07C02C537CBF2D>I<EC01F8EC0FFE91383F07879139FC03DF -80903801F801903903F000FFEB0FE04948EB7F005C133F49C7FC49147E5B000115FEA248 -485CA215011207495CA21503120F495CA21507A25E5B0007140FA24B5A6D133F0003147F -000114FF6D485B0000EB03DF90387E0F3FEB1FFCD907F090C7FC90C7FC5DA2157EA215FE -A25D001C1301007F5C4813035D4A5A4A5A48495A00F8017EC8FC387E01FC381FFFE00003 -90C9FC293B7FA72B>I<EB01FC13FF5CA21303A25CA21307A25CA2130FA25CA2131FA25C -A2133FA291C9FC15FE90397F07FFC091381F03E090397E3801F09138F000F8EBFFE04A7F -5C91C7FC485AA25BA2484813015E5BA2000714035E5B1507120F5E49130F5E121F031F13 -70491480A2003F023F13F0EE00E090C7FC160148023E13C01603007E1680EE070000FE5D -ED1F1E48EC0FF80038EC03E02C407CBE34>I<143C14FEA21301A314FCEB00701400AD13 -7E3801FF803803C7C0EA0703000F13E0120E121C13071238A2EA780F007013C0A2EAF01F -14801200133F14005B137EA213FE5BA212015B0003130E13F0A20007131EEBE01CA2143C -EBC0381478147014E013C13803E3C03801FF00EA007C173E7EBC1F>I<EB01FC13FF5CA2 -1303A25CA21307A25CA2130FA25CA2131FA25CA2133FA291C9FC16FC49EB03FE92380F07 -80017EEB3C0FED703F01FE13E0913801C07F9038FC0380EC07000001010E14004A131C49 -4890C7FC5C00035BEBF9C0495A01FFC9FC5A14F0EBE3FE9038E07F80000FEB1FC06E7EEB -C00781001F1303160E1380A2003F151E0207131C010013E0A2485DA2007E010313781670 -00FE01015B15F1489038007F800038023EC7FC29407CBE2F>107 -D<EB07F0EA03FF14E0A2EA000FA214C0A2131FA21480A2133FA21400A25BA2137EA213FE -A25BA21201A25BA21203A25BA21207A25BA2120FA25BA2121FA25BA2123FA290C7FCA25A -EB0380127EA212FE130700FC1300A25B130EA2EA7C1C133CEA3E38EA1FF0EA07C014407D -BE1B>I<01F8D907F0EB07F8D803FED93FFEEB1FFE28078F80F81FEB781F3E0F0F81C00F -81E00F803E0E07C78007C3C007C0001CD9CF00EBC78002FEDAEF007F003C4914FE003849 -5C49485C12780070495CA200F0494948130F011F600000495CA2041F141F013F6091C75B -193F043F92C7FC5B017E92C75A197E5E01FE9438FE01C049027E14FCA204FE0101130300 -0106F81380495CF20700030115F00003190E494A151E1A1C03035E0007943800F8F0494A -EC7FE0D801C0D900E0EC1F804A297EA750>I<01F8EB0FF0D803FEEB3FFC3A078F80F03E -3A0F0F83C01F3B0E07C7800F80001CEBCF0002FE80003C5B00385B495A127800705BA200 -F049131F011F5D00005BA2163F013F92C7FC91C7FC5E167E5B017E14FE5EA201FE0101EB -03804914F8A203031307000103F013005B170E16E000035E49153C17385F0007913801F1 -E0496DB45AD801C0023FC7FC31297EA737>I<EC07F8EC7FFE903901FC0F80903907E007 -E090390FC003F090393F8001F8EB7F0001FEEB00FC485A484814FEA2485A120F5B001F15 -FF485AA2ED01FE127F5BA2150300FF15FC90C7FCA2ED07F8A2ED0FF0A2007E15E0007FEC -1FC0ED3F80A26CEC7F006C6C13FC4A5A6C6C485A3907E00FC02601F03FC7FC3800FFFCEB -1FE028297DA72C>I<D907C013FE903A0FF003FF80903A1C7C0F07E0903A383C1C03F090 -3A783E7801F80170EBF0009026F03FE013FC01E05B4B13FE0001017F147E01C090C7FC14 -7E17FF000313FEA2C75AA201015C17FE5CA20103140317FC5CA20107EC07F8A24A14F016 -0F010F15E0161F17C0EE3F80011F15006E137E5E9138B801F890393FBC03E091389E0FC0 -DA07FFC7FCEC01F849C9FCA2137EA213FEA25BA21201A25BA21203A2B512E0A3303A84A7 -2E>I<91381F800C9138FFE01C903903F0707C90390FC0387890391F801CF890383F000F -137E4914F000011407485A485A16E0485A121F150F484814C0A3007F141F491480A300FF -143F90C71300A35D48147EA315FE007E495A1403A26C13074A5A381F801D000F13793807 -C1F33901FFC3F038007F03130014075DA3140F5DA3141F5DA2143F147F90381FFFFE5BA2 -263A7DA729>I<D801F0EB3F80D807FCEBFFE03A0F1F03C0F0000E90380F00F8391E0F9E -03001C13BC003CEBF807003813F0A226781FE013F000709038C001C092C7FC5C12F0133F -000090C8FCA35B137EA313FE5BA312015BA312035BA312075BA3120F5BEA038025297EA7 -29>I<EC1FC0ECFFF8903803E03C903807800E90381E0007168049130F49131F153FA201 -F81400A2151C6D90C7FC7FEBFFE014FE90387FFFC06D7F6D13F86D7F13039038001FFE14 -031400157E000C143E123F487EA248C7123CA25D12FC00F05C0070495A0078495A6C495A -260F803EC7FC3803FFF838007FC021297CA72B>I<147014FC1301A25CA21303A25CA213 -07A25CA2130FA25CA2007FB512F0B6FC15E039001F8000133FA291C7FCA25BA2137EA213 -FEA25BA21201A25BA21203A25BA21207EC01C013E01403000F1480A2EBC0071500140E14 -1E5C000713385C3803E1E03801FF80D8003EC7FC1C3A7EB821>I<137C48B4EC03802603 -C7C0EB0FC0EA0703000F7F000E151F121C010715801238163FEA780F0070491400A2D8F0 -1F5C5C0000157E133F91C712FEA2495C137E150113FE495CA215030001161C4914F0A215 -07173CEEE038150F031F1378000016706D133F017C017313F0017E01E313E0903A3F03C1 -F1C0903A0FFF007F80D901FCEB1F002E297EA734>I<013EEE0380D9FF800107EB0FE026 -01C3E090381F801FD8038117F0380701F0000E153F001E1600D81C03160F003C17070038 -4BEB03E0D87807147E00705B1801D8F00F14FE4A4914C01200131FDA800114034C148013 -3F140003031407494A1400137EA26001FE0107140E495C60A360150F017C5E017E011F14 -F0705B6D0139495A6D903970F8038090280FC0E07C0FC7FC903A03FFC01FFC903A007F00 -07F03C297EA741>119 D<D901F8133FD907FEEBFFE0903A1E0F83C0F0903A3807C780F8 -90397003CF0301E013FED801C0EBFC071203018013F8D8070015F0EE01C0000E4AC7FCA2 -001E1307A2C75BA2140F5DA3141F5DA3143F92380001C0A34A1303001E1680003F017E13 -07267F80FE14005ED8FF81141ED901DF131CD8FE035C3A7C078F80F03A3C0F07C1E03A1F -FC03FF802707F0007EC7FC2D297EA734>I<137C48B4EC03802603C7C0EB0FC0EA070300 -0F7F000E151F001C168013071238163FD8780F150000705BA2D8F01F5C4A137E1200133F -91C712FE5E5B137E150113FE495CA2150300015D5BA215075EA2150F151F00005D6D133F -017C137F017E13FF90393F03DF8090380FFF1FEB01FC90C7123F93C7FCA25DD80380137E -D80FE013FE001F5C4A5AA24848485A4A5A6CC6485A001C495A001E49C8FC000E137C3807 -81F03803FFC0C648C9FC2A3B7EA72D>I<02F8130ED903FE131ED90FFF131C49EB803C49 -EBC0784914F090397E07F1E09038F800FF49EB1FC049EB07800001EC0F006C48131E90C7 -5A5D5D4A5A4A5A4A5A4AC7FC143E14785C495A495A495A49C8FC011E14E05B5B49130148 -48EB03C0485AD807F8EB078048B4131F3A1F87E07F00391E03FFFE486C5B00785CD87000 -5B00F0EB7FC048011FC7FC27297DA72A>I E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fm cmr12 14.4 68 -/Fm 68 123 df<ED03FF033F13E04AB512F8913907FE01FC91391FE0003E4A48130F02FF -C76C7E4948143F49484A7E494814FF130F5C495AA2715A49486EC7FC170C94C8FCAFEF3F -C0B9FCA43A003FC00001EE007F173FB3B3A4D9FFF0ECFFF0007F9026FFE07FEBFFE0A43B -547ED341>12 D<ED3F80EDFFE002037F913807E0F891381FC03CEC3F804B7E147E02FE13 -0E5C0101140F82A25C1303A45E160EA26E131E161C163C163816785E01015CECFE014B5A -4B5AA26E48CBFC6D131E4B0207B512FE15F85D147F4BDA007F13C04B92380FFE00023FEE -07F86F16E0735A6F1507027F5F4A6C93C7FCD901EF5E902603CFFC150ED907C7161E9026 -0F87FE5DD91F031638013E6D1578D93C011670496C6D14F0496E495A0001027F5D48486E -130300076E6C5C4848011F1407001F6F49C8FC003F6E7E490107141E007F6F131C6F6C13 -3C6F5C00FFEE80706FEBC0F093387FE1E0EFE3C093383FF3806DEC1FFF7090C8120E705A -707E6C6C191E706D141C6C6C70143C4C6D14386C6C91260FBFF814786C6C91261F0FFC14 -F06C6C91267E07FE13016C6C903C01F803FF8007E06C9027E01FF0009038E03FC06C90B5 -00C0013FB51280013F91C7000FEBFE00010701FC020313F8010001C09138003FE04F577B -D45B>38 D<15E01401EC03C0EC0780EC0F00141E5C147C5C495A13035C495A130F5C131F -91C7FC133E137EA25BA2485AA25B1203A2485AA3120F5BA2121FA25BA2123FA290C8FCA3 -5AA5127EA312FEB3A3127EA3127FA57EA37FA2121FA27FA2120FA27F1207A36C7EA21201 -7FA26C7EA2137EA2133E7F80130F8013076D7E8013016D7E147C143C8080EC0780EC03C0 -EC01E014001B7974D92E>40 D<12E07E12787E7E7E6C7E7F6C7E6C7E7F1200137C137E13 -3E133F7F6D7E80A26D7EA26D7EA2130180A26D7EA380147EA2147FA280A21580A2141FA3 -15C0A5140FA315E0B3A315C0A3141FA51580A3143FA21500A25CA2147EA214FE5CA3495A -A25C1303A2495AA2495AA25C49C7FC5B133E137E137C5B12015B485A485A5B48C8FC121E -5A5A5A5A1B797AD92E>I<120FEA3FC0EA7FE012FF13F0A213F8A3127F123FEA0F381200 -A513781370A313F013E0A2120113C0120313801207EA0F00121EA25A5A12300D23768B21 ->44 D<B612FEA71F077F9C27>I<120FEA3FC0EA7FE0EAFFF0A6EA7FE0EA3FC0EA0F000C -0C768B21>I<1738177CA217FC17F8A2160117F0A2160317E0A2160717C0A2160F178016 -1F1700A25E163EA2167E167CA216FC5EA215015E15035EA215075EA2150F5EA2151F93C7 -FCA25D153E157E157CA215FC5DA214015DA214035DA214075D140F5DA2141F92C8FCA25C -143EA2147E147CA214FC5CA213015C13035CA213075CA2130F5CA2131F91C9FCA25B133E -137E137CA213FC5BA212015BA212035BA212075B120F5BA2121F90CAFCA25A123EA2127E -127CA212FC5AA212702E787AD93B>I<EC1FF891B5FC010314C090390FF81FF090391FC0 -03F849486C7E017EC7127E49800001168049141F4848EC0FC0000716E0491407000F16F0 -A34848EC03F8A2003F16FCA44848EC01FEA700FF16FFB3A5007F16FEA56D1403A2003F16 -FCA4001F16F8A26D1407000F16F0A26C6CEC0FE0A26C6CEC1FC0A26C6CEC3F806C6CEC7F -00017F14FE6D6C485A6D6C485A90390FF81FF00103B512C0010091C7FCEC1FF830517BCE -3B>I<14075C5C147F5C1307133F000FB5FCB6FC13F913C1EAF0011200B3B3B3A7497F01 -0F13E0B712FEA4274F75CE3B>I<EC7FE0903803FFFE010F6D7E013F14E0D9FF0013F8D8 -01F8EB1FFCD803E06D7E4848EB03FF48486D138090C813C0001E16E0001C157F003CED3F -F012380078ED1FF81270A2B4ED0FFC13C07FA66C5A6C5A000EC8FCC9EA1FF8A317F0163F -A2EE7FE017C016FF17804B1300A24B5A4B5A5E4B5A4B5A4B5A5E4BC7FC15FE4A5A4A5A4A -5A4A5A5D4A5A4AC8FC147E5C4948141CEB03E0495A4948143891C8FC131E5B5B49157848 -5A48481570484815F048B7FCA25A5A5AB812E0A42E4F7ACE3B>I<EC3FF849B57E010F14 -E090391FC01FF890397E0003FC01F86DB4FCD801E06D13804848EC7FC0484815E048C812 -3F01C015F013F0486CEC1FF87FA56C5AA2EA03E0C9EA3FF0A317E0167F17C016FF17804B -13005E4B5A4B5A4B5AED3FC0DA07FFC7FC903803FFFC5DEDFF8090C7EA1FE0ED07F8ED01 -FE6F7EEE7F8017C0EE3FE0EE1FF017F8A2EE0FFC17FEA2160717FFA3120FEA3FC0487E48 -7EA417FE160F5B6C4815FC90C8FC0078ED1FF87E003EED3FF06CED7FE06C7E6C6CECFFC0 -D803F0491380D801FC903807FE003A00FFC01FFC013FB512F0010F14C0010391C7FC9038 -003FF830517BCE3B>I<160F5EA25E5EA25E5DA25D5DA25D151E151C153C5D157015F04A -5A5D14035D4A5A5C140E5C143C14385C14F05C495A13035C130749C7FC130E131E5B1338 -13785B5B1201485A5B120748C8FC120E121E5A123812785AB912F0A4C8000190C7FCAF4B -7F4B7F020FB612E0A434507DCF3B>I<000316C001C0140301F8141F903AFFC003FF8091 -B612005E5E5E16E016804BC7FC019F13F8018113800180C9FCB0EC0FF0ECFFFE01836D7E -903987F01FE090399F0007F801BE6D7E01F86D7E496D7E49EC7F805BEE3FC04915E0C912 -1F17F0A317F8160FA317FCA5120EEA3F80487E12FF7FA217F85B161F5B48C813F0127000 -78ED3FE0A26C16C0167F6CEDFF80001F16006C6C495A6C6C13036C6CEB07F8D801F8EB1F -F06CB4EB7FE06DB51280011F49C7FC010713F8010013C02E517ACE3B>I<ED3FE0913803 -FFFC020F13FF91393FE01F8091397F0007C0D901FCEB01E04948EB00F0495A4948130349 -48EB0FF84948131F49C7FC13FEA2485A120349EC0FF00007ED03C093C7FC485AA2121F5B -A2123FA3127F5BEC0FFF023F13C04A13F03AFFC1F003FC9039C3C000FED9C780137F91C7 -EA3F8001CE15C001DCEC1FE0160F01D815F001F8EC07F85B17FCA24915FE1603A317FF5B -A3127FA66C7EA317FE121FA216076C6C15FCA2000716F86D140F000316F06DEC1FE01201 -6C6CEC3FC06DEC7F806D6CEBFF006D6C485A90390FF80FFC6DB512F0010114C06D6C90C7 -FCEC0FF830517BCE3B>I<EC1FF891B5FC010314E090390FF00FF890391F8001FC017EC7 -7E49EC3F80D801F0141F0003ED0FC04915E048481407EE03F0120F4915F81601121FA37F -A36D14036D15F07F6C6CEC07E07F6D6CEB0FC06C6D131F02F0EB3F806C6D14006C01FE13 -7E6E485A6CECC3F06DEBE7E0011FEBFF806D49C7FC01037F6D806D6C13E091B57E010314 -FCD90FC77FD93F817FD97E0014C049133F48486D13E04848010713F048486D13F8484813 -00001FED7FFC49141F48C8EA0FFE1607007E1503EE01FF8212FE48167FA2173FA56C163E -127E177E007F167C6C16FC6D15F86C6C14016C6CEC03F06DEC07E06C6CEC0FC06C6CEC3F -80C6B4ECFF0090397FE007FC011FB55A010714E0010191C7FC9038001FF830517BCE3B> -56 D<EC1FF891B5FC010314C090390FF00FE090391FC003F890397F8001FC01FEC77E00 -01157F4848EC3F805B0007ED1FC0484815E0001F150F4915F0123F1607007F16F85BA217 -FC12FFA2160317FEA617FFA35E127FA37F003F5DA2121F6D5C000F151B0007153B6D1433 -6C6C1473000115E36C6C1301017FEB03C3903A3FC00F83FE90390FFFFE03010313FC0100 -13F091C7FC160717FCA317F8A2160F17F0A2161FD803C015E0EA0FF0486CEC3FC0178016 -7F170016FE150149495AD80FC0495A90C7485A6C6C495A01E0495A2703FC01FFC7FC6CB5 -5A6C6C13F8011F13E0010390C8FC30517BCE3B>I<EE03804C7EA34C7EA34C7EA34C7EA3 -4C7EA24C7E16E7A203017F16C3A20303801681A2DB07017F82A2030E80177FA24B80173F -A24B6D7EA20378800370130FA203F0804B1307A20201814B7FA24A488183A24AC78083A2 -020E82187FA24A6F7E021FB7FC4A82A30278C8EA1FFC0270150FA202F0824A1507A24948 -8284A249488384A249CA7FA24984010E177FA2011E84193F133E017F8448486C4C7E000F -01E04B487EB500FE037FEBFFFEA44F557CD458>65 D<B812FEEFFFC018F818FE26007FF8 -C73807FF806D4802017F011F6F6C7E727E727E727E727EA2727EA2721380A21AC0A384A3 -60A21A80A2601A00A24E5A180F614E5A4E5AF0FFE04D1380050790C7FCEF7FFC91B712E0 -8418FE02F0C73801FF809438007FE0F01FF8727EF003FE857213807213C0F17FE0A2F13F -F0A21AF8191FA21AFCA81AF8193FA21AF0197FF1FFE0A24E13C04E1380604E1300F03FFC -013FEEFFF8496C02075BBA12C096C7FC18FC18C046527AD153>I<DC1FFC14034BB500C0 -1307030F02F0130F037F14FC912801FFF800FF131F02070180EB1FC04A48C73807E03FDA -3FF8913801F07FDA7FE0EC00F8902601FF80ED3CFF4990C97E494882494882495A494882 -4948825C01FF834849177F91CBFC48193F485AA24848181FA2121F49180FA2123FA24918 -07127FA31A005B12FFAE127F7FA31A07123F7FA2121FA26D180F000F190EA26C7E1A1E6C -6C181C6C193C806C6D1778137F6E17F06D6CEE01E06D7E6D6CEE03C06D6CEE07806D6CEE -0F006D6D151E9026007FE0157CDA3FF85DDA0FFEEC03F06E6C6CEB0FE0020101F8EBFF80 -6E6CB548C7FC030F14F8030114E09226001FFEC8FC48567AD355>I<B812FEEFFFE018FC -18FF26007FFCC7000F13C06D4802017F011F9238003FF8F00FFC727EF001FF727F737E73 -7E737E190F86737EA2737E737EA21B8085A21BC01A7F1BE0A4F23FF0A51BF8AE1BF0A4F2 -7FE0A41BC01AFF1B80A24F1300A24F5AA24F5AA24F5A4F5A4F5A4F5A4F5A4E90C7FC4E5A -F00FFCF03FF8013FEEFFE0496C020F5BBAC8FC18FC18E04DC9FC4D527BD159>I<BB1280 -A426007FFCC8123F6D48030313C0011F1600193F191F190F1907A21903A2F101E0A31900 -A6050E1470A41A00A3171EA3173E177E17FE160791B6FCA49138F800071600177E173E17 -1EA3170EA31A0EA31A1C94C8FCA41A3C1A38A31A78A31AF0A21901A21903A21907F10FE0 -193F19FF013F1603496C153FBBFC1AC0A347527BD150>I<BA12FCA426007FFCC712016D -489138001FFE011F160318011800197E193EA2191EA285A385A6F10380A2171CA296C7FC -A5173CA3177C17FC1601160F91B6FCA49138F8000F16011600177C173CA3171CA794C9FC -B3497E49B4FCB712E0A441527BD14C>I<DC1FFC14060303B56C130E031F02F0131E037F -14FC912801FFF801FE133E0207903980001F80DA1FFCC73807C07EDA3FF0913803E0FEDA -FFE0EC00F049018015794990C9123D4948161F4948160F49481607495A494816034A1601 -13FF484916004890CBFC1A7E485AA24848183EA2121F49181EA2123F5B1A0E127FA397C7 -FC5B12FFAE127F6D4BB612FEA4003F93C7003F13806D94380FFE001907121FA27F120FA2 -6C7EA26C7EA26C7F6C7F137F806D7E6D6C160F6D7E6D7E6D6C161F6D01C0153D6D6D157D -DA3FF815F8DA1FFE913803F07E912607FFC090380FE03E020101FC90387F801E6E6CB538 -FE000E031F02F81306030302E090C7FC9226001FFEC9FC4F567AD35C>I<B70107B612F8 -A4C66C48C80003EBF0006D486F5B6D486F5BB3AD91B9FCA402F8C9FCB3B1496C4B7F496C -4B7FB70107B612F8A44D527BD158>I<B7FCA439007FFE006D5A6D5AB3B3B3B0497E497E -B7FCA420527BD12A>I<49B612FEA490C7003F138092380FFE001507B3B3B3A21206EA3F -C0487E487EA44B5AA25B007F5D0180131F0078C75B6C143F003E4A5A6C5D6C6C495A2707 -E003FEC7FC3901FC07FC6CB512F0013F13C0D907FCC8FC2F547BD13C>I<B74AB512FEA4 -C66C48C9003F13C06D487048C7FC6D4817F0735A1A804FC8FC193E61614E5A4E5A4E5A4E -5A4EC9FC183E60604D5A4D5A4D5A4D5A4DCAFC173E5F5F4C5A4C5A4C5A160F4C7E4C7E16 -7F4C7E4B7F5D923807CFFE92380F8FFFED1F07DB3E037F037C804B7E9126F9E0007FDAFB -C080DAFF80137F92C76C7E4A814A141F4A6E7E8483717F8583717F85187F727EA2727E72 -7EA2727E727FA2727F727FA2737E86193F8686496C83496C93B512E0B7020FECFF80A451 -527BD15B>I<B712E0A4C66C90CAFCEB3FFC6D5AB3B3A9191CA51938A61978A319F819F0 -A218011803A21807180F181F183F18FF013F1503496C023F13E0BAFCA43E527BD149>I< -B500FC95B512FCA36E5FD8007FF2F800D93DFF943803BFF0011D62A2011C6DEE073FA36E -6C160EA36E6C161CA26E6C1638A36E6C1670A36E6C16E0A36E6CED01C0A26E6CED0380A3 -6E6DEC0700A36F6C140EA36F6C5CA26F6C5CA36F6C5CA36F6C5CA26F6C495AA36F6C495A -A36F6D48C7FCA393387FC00EA2706C5AA3706C5AA3706C5AA3706C5AA270B45AA3705BA3 -013E6E90C8FC137F496C4E7E000701F0027E4B7EB66C4BB612FC173CA35E527AD16B>I< -B500FC030FB512F8A28080D8003FDC007F13006D6DED0FF8735A011D6D6F5A011C6D6F5A -A26E7E81143F6E7E81140F6E7E82806E7F82806F7E82153F6F7EA26F7E6F7EA26F7F8381 -6F7F83167F707E83161F707E838270138018C0827013E0A2EF7FF0EF3FF8A2EF1FFC18FE -170FEF07FF1981837113C119E183F07FF119F9183FF01FFD19FF8484A28484A284A2197F -193F133E017F171F496C160F000713F0B66C15071903A219014D527BD158>I<EE7FF803 -07B57E033F14F09239FFC00FFC913A03FE0001FFDA0FF89038007FC0DA3FE0EC1FF0DA7F -80EC07F84AC86C7E49486F7E49486F7E4948707E4948707E4948707E4948707E017F8449 -48707E91CA120348854848717EA24848711380A2000F1AC049187F001F1AE0A34848F03F -F0A3007F1AF8A249181FA300FF1AFCAE6C6CF03FF8A5003F1AF06D187FA2001F1AE0A26D -18FF000F1AC0A26C6C4D1380A200031A006D5F6C616C6D4C5A6E160F017F606D6C4C5A6D -6C4C5AA26D6C4C5A6D6C4C5A6D6C4B90C7FCD900FFED03FCDA7FC0EC0FF86E6C4A5ADA0F -F8EC7FC0DA03FE4948C8FC913A00FFC00FFC033FB512F0030714809226007FF8C9FC4E56 -7AD35B>I<B812FCEFFFC018F818FE26007FFCC7381FFF806D4802017F011F9238007FF0 -F01FF8727E727E727E841A807213C0A21AE0197FA21AF0A91AE0A219FF1AC0A24E13801A -00604E5A4E5A4E5AF07FE04D485A051F90C7FC91B712FC18F0188002F8CBFCB3AE497E49 -7EB7FCA444527BD150>I<EE7FF80307B57E033F14F09239FFC00FFC913A03FE0001FFDA -0FF89038007FC0DA3FE0EC1FF04A486E7E4AC8EA03FC49486F7E49486F7E4948707E4948 -707E4948707E013F844948707E4948707EA24890CA6C7E4885498300071A804983000F1A -C0A24848F07FE0A3003F1AF049183FA2007F1AF8A449181F00FF1AFCAE007F1AF8A26D18 -3FA3003F1AF0A36C6CF07FE0A36C6CF0FFC0A200071A806D5F00031A006DDA0FC05B6CDB -3FF85C6C6DD9FFFC495A923801F01ED97FC0496C495A903D3FE003C003801FF0011F0280 -01C05BDAF0070101133FD90FF890C76C485AD907FC4C5AD903FE03F190C7FCD900FFED73 -FC91267F8780EB77F8DA3FE3EC7FF091260FFBC014C0912803FFE001FFC8FC02009038F0 -0FFC033FB51506030714BC9239007FF81E93C7FC061F140EA285060F141E73133C851B7C -9638F801FC953807FC0796B512F8A2841BF0A27214E07214C01B80073F1300F11FFCF107 -F04F6B7AD35B>I<B812C017FEEFFFC018F026007FFCC713FC6D48EC0FFF011F03017F94 -38007FE0727E727E727E180785727EA28684A286A762A26097C7FCA24E5A614E5A4E5A4E -5AF0FFC04D90C8FCEF0FFEEFFFF891B712C04DC9FC839126F8000113C09338003FF0EF0F -FC717EEF01FF85717F727EA2727EA2727EA985A81B0785180FA21B0F0607140E496C8249 -6C6F141EB76EEB801C72EBC03C96387FE0F896381FFFF0CC000713E09638007F8050547B -D156>I<DA3FF0130349B55B010714C0011FECF00F903A7FE00FF81F49C712FED801FCEC -3F3F4848EC1FBF48486EB4FC48481403485A4980003F8190C97E5A83127E8312FEA283A3 -7E837FA27F007F93C7FC7F7FEA3FFC7F6C6C7E14F86CEBFF806C14F8EDFF806C15F06C15 -FE6C6C806D15C0010F81010315F8D9007F80140F020080030F7F03001480161F040713C0 -160182EF7FE0A2173FEF1FF0A200E0160FA31707A37EA318E07E170F7E18C06C161F6C17 -806D153F6D16006D157E6D15FED8FCFC4A5A017F4A5A26F83FC0EB0FF0D90FFEEB7FC0D8 -F003B65A48C64AC7FC023F13F848010113C034567AD341>I<003FBB12C0A449C79038F0 -000701F06E48130001C0183F48C8EE0FE0007E1907007C1903A200781901A400701900A5 -00F01AF0481A70A6C91700B3B3AC4C7E030313FC027FB712E0A44C517CD055>I<B7020F -B512F8A4C66C48C96C13006D48EE0FF86D48705A735A735AB3B3B0010F17036280A20107 -170797C7FC6E5E1303191E6D7E616D6D5D6E7E023F5E6E6C4A5A6E6C4A5A6E6C140FDA03 -FE4AC8FC6E6C6C13FE913A007FF007FC031FB512F0030714C0030191C9FC9238001FF84D -547BD158>I<B600FC030FB512E0A4C691CAEBFC00D97FFCEF3FF06D48EF1FC0011F616E -71C7FC130F1A0E6E171E0107181CA26E173C6D1838816D60A26F16F06D6081027F4C5AA2 -81023F4C5AA26F1507021F94C8FC81020F160EA26F151E0207161CA26F153C6E1638826E -5EA27014F06E5E821801037F5D82033F4A5AA2701307031F92C9FC82030F140EA270131E -0307141CA270133C6F143817806F5CA2EFC0F06F5C17E017E1047F5B17F193383FF380A2 -17FF7090CAFCA2705AA3705AA3705AA2705AA3705A53547ED158>I<B600FE0303B512F8 -A4C60280DB007F1300013F90CAEA1FF86DF00FE06D616D616D6D94C7FC6F161E6D181C6F -163C6D18386E6C16786F5E023F5F6F1501021F5F6E6C15036F4B5A6E94C8FC6E6D5C7014 -0E6E161E705C6E16386F6C1478701470033F15F070495A6F6C5C030F1403705C6F14076F -6D48C9FCEFC00E6F141EEFE01C6F143C706C5AEFF870043F13F0715AEE1FFF705B608270 -90CAFCB3AA5E4C13C0031FB612E0A455527FD158>89 D<001FB912E0A402FCC7000113C0 -02805C49C8148001F84B1300495D495E494B5A49153F90C95B484C5A123E4D5A5E003C5F -4C5B5E95C7FC00384B5AA24C5A163F5F4C5AC912FF5F4B5B5D5F4B90C8FCA24B5A151F5E -4B5A157F5E4B5AA24A5B5C5E4A90C9FC5C5D4A5AA24A4815E0147F5D4A5A5B5D495B4916 -0192C813C0495AA2495A133F4A1503495A13FF4A1507485B180F485B48171F91C9123F48 -48167F001F17FF494B138048481507007F161F490203B5FCBAFCA43B527AD148>I<B512 -C0A500F8C7FCB3B3B3B3B3B3A2B512C0A5127874D921>I<B512C0A5EA0007B3B3B3B3B3 -B3A2B5FCA512787ED921>93 D<ECFFC0010F13F8013F13FE9039FF00FF80D801F0EB3FE0 -D803C0EB0FF0486C6D7E01F86D7E000F816D13016F7EA3707E6C5AEA01E0C9FCA6ED3FFF -020FB5FC9138FFFC7F01071300EB1FF0EB7FC04848C7FCEA03FC485A485A485A123F5B48 -5A187012FF90C8FCA216FFA35D6D14BF007F14036DEB073F6C6C90390F1FC0E06C6C131E -6C6C90393C0FE1C02707FE01F013FF0001B5486C13806C6C90398003FE00D907FCC712F8 -34367BB43B>97 D<EB7F80B5FCA41203C6FC137FB3A6ED07FC92387FFF800281B512E091 -3987F00FF891398F8001FC029EC7B4FC02BC6E7E02F86E7E4A6E7E4A6E7E4A1407844A6E -7EA2841701A284A283A21980AB19005FA360A24D5AA24D5A804D5A6E5D6E4A5AD97E784A -5A6E4AC7FCD97C1EEB01FE6E495A903A7807E01FF00201B512C0902670007F90C8FC90C7 -EA0FF839547DD241>I<EC0FFE91387FFFE049B512F8903907F801FE90391FE0001FD93F -80EB078049C7EA0FC001FE143F484815E00003157F485A485AA2485AEE3FC0003FED0F00 -4991C7FCA2127FA35B12FFAB127F7FA3123F6D1570121F6D15F0000F16E06D140112076C -6CEC03C06D15806C6C14076C6DEB0F00D93FC0131E6D6C137C903907FC03F06DB55AD900 -7F1380DA0FF8C7FC2C367CB434>I<17FF4BB5FCA4ED0007160182B3A6EC0FF8EC7FFF49 -B512E0903907FC03F090391FE0007C49487F49C7120F01FE80484880485A000781484880 -A2485AA2485AA2127FA35B12FFAB127FA27FA2123FA27F121FA26C6C5C00075D7F6C6C5C -6C6C5C6C6C021E7F6D6C017C13E0D91FC049EBFF8090390FF807E00103B512800100495A -DA1FF091C7FC39547CD241>I<EC0FF891B5FC010314C090390FF80FF090391FC003FC90 -397F8001FE49C77E4848EC7F804848143F49EC1FC0485A000FED0FE05B001F16F0160748 -5AA2007F16F8A25B160312FF90B7FCA30180C9FCA8127F7FA2123FA26D1538121F17786C -6C1570000716F06D15E06C6C14016C6CEC03C06C6C15806D6C130F6D6CEB1F00D90FF013 -3C903907FE01F80101B512E06D6C1380DA07FCC7FC2D367DB434>I<157F913803FFE002 -0F13F091383FC0F891387F01FC903901FE03FE903803FC0714F81307EB0FF0A290391FE0 -03FCED01F892C7FC495AB3B612FEA426003FC0C7FCB3B3A580EBFFF0007FEBFFF8A42754 -7DD324>I<EF1FC0DA3FE0EBFFE0902701FFFC0313F001079039FF07E1F8903A1FE03FCF -01903A3F800FFC03903A7F0007F80101FE010314F04848903901FC004000036F13004913 -00000781A24980000F82A8000793C7FC6D5CA200035D6D130100015D6C6C495A017F495A -6E485A9039FFE03FC0D801C7B5C8FC01C113FC3903803FE091CAFCA57FA27F7F7F6CB612 -E016FF6C16C017F0013F15FC8390B8FCD803F8C7001F1380D80FE0020113C04848EC007F -4848ED1FE090C9120F127EEF07F012FE481603A56C1607007E17E0007F160F6C6CED1FC0 -6C6CED3F806C6CED7F006C6C15FED803FCEC03FCC6B4EC0FF0D93FF0EBFFC0010FB6C7FC -010114F8D9001F1380354E7DB43B>I<EB7F80B5FCA41203C6FC137FB3A6ED07FC92383F -FF8092B512E0913981F00FF8913983C007FC9139870003FE028E1301029C6D7E14B814B0 -02F06E7E5CA25CA35CB3AD2601FFE0903801FFE0B600C0B612C0A43A537CD241>I<1378 -EA01FE487E487FA66C90C7FC6C5AEA007890C8FCB0EB7F80B5FCA41203C6FC137FB3B3A4 -3801FFE0B61280A419507CCF21>I<EBFF80B5FCA41203C6FC137FB3A793B512F8A4043F -138093381FFC0017F017C094C7FC163E5E5E4B5A4B5AED07804BC8FC151E5D15FC1481EC -83FEEC87FF148F029E7F9138BC7FC0ECF83F02F07F4A6C7EECC00F02807F4A6C7E6F7EA2 -6F7E6F7F167F83707E161F83707E160783707E8318802601FFC04913E0B6D8803F13FFA4 -38537DD23E>107 D<EB7F80B5FCA41203C6FC137FB3B3B3B13801FFE0B612C0A41A537C -D221>I<01FFD907FEEC03FFB590261FFFC0010F13E0037F01F0013F13F8912701F80FFC -9038FC07FE913D03C003FE01E001FF000390260700019038038000C6010E6D6C48C76C7E -6D48DA7F8E6E7E4A159CA24ADA3FF86E7E02605D14E04A5DA34A5DB3AD2601FFE0DAFFF0 -EC7FF8B6D8C07F9026FFE03FB512F0A45C347CB363>I<01FFEB07FCB590383FFF8092B5 -12E0913901F00FF8913903C007FC000349C66C7EC6010E13016D486D7E5C143002706E7E -146014E05CA35CB3AD2601FFE0903801FFE0B600C0B612C0A43A347CB341>I<EC0FFC91 -387FFF8049B512E0903907F807F890391FE001FE90393F80007F017EC7EA1F80496E7E48 -486E7E00038248486E7EA248486E7EA248486E7EA2003F82A24848ED7F80A400FF17C0AB -007F1780A26D15FFA2003F1700A2001F5E6D1401000F5E6D140300075E6C6C4A5A6C6C4A -5AA2D8007FEC3F806D6C49C7FC90391FE001FE903907F807F86DB55AD9007F1380DA0FFC -C8FC32367CB43B>I<90397F8007FCB590387FFF800281B512E0913987F00FF891398F80 -03FC000390399E0001FFC601BC6D7FD97FF86E7E4A6E7E4A6E7E4A140F844A6E7EA2717E -A3717EA4711380AB4D1300A44D5AA24D5AA2606E140F4D5A6E5D6E4A5A6E4A5A02BC4AC7 -FC029E495A028FEB07FC913987E01FF00281B512C0DA807F90C8FCED0FF892CAFCB13801 -FFE0B612C0A4394B7DB341>I<DA07F81307DA7FFF5B49B512C0903907FC03E0903A1FF0 -00F81FD93FC0133C49486D5A49C7120E4848140F48486EB4FC000781485A4980121F8248 -5AA2485AA4485AAB6C7EA46C7EA36C6C5CA26C6C5C12076D5C6C6C5C6C6C141E6C6D5B6D -6C5B90391FE001F090390FF807E00103B512800100495AEC1FF091C8FCB1040313C04BB6 -1280A4394B7CB33E>I<01FFEB1F80B5EB7FF0913801FFF8913803E1FC91380783FE0003 -EB0F07C6131EEB7F1C1438143091387003FC91386000F0160014E05CA45CB3AA8048487E -B612F0A427347DB32E>I<D907FE13C090387FFF8148B512E33907F803FF390FC0007F48 -48133F48C7121F003E140F007E1407127C00FC1403A315017EA27E7F6C6C90C7FC13F013 -FF6C13F86CEBFF806C14E06C14F86C14FEC680013F1480010714C0D9003F13E014039138 -007FF0151F00E0140FED07F8A26C1403A215017EA36C15F0A26C14036C15E015076DEB0F -C06DEB1F80D8FDF0EB3F0039F8FC01FE39F07FFFF8D8E01F13E0D8C00390C7FC25367CB4 -2E>I<EB01C0A71303A41307A3130FA2131FA2133F137F13FF5A5A001F90B512E0B7FCA3 -26003FC0C7FCB3A71638AC6E1378011F1470A26D6C13F016E0903807F801903903FC03C0 -903901FE07806DB51200EC3FFCEC07F0254B7EC92E>I<D97F80EC7F80B591B5FCA40003 -1503C61500017F157FB3AC17FFA35EA3013F5C6EEB077FA2011F020E7F6D6C011C13F06E -0178EBFFC0903903FC01F06DB512E06D6C1380912607FC00EB80003A357CB341>I<B601 -03B51280A4000301F09039007FF800C601C0EC3FE0017FED1F8095C7FC133F171E6D7E17 -1C6E143C010F1538A26E1478010715708001035DA26E130101015D806D4A5AA2ED800702 -7F91C8FC15C0023F130EA2EDE01E021F131CA26E6C5AA2EDF87802071370A26E6C5AA215 -FF6E5BA26E5BA36FC9FCA2153EA3151C39347EB23E>I<B60007B5D8F007B5FCA4000390 -27E0001FFEC713F06C0180D90FF8EC7FC06C0307ED3F80F21F00017F0203151EA26D6C80 -1A1CA26D6C496C5CA26E6E1478010FDA0E7F1470A26E6F13F00107DA1C3F5CA26EEDC001 -0103DA381F5CA26E0178EBE0030101DA700F5CA26E01F0EBF0076DDAE00791C7FCA2DA7F -81ECF80EEEC003A2DA3FC36E5AEE8001A2DA1FE76E5A93C7FCA2DA0FFEEC7F70A219F06E -486E5AA36E486E5AA36E486E5AA36E486EC8FC50347EB255>I<007FB5D8800FB51280A4 -C69026FC0003EBF000D93FF86D1380011F4BC7FC010F15F801075D6D6C5C6E495A6D6C5C -6D14076E6C48C8FCEDC01E6E6C5A021F133891380FF0786F5A913807FDE002035BEC01FF -5E80157F6F7E824B7E15FFEDE7F802017F913803C3FEEC07814AC67E020E80021E6D7E4A -133F4A6D7E4A80707E4948130749486D7E010781010F6E7E013F8201FF8200076D010713 -F0B500F8011FEBFFE0A43B337FB23E>I<B60103B51280A4000301F09039007FF800C601 -C0EC3FE0017FED1F8095C7FC133F6E141E131F171C6E143C010F15388001075DA26E14F0 -01035D8001014A5AA26E13036D5D1580027F49C8FCA26F5A023F130E15E0021F5BA2EDF0 -3C020F133815F802075BA2EDFCF002035B15FE6E6C5AA36E5BA26FC9FCA3153EA2151CA2 -153C153815781570A215F05D14015DA2003E495A127F486C48CAFCA2140E141E495A6C5B -007C5B383F03E06CB45A00075BD801FCCBFC394B7EB23E>I<001FB712E0A301FCC7EA7F -C001E014FF018049138090C714004B5A001E14074B5A485D4B5A153F4B5A00385D15FF4A -5B93C7FC4A5A1407C7485A5D4A5A143F4A5A5D14FF495B92C8FC494814E01307495A5C49 -5A013FEC01C0495A5C13FF485B91C71203485A12074848140749140F485A003FED3F8048 -4814FF491307B8FCA32B337DB234>I E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fn cmtt12 14.4 1 -/Fn 1 96 df<003FB712F84816FCB812FEA46C16FC6C16F82F08797C3E>95 -D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fo cmsy10 10.95 15 -/Fo 15 121 df<007FB812F8B912FCA26C17F83604789847>0 D<121EEA7F80A2EAFFC0 -A4EA7F80A2EA1E000A0A799B19>I<0060166000F816F06C1501007E15036CED07E06C6C -EC0FC06C6CEC1F806C6CEC3F006C6C147E6C6C5C6C6C495A017E495A6D495A6D6C485A6D -6C485A6D6C48C7FC903803F07E6D6C5A903800FDF8EC7FF06E5A6E5AA24A7E4A7EECFDF8 -903801F8FC903803F07E49487E49486C7E49486C7E49486C7E017E6D7E496D7E48486D7E -4848147E4848804848EC1F804848EC0FC048C8EA07E0007EED03F0481501481500006016 -602C2C73AC47>I<EB03C0A2805CA600F0140F00FC143F00FE147F00FF14FF393FC3C3FC -390FE187F03903F18FC03900FDBF00EB3FFCEB0FF0EB03C0EB0FF0EB3FFCEBFDBF3903F1 -8FC0390FE187F0393FC3C3FC39FF03C0FF00FE147F00FC143F00F0140F00001400A6805C -A220277AA92D>I<1506150FB3A9007FB912E0BA12F0A26C18E0C8000FC9FCB3A6007FB9 -12E0BA12F0A26C18E03C3C7BBC47>6 D<EB0FFCEB3FFF90B512C0000314F03907F807F8 -390FE001FC391F80007E48C77E003E8048EC0F80A20078140700F815C0A2481403A66C14 -07A200781580007C140FA26CEC1F00003F5C6C6C137E390FE001FC3907F807F86CB55AC6 -14C0013F90C7FCEB0FFC22227BA72D>14 D<EB0FFCEB3FFF90B512C0000314F048804880 -48804880A2481580A3B712C0AA6C1580A36C1500A26C5C6C5C6C5C6C5CC614C0013F90C7 -FCEB0FFC22227BA72D>I<007FB912E0BA12F0A26C18E0CDFCAE007FB912E0BA12F0A26C -18E0CDFCAE007FB912E0BA12F0A26C18E03C287BAA47>17 D<1818187CEF01FCEF07F8EF -1FF0EF7FC0933801FF00EE07FCEE1FF0EE7FC04B48C7FCED07FCED1FF0ED7FC04A48C8FC -EC07FCEC1FF0EC7FC04948C9FCEB07FCEB1FF0EB7FC04848CAFCEA07FCEA1FF0EA7FC048 -CBFC5AEA7F80EA3FE0EA0FF8EA03FEC66C7EEB3FE0EB0FF8EB03FE903800FF80EC3FE0EC -0FF8EC03FE913800FF80ED3FE0ED0FF8ED03FE923800FF80EE3FE0EE0FF8EE03FE933800 -FF80EF3FE0EF0FF8EF03FC170018381800AE007FB812F8B912FCA26C17F8364878B947> -20 D<126012F812FEEA7F80EA3FE0EA0FF8EA03FEC66C7EEB3FE0EB0FF8EB03FE903800 -FF80EC3FE0EC0FF8EC03FE913800FF80ED3FE0ED0FF8ED03FE923800FF80EE3FE0EE0FF8 -EE03FE933800FF80EF3FE0EF0FF8EF03FC1701EF07F8EF1FF0EF7FC0933801FF00EE07FC -EE1FF0EE7FC04B48C7FCED07FCED1FF0ED7FC04A48C8FCEC07FCEC1FF0EC7FC04948C9FC -EB07FCEB1FF0EB7FC04848CAFCEA07FCEA1FF0EA7FC048CBFC12FC1270CCFCAE007FB812 -F8B912FCA26C17F8364878B947>I<D91FE01620D97FF816703801FFFE486D7E48804814 -F09038E01FF8271F8007FC15F0273E0001FE15E0003CD9007F1401007CDA3FC013030078 -DA0FE014C00070DA07F8130700F0DA03FEEB1F8048913A01FF807F006F90B5FC043F5B70 -5B04075B040113E000409238007F803C157BA047>24 D<D91FE01620D9FFFC16704813FF -000714C04814F048809026E01FFE15F0273F0003FFEC01E0007E010013C00078DA3FF013 -07DB0FFCEB0FC048913A07FF807F8048020190B5FC6F1500043F5B040F13F804035B0040 -9238007F80CDFCA4D91FE01620D9FFFC16704813FF000714C04814F048809026E01FFE15 -F0273F0003FFEC01E0007E010013C00078DA3FF01307DB0FFCEB0FC048913A07FF807F80 -48020190B5FC6F1500043F5B040F13F804035B00409238007F803C287BAB47>I<193019 -78A2197C193CA2193E191EA2191F737EA2737E737EA2737E737E1A7C1A7EF21F80F20FC0 -F207F0007FBB12FCBDFCA26C1AFCCDEA07F0F20FC0F21F80F27E001A7C624F5A4F5AA24F -5A4F5AA24FC7FC191EA2193E193CA2197C1978A2193050307BAE5B>33 -D<126012F0B3B3B3B3B11260045B76C319>106 D<EB3F80EBFFF03803E078380F801E48 -487E80003EEB03805A15C0140F5AA3EC078091C7FCA37E127CA27E121E121F6C7EEA03C0 -6C7EEA00F8133EEBFF803803E3E0380F80F0381F0078143E003E7F487F1580EC07C05A15 -E01403A57E127CEC07C07E121E001FEB0F80390F801F00EA03C03801E03E3800F8F8EB3F -E0EB0F80EB03E0EB00F01478143E80801580EC07C0A215E01403A3123C127EA3EC07C012 -781238EC0F806CEB1F00121E6C133E3803C0F83801FFE038003F801B537ABF28>120 -D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fp cmsy8 8 4 -/Fp 4 49 df<B812C0A32A037A9137>0 D<EC3FF0903801FFFE903907C00F8090391E00 -01E00178EB007801E0141C48488048488048C8EA0380000EED01C0000C1500001C16E000 -18166000381670003016300070163800601618A200E0D90780131C48496C130C4A7EA24A -7EA36E5AA26E5A6C6D48131C006090C81218A20070163800301630003816700018166000 -1C16E0000C16C0000E15016CED03806C6CEC07006C6C140E6C6C5C01781478011EEB01E0 -903907C00F80902601FFFEC7FC9038003FF02E2F7CA737>12 D<EB7F803801FFE0000713 -F8380FC0FC381F003E003C130F00387F007814800070130300F014C0481301A66C130300 -7014800078130700381400003C5B001F133E380FC0FC6CB45A000113E038007F801A1A7C -9D23>14 D<137813FE1201A3120313FCA3EA07F8A313F0A2EA0FE0A313C0121F1380A3EA -3F00A3123E127E127CA35AA35A0F227EA413>48 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fq cmti10 10.95 70 -/Fq 70 124 df<DC0FF0EB0F80DC7FFEEB3FE0922601FC0FEBF878923B03F00381F03C92 -3B07C007C3E07C923B0F801FC7E1FC031F013F13C318CFED3F001983069F13F8037E9039 -0E1F80E005001400183F03FE92C7FC5DA3600201157E5DA318FE02035D0103B9FCA26190 -290003F00001FCC7FC14074B5CA41703020F5D5DA31707021F5D5DA3170F023F5D92C7FC -A3171F4A5D147EA3173F02FE92C8FC5CA35F0101157E5CA35F495AA34C5A495AA2001E02 -F05B007F9038C3F803010F5D00FF018713075F0207495AD8FE1F4948C9FCD8F81EEBC01E -3A703C03803C3A787801E0F83A1FF000FFE0D807C0EB3F80465383BF38>11 -D<933807FF80043F13E09338FE00F8DB01F0133EDB07E0130E4B48131F4C137F031F14FF -4BC7FCA218FE157E1878180015FE5DA31401A25DA414030103B712F0A218E0903A0003F0 -00070207140F4B14C0A3171F020F15805DA2173F1800141F5D5F177EA2143F92C712FE5F -A34A1301027EECF81CA3160302FEECF03C4A1538A21878187013014A010113F018E09338 -00F1C0EF7F804948EC1F0094C7FCA35C1307A2001E5B127F130F00FF5BA249CAFC12FEEA -F81EEA703CEA7878EA1FF0EA07C0385383BF33>I<EE07FC93393FFF87F09338FC07C792 -3A03F001E7E0DB07C013F792390F8007FF031F4913C016005DA2037E1580EF039FEF001F -183F4B1500A3600201157E5DA218FE6014035D0103B7FC60A2903A0007F000014B130360 -A31707020F5D5DA2170F60141F5D171F60A2143F92C7123F95C7FCA34A5C027EEC7E07A3 -17FE02FE4A5A4A150EA2181E181C13014AEC7C3C1838EF3C70EF1FE04948EC07C094C8FC -A3495AA3001E5BEA7F0FA200FF5BA249CBFC12FEEAF83EEA703CEA7878EA1FF0EA07C03C -5383BF35>I<EA01E0EA07F8120F13FC121FA4120FEA03D8EA0018A21338133013701360 -13E013C01201EA038013005A120E5A5A5A5A5A0E1C6DBE1C>39 D<ED01801507ED0F0015 -1C5D5D5D14014A5A4A5A4AC7FC141E143E5C14785C1301495AA2495A5C130F49C8FCA213 -3EA25BA213FC5B12015BA212035B1207A25B120FA25BA2121FA290C9FCA25AA2123EA212 -7EA2127CA65AAB1278A67EA47EA2120E120F7EA26C7EA26C7E6C7E1360215A73C325>I< -14031580A2EC01C0EC00E0A21570A215781538153CA3151EA4151FA2150FA7151FA9153F -A2153EA3157EA2157CA215FCA215F8A21401A215F0A2140315E0A2140715C0A2EC0F80A2 -141F15005C143EA25CA25CA2495A5C1303495A5C130F49C7FC131E5B137C5B5B485A485A -485A48C8FC121E5A12705A5A205A7FC325>I<EA01E0EA07F8120FA2EA1FFCA4EA0FF8EA -0798EA001813381330A21370136013E013C01201EA0380EA07001206120E5A5A5A5A5A0E -1C7A891C>44 D<387FFFFCA3B5FCA21605799521>I<120FEA3FC0127FA212FFA31380EA -7F00123C0A0A77891C>I<1838187CA218F8170118F0EF03E0A2EF07C0A2EF0F80171F18 -00173EA25FA25F16015F4C5AA24C5AA24C5A161F94C7FC163EA25EA25E15015E4B5AA24B -5AA24B5A151F93C8FC153EA25DA25D14015D4A5AA24A5AA24A5A141F92C9FC143EA25CA2 -5C13015C495AA2495AA2495A131F91CAFC133EA25BA25B12015B485AA2485AA2485A121F -90CBFC123EA25AA25AA25A5A365B7FC32E>I<15FE913807FF8091381F07C091387C01F0 -ECF000494813F8494813780107147C495A49C7FC167E133E137EA25BA2485AA2000315FE -A25B000715FCA2491301120FA34848EB03F8A44848EB07F0A448C7EA0FE0A316C0007E14 -1F12FE1680153FA2481500A2157EA25DA25D4813015D6C495A127C4A5A4A5A6C49C7FC14 -3E6C5B380FC1F03803FFC0C648C8FC273F76BC2E>I<15031507150F151F151E153E157E -EC01FEEC03FC1407141FEB01FF90380FFBF8EB1FC3EB0E07130015F0A2140FA215E0A214 -1FA215C0A2143FA21580A2147FA21500A25CA25CA21301A25CA21303A25CA21307A25CA2 -130FA25CA2131FA25CEB7FE0B612F0A215E0203D77BC2E>I<15FE913803FFC091380F01 -F091383C00F84A137C4A7F4948133F49487F4A148049C7FC5BEB0E0C011E15C0EB1C0EEB -3C06133813781370020E133FD9F00C148013E0141C0218137F00011600EBC0384A13FEEC -600102E05B3A00E3C003F89039FF0007F0013C495A90C7485A5E037FC7FC15FC4A5A4A5A -EC0FC04AC8FC147E14F8EB03E0495A011FC9FC133E49141801F0143C48481438485A1678 -485A48C85A120E001E4A5AD83FE0130301FF495A397C3FF01FD8780FB55AD8700391C7FC -D8F0015B486C6C5A6E5AEC07C02A3F79BC2E>I<ED7F80913803FFE091380F80F891383C -007C02F87FD901E07F494814804948130F49C7FC010E15C0131EEB1C18EB3C1CEB380C01 -78141F17801370A2021C133F6D4814004A5BD91FE0137ED90F805B90C8FC4B5A4B5A4B5A -ED1F8003FFC7FCECFFFC15F0A2EC00FC153E153F8182150F82A4151FA2121E127F153F48 -5DA3484AC7FC12F800E014FE5D14016C495A0070495A0078EB0FC00038495A6C017EC8FC -380F01F83803FFE0C690C9FC2A3F78BC2E>I<02C0EB018002F0130FD901FEEB7F0091B5 -12FE5E5E4914E016804BC7FCECBFF8D90780C8FC91C9FCA35B130EA3131E131CA3133C90 -38381FC0ECFFF090383BE07C90387F003E017E133F017C7F0178805B498090C7FCA6153F -A4001F147F486C5C487EA24913FF00FF92C7FC90C7FC48495A12E04A5A5D6C495A140F00 -705C0078495A6C495A003E01FEC8FC381F03FC380FFFF0000313C0C648C9FC293F77BC2E ->53 D<ED0FE0ED7FF8913801F01C913807C00E91381F800F91383E00074A131F4A137F49 -4813FF1303495A494813FE131F4948137891C8FC5B13FEA2485AA212035B0007EB1FC0EC -7FF0390FF1E07C9038F3803EEBF700D81FFE7F4914805BED0FC0485A5B151F4914E0127F -A25BED3FC0A248C7FCA2157F16805AA215FF1600A24A5AA2485C007C495AA2007E495A4A -5A003E495A003F495A261F807EC7FC380FC1FC6CB45A6C13E0C66CC8FC283F76BC2E>I< -15FF020713C091381F81E091383E00F002FC13F84948137C495A4948137E010F143E495A -133F4A133F017F147F91C7FC5BA2485AA216FF12035B16FE150112075B1503A216FC4913 -07A20003140F16F8151F12016D133F0000EC7FF015EF90387C01CF90393E079FE090380F -FE1FD903F813C090C7123FA21680157F160015FEA24A5A001C5C007F1303485C4A5A4A5A -4A5A4849C7FC00F8137E00E05B6C485A387C07E0383FFFC06C90C8FCEA03F8283F77BC2E ->57 D<131EEB3F80137FEBFFC05AA214806C13005B133C90C7FCB3120FEA3FC0127FA212 -FFA35B6CC7FC123C122777A61C>I<171C173C177CA217FCA216011603A21607A24C7EA2 -161DA216391679167116E1A2ED01C1A2ED038115071601150EA2031C7FA24B7EA25D15F0 -5D4A5AA24A5AA24AC7FC5C140E5C021FB6FC4A81A20270C7127FA25C13015C495AA249C8 -FCA2130E131E131C133C5B01F882487ED807FEEC01FFB500E0017FEBFF80A25C39417BC0 -44>65 D<49B712C018F818FE903B0003FC0001FF9438007F804BEC3FC0A2F01FE014074B -15F0180FA2140F5D181FA2021F16E05D183F19C0023FED7F804B14FF19004D5A027F4A5A -92C7EA07F0EF1FE0EF7F804AD903FEC7FC92B512F017FE4AC7EA3F800101ED1FE04A6E7E -17078401036F7E5CA30107825CA3010F5E4A1407A260011F150F5C4D5A60013F153F4A4A -5A4D5A017F4A90C7FC4C5A91C7EA0FF849EC3FF0B812C094C8FC16F83C3E7BBD40>I<93 -39FF8001C0030F13E0033F9038F803809239FF807E07913A03FC001F0FDA0FF0EB071FDA -1FC0ECBF00DA7F806DB4FC4AC77E495AD903F86E5A495A130F4948157E4948157C495A13 -FF91C9FC4848167812035B1207491670120FA2485A95C7FC485AA3127F5BA312FF5BA490 -CCFCA2170FA2170EA2171E171C173C173817786C16706D15F04C5A003F5E6D1403001F4B -5A6D4AC8FC000F151E6C6C5C6C6C14F86C6C495A6C6CEB07C090397FC03F8090261FFFFE -C9FC010713F0010013803A4272BF41>I<49B712C018F818FE903B0003FE0003FF943800 -7F804BEC1FC0F00FE0F007F014074BEC03F8F001FCA2140F4BEC00FEA3141F4B15FFA314 -3F5DA3027F5D5DA219FE14FF92C81203A34917FC4A1507A219F813034A150F19F0A20107 -EE1FE05CF03FC0A2010FEE7F804A16006060011F4B5A4A4A5A4D5AA2013F4B5A4AEC3FC0 -4DC7FC017F15FEEE03FC4AEB0FF001FFEC7FE0B8128004FCC8FC16E0403E7BBD45>I<49 -B812F8A390260003FEC7121F18074B14031801F000F014075DA3140F5D19E0A2141F4B13 -38A2EF7801023F027013C04B91C7FCA217F0027F5CED80011603160F91B65AA3ED001F49 -EC07805CA3010392C8FC5CF003804C13070107020E14005C93C75A180E010F161E4A151C -183CA2011F5E5C60A2013F15014A4A5A1707017F150F4D5A4A147F01FF913807FF80B9FC -A295C7FC3D3E7BBD3E>I<49B812F0A390260003FEC7123F180F4B1403A2F001E014075D -A3140F5D19C0A2141F5D1770EFF003023F02E013804B91C7FCA21601027F5CED8003A216 -0702FFEB1F8092B5FCA349D9003FC8FC4A7F82A20103140E5CA2161E0107141C5CA293C9 -FC130F5CA3131F5CA3133F5CA2137FA25C497EB612E0A33C3E7BBD3B>I<9339FF8001C0 -030F13E0033F9038F803809239FF807E07913A03FC001F0FDA0FF0EB071FDA1FC0ECBF00 -DA7F806DB4FC4AC77E495AD903F86E5A495A130F4948157E4948157C495A13FF91C9FC48 -48167812035B1207491670120FA2485A95C7FC485AA3127F5BA312FF5BA30303B512FC90 -C7FCA2DB000190C7FCA25FA216035FA316076C5E7FA2003F150F6D5D121F6D141F000F15 -3F6C6C4A5A6C6C14F76C6CEB01E36CB4EB07C1903A7FC03F81C090391FFFFE00010701F8 -90C8FC010013803A4272BF46>I<49B648B6FC495DA2D9000390C7000313004B5D4B5DA2 -180714074B5DA2180F140F4B5DA2181F141F4B5DA2183F143F4B5DA2187F147F4B5DA218 -FF91B8FC96C7FCA292C712015B4A5DA2170313034A5DA2170713074A5DA2170F130F4A5D -A2171F131F4A5DA2173F133F4A5DA2017F157FA24A5D496C4A7EB66CB67EA3483E7BBD44 ->I<49B6FC5BA2D9000313005D5DA314075DA3140F5DA3141F5DA3143F5DA3147F5DA314 -FF92C7FCA35B5CA313035CA313075CA3130F5CA3131F5CA3133F5CA2137FA25C497EB67E -A3283E7BBD23>I<4AB61280A2180091C713C0167F5FA216FF94C7FCA35D5EA315035EA3 -15075EA3150F5EA3151F5EA3153F5EA3157FA25EA215FFA293C8FCA25CA25DA2380F8003 -EA3FC0D87FE05BA21407D8FFC05B140F01805B49485A12FC0070495A4A5A6C01FEC9FC38 -3C01FC380F07F03807FFC0C648CAFC314079BD30>I<49B6903807FFFE605ED9000390C7 -000113E04B6E13004B15FC4E5A19E002074B5A4BEC0F804EC7FC183C020F5D4B5C4D5AEF -07C0021F4AC8FC4B131E5F5F023F5C9238C003E0EE07804CC9FC027F5B4B5AEEFF801581 -ECFF834B7FED0F7FED1E3F49017C7FECFEF89138FFE01F03C07F491380ED000F4A805C01 -0714074A80A21603010F815C160183131F4A6D7FA2177F013F825C173F017F82A24A8149 -6C4A7EB6D8800FB512C0A261473E7BBD46>I<49B612C0A25FD9000390C8FC5D5DA31407 -5DA3140F5DA3141F5DA3143F5DA3147F5DA314FF92C9FCA35B5CA313035C18C0EF01E001 -0716C05C17031880130F4A140718005F131F4A141EA2173E013F5D4A14FC1601017F4A5A -16074A131F01FFECFFF0B8FCA25F333E7BBD39>I<49B5933807FFFC496062D90003F0FC -00505ADBBF805E1A771AEF1407033F923801CFE0A2F1039F020FEE071F020E606F6C140E -1A3F021E161C021C04385BA2F1707F143C023804E090C7FCF001C0629126780FE0495A02 -705FF00700F00E0114F002E0031C5BA2F03803010116704A6C6C5D18E019070103ED01C0 -0280DA03805BA2943807000F13070200020E5C5FDB03F8141F495D010E4B5CA24D133F13 -1E011CDAF9C05CEEFB80197F013C6DB4C7FC013895C8FC5E01784A5C13F8486C4A5CD807 -FE4C7EB500F04948B512FE16E01500563E7BBD52>I<902601FFFE020FB5FC496D5CA2D9 -00016D010013C04AEE3F00193E70141C193CEC07BFDB3FE01438151F1978020F7FDA0E0F -15708219F0EC1E07021C6D5CA203031401023C7FDA38015DA2701303EC7800027002805B -A2047F130702F014C04A013F91C7FCA2715A0101141F4AECF00EA2040F131E010315F84A -151C1607EFFC3C0107140391C7143817FE040113784915FF010E16708218F0131E011C6F -5AA2173F133C01385E171F137813F8486C6F5AEA07FEB500F01407A295C8FC483E7BBD44 ->I<EEFFC0030713F892383F80FE9238FC003FDA03F0EB0F804A486D7EDA1F80804AC76C -7E027E6E7E4A81494814004948811307495A4948157F133F5C49C9FC4917805B1201485A -A212075B000F17FFA25B121F190048485DA448484B5AA34D5AA25B4D5A12FF60171F6000 -7F163F604D5AA24DC7FC5F003F15014C5A6D5D001F4B5A4C5A6C6C4A5A4C5A6C6C4AC8FC -000315FC6C6C495A6C6CEB07E0017FEB1F8090261FC07EC9FC903807FFF8010013803942 -73BF46>I<49B77E18F018FC903B0003FE0003FEEF00FF4BEC7F80F03FC00207151F19E0 -5DA2020F16F0A25DA2141FF03FE05DA2023F16C0187F4B1580A2027FEDFF00604B495A4D -5A02FF4A5A4D5A92C7EA3FC04CB4C7FC4990B512FC17E04ACAFCA21303A25CA21307A25C -A2130FA25CA2131FA25CA2133FA25CA2137FA25C497EB67EA33C3E7BBD3E>I<EEFFC003 -0713F892383F80FE9238FC003FDA03F06D7E4A486D7EDA1FC06D7E4AC76C7E027E814A6E -7E495A01036F7E495A495A494881133F4A81137F49C91380A2485A12035B000717FF5B12 -0FA25B121F190048485DA448484B5AA36017075B6000FF160F60171F60127F4D5A60177F -4DC7FC5F003F903803E00191390FF003FCDA3C185B3B1FC0700C07F002E0495A000F496C -485A01E04A5AD807F14AC8FC0003018013FCD801F9EB07F8D800FD14E090397FC01F8090 -3A1FE07E0003903807FFFE0100018E5BDA000E1306030F130EA24B131E5FEE807CEEC1F8 -16FF5FA25F5F8194C8FC6F5AED01F8395273BF46>I<49B612FCEFFF8018F0903B0003FE -000FF8EF03FE4BEB00FF8419800207ED3FC05DA219E0140F5DA3021FED7FC05DA2F0FF80 -143F4B15004D5A60027F4A5A4B495A4D5AEF3F8002FF02FEC7FC92380007F892B512E017 -80499038000FE04A6D7E707E707E0103814A130083A213075CA25E130F5C5F1603131F5C -A3013F020714404A16E05F017F160119C04A01031303496C1680B6D8800113079438FE0F -009338007E1ECAEA3FFCEF07F03B407BBD42>I<92391FE00380ED7FFC913A01FFFE0700 -913907F01F8F91390FC007DF4AC66CB4FC023E6D5A4A130014FC495A4948147CA2495AA2 -010F15785CA3011F1570A46E91C7FCA2808014FE90380FFFE015FC6DEBFF8016E06D806D -806D6C7F141F02037FEC003FED07FF1501A281A282A212075A167E120EA2001E15FE5EA2 -5E003E14015E003F14034B5A486C5C150F6D495A6D49C8FCD8F9F0137C39F8FE01F839F0 -3FFFF0D8E00F13C026C001FEC9FC314279BF33>I<48B9FCA25A903AFE001FF00101F891 -38E0007FD807E0163E49013F141E5B48C75BA2001E147FA2001C4B131C123C003814FFA2 -007892C7FC12704A153C00F01738485CC716001403A25DA21407A25DA2140FA25DA2141F -A25DA2143FA25DA2147FA25DA214FFA292C9FCA25BA25CA21303A25CEB0FFE003FB67E5A -A2383D71BC41>I<001FB500F090B512F0485DA226003FF0C7380FFC004AEC03F04A5D71 -5A017F1503A24A5DA201FF150795C7FC91C8FCA2485E170E5BA20003161E171C5BA20007 -163C17385BA2000F167817705BA2001F16F05F5BA2003F1501A2495DA2007F1503A2495D -A2160794C8FC48C8FC5E160E161E6C151C163C5E5E5E6C6C13014B5A001F4A5A6C6C011F -C9FC6D133E6C6C13F83903FC07F0C6B512C0013F90CAFCEB07F83C406FBD44>I<B500FE -91387FFFE094B5FC19C00003018091380FFC0049C8EA07F000015F606095C7FC170EA25F -173C17386D5DA26C5E16015F4C5AA24CC8FC5E160E5E805E137F5E5EA24B5AA24B5A1507 -93C9FCECC00EA2013F5B153C15385DA25D14C15DECC38014E302E7CAFCEB1FEF14EE14FC -A25CA25CA25C5C130F5CA291CBFC130E3B406DBD44>I<277FFFFE01B500FC90B512E0B5 -FCA20003902680000790C7380FFC006C90C701FCEC07F049725A04035EA26350C7FCA204 -07150EA2040F5D1A3C041F153862163B6216734F5A6D14E303014B5A6C15C303034BC8FC -1683DB0703140E191E030E151C61031C7F61ED380161157003F04A5A15E002014B5A15C0 -DA03804AC9FC60DA0700140E60140E605C029C5D14B8D97FF85D5C715A5C4A5DA24A92CA -FC5F91C7FC705A137E5F137C5F137801705D53406EBD5B>I<91B690383FFFFC605E0201 -01E0010F13006E49EB07F84C6D5A19C06F6C495A96C7FC033F140E705B183C031F5C705B -4D5A030F5C70485A4DC8FC0307130EEEFC1E5F03035BEEFE705F6F6C5A5FA26F90C9FC83 -A2707EA216FF4B7F5DED079FEE1FF0150EED1C0F03387F1578EDF007DA01E07F15C09138 -038003DA07007F140E021E13014A805C02707F4A81495A4948147F01078249C8FC013F6F -7E496C147F2603FFC049487EB500F8011FEBFFE0A261463E7CBD44>I<B691383FFFF0A2 -5C000301C0913807FE006C49EC03F86C17E0604D5A017F93C7FC6E140E5F013F153C6E5C -17705F6D6C495A16034C5A010F92C8FC6E130E5E0107143C6E5B16705E6D6C485A15034B -5A010191C9FCECFF0E5D6D133C15F85D5D6E5AA25DA292CAFC5CA35C1301A35C1303A35C -1307A3495AA3131F001FB512F0A33C3E6EBD44>I<027FB612FEA3913AFFF80007FC03C0 -14F892C7EA0FF0D901FC141F4AEC3FE04AEC7FC04A15800103EDFF004A5B4C5A4948495A -5F91C7485A49141F010E4A5A4C5A5F011E4AC7FC90C75A4B5A4B5A5E4B5A151F4B5A4B5A -5E15FF4A90C8FC4A5A4A5A5D140F4A5A4A5A4A48130E4B131E02FF141C4990C7FC495A49 -48143C4A1438010F1578495A49481470494814F05C01FF4A5A4890C7FC48481403484814 -07494A5A000F151F4848143F4848ECFF804848130F90B7FCB8FC94C7FC373E79BD38>I< -147E49B47E903907C1C38090391F80EFC090383F00FF017E137F4914804848133F485AA2 -48481400120F5B001F5C157E485AA215FE007F5C90C7FCA21401485C5AA21403EDF0385A -A21407EDE078020F1370127C021F13F0007E013F13E0003E137FECF3E1261F01E313C03A -0F8781E3803A03FF00FF00D800FC133E252977A72E>97 D<EB1FC0EA0FFF5CA2EA003FA2 -91C7FCA25BA2137EA213FEA25BA21201A25BA21203A25B147E3907F1FF809038F783E090 -38EF01F013FE390FF800F8A24913FC49137C485A157E5B15FE123FA290C7FCA248130115 -FC127EA2140300FE14F85AA2EC07F0A215E048130F15C0141F15800078EB3F00127C147E -003C5B383E01F8381E03E06C485A6CB4C7FCEA01F81F4076BE2A>I<EC1FC0ECFFF09038 -03F03C903807C01E90381F800E90383F000F017E133F4913FF485A485A000714FE5B000F -14FC48481300A2485AA3127F90C8FCA35A5AA6481403007E1407150F151E003E143C1578 -6C14F0EC03E0390F800F803903E07E003801FFF838003FC0202977A72A>I<EE3F80ED1F -FF1700A2ED007FA2167EA216FEA25EA21501A25EA21503A25EA21507A25E147E903801FF -8F903807C1CF90391F80EFC090383F00FF017E137F5B48486D5A485AA2485A000F92C7FC -5B001F5CA24848137EA215FE127F90C75AA214015A485CA2140316384814F0A214071678 -91380FE070127C021F13F0007E013F5B003E137FECF3E1261F01E35B3A0F8781E3802703 -FF00FFC7FCD800FC133E294077BE2E>I<EC3F80903801FFE0903807E0F890381F803CEB -3E0001FC131E485A485A12074848133E49133C121F4848137C15F8EC03F0397F000FE0EC -FF809038FFFC00B512C048C8FCA45AA61506150E151E007C143C15786C14F0EC01E06CEB -07C0390F801F003807C0FC3801FFF038007F801F2976A72A>I<167C4BB4FC923807C780 -92380F83C0ED1F87161FED3F3FA2157EA21780EE0E004BC7FCA414015DA414035DA30103 -B512F8A390260007E0C7FCA3140F5DA5141F5DA4143F92C8FCA45C147EA414FE5CA41301 -5CA4495AA4495AA4495A121E127F5C12FF49C9FCA2EAFE1EEAF83C1270EA7878EA3FE0EA -0F802A5383BF1C>I<EC03F0EC0FFC91383E0E1C9138FC077E903901F003FE1303903807 -E001D90FC013FCEB1F80A2EB3F004914F8137E01FE1303A2484814F0A2150712034914E0 -A2150F12074914C0A2151FA216805B153F1203ED7F006D5BA200015B0000495A9038F80F -7E90387C1EFEEB1FF8903807E0FC90C7FC1401A25DA21403A25D001C1307007F5C48130F -5D4A5A4AC7FC48137E00F85B387C03F0381FFFC0D803FEC8FC273B7CA72A>I<EB01FC13 -FF5CA21303A25CA21307A25CA2130FA25CA2131FA25CA2133FA291C8FCEC03F890387F0F -FE91383E0F80D97E7813C0ECE007D9FFC013E014801400A2485A5BA25B0003140F16C05B -A20007141F16805BA2000F143F16005B5D001F147EEDFE074913FCA2003F0101130FEDF8 -0E1300161E48ECF01CA2007E1538A200FE1570020013E048EC7FC00038EC1F0028407ABE -2E>I<1478EB01FCA21303A314F8EB00E01400AD137C48B4FC38038F80EA0707000E13C0 -121E121CEA3C0F1238A2EA781F00701380A2EAF03F140012005B137E13FE5BA212015BA2 -12035B1438120713E0000F1378EBC070A214F0EB80E0A2EB81C01383148038078700EA03 -FEEA00F8163E79BC1C>I<EB01FC13FF5CA21303A25CA21307A25CA2130FA25CA2131FA2 -5CA2133FA291C8FCED03E049EB0FF8ED3C3C017EEB707CEDE1FC9038FE01C1EC03839038 -FC0703140E0001011C13F891383800E0494813001460000313E0EBF9C0EBF78001FEC8FC -1207EBFFE0EBE7F8EBE0FE000F137F6E7EEBC01F81001F130F16701380A2003F15F0021F -13E001001380A248148116C0007EEB0F83168000FE14879138078F0048EB03FE0038EB00 -F826407ABE2A>107 D<EB07F0EA03FF14E0A2EA000FA214C0A2131FA21480A2133FA214 -00A25BA2137EA213FEA25BA21201A25BA21203A25BA21207A25BA2120FA25BA2121FA25B -A2123FA290C7FCA25A1307127EA2EAFE0F130E12FCA2131E131CA2EA7C381378EA3C70EA -1FE0EA0780144079BE17>I<D801F0D93F80137F3D07FC01FFE003FFC03D0F3E07C1F80F -83F03D0E1F0F00FC1E01F8001E011C90387C3800001C49D97E707F003C01F05C0038157F -4A5C26783FC05C12704A91C7FC91C7127E00F003FE1301494A5CEA007EA20301140301FE -5F495CA203031407000160495C180F03075D0003051F13E0494A1480A2030FEC3F810007 -F001C0495CA2031F91383E0380120F494AEC0700A2033F150E001FEF1E1C4991C7EA0FF8 -0007C7000EEC03E0432979A74A>I<D801F0EB3F803A07FC01FFE03A0F3E07C1F83A0E1F -0F00FC001E011C137C001C49137E003C13F012385C38783FC012705C91C7FC00F015FE49 -5CEA007EA2150101FE5C5BA2150300015D5B15075E0003020F13704914C0A2031F13F000 -07ED80E05B1681EE01C0120F49EC0380A2EE0700001FEC0F0E49EB07FC0007C7EA01F02C -2979A733>I<EC1FC0ECFFF8903803F07C90380FC01FEB1F8090393F000F80017E14C049 -1307484814E0485A12075B000F15F0485AA2485AA2ED0FE0127F90C7FCA2151F4815C05A -A2ED3F80A2ED7F00A248147E007C5C007E13015D4A5A003E495A6C495A4A5A260F803EC7 -FC3807C0FC3801FFF038003F80242977A72E>I<903903E001F890390FF807FE903A1E7C -1E0F80903A1C3E3C07C0013C137801389038E003E0EB783F017001C013F0ED80019038F0 -7F0001E015F8147E1603000113FEA2C75AA20101140717F05CA20103140F17E05CA20107 -EC1FC0A24A1480163F010F15005E167E5E131F4B5A6E485A4B5A90393FB80F80DA9C1FC7 -FCEC0FFCEC03E049C9FCA2137EA213FEA25BA21201A25BA21203A2387FFFE0B5FCA22D3A -80A72E>I<027E1360903901FF81E0903807C1C390391F80E7C090383F00F7017E137F5B -4848EB3F80485AA2485A000F15005B121F5D4848137EA3007F14FE90C75AA3481301485C -A31403485CA314074A5A127C141F007E133F003E495A14FF381F01EF380F879F3903FF1F -80EA00FC1300143F92C7FCA35C147EA314FE5CA21301130390B512F05AA2233A77A72A> -I<D801F013FC3A07FC07FF803A0F3E0F03C0260E1F1C13E0001EEB380F001C1370003CEB -E01F123814C0D8783F14C00070903880070092C7FC91C8FC12F05BEA007EA313FE5BA312 -015BA312035BA312075BA3120F5BA3121F5B0007C9FC232979A726>I<EC7F80903801FF -E0903807C0F890381F003C013E131C013C131E017C133E49137E15FEA2000114FCA21570 -6D13007FEBFFC014FC6C13FF15806D13C06D13E0010F13F01300140F14071403120C123F -387F80011403D8FF0013E0A300FCEB07C000F0EB0F8012700078EB1F006C133C381F01F8 -3807FFE0C690C7FC1F297AA725>I<EB01C0EB03F01307A25CA2130FA25CA2131FA25CA2 -133FA291C7FCA2007FB51280B6FC1500D8007EC7FC13FEA25BA21201A25BA21203A25BA2 -1207A25BA2120FA25BA2121F141C1380A2003F133C1438EB0078147014F05C495AEA1F03 -495A6C48C7FCEA07FCEA01F0193A78B81E>I<137C48B4141C26038F80137EEA0707000E -7F001E15FE121CD83C0F5C12381501EA781F007001805BA2D8F03F1303140000005D5B01 -7E1307A201FE5C5B150F1201495CA2151F0003EDC1C0491481A2153F1683EE0380A2ED7F -07000102FF13005C01F8EBDF0F00009038079F0E90397C0F0F1C90391FFC07F8903907F0 -01F02A2979A731>I<017CEB01C048B4EB07F038038F80EA0707000E01C013F8121E001C -1403EA3C0F0038EC01F0A2D8781F130000705BA2EAF03F91C712E012005B017E130116C0 -13FE5B1503000115805BA2ED07001203495B150EA25DA25D1578000114706D5B0000495A -6D485AD97E0FC7FCEB1FFEEB03F0252979A72A>I<017C167048B491387001FC3A038F80 -01F8EA0707000E01C015FE001E1403001CEDF000EA3C0F0038177C1507D8781F4A133C00 -701380A2D8F03F130F020049133812005B017E011F14784C137013FE5B033F14F0000192 -C712E05BA2170100034A14C049137E17031880A2EF070015FE170E00010101141E01F86D -131C0000D9039F5BD9FC076D5A903A3E0F07C1E0903A1FFC03FFC0902703F0007FC7FC37 -2979A73C>I<903903F001F890390FFC07FE90393C1E0E0F9026780F1C138001F0EBB83F -D801E013F89039C007F07FEA0380000714E0D9000F140048151C000E4AC7FCA2001E131F -A2C75BA2143F92C8FCA35C147EA314FE4A131CA30101143C001E1538003F491378D87F81 -1470018314F000FF5D9039077801C039FE0F7C033A7C0E3C078027783C1E1EC7FC391FF8 -0FFC3907E003F029297CA72A>I<137C48B4143826038F8013FCEA0707000E7F001E1401 -001C15F8EA3C0F12381503D8781F14F000701380A2D8F03F1307020013E012005B017E13 -0F16C013FE5B151F1201491480A2153F000315005BA25D157EA315FE5D00011301EBF803 -0000130790387C1FF8EB3FF9EB07E1EB00035DA21407000E5CEA3F80007F495AA24A5AD8 -FF0090C7FC143E007C137E00705B387801F0383803E0381E0FC06CB4C8FCEA03F8263B79 -A72C>I<D901F01370D907FC13F0010F14E090381FFE0190393FFF03C049EB838090387C -0FCF9039F803FF009038F0007E49133C000114386C48137890C75A4A5A4A5A4A5A4AC7FC -141E5C5C5C495A495A495A49C8FC131E4913075B5B48485B4848131E485A01F05BD80FFE -137C391F1F81F8383E0FFFD83C075B486C5B00705CD8F00190C7FC38E0007C24297BA725 ->I<B8FCA2280278982E>I E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fr cmr9 9 62 -/Fr 62 122 df<91393FE00FE0903A01FFF83FF8903A07E01EF83C903A1F800FF07E903A -3F001FE0FE017E133F4914C0485A1738484890381F8000ACB812C0A33B03F0001F8000B3 -A7486C497EB50083B5FCA32F357FB42D>11 D<EC1FE0ECFFFC903803F01E90390FC00780 -EB1F8090393F000FC0017E131F5BA2485AED0F8092C7FCA9ED0FC0B7FCA33901F8001F15 -0FB3A6486CEB1FE0267FFFC1B5FCA328357FB42B>I<EC1FF891B512C0903803F00F9038 -0FC01FEB1F80EB3F00137E5B150F485AACB7FCA33901F8000FB3A7486CEB1FE0267FFFE3 -B5FCA328357FB42B>I<003C13F0387E01F838FF03FCA2EB83FEA2EA7F81383D80F60001 -1306A40003130EEB000CA248131C00061318000E1338000C1330001C13704813E0387001 -C00060138017177EB326>34 D<017C1503D803FEED078026078780140F260F01C0141F26 -1E00E0EC3F00003E01F8147E003C017CEB01FE007C90397F8007FC913933FFFEF8007890 -38307FF900F89039380001F00218495A16075F4C5A161F4CC7FC163E5E023813FC007801 -305B007C4A5AEC7003003C01605B003E9038E007C0001EEBC00FD80F015C270787801FC8 -FC3903FE003FD8007C133E90C748131F03FCEBFF809239F801E1E0913A01F003C0700203 -9038078030DBE00F1338DA07C0EB0018020F49131C0380140C91381F001E4A013E130E02 -3E15065C14FC495A5C495A13075C4948150E011F021E130C91C7121F013E161C017E6E13 -18017CED803849020713300001923803C07049913801E1E049913800FF806C48ED1F0037 -3C7CB740>37 D<123C127EB4FCA21380A2127F123D1201A412031300A25A1206120E120C -121C5A5A126009177AB315>39 D<14C01301EB0380EB0F00130E5B133C5B5BA2485A485A -A212075B120F90C7FC5AA2121E123EA3123C127CA55AB0127CA5123C123EA3121E121FA2 -7E7F12077F1203A26C7E6C7EA213787F131C7F130FEB0380EB01C01300124A79B71E>I< -12C07E1270123C121C7E120F6C7E6C7EA26C7E6C7EA27F1378137C133C133EA2131E131F -A37F1480A5EB07C0B0EB0F80A514005BA3131E133EA2133C137C137813F85BA2485A485A -A2485A48C7FC120E5A123C12705A5A124A7CB71E>I<123C127EB4FCA21380A2127F123D -1201A412031300A25A1206120E120C121C5A5A126009177A8715>44 -D<B512F0A514057F921A>I<123C127E12FFA4127E123C08087A8715>I<EB0FE0EB7FFCEB -F83E3903E00F803907C007C0EB8003000F14E0391F0001F0A24814F8A2003E1300007E14 -FCA500FE14FEB2007E14FCA56CEB01F8A36C14F0A2390F8003E03907C007C0A23903E00F -803900F83E00EB7FFCEB0FE01F347DB126>48 D<13075B5B137FEA07FFB5FC13BFEAF83F -1200B3B3A2497E007FB51280A319327AB126>I<EB3FC0EBFFF0000313FC380F80FF391E -007F80001CEB3FC048EB1FE048130F15F00060130712FC6C14F87E1403A3007E1307123C -C7FC15F0A2140F15E0EC1FC0A2EC3F801500147E5C495A5C495A495A495A49C7FC133E13 -3C4913185B485A48481330485A48C7FC001C1470001FB512F05A5AB612E0A31D327CB126 ->I<EC01C0A214031407A2140F141FA2143F147F146F14CF1301EB038F140F1307130E13 -0C131C13381330137013E013C0EA0180120313001206120E120C5A123812305A12E0B712 -80A3C7380FC000A94A7E0107B51280A321337EB226>52 D<000C14C0380FC00F90B51280 -15005C5C14F014C0D80C18C7FC90C8FCA9EB0FC0EB7FF8EBF07C380FC03F9038001F80EC -0FC0120E000CEB07E0A2C713F01403A215F8A41218127E12FEA315F0140712F8006014E0 -1270EC0FC06C131F003C14806CEB7F00380F80FE3807FFF8000113E038003F801D347CB1 -26>I<1230123C003FB6FCA34814FEA215FC0070C7123800601430157015E04814C01401 -EC0380C7EA07001406140E5C141814385CA25CA2495A1303A3495AA2130FA3131F91C7FC -A25BA55BA9131C20347CB126>55 D<EB0FE0EB7FF8EBFFFE3803F83F3907E00F80390FC0 -07C0D81F8013E0EC03F0EA3F0048EB01F8127EA200FE14FC1400A415FEA5007E1301A212 -7F7E1403EA1F80000F13073807C00E3803E01C3801F03838007FF090381FC0FC90C7FC14 -01A215F8A215F01403001F14E0383F800715C0140FEC1F809038003F00001C137E381F01 -FC380FFFF0000313C0C690C7FC1F347DB126>57 D<123C127E12FFA4127E123C1200B012 -3C127E12FE12FFA3127F123F1203A412071206A3120E120C121C1238123012701260082F -7A9F15>59 D<15E0A34A7EA24A7EA34A7EA3EC0DFE140CA2EC187FA34A6C7EA202707FEC -601FA202E07FECC00FA2D901807F1507A249486C7EA301066D7EA2010E80010FB5FCA249 -800118C77EA24981163FA2496E7EA3496E7EA20001821607487ED81FF04A7ED8FFFE49B5 -12E0A333367DB53A>65 D<B7FC16E016F83A03FC0003FE0001EC00FFEE7F80EE3FC0161F -17E0160F17F0A617E0161F17C0EE3F80EE7F0016FEED03FC90B612F05E9039FC0007FCED -00FEEE3F80EE1FC0EE0FE017F0160717F8160317FCA617F81607A2EE0FF0EE1FE0163FEE -7FC00003913803FF00B75A16F816C02E337DB236>I<DA03FE130C91393FFF801C91B512 -E0903A03FE01F83C903A0FF0003C7CD91FC0EB0EFCD97F80130701FEC712034848140100 -0315005B4848157C485A173C485A171C123F5B007F160CA390C9FC481600AB7E6D150CA3 -123F7F001F161C17186C7E17386C6C15306C6C15706D15E012016C6CEC01C0D97F80EB03 -80D91FC0EB0F00D90FF0131ED903FE13FC0100B512F0023F13C0DA03FEC7FC2E377CB437 ->I<B812C0A3D803FCC7127F0001150FEE03E01601A21600A21760A403061330A4170015 -0EA2151E157E90B512FEA39038FC007E151E150EA21506170CA3171892C7FCA41738A217 -70A217F01601160316070003157FB812E0A32E337DB234>69 D<B81280A3D803FCC7FC00 -01151FEE07C01603A21601A21600A41760150CA31700A2151CA2153C15FC90B5FCA3EBFC -00153C151CA2150CA592C8FCAB487EB512FEA32B337DB232>I<B5D8FE03B512F8A30001 -90C73807FC006C486E5AB390B7FCA349C71203B3A3486C4A7EB5D8FE03B512F8A335337E -B23A>72 D<B512FEA3000113006C5AB3B3A7487EB512FEA317337EB21C>I<017FB5FCA3 -9038003FE0EC1FC0B3B1127EB4FCA4EC3F805A0060140000705B6C13FE6C485A380F03F0 -3803FFC0C690C7FC20357DB227>I<B500FE903807FFF8A3000190C7000113006C48EC00 -FC17F04C5A4C5A4CC7FC160E5E5E5E5E4B5A4B5A4BC8FC150E5D5D15F84A7E14034A7EEC -0EFF5C4A6C7E4A6C7EECE01FD9FFC07F4A6C7E4A6C7E5B6F7E6F7EA26F7E707EA2707E70 -7E160F83707E707EA283486C913807FF80B500FE013F13FCA336337EB23C>I<B512FEA3 -D803FEC9FC6C5AB3A9EE0180A416031700A45EA25E5E5E5E16FE00031407B7FCA329337D -B230>I<D8FFFC923801FFF86D5DA20003EFFE00D801BFED06FCA3D99F80140CA2D98FC0 -1418A3D987E01430A2D983F01460A3D981F814C0A3D980FCEB0180A2027EEB0300A36E13 -06A26E6C5AA36E6C5AA36E6C5AA26E6C5AA36E6C5AA3913800FD80A2037FC7FCA3486C13 -3ED80FF04B7EB5011C90387FFFF8A33D337CB246>I<EC07FC91387FFFC0903901FC07F0 -903907E000FCD90F80133E013FC76C7E017E6E7E496E7E48486E7E48486E7EA248486E7E -000F8249157E001F167FA24848ED3F80A2007F17C0A290C9121FA24817E0AB6C17C06D15 -3FA3003F17806D157FA2001F17006D5D000F5E6C6C4A5AA26C6C4A5A00015E6C6C4A5A01 -7E4A5A6D4A5AD91FC0017FC7FCD907E013FC903901FC07F09039007FFFC0DA07FCC8FC33 -377CB43C>79 D<B612FCEDFF8016F03A01FE0007FC0000EC01FEED007F707E707E83160F -83A65FA24C5AA24C5A047EC7FC4B5AED0FF090B612C093C8FC9039FE001FC0ED07F06F7E -6F7E150082167E167FA583A5180C17C0A2043F131C486C1618B500FEEB1FE0040F133893 -3807F070C93801FFE09338003F8036357EB239>82 D<90381FE00390387FFC0748B5FC39 -07F01FCF390F8003FF48C7FC003E80814880A200788000F880A46C80A27E92C7FC127F13 -C0EA3FF013FF6C13F06C13FF6C14C06C14F0C680013F7F01037F9038003FFF1403020013 -80157F153FED1FC0150F12C0A21507A37EA26CEC0F80A26C15006C5C6C143E6C147E01C0 -5B39F1FC03F800E0B512E0011F138026C003FEC7FC22377CB42B>I<007FB712FEA39039 -8007F001D87C00EC003E0078161E0070160EA20060160600E01607A3481603A6C71500B3 -AB4A7E011FB512FCA330337DB237>I<B500F0903803FFF8A3D807FEC8EA7FC06C48ED1F -000001161E6D151C00001618A26D15386D1530A26D6C5CA26E14E0011F5DA26D6C495AA2 -8001074AC7FCA26D6C1306A28001015CA26E131C01001418806E5BA2ED8070023F1360A2 -6E6C5AA215E1020F5BA2DA07F3C8FCA215FBEC03FEA36E5AA26E5AA31570A235357EB23A ->86 D<B5D8F007B539800FFFF0A3000390C7273FF000011300D801FC6E48EB007C1A386D -140F00001930836D020715706D1860A26E496C14E0013F60A26ED919FC1301011F60A26E -D930FE1303010F95C7FCA26ED9607F5B01071706A26E9039C03F800E0103170CA2913BFC -01801FC01C01011718A2913BFE03000FE03801001730A2DAFF06EB07F0027F5EA2038CEB -03F8023F5EA203D8EB01FC021FEDFD80A203F0EB00FF020F93C8FCA24B800207157EA24B -143E0203153CA24B141C020115184C357FB24F>I<0003130C48131C000E133848137000 -181360003813E0003013C0EA700100601380A2EAE00300C01300A400DE137800FF13FCEB -83FEA2EA7F81A2383F00FC001E1378171774B326>92 D<EB7F803803FFF0380F80FC381C -003E003F133F6D6C7E6E7EA26E7EEA1F00C7FCA4EB01FF131FEBFF873803FC07EA0FF0EA -1FC0EA3F80127F13004815C05AA3140FA26C131F6C133B3A3F8071F180391FC1E1FF2607 -FFC013003900FE003C22237DA126>97 D<EA03F012FFA312071203AEEC3F80ECFFE09038 -F3C0F89038F7007E01FE7F49EB1F8049EB0FC05BED07E016F0A2150316F8AA16F0150716 -E0A2ED0FC07F6DEB1F8001ECEB3F0001CF137C90388381F8903801FFE0C76CC7FC25357E -B32B>I<EB07F8EB3FFF9038FC07C03901F000E03903E003F03807C007120FEA1F80123F -90380003E04890C7FCA2127E12FEAA127FA26C14187F001F14386D1330000F14706C6C13 -E03903F001C03900FC0F8090383FFE00EB07F01D237EA122>I<153FEC0FFFA3EC007F81 -AEEB07F0EB3FFCEBFC0F3901F003BF3907E001FF48487E48487F8148C7FCA25A127E12FE -AA127E127FA27E6C6C5BA26C6C5B6C6C4813803A03F007BFFC3900F81E3FEB3FFCD90FE0 -130026357DB32B>I<EB0FE0EB7FFCEBF83F3903F00F80D807E013C0390FC007E0381F80 -0315F0EA3F0014014814F8127EA212FEA2B6FCA248C8FCA5127E127FA26C1418A26C6C13 -38000F14306D13706C6C13E03901F003C03900FC0F00EB3FFEEB07F01D237EA122>I<EB -01FCEB07FF90381F078090383E0FC0EB7C1F13FCEA01F8A20003EB070049C7FCACB512F0 -A3D803F0C7FCB3A7487E387FFFE0A31A357FB417>I<151F90391FC07F809039FFF8E3C0 -3901F07FC73907E03F033A0FC01F83809039800F8000001F80EB00074880A66C5CEB800F -000F5CEBC01F6C6C48C7FCEBF07C380EFFF8380C1FC0001CC9FCA3121EA2121F380FFFFE -ECFFC06C14F06C14FC4880381F0001003EEB007F4880ED1F8048140FA56C141F007C1500 -6C143E6C5C390FC001F83903F007E0C6B51280D91FFCC7FC22337EA126>I<EA03F012FF -A312071203AEEC1FC0EC7FF09038F1E0FC9038F3807C9038F7007E13FE497FA25BA25BB3 -486CEB7F80B538C7FFFCA326347EB32B>I<EA0780EA0FC0EA1FE0A4EA0FC0EA0780C7FC -AAEA07E012FFA3120F1207B3A6EA0FF0B5FCA310337EB215>I<EB03C0EB07E0EB0FF0A4 -EB07E0EB03C090C7FCAAEB03F013FFA313071303B3B01238127C00FE13E0130714C0130F -007C138038381F00EA1FFCEA07F0144384B217>I<EA03F012FFA312071203AF913803FF -E0A36E1300EC00F8EC01E05D4A5A020FC7FC141C5C5C14F0EBF3F8EBF7FC13FEEBFC7EEB -F87F496C7E141F6E7E8114076E7E8114016E7E81486CEBFF80B500C313F0A324347EB329 ->I<EA07E012FFA3120F1207B3B3A7EA0FF0B5FCA310347EB315>I<2703F01FE013FF00FF -90267FF80313C0903BF1E07C0F03E0903BF3803E1C01F02807F7003F387FD803FE147049 -6D486C7EA2495CA2495CB3486C496C487EB53BC7FFFE3FFFF0A33C217EA041>I<3903F0 -1FC000FFEB7FF09038F1E0FC9038F3807C3907F7007EEA03FE497FA25BA25BB3486CEB7F -80B538C7FFFCA326217EA02B>I<EB07F0EB3FFE9038FC1F803901F007C03903C001E000 -078048486C7E48C7127CA248147E003E143E007E143FA300FE1580A8007E1500A36C147E -A26C147C6D13FC6C6C485A00075C3903F007E03900FC1F80D93FFEC7FCEB07F021237EA1 -26>I<3903F03F8000FFEBFFE09038F3C0F89038F7007ED807FE7F6C48EB1F804914C049 -130F16E0ED07F0A3ED03F8A9150716F0A216E0150F16C06D131F6DEB3F80160001FF13FC -9038F381F89038F1FFE0D9F07FC7FC91C8FCAA487EB512C0A325307EA02B>I<903807F0 -0390383FFC07EBFC0F3901F8038F3807E001000F14DF48486CB4FC497F123F90C77E5AA2 -5A5AA9127FA36C6C5B121F6D5B000F5B3907E003BF3903F0073F3800F81EEB3FF8EB0FE0 -90C7FCAAED7F8091380FFFFCA326307DA029>I<3803E07C38FFE1FF9038E38F809038E7 -1FC0EA07EEEA03ECA29038FC0F8049C7FCA35BB2487EB512E0A31A217FA01E>I<EBFF06 -000713CE381F00FE003C133E48131E140E5A1406A27EA200FE90C7FC6C7EEA7FFC383FFF -C014F0000F7F6C7FC67FEB0FFF1300EC3F8000C0131F140F6C1307A37E15006C5B6C130E -6C5B38F7807838E1FFE038C07F8019237EA11E>I<1330A51370A313F0A21201A2120312 -07381FFFFEB5FCA23803F000AF1403A814073801F806A23800FC0EEB7E1CEB1FF8EB07E0 -182F7FAD1E>I<D803F0133F00FFEB0FFFA30007EB007F000380B35DA35D12016D481380 -0000903803BFFC90387E073FEB1FFED907F8130026227EA02B>I<B5EBFFF0A3D80FF0EB -3F800007EC1F000003140E150C6D131C00011418A26C6C5BA26D1370017E1360137F6D5B -A290381F8180A214C3010F90C7FCA2EB07E6A214FE6D5AA26D5AA36D5AA2146024217E9F -29>I<B53A1FFF81FFF0A33C07F801FC003F8001F049EB1E0000030100141C816C6C017C -1318A26D017E1338000002FE1330A290267E01FF5B159F168090263F030F5BA216C0903A -1F8607C180A202C613E390260FCC0390C7FCA2D907FC13F6ECF80116FE6D486C5AA36D48 -1378A36D48133034217F9F37>I<B53801FFF8A32603FE0013806C48EB7C000000147801 -7E1370017F5B90383F81C090381F8380D90FC3C7FCEB07E614FE6D5A6D5A6D7E80805B90 -38039F809038071FC09038060FE0EB0C0790381C03F0496C7E01707FEBF000000180000F -ECFF8026FFFC0313FCA326207F9F29>I<3A7FFF807FF8A33A07F8001FC00003EC0F8000 -01EC070015066C6C5BA26D131C017E1318A26D5BA2EC8070011F1360ECC0E0010F5BA290 -3807E180A214F3010390C7FC14FBEB01FEA26D5AA31478A21430A25CA214E05CA2495A12 -78D8FC03C8FCA21306130EEA701CEA7838EA1FF0EA0FC025307F9F29>I -E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fs cmr6 6 5 -/Fs 5 54 df<13E01201120712FF12F91201B3A7487EB512C0A212217AA01E>49 -D<EA01FC3807FF80381C0FC0383003E0386001F0EB00F812F86C13FCA2147C1278003013 -FCC7FC14F8A2EB01F0EB03E014C0EB0780EB0F00131E13385B5B3801C00CEA0380380600 -185A5A383FFFF85AB512F0A216217CA01E>I<13FF000313C0380F03E0381C00F014F800 -3E13FC147CA2001E13FC120CC712F8A2EB01F0EB03E0EB0FC03801FF00A2380003E0EB00 -F01478147C143E143F1230127812FCA2143E48137E0060137C003813F8381E03F0380FFF -C00001130018227DA01E>I<14E01301A213031307A2130D131D13391331136113E113C1 -EA01811203EA07011206120C121C12181230127012E0B6FCA2380001E0A6EB03F0EB3FFF -A218227DA11E>I<00101330381E01F0381FFFE014C01480EBFE00EA1BF00018C7FCA513 -FE381BFF80381F03C0381C01E0381800F014F8C71278A2147CA21230127812F8A2147848 -13F8006013F0387001E01238381E07803807FF00EA01F816227CA01E>I -E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Ft cmtt10 10.95 79 -/Ft 79 123 df<0060150C00F0151EB3ABB712FEA36C15FC27227C9530>32 -D<00101304007C131F00FEEB3F80A26C137FA248133FB2007E1400007C7F003C131E0010 -1304191C75B830>34 D<D803C0EB01E0D80FF01303486C497E487E150F487ED87E7E495A -EAFE7F5E486C133FA25E157FA24BC7FC6C5A5D387E7E01EA7FFED83FFC5B1403EA1FF86C -48485AEA03C0C75B140FA25D141FA24A5AA25D147FA292C8FC5CA2495AA25C1303A25C13 -07A290390FF001E0ED07F84A487E011F497EA24A487E133F163F90267F807F1380ED7E1F -14005BA25B1201A24848EB7F3F033F13004914FF12076F5A5B6F5A6C486D5A0001EC01E0 -29477DBE30>37 D<EA07C0EA0FF0EA1FF8A213FCA213FE120F1207EA007EA513FE13FCA2 -120113F81203EA07F0120FEA1FE0127FEAFFC013801300127C12380F1D70B730>39 -D<141E147F14FF5BEB03FEEB07FCEB0FF0EB1FE0EB3FC0EB7F80EBFF00485A5B12035B48 -5A120F5BA2485AA2123F5BA2127F90C7FCA412FEAD127FA47F123FA27F121FA26C7EA27F -12076C7E7F12017F6C7EEB7F80EB3FC0EB1FE0EB0FF0EB07FCEB03FEEB01FF7F147F141E -184771BE30>I<127812FE7E7F6C7E6C7EEA0FF06C7E6C7E6C7E6C7EEB7F80133F14C013 -1FEB0FE014F01307A2EB03F8A214FC1301A214FE1300A4147FAD14FEA4130114FCA21303 -14F8A2EB07F0A2130F14E0EB1FC0133F1480137FEBFF00485A485A485A485AEA3FE0485A -485A90C7FC5A1278184778BE30>I<14E0497E497EA60038EC0380007EEC0FC0D8FF83EB -3FE001C3137F9038F3F9FF267FFBFB13C06CB61280000FECFE00000314F86C5C6C6C13C0 -011F90C7FC017F13C048B512F04880000F14FE003FECFF80267FFBFB13C026FFF3F913E0 -9038C3F87F0183133FD87E03EB0FC00038EC0380000091C7FCA66D5A6D5A23277AAE30> -I<143EA2147FAF007FB7FCA2B81280A36C1600A2C76CC8FCAF143EA229297DAF30>I<EA -03E0EA0FF0EA1FF813FCEA3FFEA213FFA27EA27E1203EA007FA2137E13FEEA01FC1203EA -07F8EA3FF0127FEAFFE0EA7F801300123C1019708B30>I<007FB612F0A2B712F8A36C15 -F0A225077B9E30>I<120FEA3FC0EA7FE0A2EAFFF0A4EA7FE0A2EA3FC0EA0F000C0C6E8B -30>I<16F01501ED03F8A21507A2ED0FF0A2ED1FE0A2ED3FC0A2ED7F80A2EDFF00A24A5A -A25D1403A24A5AA24A5AA24A5AA24A5AA24A5AA24AC7FCA2495AA25C1303A2495AA2495A -A2495AA2495AA2495AA249C8FCA2485AA25B1203A2485AA2485AA2485AA2485AA2485AA2 -48C9FCA25AA2127CA225477BBE30>I<14FE903807FFC0497F013F13F8497F90B57E48EB -83FF4848C6138049137F4848EB3FC04848EB1FE049130F001F15F0491307A24848EB03F8 -A290C712014815FCA400FEEC00FEAD6C14016C15FCA36D1303003F15F8A26D1307001F15 -F0A26D130F6C6CEB1FE0A26C6CEB3FC06C6CEB7F806D13FF2601FF8313006CEBFFFE6D5B -6D5B010F13E06D5BD900FEC7FC273A7CB830>I<EB03C0497EA2130FA2131FA2133F137F -13FF1203123FB5FCA213EF138FEA7E0F1200B3B0003FB512F84814FCB612FEA26C14FC6C -14F81F3977B830>I<EB07FC90383FFFC090B512F00003804814FE4880261FF80F138026 -3FE00113C09038C0007F4848EB3FE090C7121FED0FF04814075A6C15F81503A3127E1218 -C8FCA2150716F0150F16E0151F16C0153FED7F8015FF4A13005DEC07FC4A5A4A5A4A5A4A -5A4A5A4990C7FC495A495AEB0FF0EB3FE0495A495A4890C8FC4848EB01F04848EB03F848 -5AEA1FE048B6FCB7FCA37E6C15F025397BB830>I<EB03FF013F13E090B512F84814FE48 -80481580260FFE0113C09038F0007F4848EB1FE0150F16F01507A26C5A6C5AC8FC150F16 -E0A2151FED3FC0157FEDFF8002071300903807FFFE495B5D8115FF6D1480D9000113C091 -38003FE0ED1FF0ED07F8150316FC150116FE1500A21218127EB4FCA2150116FC4814036C -15F86C6C13076DEB1FF0D83FF0133F3A1FFE01FFE06CB612C06C15806CECFE00C65C013F -13F001031380273A7CB830>I<EC03FC4A7E140F141FA2143F147F157E14FEA2EB01FCEB -03F8A2EB07F0A2EB0FE0EB1FC0A2EB3F80A2EB7F0013FEA2485A485AA2485AA2485A485A -A2485AA248C7FC12FEB8FC1780A46C1600C8007EC7FCAA91387FFFFE91B6FCA46E5B2939 -7DB830>I<000FB612804815C05AA316800180C8FCAEEB83FF019F13C090B512F015FC81 -81D9FE0313809039F0007FC049133F0180EB1FE06CC7120F000E15F0C81207A216F81503 -A31218127EA2B4FC150716F048140F6C15E06C141F6DEB3FC06D137F3A3FE001FF80261F -FC0F13006CB55A6C5C6C5C6C14E06C6C1380D90FFCC7FC25397BB730>I<EC0FF8EC7FFF -49B51280010714E0131F4914F090387FF80F9039FFC007F84813803803FE005B485A4848 -EB03F0ED01E0484890C7FC5B123F5BA2127FEB000C903803FFE0010F13F8D8FF3F13FE48 -B6FCB7128016C09039FE007FE001F8EB1FF001E0130F49EB07F849EB03FCA290C7120116 -FE1500A37EA46C7E15016D14FC121F6D1303000FEC07F86D130F6C6CEB1FF06DEB3FE03A -03FF81FFC06C90B512806C15006D5B011F13F8010713E001011380273A7CB830>I<127C -B712FC16FEA416FC48C7EA0FF816F0ED1FE0007CEC3FC0C8EA7F80EDFF00A24A5A4A5A5D -14075D140F5D4A5AA24A5AA24AC7FCA25C5C13015CA213035CA213075CA4495AA6131F5C -A96D5A6DC8FC273A7CB830>I<49B4FC011F13F0017F13FC90B57E0003ECFF804815C048 -010113E03A1FF8003FF049131FD83FC0EB07F8A24848EB03FC90C71201A56D1303003F15 -F86D13076C6CEB0FF06C6CEB1FE0D807FCEB7FC03A03FF83FF806C90B512006C6C13FC01 -1F13F0497F90B512FE48802607FE0013C0D80FF8EB3FE0D81FE0EB0FF04848EB07F84913 -03007F15FC90C712014815FE481400A66C14016C15FC6D1303003F15F86D1307D81FF0EB -1FF06D133F3A0FFF01FFE06C90B512C06C1580C6ECFE006D5B011F13F0010190C7FC273A -7CB830>I<49B4FC010F13E0013F13F890B57E4880488048010113803A0FFC007FC0D81F -F0EB3FE04848131F49EB0FF048481307A290C7EA03F85A4815FC1501A416FEA37E7E6D13 -03A26C6C13076C6C130F6D133FD80FFC13FF6CB6FC7E6C14FE6C14F9013FEBE1FC010F13 -8190380060011400ED03F8A2150716F0150F000F15E0486C131F486CEB3FC0157FEDFF80 -4A1300EC07FE391FF01FFC90B55A6C5C6C5C6C1480C649C7FCEB3FF0273A7CB830>I<12 -0FEA3FC0EA7FE0A2EAFFF0A4EA7FE0A2EA3FC0EA0F00C7FCAF120FEA3FC0EA7FE0A2EAFF -F0A4EA7FE0A2EA3FC0EA0F000C276EA630>I<007FB7FCA2B81280A36C16006C5DCBFCA7 -003FB612FE4881B81280A36C1600A229157DA530>61 D<EB1FFE90B512E0000314F8000F -14FE4880481580267FF80313C09038C0007F48C7121F16E0150FA3127E151F0018EC7FC0 -C812FF020313804A13004A5AEC1FF84A5AEC7FC04A5A92C7FC495AA2495A5CA213075CA8 -6D5A90C9FCA8EB01C0EB07F0A2497EA36D5AA2EB01C023397AB830>63 -D<147F4A7EA2497FA4497F14F7A401077F14E3A3010F7FA314C1A2011F7FA490383F80FE -A590387F007FA4498049133F90B6FCA34881A39038FC001F00038149130FA40007814913 -07A2D87FFFEB7FFFB56CB51280A46C496C130029397DB830>65 D<007FB512F0B612FE6F -7E82826C813A03F8001FF815076F7E1501A26F7EA615015EA24B5A1507ED1FF0ED7FE090 -B65A5E4BC7FC6F7E16E0829039F8000FF8ED03FC6F7E1500167FA3EE3F80A6167F1700A2 -5E4B5A1503ED1FFC007FB6FCB75A5E16C05E6C02FCC7FC29387EB730>I<91387F803C90 -3903FFF03E49EBFC7E011F13FE49EBFFFE5B9038FFE07F48EB801F3903FE000F48481307 -5B48481303A2484813015B123F491300A2127F90C8FC167C16005A5AAC7E7EA2167C6D14 -FE123FA27F121F6D13016C6C14FCA26C6CEB03F86D13076C6CEB0FF03901FF801F6C9038 -E07FE06DB512C06D14806D1400010713FC6D13F09038007FC0273A7CB830>I<003FB512 -E04814FCB67E6F7E6C816C813A03F8007FF0ED1FF8150F6F7E6F7E15016F7EA2EE7F80A2 -163F17C0161FA4EE0FE0AC161F17C0A3163F1780A2167F17005E4B5A15034B5A150F4B5A -ED7FF0003FB65A485DB75A93C7FC6C14FC6C14E02B387FB730>I<007FB7FCB81280A47E -D803F8C7123FA8EE1F0093C7FCA4157C15FEA490B5FCA6EBF800A4157C92C8FCA5EE07C0 -EE0FE0A9007FB7FCB8FCA46C16C02B387EB730>I<003FB712804816C0B8FCA27E7ED801 -FCC7121FA8EE0F8093C7FCA5153E157FA490B6FCA69038FC007FA4153E92C8FCAE383FFF -F8487FB5FCA27E6C5B2A387EB730>I<02FF13F00103EBC0F8010F13F1013F13FD4913FF -90B6FC4813C1EC007F4848133F4848131F49130F485A491307121F5B123F491303A2127F -90C7FC6F5A92C8FC5A5AA892B5FC4A14805CA26C7F6C6D1400ED03F8A27F003F1407A27F -121F6D130F120F7F6C6C131FA2D803FE133F6C6C137FECC1FF6C90B5FC7F6D13FB010F13 -F30103EBC1F0010090C8FC293A7DB830>I<3B3FFF800FFFE0486D4813F0B56C4813F8A2 -6C496C13F06C496C13E0D803F8C7EAFE00B290B6FCA601F8C7FCB3A23B3FFF800FFFE048 -6D4813F0B56C4813F8A26C496C13F06C496C13E02D387FB730>I<007FB6FCB71280A46C -1500260007F0C7FCB3B3A8007FB6FCB71280A46C1500213879B730>I<49B512F04914F8 -5BA27F6D14F090C7EAFE00B3B3123C127EB4FCA24A5A1403EB8007397FF01FF86CB55A5D -6C5C00075C000149C7FC38003FF025397AB730>I<D83FFF90380FFF80486D4813C0B56C -5AA26C497E6C496C1380D803F0903803F8004B5A4B5A151F4B5A5E4BC7FC15FE14014A5A -5D4A5A4A5A141F5D4A5A4AC8FC5C13F18101F37F13F790B57E14EFECC7F01483EC03F814 -0101FE7F496C7E5B157F497F82151F82150F826F7EA26F7E1501821500D83FFF903803FF -C0486D4813E0B56C5AA26C497E6C496C13C02B387FB730>I<383FFFF8487FB57EA26C5B -6C5BD801FCC9FCB3B0EE0F80EE1FC0A9003FB7FC5AB8FCA27E6C16802A387EB730>I<D8 -3FF8ECFFE0486C4913F0486C4913F8A2007F16F06C6C4913E00007160001EF14BFEC800F -A39039E7C01F3FA4ECE03F01E3133EA2ECF07EA201E1137CA2ECF8FCA201E013F8A214FD -EC7DF0A3147FEC3FE0A3EC1FC0A2EC070091C7FCADD83FFC903801FFE0486C4913F0B549 -13F8A26C486D13F06C486D13E02D387FB730>I<D83FFC90381FFF80486C4913C0B54913 -E0A26C6D6C13C06C6E13800003913801F800EBF7C0A3EBF3E0A314F013F1A214F8A213F0 -14FCA2147C147EA2143E143FA2141FA21581A2140F15C1A2140715E1A2140315F1A21401 -A215F91400A3157DA3153FEA3FFF481380B5EAC01FA26CEB800F6C496C5A2B387EB730> -I<90383FFFE048B512FC000714FF4815804815C04815E0EBF80001E0133FD87F80EB0FF0 -A290C71207A44815F8481403B3A96C1407A26C15F0A36D130FA26D131F6C6CEB3FE001F8 -13FF90B6FC6C15C06C15806C1500000114FCD8003F13E0253A7BB830>I<007FB512F0B6 -12FE6F7E16E0826C813903F8003FED0FFCED03FE15016F7EA2821780163FA6167F17005E -A24B5A1503ED0FFCED3FF890B6FC5E5E16804BC7FC15F001F8C9FCB0387FFFC0B57EA46C -5B29387EB730>I<90383FFFE048B512FC000714FF4815804815C04815E0EBF80001E013 -3F4848EB1FF049130F90C71207A44815F8481403B3A8147E14FE6CEBFF076C15F0EC7F87 -A2EC3FC7018013CF9038C01FFFD83FE014E0EBF80F90B6FC6C15C06C15806C1500000114 -FCD8003F7FEB00016E7EA21680157F16C0153F16E0151F16F0150FED07E025467BB830> -I<003FB57E4814F0B612FC15FF6C816C812603F8017F9138003FF0151F6F7E1507150382 -1501A515035E1507150F4B5A153F4AB45A90B65A5E93C7FC5D8182D9F8007FED3FE0151F -150F821507A817F8EEF1FCA53A3FFF8003FB4801C0EBFFF8B56C7E17F06C496C13E06C49 -EB7FC0C9EA1F002E397FB730>I<90390FF803C0D97FFF13E048B512C74814F74814FF5A -381FF80F383FE001497E4848137F90C7123F5A48141FA2150FA37EED07C06C91C7FC7F7F -EA3FF0EA1FFEEBFFF06C13FF6C14E0000114F86C80011F13FF01031480D9003F13C01401 -9138007FE0151FED0FF0A2ED07F8A2007C140312FEA56C140716F07F6DEB0FE06D131F01 -F8EB3FC001FF13FF91B51280160000FD5CD8FC7F13F8D8F81F5BD878011380253A7BB830 ->I<003FB712C04816E0B8FCA43AFE003F800FA8007CED07C0C791C7FCB3B1011FB5FC49 -80A46D91C7FC2B387EB730>I<3B7FFFC007FFFCB56C4813FEA46C496C13FCD803F8C7EA -3F80B3B16D147F00011600A36C6C14FE6D13016D5CEC800390393FE00FF890391FF83FF0 -6DB55A6D5C6D5C6D91C7FC9038007FFCEC1FF02F3980B730>I<D87FFE90380FFFC0B549 -13E06E5AA24A7E6C486D13C0D807F0903801FC00A26D130300035DA46C6C495AA46C6C49 -5AA46D131F6D5CA3EC803F013F5CA46D6C48C7FCA490380FE0FEA401075B14F1A301035B -A314FB01015BA314FFA26D5BA46E5A6E5A2B397EB730>I<D83FFC903801FFE0486C4913 -F000FF16F8A2007F16F06C486D13E0D81FC09038001FC0000F1680A76D143F00071600A7 -000390380F803E9039F01FC07EEC3FE0A3EC7FF0A2147D0001157CA29039F8FDF8FCA314 -F8A300005D01F913FCA2ECF07CA201FD137DA2017D5CECE03DA3017F133FA2ECC01FA201 -3F5CA2EC800F6D486C5A2D397FB730>I<3A3FFF01FFF84801837F02C77FA202835B6C01 -015B3A01FC007F806D91C7FC00005C6D5BEB7F01EC81FCEB3F8314C3011F5B14E7010F5B -14FF6D5BA26D5BA26D5BA26D90C8FCA4497FA2497FA2815B81EB0FE781EB1FC381EB3F81 -81EB7F0081497F49800001143F49800003141F49800007140FD87FFEEB7FFFB590B51280 -80A25C6C486D130029387DB730>I<D87FFF90381FFFC0B56C4813E0A46C496C13C0D803 -F8903803F8006D1307A26C6C495AA26C6C5C151F6D5CEC803F013F5CECC07F011F91C7FC -A290380FE0FEA214F101075BA2903803FBF8A201015B14FF6D5BA26E5AA36E5AB1903803 -FFF8497F497FA26D5B6D5B2B387EB730>I<001FB612FC4815FE5AA490C7EA03FCED07F8 -16F0150FED1FE016C0153FED7F80003E1500C85A4A5A5D14034A5A5D140F4A5A5D143F4A -5A92C7FC5C495A5C1303495A5C130F495A5C133F495A91C8FC5B4848147C4914FE120348 -5A5B120F485A5B123F485A90B6FCB7FCA46C15FC27387CB730>I<007FB612F0A2B712F8 -A36C15F0A225077B7D30>95 D<1338137CEA01FE12031207EA0FFC13F0EA1FE013C0EA3F -8013005A127EA212FE5AA5EAFFC013E013F0127FA2123FA2EA1FE0EA07C00F1D70BE30> -I<EB7FF80003B5FC4814C04880488048809038E01FFC9038C003FE14016E7E6C487F6CC7 -7FC8123FA491B5FC130F137F48B6FC12075A48EB803F383FF800EA7FE0138048C7FC5AA4 -157F7E6C6C13FFEBC003263FF01FEBFF8090B712C07E6C14EF000314876CD9FE01138026 -003FE0C8FC2A2A7BA830>I<EA3FFC487E12FFA2127F123F1200AAEC03FE91381FFF8002 -7F13E091B57E90B612FC82ECFE079138F001FF4A6C13804A137F4AEB3FC091C7121F17E0 -49140FA217F01607A8160FA217E07F161F6EEB3FC0A26EEB7F806E13FFDAF00313009138 -FC0FFE91B55A5E495CD97E7F13C0D93C1F90C7FC90380003FC2C3980B730>I<ECFFE001 -0713FC011F7F017F7F90B612804815C048EB807F3907FC003F485A485A49EB1F804848EB -0F004990C7FC127F90C9FCA25A5AA87E7EA27F003FEC07C06DEB0FE06C7E6D131F6C6C14 -C0D807FE133F9039FFC0FF806C90B5FCC615006D5B011F13F801075B01011380232A7AA8 -30>I<913801FFE04A7F5CA28080EC0007AAEB03FE90381FFF874913E790B6FC5A5A4813 -03380FFC00D81FF0133F49131F485A150F4848130790C7FCA25AA25AA87E6C140FA27F00 -3F141F6D133F6C7E6D137F390FF801FF2607FE07EBFFC06CB712E06C16F06C14F76D01C7 -13E0011F010313C0D907FCC8FC2C397DB730>I<49B4FC010713E0011F13F8017F7F90B5 -7E488048018113803A07FC007FC04848133FD81FE0EB1FE0150F484814F0491307127F90 -C7FCED03F85A5AB7FCA516F048C9FC7E7EA27F003FEC01F06DEB03F86C7E6C7E6D1307D8 -07FEEB1FF03A03FFC07FE06C90B5FC6C15C0013F14806DEBFE00010713F8010013C0252A -7CA830>I<EDFF80020713E0021F13F05C4A13F891B5FC491387903803FE079138FC03F0 -903907F800C04A1300A8003FB612C04815E0B7FCA36C15C0260007F0C7FCB3A9003FB512 -FE4880B71280A26C15006C5C25397DB830>I<D903FC13FF90261FFF8713C04913DF90B7 -12E05A5A2607FE07138F903AF801FE07C048486C6CC7FCA2497F001F8149133FA56D137F -000F92C7FC6D5BA26C6C485AEBFE0790B55A5D485C15C001DF5BD9C3FCC8FC01C0C9FCA3 -7F7F6CB512F015FF6C15C04815F0488148813A3FE0001FFE0180130148C8127F007E8100 -FE168048151FA56C153F007FED7F006D5C6C6C495A01F013076CB4EB7FFC6C90B55A6C5D -000115C06C6C91C7FC011F13FC010113C02B3E7DA730>I<EA3FFC487E12FFA2127F123F -1200AAEC01FE91380FFF80023F13E091B57E90B67EA29138FE07FCECF8039138E001FE14 -C0EC8000A291C7FCA25BB3A23B3FFFF81FFFF8486D4813FCB500FE14FEA26C01FC14FC6C -496C13F82F3880B730>I<14E0EB03F8A2497EA36D5AA2EB00E091C8FCA9381FFFF8487F -5AA27E7EEA0001B3A9003FB612C04815E0B7FCA27E6C15C023397AB830>I<EC01C0EC07 -F0A2EC0FF8A3EC07F0A2EC01C091C7FCA990B512F04814F8A47EEB0003B3B3A5EC07F0A2 -123C007EEB0FE0B4131FEC3FC0147F90B512806C14005C6C5B000F13F0000313C01D4E7C -B830>I<EA7FF8487EA4127F1200AB0203B512804A14C017E0A217C06E14809139001FE0 -004B5A4B5A4BC7FC4A5A4A5AEC0FF84A5A4A5A4A5A4A5A01FD7F90B57E8114F7ECE3F8EC -C1FCEC81FEEC00FF497F496D7E6F7E826F7E15076F7E6F7E3B7FFFF81FFFE0B56C4813F0 -17F8A217F06C496C13E02D387FB730>I<387FFFF8B57EA47EEA0001B3B3A8007FB612F0 -B712F8A46C15F025387BB730>I<02FC137E3B7FC3FF01FF80D8FFEF01877F90B500CF7F -15DF92B57E6C010F13872607FE07EB03F801FC13FE9039F803FC01A201F013F8A301E013 -F0B3A23C7FFE0FFF07FF80B548018F13C0A46C486C01071380322881A730>I<EC01FE3A -3FFC0FFF80267FFE3F13E000FF90B57E90B67E7E6C9038FE07FCC6EBF8039138E001FE14 -C0EC8000A291C7FCA25BB3A23B3FFFF81FFFF8486D4813FCB500FE14FEA26C01FC14FC6C -496C13F82F2880A730>I<49B4FC010F13E0013F13F8497F90B57E0003ECFF8014013A07 -FC007FC04848EB3FE0D81FE0EB0FF0A24848EB07F8491303007F15FC90C71201A300FEEC -00FEA86C14016C15FCA26D1303003F15F86D13076D130F6C6CEB1FF06C6CEB3FE06D137F -3A07FF01FFC06C90B512806C15006C6C13FC6D5B010F13E0010190C7FC272A7CA830>I< -EC03FE3A3FFC1FFF80267FFE7F13E000FF90B57E90B612FC6C816CEBFE07C69038F001FF -4A6C13804A137F4AEB3FC091C7121F17E049140FA217F01607A8160FA217E07F161F6EEB -3FC0A26EEB7F806E13FFDAF00313009138FC0FFE91B55A5E495C6E13C0021F90C7FCEC03 -FC91C9FCAD383FFFF8487FB57EA26C5B6C5B2C3C80A730>I<49B413F8010FEBC1FC013F -13F14913FD48B6FC5A481381390FFC007F49131F4848130F491307485A491303127F90C7 -FC15015A5AA77E7E15037FA26C6C1307150F6C6C131F6C6C133F01FC137F3907FF01FF6C -90B5FC6C14FD6C14F9013F13F1010F13C1903803FE0190C7FCAD92B512F84A14FCA46E14 -F82E3C7DA730>I<ED07F83A3FFF803FFF486DB51280B512C302CF14C06C13DF6C9038FF -FC3FD8001F13E09238801F809238000F004A90C7FC5C5C5CA25CA45CAF003FB512FC4880 -B7FCA26C5C6C5C2A287EA730>I<90381FFC1E48B5129F000714FF5A5A5A387FF007EB80 -0100FEC7FC4880A46C143E007F91C7FC13E06CB4FC6C13FC6CEBFF806C14E0000114F86C -6C7F01037F9038000FFF02001380007C147F00FEEC1FC0A2150F7EA27F151F6DEB3F806D -137F9039FC03FF0090B6FC5D5D00FC14F0D8F83F13C026780FFEC7FC222A79A830>I<EB -0780497E131FA9003FB612E04815F0B7FCA36C15E026001FC0C7FCB216F8ED01FCA5ECE0 -03010FEB07F814F09138FC1FF06DB512E06D14C016806D14009038007FFCEC1FF026337E -B130>I<D83FFCEB3FFC486C497E00FF14FFA2007F147F003F143F00001400B3A41501A2 -150315076D130F903A7FC07FFFF891B612FC6D15FE7F6D4913FC6D9038F87FF8010001C0 -C7FC2F2880A630>I<3B3FFFC07FFF80486DB512C0B515E0A26C16C06C496C13803B01F8 -0003F000A26D130700005DA26D130F017E5CA2017F131F6D5CA2EC803F011F91C7FCA26E -5A010F137EA2ECE0FE01075BA214F101035BA3903801FBF0A314FF6D5BA36E5A6E5A2B27 -7EA630>I<3B3FFFC01FFFE0486D4813F0B515F8A26C16F06C496C13E0D807E0C7EA3F00 -A26D5C0003157EA56D14FE00015DEC0F80EC1FC0EC3FE0A33A00FC7FF1F8A2147DA2ECFD -F9017C5C14F8A3017E13FBA290393FF07FE0A3ECE03FA2011F5C90390F800F802D277FA6 -30>I<3A3FFF81FFFC4801C37FB580A26C5D6C01815BC648C66CC7FC137FEC80FE90383F -81FC90381FC3F8EB0FE3ECE7F06DB45A6D5B7F6D5B92C8FC147E147F5C497F81903803F7 -E0EB07E790380FE3F0ECC1F890381F81FC90383F80FE90387F007E017E137F01FE6D7E48 -486D7E267FFF80B5FCB500C1148014E3A214C16C0180140029277DA630>I<3B3FFFC07F -FF80486DB512C0B515E0A26C16C06C496C13803B01FC0003F000A2000014076D5C137E15 -0F017F5C7F151FD91F805BA214C0010F49C7FCA214E00107137EA2EB03F0157C15FCEB01 -F85DA2EB00F9ECFDF0147D147FA26E5AA36E5AA35DA2143F92C8FCA25C147EA2000F13FE -486C5AEA3FC1EBC3F81387EB8FF0EBFFE06C5B5C6C90C9FC6C5AEA01F02B3C7EA630>I< -001FB612FC4815FE5AA316FC90C7EA0FF8ED1FF0ED3FE0ED7FC0EDFF80003E491300C748 -5A4A5A4A5A4A5A4A5A4A5A4A5A4990C7FC495A495A495A495A495A495A4948133E4890C7 -127F485A485A485A485A485A48B7FCB8FCA46C15FE28277DA630>I -E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fu cmr8 8 9 -/Fu 9 116 df<EB3FC0EBFFF03803E07C48487E48487E497E001EEB0780A2003E14C0A2 -48EB03E0A500FC14F0B0007C14E0A3007E1307003E14C0A36CEB0F806C14006D5A3807C0 -3E3803F0FC3800FFF0EB3FC01C2D7DAB23>48 D<130C133C137CEA03FC12FFEAFC7C1200 -B3B113FE387FFFFEA2172C7AAB23>I<EB7F803801FFF0380780FC380E003F48EB1F8048 -EB0FC05A0060EB07E012F000FC14F07E1403A3007C1307C7FCA215E0140F15C0141F1580 -EC3F00147E147C5C495A495A495A495A011EC7FC5B5B4913305B485A4848136048C7FC00 -0E14E0001FB5FC5A4814C0B6FCA21C2C7DAB23>I<EB3FC03801FFF03807C0FC380E007E -487FEC1F80003F14C0A2EB800F1300A2000C131FC7FC1580A2EC3F00143E5C5CEB03F0EB -FFC014F0EB00FC143FEC1F8015C0140F15E0A2EC07F0A21238127C12FEA3EC0FE012F800 -6014C00070131F6C1480001EEB3F00380780FC3801FFF038007FC01C2D7DAB23>I<140E -A2141E143EA2147E14FEA2EB01BE1303143E1306130E130C131813381330136013E013C0 -EA0180120313001206120E120C5A123812305A12E0B612FCA2C7EA3E00A9147F90381FFF -FCA21E2D7EAC23>I<000CEB0180380FC01F90B512005C5C14F014C0D80C7EC7FC90C8FC -A8EB1FC0EB7FF8380DE07C380F801F01001380000E130F000CEB07C0C713E0A2140315F0 -A4127812FCA448EB07E012E0006014C00070130F6C14806CEB1F006C133E380780F83801 -FFE038007F801C2D7DAB23>I<EA07C012FFA2120F1207AC14FE9038C3FF809038C703E0 -9038DE01F013F8496C7EA25BA25BB2486C487E3AFFFE1FFFC0A2222E7EAD27>104 -D<2607C07FEB07F03BFFC3FFC03FFC903AC783F0783F3C0FCE01F8E01F803B07DC00F9C0 -0F01F8D9FF8013C04990387F000749137EA249137CB2486C01FEEB0FE03CFFFE0FFFE0FF -FEA2371E7E9D3C>109 D<3801FE183807FFB8381E01F8EA3C00481378481338A21418A2 -7E7EB41300EA7FF06CB4FC6C13C06C13F0000113F838001FFC130138C0007E143EA26C13 -1EA27EA26C133CA26C137838FF01F038E3FFC000C0130017207E9E1C>115 -D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fv cmbx12 12 58 -/Fv 58 123 df<DB0FFFEB03FF4AB5D8C03F13C0020F02F1B512E0027F91B612F0902701 -FFF8039038FE1FF849018002F813FC010F4948EBF03F49484913E0495A4A15C0495AF11F -F801FF16804A6DEC07E070EC018096C7FCABBA12F0A5C69026E000030180C7FCB3B0007F -D9FFC1B67EA546467EC541>11 D<EA07C0EA1FF0EA3FF8EA7FFC12FF13FEA213FFA47E7E -7EEA07CFEA000FA2131F131EA2133EA2133C137C13F8A2EA01F0120313E0EA07C0EA1F80 -1300121E120C1022788E1F>44 D<B612F8A91D097F9A25>I<EA07C0EA1FF0EA3FF8EA7F -FCEAFFFEA7EA7FFCEA3FF8EA1FF0EA07C00F0F788E1F>I<EE01C0EE03E01607A2160F17 -C0161F1780A2163F17005E167EA216FE5E15015EA215035EA215075E150F5EA2151F5E15 -3F93C7FCA25D157E15FE5DA214015D14035DA214075D140F5DA2141F5D143F92C8FCA25C -147EA214FE5C13015CA213035C13075CA2130F5C131F5CA2133F91C9FC5B137EA213FE5B -12015BA212035BA212075B120F5BA2121F5B123F90CAFCA25A127E12FE5AA25A12782B64 -7ACA38>I<EC3FF849B5FC010F14E0013F14F890397FF01FFC9039FFC007FE4890380001 -FF48486D1380000716C049147F000F16E049143F001F16F0A2003F16F8A249141F007F16 -FCA600FF16FEB3A3007F16FCA56C6CEC3FF8A3001F16F0A2000F16E06D147F000716C06D -14FF6C6C4913806C6D4813006C6D485A90397FF01FFC6DB55A010F14E001031480902600 -3FF8C7FC2F427CC038>I<EC03C01407141F147FEB03FF133FB6FCA413C3EA0003B3B3AD -B712FCA5264177C038>I<ECFFE0010F13FE013F6D7E90B612E0000315F82607FC0313FE -3A0FE0007FFFD81F806D138048C7000F13C0488001C015E001F07F00FF6E13F07F17F881 -A46C5A6C5A6C5AC9FC17F05DA217E05D17C04B13804B1300A2ED1FFC4B5A5E4B5A4B5A4A -90C7FC4A5A4A5AEC0FF04A5AEC3F804AC7127814FE495A494814F8D907E014F0495A495A -49C8FC017C140149140348B7FC4816E05A5A5A5A5AB8FC17C0A42D417BC038>I<ECFFF0 -010713FF011F14C0017F14F049C66C7ED803F8EB3FFED807E06D7E81D80FF86D138013FE -001F16C07FA66C5A6C4815806C485BC814005D5E4B5A4B5A4B5A4A5B020F1380902607FF -FEC7FC15F815FF16C090C713F0ED3FFCED0FFEEEFF80816F13C017E0A26F13F0A217F8A3 -EA0FC0EA3FF0487EA2487EA217F0A25D17E06C5A494913C05BD83F80491380D81FF04913 -00D80FFEEBFFFE6CB612F800015D6C6C14C0011F49C7FC010113E02D427BC038>I<163F -A25E5E5D5DA25D5D5D5DA25D92B5FCEC01F7EC03E7140715C7EC0F87EC1F07143E147E14 -7C14F8EB01F0EB03E0130714C0EB0F80EB1F00133E5BA25B485A485A485A120F5B48C7FC -123E5A12FCB91280A5C8000F90C7FCAC027FB61280A531417DC038>I<0007150301E014 -3F01FFEB07FF91B6FC5E5E5E5E5E16804BC7FC5D15E092C8FC01C0C9FCAAEC3FF001C1B5 -FC01C714C001DF14F09039FFE03FFC9138000FFE01FC6D7E01F06D13804915C0497F6C48 -15E0C8FC6F13F0A317F8A4EA0F80EA3FE0487E12FF7FA317F05B5D6C4815E05B007EC748 -13C0123E003F4A1380D81FC0491300D80FF0495AD807FEEBFFFC6CB612F0C65D013F1480 -010F01FCC7FC010113C02D427BC038>I<4AB47E021F13F0027F13FC49B6FC0107903880 -7F8090390FFC001FD93FF014C04948137F4948EBFFE048495A5A1400485A120FA248486D -13C0EE7F80EE1E00003F92C7FCA25B127FA2EC07FC91381FFF8000FF017F13E091B512F8 -9039F9F01FFC9039FBC007FE9039FF8003FF17804A6C13C05B6F13E0A24915F0A317F85B -A4127FA5123FA217F07F121FA2000F4A13E0A26C6C15C06D4913806C018014006C6D485A -6C9038E01FFC6DB55A011F5C010714C0010191C7FC9038003FF02D427BC038>I<121E12 -1F13FC90B712FEA45A17FC17F817F017E017C0A2481680007EC8EA3F00007C157E5E0078 -5D15014B5A00F84A5A484A5A5E151FC848C7FC157E5DA24A5A14035D14074A5AA2141F5D -143FA2147F5D14FFA25BA35B92C8FCA35BA55BAA6D5A6D5A6D5A2F447AC238>I<EC7FF0 -0103B5FC010F14C0013F14F090397F801FFC3A01FC0003FE48486D7E497F4848EC7F8016 -3F484815C0A2001F151FA27FA27F7F01FE143F6D158002C0137F02F014006C01FC5B6E48 -5A6C9038FF83FCEDE7F86CECFFE06C5D6C92C7FC6D14C06D80010F14F882013F8090B7FC -48013F14802607FC0F14C0260FF80314E04848C6FC496D13F0003F141F48481307496D13 -F8150000FF157F90C8123F161F160FA21607A36D15F0127F160F6D15E06C6C141F6DEC3F -C06C6CEC7F80D80FFE903801FF003A07FFC00FFE6C90B55AC615F0013F14C0010F91C7FC -010013F02D427BC038>I<EC7FF0903807FFFE011F6D7E017F14E09039FFE03FF0489038 -800FF848496C7E48488048486D7E001F80003F1680A2484815C08117E0A212FF17F0A617 -F8A45D127FA3003F5CA26C7E5D6C6C5B12076C6C133E6CEBC07C6CEBFFF8013F5B010F01 -C013F00101130090C8FCA217E05DA2EA03C0D80FF015C0487E486C491380A217004B5A15 -0F5E49495A6C48495A01C0EBFFE0260FF0035B6CB65A6C4AC7FC6C14F86C6C13E0D907FE -C8FC2D427BC038>I<EE1F80A24C7EA24C7EA34C7EA24B7FA34B7FA24B7FA34B7F169F03 -1F80161F82033F80ED3E07037E80157C8203FC804B7E02018115F0820203814B137F0207 -815D173F020F814B7F021F8292C77EA24A82023E80027E82027FB7FCA291B87EA2498302 -F0C8FCA20103834A157F0107834A153FA249488284011F8491C97E4984133E017E82B602 -0FB612F0A54C457CC455>65 D<DCFFF01470031F01FF14F04AB6EAE0010207EDF803023F -EDFE0791B539E001FF0F4949C7EA3F9F010701F0EC0FFF4901C0804990C87E4948814948 -814948167F4849163F4849161F5A4A160F485B19074890CAFC19035A5BA2007F1801A349 -94C7FC12FFAE127F7F1AF0A2123FA27F6C18011AE06C7F19036C6D17C06E16077E6C6DEE -0F806C6DEE1F006D6C5E6D6C167E6D6C6C5D6D6D4A5A6D01F0EC07F0010101FEEC1FE06D -903AFFF001FF80023F90B6C7FC020715FC020115F0DA001F1480030001F8C8FC44467AC4 -51>67 D<B9FC18F018FE727E19E026003FFEC7001F13F805017F9438003FFF060F7F727F -727F727F84737E737EA2737EA2737EA21B80A2851BC0A51BE0AD1BC0A51B8061A21B0061 -62193F624F5A19FF624E5B06075B4E5B063F90C7FC4DB45A050F13F8BA5A19C04EC8FC18 -F095C9FC4B447CC356>I<BA12F8A485D8001F90C71201EF003F180F180318011800A219 -7E193EA3191EA21778A285A405F890C7FCA316011603161F92B5FCA5ED001F1603160116 -00A2F101E01778A2F103C0A494C7FC1907A21A80A2190FA2191FA2193FF17F0061601807 -181F4DB5FCBBFC61A443447DC34A>I<BA1280A419C026003FFEC7121F1701EF007F183F -181F180F180719E01803A31801A3EE01E0F000F0A419001603A31607160F167F91B6FCA5 -9138FE007F160F16071603A31601A693C9FCAFB712F0A53C447CC346>I<DCFFF0147003 -1F01FF14F04AB6EAE0010207EDF803023FEDFE0791B539E001FF0F4949C7EA3F9F010701 -F0EC0FFF4901C0804990C87E4948814948814948167F4849163F4849161F5A4A160F485B -19074890CAFC19035A5BA2007F1801A34994C8FC12FFAD057FB612F0127F7FA3003FDC00 -01EBF000A27F7EA26C7FA26C7F807E6C7F6C7F6D7E6D6C5D6D6C7E6D6D5C6D01F05C0101 -01FE143F6D903AFFF001FF9F023F90B6120F0207EDFC030201EDF000DA001F02C0133003 -0001FCC9FC4C467AC458>I<B7D88003B612FEA526003FFEC9EBF800B3A791B9FCA54AC9 -FCB3AAB7D88003B612FEA54F447CC358>I<B712E0A5D8001F90C7FCB3B3B3A4B712E0A5 -23447DC32A>I<B76C0103B512F8A526003FFEC93807E0004F5A4F5A077EC7FC614E5A4E -5A4E5AF01F804EC8FC187E604D5AEF07F0EF0FC04D5A4DC9FC177E4C5AEE03F04C5A4C5A -4C7EEE7FF04C7E5D4B7F4B7F4B7FED3F3FDB7E1F7F03FC806E486C7F4B7E4B6C7F038080 -4B6C7F4A7F717E84717F83717F85717F83717F85717F187F727E86727F84727F86727F84 -B76C90B612FCA54E447CC358>75 D<B712F0A526003FFECAFCB3B1F00780A4180F1900A4 -60A360A2187EA218FE170117031707171F177FEE03FFB95AA539447CC343>I<B500FE06 -7FB512806E95B6FCA26F5EA2D8003F50C7FC013D6DEE03DFA2013C6DEE079FA26E6CEE0F -1FA26E6C161EA26E6C163CA36E6C1678A26E6C16F0A26E6DEC01E0A26E6DEC03C0A36E6D -EC0780A26F6CEC0F00A26F6C141EA26F6C5CA36F6C5CA26F6C5CA26F6D485AA26F6D485A -A26F6D485AA3706C48C7FCA293383FF81EA2706C5AA2706C5AA3706C5AA2705BA2705BA2 -705BA2B6057FB6128071C7FCA2173E171C61447CC36A>I<B64BB512FE8181A281D8003F -6D91C7EA780081013D7F81133C6E7E6E7F6E7F6E7F6E7F82806E7F6E7F6F7E6F7F83816F -7F6F7F6F7F6F7F6F7F8382707F707F707F707F8482707F707F717E7113807113C019E083 -7113F07113F87113FC7113FE19FF847213F884848484A28484197F193F191FA2190F1907 -B61603190119001A78A24F447CC358>I<923807FFC092B512FE0207ECFFC0021F15F091 -267FFE0013FC902601FFF0EB1FFF01070180010313C04990C76C7FD91FFC6E6C7E49486F -7E49486F7E01FF8348496F7E48496F1380A248496F13C0A24890C96C13E0A24819F04982 -003F19F8A3007F19FC49177FA400FF19FEAD007F19FC6D17FFA3003F19F8A26D5E6C19F0 -A26E5D6C19E0A26C6D4B13C06C19806E5D6C6D4B13006C6D4B5A6D6C4B5A6D6C4B5A6D6C -4A5B6D01C001075B6D01F0011F5B010101FE90B5C7FC6D90B65A023F15F8020715C00200 -4AC8FC030713C047467AC454>I<B9FC18F018FE727E19E0D8001F90C7000F7F05017F71 -6C7E727E727E721380A21AC084A21AE0A91AC0A24E1380A21A00604E5A4E5A4D485A050F -5B92B712C096C7FC18FC18C092CBFCB3A7B712E0A543447DC34D>I<B812F8EFFFC018F8 -18FE727ED8001F90C7003F13E005037F05007F727E727E727EA28684A286A762A24E90C7 -FCA24E5A61187F943801FFF005075B053F138092B7C8FC18F818E018F892C77FEF3FFF05 -0F7F717F717FA2717FA2717FA785A61B0F85A2187F73131F72141EB700E06DEB803E72EB -E0FC72EBFFF8060114F0726C13E0CC0007138050457DC354>82 D<DAFFE0131C010701FE -133C013F9038FF807C90B6EAE0FC4815F9489038801FFF3907FC00014848EB007F484814 -3F4848140F491407007F15035B1601160012FF177CA27FA26D153C7F7F6D92C7FC6C7EEB -FFE014FE6CEBFFF015FF6C15E016FC6C816C6F7E6C826C826C6C81011F81010781130002 -0F80140003077FED007F82040F1380828212F082A282A27EA218007EA26C5D6C5E6D1403 -6D5D6D140701F84A5A01FFEC3FF002F8EBFFE0486CB65AD8FC1F92C7FCD8F80714FC48C6 -14F0480107138031467AC43E>I<003FBA12E0A59026FE000FEB8003D87FE09338003FF0 -49171F90C71607A2007E1803007C1801A300781800A400F819F8481978A5C81700B3B3A2 -0107B8FCA545437CC24E>I<B792B6FCA526003FFECAEAFC00806D606F15016D60811903 -6D606F15076D606F150F6D6081191F6D6D93C7FC61027F163E6F157E023F167C8119FC6E -6D5C18016E5E7013036E5E8218076E6D5C180F6E5E70131F6E93C8FC705B037F143E8218 -7E033F147C7013FC6F5C17816F5C17C117C36F5C17E76F5C17FF6F5CA36F91C9FCA2705A -A2705AA3705AA2705AA2705AA250457EC355>86 D<903801FFE0011F13FE017F6D7E48B6 -12E03A03FE007FF84848EB1FFC6D6D7E486C6D7EA26F7FA36F7F6C5A6C5AEA00F090C7FC -A40203B5FC91B6FC1307013F13F19038FFFC01000313E0000F1380381FFE00485A5B127F -5B12FF5BA35DA26D5B6C6C5B4B13F0D83FFE013EEBFFC03A1FFF80FC7F0007EBFFF86CEC -E01FC66CEB8007D90FFCC9FC322F7DAD36>97 D<EB7FC0B5FCA512037EB1ED0FF892B57E -02C314E002CF14F89139DFC03FFC9139FF000FFE02FCEB03FF4A6D13804A15C04A6D13E0 -5CEF7FF0A218F8173FA318FCAC18F8A2177F18F0A3EFFFE06E15C06E5B6E491380027C49 -1300496C495A903AFC1FC07FFC496CB512F0D9F00314C049C691C7FCC8EA1FF036467DC4 -3E>I<EC3FFC49B512C0010F14F0013F14FC90397FF003FE9039FFC001FF0003495A4849 -4813805B120F485AA2485A6F1300007F6E5AED00784991C7FCA212FFAC6C7EA3123F6DEC -03C0A26C6C1407000F16806D140F6C6DEB1F006C6D133E6C01F05B3A007FFC03F86DB55A -010F14C0010391C7FC9038003FF82A2F7CAD32>I<EE03FEED07FFA5ED001F160FB1EC3F -E0903803FFFC010FEBFF8F013F14CF9039FFF807FF48EBC00148903880007F4890C7123F -4848141F49140F121F485AA3127F5BA212FFAC127FA37F123FA26C6C141FA26C6C143F00 -07157F6C6C91B5FC6CD9C00314FC6C9038F01FEF6DB5128F011FEBFE0F010713F8902600 -7FC0EBF80036467CC43E>I<EC3FF80103B57E010F14E0013F8090397FF83FF89039FFC0 -07FC48496C7E48496C7E48486D1380485A001FED7FC05B003FED3FE0A2127F5B17F0161F -12FFA290B7FCA401F0C9FCA5127FA27FA2123F17F06C7E16016C6C15E06C6C14036C6DEB -07C06C6DEB0F806C01F0EB3F0090397FFE01FE011FB55A010714F0010114C09026001FFE -C7FC2C2F7DAD33>I<EDFF80020F13E0027F13F049B512F849EB8FFC90390FFE0FFE9038 -1FFC1F14F8133FEB7FF0A2ED0FFCEBFFE0ED03F0ED00C01600ABB612F8A5C601E0C7FCB3 -B0007FEBFFE0A527467DC522>I<DAFFE0137E010F9039FE03FF80013FEBFF8F90B812C0 -48D9C07F133F489038001FF84848EB0FFC4848903907FE1F80001F9238FF0F00496D90C7 -FCA2003F82A8001F93C7FCA26D5B000F5D6C6C495A6C6C495A6C9038C07FF04890B55A16 -80D8078F49C8FC018013E0000F90CAFCA47F7F7F90B612C016FC6CEDFF8017E06C826C16 -FC7E000382000F82D81FF0C77ED83FC014074848020113808248C9FC177FA46D15FF007F -17006D5C6C6C4A5A6C6C4A5AD80FFEEC3FF83B07FFC001FFF0000190B612C06C6C92C7FC -010F14F8D9007F90C8FC32427DAC38>I<EB7FC0B5FCA512037EB1ED07FE92383FFF8092 -B512E002C114F89139C7F03FFC9138CF801F9139DF000FFE14DE14FC4A6D7E5CA25CA35C -B3A7B60083B512FEA537457CC43E>I<137C48B4FC4813804813C0A24813E0A56C13C0A2 -6C13806C1300EA007C90C7FCAAEB7FC0EA7FFFA512037EB3AFB6FCA518467CC520>I<EC -03E0EC0FF8EC1FFCEC3FFEA2EC7FFFA5EC3FFEA2EC1FFCEC0FF8EC03E091C7FCAAEC01FF -0103B5FCA5EB000F80B3B3A7EA1F80EA3FC0EA7FE0EAFFF0EC0FFEA215FC141F01E013F8 -007FEB3FF0393FC0FFE06CB512806C1400000313FCC613C0205A86C522>I<EB7FC0B5FC -A512037EB293387FFFE0A593380FE0004C5A4CC7FC167E5EED03F8ED07E04B5A4B5A037F -C8FC15FEECC1FCECC3FE14C7ECDFFF91B57E82A202F97F02E17F02C07FEC807F6F7E826F -7E816F7F836F7F816F7F83707E163FB60003B512F8A535457DC43B>I<EB7FC0B5FCA512 -037EB3B3B3A3B61280A519457CC420>I<90277F8007FEEC0FFCB590263FFFC090387FFF -8092B5D8F001B512E002816E4880913D87F01FFC0FE03FF8913D8FC00FFE1F801FFC0003 -D99F009026FF3E007F6C019E6D013C130F02BC5D02F86D496D7EA24A5D4A5DA34A5DB3A7 -B60081B60003B512FEA5572D7CAC5E>I<90397F8007FEB590383FFF8092B512E0028114 -F8913987F03FFC91388F801F000390399F000FFE6C139E14BC02F86D7E5CA25CA35CB3A7 -B60083B512FEA5372D7CAC3E>I<EC1FFC49B512C0010714F0011F14FC90397FF80FFF90 -26FFC0017F48496C7F4848C7EA3FE000078248486E7E49140F001F82A2003F8249140700 -7F82A400FF1780AA007F1700A46C6C4A5AA2001F5E6D141F000F5E6C6C4A5AA26C6C6CEB -FFE06C6D485B27007FF80F90C7FC6DB55A010F14F8010114C09026001FFCC8FC312F7DAD -38>I<90397FC00FF8B590B57E02C314E002CF14F89139DFC03FFC9139FF001FFE000301 -FCEB07FF6C496D13804A15C04A6D13E05C7013F0A2EF7FF8A4EF3FFCACEF7FF8A318F017 -FFA24C13E06E15C06E5B6E4913806E4913006E495A9139DFC07FFC02CFB512F002C314C0 -02C091C7FCED1FF092C9FCADB67EA536407DAC3E>I<90387F807FB53881FFE0028313F0 -028F13F8ED8FFC91389F1FFE000313BE6C13BC14F8A214F0ED0FFC9138E007F8ED01E092 -C7FCA35CB3A5B612E0A5272D7DAC2E>114 D<90391FFC038090B51287000314FF120F38 -1FF003383FC00049133F48C7121F127E00FE140FA215077EA27F01E090C7FC13FE387FFF -F014FF6C14C015F06C14FC6C800003806C15806C7E010F14C0EB003F020313E0140000F0 -143FA26C141F150FA27EA26C15C06C141FA26DEB3F8001E0EB7F009038F803FE90B55A00 -FC5CD8F03F13E026E007FEC7FC232F7CAD2C>I<EB01E0A51303A41307A2130FA2131FA2 -133F137F13FF1203000F90B51280B7FCA4C601E0C7FCB3A3ED01E0A9150302F013C0137F -150790393FF80F8090391FFC1F006DB5FC6D13FC01015B9038003FE023407EBE2C>I<D9 -7FC049B4FCB50103B5FCA50003EC000F6C81B3A85EA25EA25E7E6E491380017FD901F713 -FE9138F807E76DB512C7010F1407010313FE9026007FF0EBFC00372E7CAC3E>I<B69038 -03FFFCA5000101E09038003E006C163C80017F5D8017F8013F5D6E1301011F5D6E130301 -0F5D6E13076D5DED800F6D92C7FC15C05E6DEBE01E163E6D143CEDF07C027F1378EDF8F8 -023F5B15FD021F5B15FF6E5BA36E5BA26E90C8FCA26E5AA26E5AA21578362C7EAB3B>I< -B5D8FE1FB539801FFFF0A500019027C0003FE0C7EA7C007114786E17F86C6F6C5C6E1601 -017F6E6C5CA26E011F1403013F6F5C6E013F1407011F6F5CA26E0179140F010F048090C7 -FC6E01F95C6D02F0EBC01E15806D902681E07F5B18E003C3157C6D9139C03FF07815E76D -DA801F5B18F803FF14F96E9039000FFDE018FF6E486D5BA36E486D5BA26E486D90C8FCA2 -4B7F02075DA26E48147C4B143C4C2C7EAB51>I<B500FE90383FFFF0A5C601F0903803E0 -006D6C495A013F4A5A6D6C49C7FC6E5B6D6C137E6DEB807C6D6D5A6DEBC1F0EDE3E06DEB -F7C06EB45A806E90C8FC5D6E7E6E7F6E7FA24A7F4A7F8291381F3FFCEC3E1F027C7F4A6C -7E49486C7F01036D7F49487E02C08049486C7F49C76C7E013E6E7E017E141FB500E090B5 -12FCA5362C7EAB3B>I<B6903803FFFCA5000101E09038003E006C163C80017F5D8017F8 -013F5D6E1301011F5D6E1303010F5D6E13076D5DED800F6D92C7FC15C05E6DEBE01E163E -6D143CEDF07C027F1378EDF8F8023F5B15FD021F5B15FF6E5BA36E5BA26E90C8FCA26E5A -A26E5AA21578A215F85D14015D001F1303D83F805B387FC007D8FFE05B140F92C9FC5C14 -3E495A387FC1F8EB07F06CB45A6C5B000790CAFCEA01FC36407EAB3B>I<001FB71280A4 -9026FC001F130001E0495A5B49495A90C7485A48495B123E4A5B4A5B003C495BA24A90C7 -FC4A5A4A5AC7FC4A5A495B495BA2495B499038800780491300A2495A4948130F49481400 -A2485B48495B485BA248495B4890C75A48485C15034848EB1FFEB7FCA4292C7DAB32>I -E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fw cmsl10 10.95 8 -/Fw 8 86 df<121EEA3F80EA7FC012FFA41380EA7F00123C0A0A788919>46 -D<1703EF0780170FA2EF1F00A2173EA25FA25FA24C5AA24C5AA24C5AA24C5AA24CC7FCA2 -163E167E167C5EA24B5AA24B5AA24B5AA24B5AA24BC8FCA2153EA25DA25DA24A5AA24A5A -A24A5AA24A5AA24AC9FCA2143EA25CA25CA2495AA2495AA2495AA2495A131F91CAFC133E -A25BA25BA2485AA2485AA2485AA2485AA248CBFCA2123EA25AA25AA21270315B7FC32D> -I<EC07F8EC3FFF9138FC0FC0903903F003E0903907C001F0D90F8013F849C7FC013E14FC -017E147C017C147E13FC485AA20003157F5B1207A2120F5BA2121F16FF5BA2123FA44848 -EB01FEA648C7EA03FCA5ED07F8A25A16F0A2150F16E0A3ED1FC0A21680007E143F160015 -7E123E003F5C4A5AD81F805B000FEB07E06C6C485A2603F03FC7FC3800FFFCEB1FE0283F -79BC2D>I<ED7F80913803FFE091380FC0F091383E003802FC131C495A494813FE903807 -E003EB0FC090381F8007133FD97F0013FC01FE1303ED01F0484890C7FC1203A2485AA212 -0F5BA2001FEB3F809038E0FFE0393FE3C0F89038E7007C01EE7F01FC133F4848EB1F80A2 -4914C05B16E0A2485AA216F05BA2ED3FE0A290C7FCA4157F16C0A316804814FF007E1500 -007F5C14016C5C4A5A6C6C485A4A5A6C6C485A2607E07FC7FC3803FFFEC613F8EB3FC027 -3F78BC2D>54 D<EA0380120713E090B712805AA217005E485D5E001EC85A484A5A00385D -150300784A5A00704AC7FC151E5D485CC8127015F04A5A4A5A4A5A4AC8FC140E141E5C14 -7C14785C1301495AA213075C130F495AA2133F91C9FC5BA25B5B1201A312035BA21207A3 -485AA5121F5BA26C5AEA0780294074BD2D>I<90263FFFE0023FB5FC6F16FEA29026003F -F8020313C0021F030013004A6C157C023B163C6F15381439810238167802787FDA707F15 -7082153F82031F15F002F07FDAE00F5D8215078203031401010180DAC0015D8281178004 -7F1303010315C04A013F5C17E0161F17F0040F1307010715F891C7000791C7FC17FC1603 -17FE04015B4915FF010E6E130E188E177F18CEEF3FDE011E16FE011C6F5AA2170FA21707 -133C01386F5A133C017C150113FE2607FF801400B512FC18705C483E7DBD44>78 -D<9238FF80070207EBE00F021FEBF81E91387F00FE02FCEB1F3ED903F0EB0FFE49481307 -494813034AEB01FC49C7FC491400133E137E177C491578A57F1770A26D1500808080EB7F -FEECFFE06D13FEEDFFC06D14F06D14FC010380010080143F02031480DA003F13C0150315 -00EE7FE0163F161FA2160F121CA31607160F003C16C0A31780003E151F1700007E5D007F -153E6D5C16FC01E0495AD87DF0495AD8FCFCEB0FC03AF87F803F8027F01FFFFEC7FCD8E0 -0713F839C0007FC030427BBF33>83 D<B600E090B512FC4B15F8A2000101C0C7000F1300 -6C49EC03FCEF01F091C9FC60A317015A495EA417031203495EA4170712074993C7FCA45F -120F49150EA4171E121F49151CA4173C123F491538A31778177017F05F001F15015F1603 -6D4A5A000F93C8FC5E6C6C141E6C6C5C000115F86C6C495A017FEB07C090393FC03F8090 -260FFFFEC9FC010313F89038007FC03E4073BD44>85 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fx cmbx12 14.4 43 -/Fx 43 117 df<913803FFC0023F13FC91B6FC010315C0010F018113F0903A1FFC003FF8 -49486D7E49486D7E49486D7E48496D138048496D13C0A24817E04890C813F0A34817F8A2 -4817FC49157FA3007F17FEA600FF17FFB3A5007F17FEA6003F17FCA26D15FFA26C17F8A3 -6C17F0A26C6D4913E0A26C6D4913C06C17806E5B6C6D4913006D6C495AD91FFCEB3FF890 -3A0FFF81FFF06D90B55A01011580D9003F01FCC7FC020313C0384F7BCD43>48 -D<157815FC14031407141F14FF130F0007B5FCB6FCA2147F13F0EAF800C7FCB3B3B3A600 -7FB712FEA52F4E76CD43>I<EC3FFE0103B512E0010F14FC013F14FF90B712C048D9C07F -7F2703FE000F13F8D807F801037FD80FE06D7F48486D7F48488001F01680486C6E13C07F -486C6E13E07FA27013F0A56C5AA26C5AEA0FF0EA03C0C914E05EA218C05E1880A24C1300 -5F4C5A4B5B5F4B5B5F4B5B4B90C7FC4B5A5E4B5AED7FE04B5A4A5B4A48C8FC4A5A5D4A48 -EB01F04A5AEC3F804AC7FC02FEEC03E0495A495A495A495AD91F80140749C8FC013E150F -017FB7FC90B812C05A5A5A5A5A5A5AB9FC1880A4344E79CD43>I<91380FFFC091B512FC -0107ECFF80011F15E090263FF8077F9026FF800113FC4848C76C7ED803F86E7E491680D8 -07FC8048B416C080486D15E0A4805CA36C17C06C5B6C90C75AD801FC1680C9FC4C13005F -A24C5A4B5B4B5B4B13C04B5BDBFFFEC7FC91B512F816E016FCEEFF80DA000713E0030113 -F89238007FFE707E7013807013C018E07013F0A218F8A27013FCA218FEA2EA03E0EA0FF8 -487E487E487EB57EA318FCA25E18F891C7FC6C17F0495C6C4816E001F04A13C06C484A13 -80D80FF84A13006CB44A5A6CD9F0075BC690B612F06D5D011F1580010302FCC7FCD9001F -1380374F7ACD43>I<177C17FEA2160116031607160FA2161F163F167FA216FF5D5DA25D -5DED1FBFED3F3F153E157C15FCEC01F815F0EC03E01407EC0FC01580EC1F005C147E147C -5C1301495A495A5C495A131F49C7FC133E5B13FC485A5B485A1207485A485A90C8FC123E -127E5ABA12C0A5C96C48C7FCAF020FB712C0A53A4F7CCE43>I<D80380150ED807E0157E -01FEEC03FED9FFF0137F91B65A5F5F5F5F5F94C7FC5E5E16F016C093C8FC15F801E190C9 -FC01E0CAFCABEC0FFF027F13F001E3B512FE01E76E7E9026FFF8077FDAC0017F49C713F8 -496E7E49143F4981496E7E6C481680C9FC18C08218E0A418F0A3EA0FE0487E487E487E48 -7EA418E0A35B6C484A13C05B491680003EC85A003F17006C6C4A5A6D5D6C6C4A5AD807F8 -495BD803FE01075B2701FFC03F5B6C90B65A013F4AC7FC6D14F8010314C09026007FF8C8 -FC344F79CD43>I<ED0FFF92B512E0020780021F14FC91397FFE03FE903A01FFF0007F49 -01C0EB3F804990C7121F4948EC7FC0494814FF49484913E049485B01FF5C485BA2485B5A -A2486F13C04A6D1380486F1300177E94C7FC5AA291CAFC5AA21508913801FFF8020713FF -B54814C04A14F04AC66C7E023C6D7E4A6D7E4A6D7E7013804A15C0A24A15E07013F05C18 -F8A491C714FCA37EA67EA46C17F880A27E18F06C5D18E06C6D15C07E6E4913806C6D1500 -6D6C495A6D6CEB7FFC6DB448485A6D90B55A010315C0010092C7FC023F13FC020713C036 -4F7ACD43>I<913807FFC0027F13FC0103B67E010F15E090261FFC0113F8903A3FE0003F -FCD97F80EB0FFE49C76C7E48488048486E1380000717C04980120F18E0177FA2121F7FA2 -7F7F6E14FF02E015C014F802FE4913806C7FDBC00313009238F007FE6C02F85B9238FE1F -F86C9138FFBFF06CEDFFE017806C4BC7FC6D806D81010F15E06D81010115FC010781011F -81491680EBFFE748018115C048D9007F14E04848011F14F048487F48481303030014F848 -4880161F4848020713FC1601824848157F173FA2171FA2170FA218F8A27F007F17F06D15 -1FA26C6CED3FE0001F17C06D157F6C6CEDFF806C6C6C010313006C01E0EB0FFE6C01FCEB -FFFC6C6CB612F06D5D010F1580010102FCC7FCD9000F13C0364F7ACD43>56 -D<171F4D7E4D7EA24D7EA34C7FA24C7FA34C7FA34C7FA24C7FA34C8083047F80167E8304 -FE804C7E03018116F8830303814C7E03078116E083030F814C7E031F81168083033F8293 -C77E4B82157E8403FE824B800201835D840203834B800207835D844AB87EA24A83A3DA3F -80C88092C97E4A84A2027E8202FE844A82010185A24A820103854A82010785A24A82010F -855C011F717FEBFFFCB600F8020FB712E0A55B547BD366>65 D<BA12C019FEF1FFC01AF0 -1AFCD8000701F0C7000313FFDE007F7F737F070F7F737F878587858785A287A84F5BA263 -616361634F5B4F5B077F90C7FC4E485A060713F892B812E097C8FC861AF003F0C7000313 -FE9539003FFF80070F13E0737F07017F87737F747E1C807413C0A27413E0A31CF0A386A3 -62A31CE0A2621CC0A250138097B5FC1C004F5B19074F5B073F13F04EB55ABC128098C7FC -1AF81AC007F8C8FC54527CD160>I<932601FFFCEC01C0047FD9FFC013030307B600F813 -07033F03FE131F92B8EA803F0203DAE003EBC07F020F01FCC7383FF0FF023F01E0EC0FF9 -4A01800203B5FC494848C9FC4901F8824949824949824949824949824990CA7E494883A2 -484983485B1B7F485B481A3FA24849181FA3485B1B0FA25AA298C7FC5CA2B5FCAE7EA280 -A2F307C07EA36C7FA21B0F6C6D1980A26C1A1F6C7F1C006C6D606C6D187EA26D6C606D6D -4C5A6D6D16036D6D4C5A6D6D4C5A6D01FC4C5A6D6DEE7F806D6C6C6C4BC7FC6E01E0EC07 -FE020F01FEEC1FF80203903AFFE001FFF0020091B612C0033F93C8FC030715FCDB007F14 -E0040101FCC9FC525479D261>I<BA7E19FCF1FF801AF01AFCD8000701F0C7000F13FF06 -0014C0071F7F070713F807017F737F747E747F747F86747F747F8886888688A2757EA31D -8087A21DC0A51DE0A387A963A31DC0A51D80A2631D00A3515AA2646264505B6264505B50 -5B5090C7FCF2FFFE4F5B07075B071F5B96B512C0060F91C8FCBB5A1AF01AC007FCC9FC19 -805B527CD167>I<BC1280A5D8000701F8C7000114C0F0001F19071901851A7F1A3F1A1F -A2F20FE0A21A07A31A03A318F81BF01A01A497C7FC1701A317031707170F177F92B6FCA5 -9238F8007F170F170717031701A317001B3EA31B7CA395C8FCA21BFCA21BF8A21A01A31A -031BF01A071A0FA21A1F1A3FF27FE0F101FF1907191F0603B5FCBCFCA21BC0A34F517CD0 -58>I<BB12FEA5D8000701F8C700077FF0007F191F190785858586861B80A21A1FA31A0F -A41BC006F81307A497C7FCA31701A317031707170F177F92B6FCA59238F8007F170F1707 -17031701A31700A795C9FCB3B812F8A54A517CD055>I<932601FFFCEC01C0047FD9FFC0 -13030307B600F81307033F03FE131F92B8EA803F0203DAE003EBC07F020F01FCC7383FF0 -FF023F01E0EC0FF94A01800203B5FC494848C9FC4901F882494982494982494982494982 -4990CA7E494883A2484983485B1B7F485B481A3FA24849181FA3485B1B0FA25AA298C8FC -5CA2B5FCAE6C057FB712E0A280A36C94C7003FEBC000A36C7FA36C7FA27E6C7FA26C7F6C -7FA26D7E6D7F6D7F6D6D5E6D7F6D01FC93B5FC6D13FF6D6C6D5C6E01F0EC07FB020F01FE -EC1FF10203903AFFF001FFE0020091B6EAC07F033FEE001F030703FC1307DB007F02E013 -01040149CAFC5B5479D26A>I<B8D8C003B8FCA5D8000701F8C9001FEBE000B3AE92BAFC -A503F8C9121FB3B1B8D8C003B8FCA560527CD169>I<B812C0A5D8000701F8C7FCB3B3B3 -B2B812C0A52A527CD132>I<027FB71280A591C76C90C7FCB3B3B3EA07F0EA1FFC487E48 -7EA2B57EA44C5AA34A485B7E49495BD83FF8495BD81FE05DD80FFC011F5B2707FF807F90 -C8FC000190B512FC6C6C14F0011F14C0010101F8C9FC39537DD145>I<B800C091B612F8 -A5D8000701F8C90003EBF8009738007F8051C7FC505AF203F8F20FF0505A505A505A50C8 -FCF101FCF107F84F5A4F5A4F5A4F5A07FEC9FCF003FC4E5A4E5A4E5A4E5A4E5ADD01FECA -FC4D5A4D5A4D5A4D7E173F4D7E4C487E4C7F5E4C804C804C80EEFF7F9226F9FE3F7FDBFB -FC809226FFF81F7F4C7EDCC0077F0480804C7E4B6D804B6D804B8284727F727F8684727F -727F8784728087737F85737F87737F85737F88857380747F888697B512FCB800C0013FEC -FFFEA55F527CD169>I<B812F8A5D8000701F8CAFCB3B3A91A7CA41AFC1AF8A51901A319 -03A219071AF0190FA2191F193F197F19FF180360183F4DB5FCBB12E0A546527CD151>I< -B600FC073FB512FE6F61A26F96B6FCA2D80007F5C00070EF01EFA202EF6DEF03CFA202E7 -6DEF078FA202E36DEF0F0FA202E16D171EA302E06D173CA26F6C1778A26F6C17F0A26F6D -ED01E0A26F6DED03C0A36F6DED0780A26F6DED0F00A26F6D151EA26F6D5DA3706C5DA270 -6C5DA2706D495AA2706D495AA2706D495AA3706D49C7FCA2706D131EA2706D5BA2716C5B -A3716C5BA271EB81E0A271EBC3C0A271EBE780A27101FFC8FCA3715BA2715BA2725AA272 -5AA2D93FFC6F5AB74DB712FEA2725AA2725A77527CD180>I<B600FC93B7FC8181A282D8 -00076E9239003FFC0070EE07E08282A28202EF7F02E77F02E380A202E18002E0806F7F6F -7F6F7FA26F7F6F7F6F806F80A26F80707F707F707F707FA2707F7080708070808583717F -717F717F717FA27114807114C07114E07213F07213F8A27213FC7213FE7213FF721487A2 -7214C77214E77313F77313FF85A285858585A28586868686A286868686A2D93FFC187FB7 -173F1B1F1B0F1B07755A60527CD169>I<93380FFFC00303B6FC031F15E092B712FC0203 -D9FC0013FF020F01C0010F13C0023F90C7000313F0DA7FFC02007F494848ED7FFE4901E0 -ED1FFF49496F7F49496F7F4990C96C7F49854948707F4948707FA24849717E48864A8348 -1B804A83481BC0A2481BE04A83A2481BF0A348497113F8A5B51AFCAF6C1BF86E5FA46C1B -F0A26E5F6C1BE0A36C6D4D13C0A26C6D4D1380A26C1B006C6D4D5A6E5E6C626D6C4C5B6D -6D4B5B6D6D4B5B6D6D4B5B6D6D4B5B6D6D4B90C7FC6D6D4B5A6D01FF02035B023F01E001 -1F13F0020F01FC90B512C0020390B7C8FC020016FC031F15E0030392C9FCDB001F13E056 -5479D265>I<BAFC19F819FF1AE086D8000701F0C7001F13FC060113FF726C13807313C0 -070F13E01BF0857313F81BFCA27313FEA41BFFA81BFEA31BFC61A21BF84F13F04F13E061 -4F13C04F13004E485A061F5B92B812F01AC04FC7FC19E003F8CBFCB3AEB812C0A550527C -D15C>I<93380FFFC00303B6FC031F15E092B712FC0203D9FC0013FF020F01C0010F13C0 -023F90C7000313F0DA7FFC02007F902601FFF0ED3FFE49496F7E49496F7F49496F7F4990 -C96C7F4948707F4948707F01FF854A177F48864849717EA24849711380A2481BC04A8348 -1BE0A24A83481BF0A3481BF8A291CB7EA3B51AFCAF6C1BF8A26E5FA36C1BF0A36C6D4D13 -E0A36C1BC06E5F6C1B806E5F6CDB01FE16006C6D902607FF80495A4C13E06C6D013F6D49 -5A017F91267F03F85C6D6C90277C00FC015B6D6C49D97E035B6D01806E485B6D6D48D91F -8F5B6D01E0039F90C7FC6D01F06EB45A6DD9FCF85DDA3FFF6E13F0020F6D4913C0020301 -FF90B5C8FC020091B512FC031F180C0303181EDB001FEBE3FE93C7EA01FF74133E74137E -7413FEF2F8077290B5FC1CFCA285A21CF8A2851CF07314E0A27314C0731480731400735B -9638007FF8F21FE0576A79D265>I<B912F0F0FF8019F819FF1AC0D8000701F0C714F006 -0F7F060113FE727F737F737F85737F87A2737FA387A863A2616363A24F5B4F5B4F90C8FC -4F5A06035B060F13F095B512C092B8C9FC19F819E019F89226F0000313FE9439007FFF80 -727F727F727F727F727F8684A28684A787A71D1C75133EA38575137E73157C7513FC7314 -01B86C6D9038F803F807039038FE07F07390B512E0736C14C0080F1400CEEA7FFC5F537C -D164>I<91260FFF80130791B500F85B010702FF5B011FEDC03F49EDF07F9026FFFC006D -5A4801E0EB0FFD4801800101B5FC4848C87E48488149150F001F824981123F4981007F82 -A28412FF84A27FA26D82A27F7F6D93C7FC14C06C13F014FF15F86CECFF8016FC6CEDFFC0 -17F06C16FC6C16FF6C17C06C836C836D826D82010F821303010082021F16801400030F15 -C0ED007F040714E01600173F050F13F08383A200788200F882A3187FA27EA219E07EA26C -EFFFC0A27F6D4B13806D17006D5D01FC4B5A01FF4B5A02C04A5A02F8EC7FF0903B1FFFC0 -03FFE0486C90B65AD8FC0393C7FC48C66C14FC48010F14F048D9007F90C8FC3C5479D24B ->I<003FBC1280A59126C0003F9038C0007F49C71607D87FF8060113C001E08449197F49 -193F90C8171FA2007E1A0FA3007C1A07A500FC1BE0481A03A6C994C7FCB3B3AC91B912F0 -A553517BD05E>I<B800C00103B612FCA5D8000701F8CAEBF000F31F80B3B3B11B3FA26D -97C7FC81637F1B7E6D6D17FE505A6E7E505A6E6D15076E4D5A6E6D4B5A6E6D4B5A6E01F8 -4B5A6E6DDA03FFC8FC6E6CB46CEB0FFE6F9039F001FFF8030F90B65A030316C0DB007F92 -C9FC040F14F8DC007F13805E537CD167>I<B700FE031FB512FEA5D8001F01F0CA383FFE -00F307F06D626F170F6D62811B1F6D6D601B3F6D97C7FC6F5F6D197E821BFE6E6D5E1A01 -6E6D5E1A036E60701507A26E6D5E1A0F6E6D5E1A1F6E6070153FA26E6D93C8FC626E6E14 -7E1AFE6F5E711301A26F6D5C19036F6D5C19076F5E71130FA26F6D5C191F6F6D5C193F6F -93C9FC715BA26FEC807E19FE706D5A18C1705C18E3705C18F318F770EBFFE0A2705CA270 -5CA37091CAFCA2705BA2715AA3715AA2715AA2715A715A5F537DD166>I<B700FC017FB6 -00FE91B612F0A5D8003F01C0C8001F01E0C9EBF8006F71EE0FC06D7161876F1C1F6D7196 -C7FC6F8373606D1E3E6F836D7160876F1CFC6D666F4B801F016D66704A806E525A88704A -17076E059F5F70021F80080F160F6E6570023F806EDC3E074CC8FC8870027E5F6EDC7C03 -163E7002FC804F6C167E6E1C7C700101814F6C16FC6E745B70010317016E4C6D5D060716 -C00580496D14036F63DDC00F16E04F6D14076F07F05BDDE01F170F6F92C76C5D1DF8DDF0 -3E6E141F6F98C9FCDDF87E16FC067C6E5C6FF1FE3EDDFCFC177E6F4A6E147C1DFFDDFFF0 -6E14FC6F62A24E816F62A270496F5BA24E817061A295C97E7061A270487090CAFCA37048 -705AA24D1601040360A27048705A84537DD18B>I<003FB7D88003B7FCA5D8000749C800 -0701F8C7FC6D6D9238007F806D6E93C8FC7015FE6D17016E6D5D704A5A6E16076E6D4A5A -6E6D5D4F5A6E6D143F6E6D4A5A7191C9FC6E16FE6EECC00171485A6F5D6F6D485A6FEBF8 -0F71485A6F5D6F6D485AEFFF7F6F4ACAFC6F5C6F5CA2705B705B8482707F707FA2707F70 -80855E4C80855E4C80DC3FCF7F058F7FEE7F074C6C7FDB01FE814C7E4B486C8003076E7F -4B48814C7F4B486D7F033F824C7F4BC76C7F4B6E7F4A5A4B6E804A486E800207844A4881 -4B6F7F4A4883023F824A486F7F92C96C7F02FE840101830103718090263FFFC084B76C01 -03B712F8A55D527CD166>I<B8030FB61280A5D8000F01FCCA003F90C7FC6FEF07F86D6D -606D4F5A826D6E4C5A6D4F5A826E6D4CC8FC6E18FE826E6D4B5A6E4D5A826E6D4B5A6E4D -5A836E6E4A5A6E4D5A836F6D4AC9FC6F5E715C6F6D495A6F1503715C6F6D495A6F150F06 -805B6F6E485A6F153F06E05B706D48CAFC705C725A70EBFDFC7013FF61705C82705C6182 -715B96CBFCB3AA030FB712F8A561527ED166>I<001FBA12C01AE0A40380C714C002F8C7 -5A02C0178091C8481400495D495F494B5B495D495F48484B5B5F495F94B55A5E90C85D4C -91C7FC5E60003E4B5B5E604C5B5EC95C93B55A5D604B91C8FC5D5F4B5B5D5F4B5B5D5F92 -B55A5C5F4A91C9FC5C5E4A5B5C4CEC03E04A5B5C5E91B55A5B4C14074991C8FC4918C05D -495B5B4B150F495B5B4B151F90B55A48183F5D4891C9127F4818FF4A5D48495D485F4A5D -4849033F1380484CB5FC4A143FBBFCA47E435279D152>I<EC7FFF0107B512F0013F14FE -90B77E48D9E00F7F2703FE000113F0486C6D7F6EEB3FFC48826E131F83707FA36C496D7F -A26C90C7FC6C5AC9FCA6037FB5FC020FB6FC91B7FC01071487013FEBF0074913803901FF -FC004813F0485B485B485B4890C7FC5A5BA2485AA45EA26D5C007F151D163D6C6C02797F -6C6D01F113F86C9026C003E1EBFFE06C9026F81FC014F06C90B5487EC6ED001F011F01FC -010713E0010101E090C8FC3C387CB641>97 D<EB3FF0B5FCA51203C6FCB3A4923801FFE0 -030F13FE033FEBFFC092B612F002F301017F913AF7F8003FFEDAFFE0EB0FFF03806D7F92 -C76C7F4A6E7F4A824A6E7FA2727EA285A28584A31A80AC1A00A44E5AA36118FF616E4A5B -A26E4A5B6E4A5B6F495BDACFC04990C7FCDA87F0EB7FFC913A03FE03FFF849C6B612E049 -6D148049011F01FCC8FC90C7000313C041547BD24B>I<913801FFF8021FEBFF8091B612 -F0010315FC010F9038C00FFE903A1FFE0001FFD97FFC491380D9FFF05B4817C048495B5C -5A485BA2486F138091C7FC486F1300705A4892C8FC5BA312FFAD127F7FA27EA2EF03E06C -7F17076C6D15C07E6E140F6CEE1F806C6DEC3F006C6D147ED97FFE5C6D6CEB03F8010F90 -38E01FF0010390B55A01001580023F49C7FC020113E033387CB63C>I<913803FFC0023F -13FC49B6FC010715C04901817F903A3FFC007FF849486D7E49486D7E4849130F48496D7E -48178048497F18C0488191C7FC4817E0A248815B18F0A212FFA490B8FCA318E049CAFCA6 -127FA27F7EA218E06CEE01F06E14037E6C6DEC07E0A26C6DEC0FC06C6D141F6C6DEC3F80 -6D6CECFF00D91FFEEB03FE903A0FFFC03FF8010390B55A010015C0021F49C7FC020113F0 -34387CB63D>101 D<D93FF0EB1FFCB591B512C0030314F0030F8092391FE07FFC92393F -001FFE0003027C80C602F07FDAF1E081ECF3C0DAF7807F8502FFC7FC5CA25CA45CB3ACB6 -D8F807B612C0A542367BB54B>110 D<913801FFE0021F13FE91B612C0010315F0010F90 -38807FFC903A1FFC000FFED97FF86D6C7E49486D7F48496D7F48496D7F4A147F48834890 -C86C7EA24883A248486F7EA3007F1880A400FF18C0AC007F1880A3003F18006D5DA26C5F -A26C5F6E147F6C5F6C6D4A5A6C6D495B6C6D495B6D6C495BD93FFE011F90C7FC903A0FFF -807FFC6D90B55A010015C0023F91C8FC020113E03A387CB643>I<90397FE003FEB59038 -0FFF80033F13E04B13F09238FE1FF89139E1F83FFC0003D9E3E013FEC6ECC07FECE78014 -EF150014EE02FEEB3FFC5CEE1FF8EE0FF04A90C7FCA55CB3AAB612FCA52F367CB537> -114 D<903903FFF00F013FEBFE1F90B7FC120348EB003FD80FF81307D81FE0130148487F -4980127F90C87EA24881A27FA27F01F091C7FC13FCEBFFC06C13FF15F86C14FF16C06C15 -F06C816C816C81C681013F1580010F15C01300020714E0EC003F030713F015010078EC00 -7F00F8153F161F7E160FA27E17E07E6D141F17C07F6DEC3F8001F8EC7F0001FEEB01FE90 -39FFC00FFC6DB55AD8FC1F14E0D8F807148048C601F8C7FC2C387CB635>I<143EA6147E -A414FEA21301A313031307A2130F131F133F13FF5A000F90B6FCB8FCA426003FFEC8FCB3 -A9EE07C0AB011FEC0F8080A26DEC1F0015806DEBC03E6DEBF0FC6DEBFFF86D6C5B021F5B -020313802A4D7ECB34>I E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fy cmbx12 17.28 5 -/Fy 5 54 df<B812C0AD2A0D7EA636>45 D<EA01FCEA07FF4813804813C04813E04813F0 -A2B512F8A76C13F0A26C13E06C13C06C13806C1300EA01FC151574942D>I<913801FFF8 -021FEBFFC091B612F8010315FF010F16C0013F8290267FFC0114F89027FFE0003F7F4890 -C7000F7F48486E7FD807F86E148048486E14C048486E14E048486F13F001FC17F8486C81 -6D17FC6E80B56C16FE8380A219FFA283A36C5BA26C5B6C90C8FCD807FC5DEA01F0CA14FE -A34D13FCA219F85F19F04D13E0A294B512C019804C14004C5B604C5B4C5B604C13804C90 -C7FC4C5A4C5A4B13F05F4B13804B90C8FC4B5AED1FF84B5A4B5A4B48143F4A5B4A48C8FC -4A5A4A48157E4A5A4A5AEC7F8092C9FC02FE16FE495A495A4948ED01FCD90FC0150749B8 -FC5B5B90B9FC5A4818F85A5A5A5A5ABAFCA219F0A4405E78DD51>50 -D<92B5FC020F14F8023F14FF49B712C04916F0010FD9C01F13FC90271FFC00077FD93FE0 -01017F49486D8049C86C7F484883486C6F7F14C0486D826E806E82487FA4805CA36C5E4A -5E6C5B6C5B6C495E011FC85A90C95CA294B55A614C91C7FC604C5B4C5B4C5B4C5B047F13 -8092260FFFFEC8FC020FB512F817E094C9FC17F817FF91C7003F13E0040713F8040113FE -707F717F7113E085717FA2717F85A285831A80A31AC0EA03FCEA0FFF487F487F487FA2B5 -7EA31A80A34D14005C7E4A5E5F6C495E49C8485BD81FF85F000F5ED807FE92B55A6C6C6C -4914806C01F0010791C7FC6C9026FF803F5B6D90B65A011F16F0010716C001014BC8FCD9 -001F14F0020149C9FC426079DD51>I<01C0EE01C0D801F8160F01FF167F02F0EC07FFDA -FF8090B5FC92B7128019006060606060606095C7FC17FC5F17E0178004FCC8FC16E09026 -FC3FFCC9FC91CBFCADED3FFE0203B512F0020F14FE023F6E7E91B712E001FDD9E00F7F90 -27FFFE00037F02F801007F02E06EB4FC02806E138091C8FC496F13C04917E07113F0EA00 -F090C914F8A219FC83A219FEA419FFA3EA03F0EA0FFC487E487E487FA2B57EA319FEA35C -4D13FC6C90C8FC5B4917F8EA3FF001804B13F06D17E0001F5E6C6C17C06D4B1380D807FC -92B512006C6C4A5B6C6C6C01075B6C01E0011F5BD97FFE90B55A6DB712C0010F93C7FC6D -15FC010115F0D9003F1480020301F0C8FC406078DD51>53 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: Fz cmbx12 24.88 23 -/Fz 23 125 df[<EB1FE0EBFFFC00037F486D7E488048804880A24880A281B6FC81A281 -A416807EA37EA27E7E6C14BF6C143FC613FCEB1FE090C7FC157F1600A55D5DA214015DA2 -14035D1407A24A5AA24A5AA24A5A147F5D4AC7FC5B495A5C1307495A495A495AEBFFC048 -5B4890C8FC485A5B6C5A6C5A6C5A>33 70 111 270 65 39 D[<F31FE0F37FF8A2517EA2 -507FA3507FA25080A35080A25080A35080A25080A397B67EA24F81A34F81A24F82A34F82 -A24F82A21AFBDF3FF981A2DF7FF1811AF06207FF6D80A24E01C081871A804E6E80A24E01 -00828761060F6E81A24E48838761063F6E81A24E4883876106FF6F80A24D498388614D70 -80A24D90C8FC768160050F7081A260051F708160053F7081A260057F70816005FF7180A2 -604C7280604C7280A295CAFC4C72815F040F7281A294BDFC4C88A24C88A34C88A293BE7E -05E0CB7E5F4B7480A24B497280A294CCFC4B7481A24B487381A25E031F7481A24B487381 -A25E037F7481A24B487480A25E4A7680A24A497480A293CEFC4A7681A24A4875814A7E01 -07B512FCB96C043FBA12FCA9>158 145 120 272 175 65 D[<BFFC1EFEF6FFE01FFCF7 -FF8020F020FC20FF8DC7000392CA001F15E00B0181776C800C1F807814FF0C03818A7881 -8E79808B8E8B8E8B8EA27980A4791580AB551500A4555CA26A676A676A555C9CB65AA254 -5D5492C7FC545C5414F80C3F5C545C53B612800B0F4AC8FC0B7F14F80A1FB612E095BBC9 -FC1FF81F801FF8F7FF8020F820FE95CBECFFC00C1F14F00C07807814FE0C006E7E798079 -8079807980798079808E79158023C08B23E08C23F0A223F88CA223FCA38C23FEAB5614FC -A55614F8A39DB612F0A25515E06723C055158067551500555C555C9CB6FC545D0C075D0C -1F15C09BB75A0B0F93C7FCC212FC6921E021800EFCC8FC20F020800DF0C9FC0CFCCAFC> -143 142 120 269 165 I[<BC12C0A9C7000103E0C8FCB3B3B3B3B3B3B0BC12C0A9>74 -142 122 269 87 73 D[<BC12F8A9C7000303C0CEFCB3B3B3B3A5F8FF80A4672100A667 -A368A21F07A41F0FA3555AA21F3FA21F7FA21FFFA2666668666666666653B5FC65650B1F -5C1D7F0A03B6FC1C1F0903B7FCC1FCA468A5>121 142 120 269 -140 76 D[<B900C00C7FB812E0729BB9FC72657265A37265A27265C70003A101F8C8FC72 -F51FEFA2706EF43FCFA3706EF47F8FA2706EF4FF0FA2706EF301FEA3706EF303FCA2706E -F307F8A2706EF30FF0A2706EF31FE0A3716EF23FC0A2716EF27F80A2716EF2FF00A2716E -4F5AA3716E4F5AA2716E4F5AA2716E4F5AA3716E4F5AA2726E4E5AA2726E4E5AA2726E4E -C7FCA3726E4D5AA2726E4D5AA2726E4D5AA2726E4D5AA3726E4D5AA2736E4C5AA2736E4C -5AA3736E4CC8FCA2736E4B5AA2736E4B5AA2736E4B5AA3736E4B5AA2736E4B5AA2746E4A -5AA2746E4A5AA3746E4AC9FCA2746E495AA2746E495AA3746E495AA2746E495AA2746E49 -5AA2756E485AA3756E485AA2756E48CAFCA275ECF1FEA275ECFBFCA375ECFFF8A2755DA2 -755DA3765CA2765CA27691CBFCA2765BA34A6D715B49B512FEB900FC6F490303BB12E0A2 -765BA2765BA3775A0B1FC9FC>203 142 120 269 220 I[<BE12F8F5FFF01EFF1FE01FFC -F7FF8020E020F820FEC700030380C8000781E2003F15C00B03810B00810C3F8078800C07 -807880788178818E8B8E8B8E8B8EA28EA28B8EA42380AC2300A46A67A26AA26A676A676A -9CB65A6A665492C7FC545C0C1F5C545C9BB612E00B075D0B3F5D0A07B648C8FC95BB12F8 -20E0208055C9FC1FF09CCAFC1EF00BF8CBFC06C0D0FCB3B3B2BCFCA9>137 -142 120 269 159 80 D[<93260FFFF8163E4BB600E0153F031F03FE5D037FDBFFC05C02 -03B800F05B020F05FC5B4A05FF5B027FF0C00F91B526FE000FECF01F010302C0D9007F6D -5A4991C800076D5A4901FC030090B6FC4901F0163F4949160F4901808290B5170192CBFC -4849844849181F87484984A2484984874886A248498588A24887A388A2B58680A36E85A2 -80A26E8580A2818103F0725A6C6E96C7FC15FE8116E06C15FEEEFFE017FF6C17F0F0FF80 -6C18F8F1FFC06C19FCF2FF806C1AE01BF86C1AFE6C747E6D1AE0886D866D866D1AFF6D87 -6D87010087806E86020F86020386020086153F030F851501DB001F19801601DC000F18C0 -EF007F060717E0F0003F070316F0F1003F1A0F080315F81A00871B1F877514FCA287007F -86486C85A288A388A36D86A31EF87FA37F1EF0A26D626D1CE0A27F6D5013C0A26E1B806E -96B5FC6E1B0002F8606E4E5B6E626E6C5F03E04D5B03F84D5B03FE057F5BDBFFC093B55A -04F803035C496CD9FF80021F91C7FCD9FC1F02FF49B55AD9F80792B75A496C19F049C661 -49011F18804901074DC8FC90C817F848031F16C048030003FCC9FC007C04011480>102 -146 115 271 129 83 D<93B512FC037FECFFF00207B8FC023F17E091B912F84918FE01 -07727E499126C0007F14E04901E0C7000F80496D020380496D020014FE6F6F7F90B57080 -6F6F8085486E6F807380A27380A28885886C5CA26D4982886D5B6D5B010713C0010190CA -FC90CCFCA90603B7FC050FB8FC0403B9FC167F0307BAFC153F4AB7EA807F020FEDE00002 -3F02FCC7FC91B612E0010392C8FC4914FC011F14F04914C0495C90B548C9FC485C485C48 -5C485C5A5D485CA24891CAFCA3B6FC5CA397B6FCA461806C60F107EF6C6E150F6F16CF6C -183F6FDB7F8F806C6EDBFF0F14E06C02FCDA03FE15FE6C6E91260FFC0791B5FC6C6E6CD9 -3FF817806C923AF803FFF003013F91B6487E010FEF8000010394C77E010004FC141F021F -03F0140702010380DA007F1400DA000701F8CDFC695F79DD71>97 -D[<ED1FF0017FB5FCB7FCA9EA003F1307A27FB3B296383FFFC00607B512FE063FECFFE0 -4DB712F8050716FF051F17C0057F17F094B5D8C00F8004F301FCC714FE04F701E0023F7F -93B50080020F804DC86C14E005F80301804D6F804D707F05808294CA804C717F4C7180A2 -4C71808BA27680A28B88A28BA28BA3888BA52080B02000A56764A267A3676467A2525CA2 -67647062704D91C7FC704D5BA2714C5B7193B55A05F04B5CDCBFF84B5CDC1FFC030F5C4B -6CB44B91C8FC7001C0027F5B4B6C01F00103B55A4BC601FF013F14F04B6D90B712C04B01 -1F94C9FC4B6D16FC4B010316F092C86C15804A030F02F8CAFC90CB49CBFC>113 -144 121 270 129 I<94387FFFC0040FB6FC93B712E0030716FC031F16FF037F17C04AB9 -12F00207DAF80380021F912680003F13FE4A49C7000F7F4A01F802038049B5486E804902 -C06E6C7F494A6F7F4991C9FC49727F4949707F4B84498490B548707F5A4B198048855D48 -1CC086481CE05D5A871DF05AA25D5AA21DF887A2B6FCA392BBFCA51DF00380CDFCA77EA4 -817EA37EA2817EA26CF307F06FF00FF87E816C1B1F6F19F06C1B3F6D6DF07FE06D7FF4FF -C06D6E4C13806D6E5E6D02F04C13006D6EEE1FFE6D6E4C5A6D6C01FFEEFFF86E02E00203 -5B6E02FC021F5B02079126FFC003B55A6E92B7C7FC020060033F17F8030F17E003011780 -DB003F03FCC8FC040315C0DC000F01F8C9FC5D5F7ADD6A>101 D<F5FFC093260FFFFC03 -0F13F04BB600E0027F7F031F03FE49B512FE037F9226FF8007800203B8EAF01F020FDDFC -3F15804A7148133F027FDA003F90B500F014C091B500F80107ED807F4902E00101ECFC00 -010702806D6C5B93C87E49496F7F49496F7F49496F6D6D1380491A8077130090B5486F6E -6C5AF503F84875C8FCA2484A6F80A44887AB6C63A46C6E4B5CA26C63A26D6D4B5CA26D97 -C9FC6D6D4B5B6D6D4B5B6D6D4B5B705C010102E049B512E06D02F801075C4902FF013F5C -4992B648CAFC496002F317F090260FE07F1680031F4BCBFC90261FC00115E0DB000F01FC -CCFC013F91CFFCA3137FA280A380A28080806E7E15F092B812F06DF0FFE01BFEF3FFC06D -1AF81CFE767E6D1BE06D87896D1BFE6D877F6E878A0103BD7E130F013F8890BEFC4802E0 -C9003F814891CBFC4801FC180F48490601804849727E484985884849737F88A2B55A88A6 -6E616C65A26E616C6D4F5B6C656E616C6D4F5B6C6D96B55A6C6D6C05035C6F5FC602F005 -1F49C7FC6D01FC057F5B6DD9FF800303B55A010F02F8033F14E06DDAFFE0010FB65A0101 -92B9C8FCD9003F19F8020F19E0020196C9FCDA001F17F0030194CAFCDB000192CBFC6A88 -7ADD74>103 D[<EC3FC0ECFFF0010313FC497F497F498049804980A290B67EA24881A86C -5DA26D5CA26D5C6D5C6D91C8FC6D5B6D5B010013F0EC3FC091CAFCB3A3ED1FF0017FB5FC -B7FCA9EA003F1307A27FB3B3B3B0B91280A9>49 144 119 271 65 -105 D[<ED1FF0017FB5FCB7FCA9EA003F1307A27FB3B3B3B3B3B3ACB912C0A9>50 -143 119 270 65 108 D<DB3FE0912601FFFC943801FFFC017FB5031FD9FFE0041FEBFF -E0B792B600FC93B612FC060303FF030315FF060F04C0020F16C0063F04F0023F16F095B8 -6C91B87E4DD9FC036E49D9FC03804DD9C0006E49D9C000804D48C7003F6D4948C7003F7F -DD0FF86EDB0FF880D8003F4B48714848830107DB3FC06E9126C03FC06E804D484E5A6D4B -C86F48C881DCE1FE6FDAE1FE814D61DCE3F8DEF3F884DCE7F0F0F7F04D6F4B81DCEFC0F0 -FFC0A2DCFF804F84A294C993C9FCA24C61A34C61A44C61B3B3AFB900E090B900E090B912 -E0A9B35D77DCC2>I<DB3FE0913803FFFC017FB5033FEBFFE0B792B612F8060715FE061F -6F7E4E16E095B87E4DD9FC03804DD9C000804D48C76C7FDD0FF880D8003FDB1FE0820107 -4B486E804D5A6D03FEC881DCE1FC815F04E385EEE7F04D81EEEFC0A2DCFF8084A294C9FC -A25EA35EA45EB3B3AFB9D8E001B912C0A9725D77DC81>I<94381FFFF00407B612C0047F -15FC0303B87E030F17E0037F17FC4ABAFC4A9126FC007F80020F02C0010714E04A49C880 -027F01F8033F13FC91B5486F7F4902C003077F494A6F804991C96C80494970804949717F -49874949717FA290B548717F48884B83481D80A2481DC04B83481DE0A2481DF0A3484A71 -14F8A4481DFCA5B61BFEAF6C1DFCA56C6E4D14F8A36C1DF0A36C1DE06F5F6C1DC0A26C6E -4D1480A26C1D006F5F6C646D6D4D5B6F94B5FC6D636D6D4C5C6D6E4B5C6D6E4B5C6D02F0 -031F5C6D6E4B91C7FC6D6C01FE92B512FC6ED9FFC001075C6E02FC017F5C020791B812C0 -020196C8FC6E6C17FC031F17F003031780DB007F03FCC9FC040715C0DC001F01F0CAFC67 -5F7ADD74>I<DB7FC049B47E90B6021F13F8B7027F13FE4DB67E4D15E04D814D814D0107 -7F94263FF00F7F94387FC01F4D48487FD8003F16000107DAC1FE491480EEC3FC6D5DEEC7 -F05F16CF5F16DF4D6D1400A204FFC76C5BA2735B4C6E5B735B070013C04C92C8FCA45EA6 -5EB3B3AAB912FCA9515D79DC5F>114 D<92261FFFF814F80203B638C001FC023FEDFC07 -91B8121F010317FF130F013F9038F8001F4990C8FCD9FFF8153F4801E0150F4849150348 -49814890CAFC197F4848173F191F485AA2007F180FA31907487EA27FA28002E0705A6E93 -C8FC14FC14FF15F06CECFF8016FCEEFFF06CEEFF8018F06C17FE727E6C18E0856C18FC6C -846C727E6C856D84011F846D841303010084023F83140F020183EC001FDB007F16801603 -DC000F15C01700183F060F14E0007F1703486C82727E857F85857FA2857F1BC07FA27F1B -806D5F7F1B006E5E6E5F6E163F6E4C5A02FC4C5A6E03035B6E6C4A5B03F0023F5B03FF01 -07B55A01F991B7C7FCD9F07F16FCD9E01F16F0D9800716C0D9000193C8FC48D9003F14F8 -007C020349C9FC4B5F78DD5C>I[<ED03FEA81507A5150FA4151FA3153FA2157FA215FFA2 -5CA25C5CA25C5C5C5C91B5FC13035B131F017F91B712F00007BAFCBBFCA7C74AC9FCB3B3 -AAF101FFB1616E17FE82A219076E17FC836EEE0FF871131F6E6EEB3FF071137F6E6EEBFF -E06EDAFF0313C06E92B512806E1700033F5D6F5D03075D030015E0041F1480040001FCC7 -FC>72 132 124 258 90 I<DB0FF8F01FF0017FB594B6FCB74BB7FCA9D8003F94C77E01 -07190FA26D85B3B3B063A463A263A27F6398B6FCA26DF001FB7015036EEF07F3E00FE380 -6E6D151FE07FC314FF6E6D6CDAFF83EDFFC06E6E010313036E02FCEB3FFE6E91B612FC02 -0017F86F16E0031F16800303EDFE00DB007F14F8040102C093C8FC725E77DC81>I<007F -B800C04AB71280A9D800034ACA000791C7FC6D080013F0775A6D6E4E5AA26E6E6064836E -4F90C8FC836E4F5A836E4F5AA26E6E4C5AA26E6E5F1C3F6E6E5F1C7F836E4F5A846F4D5B -846F4D90C9FCA26F6E4A5AA26F6E5D1B0F846F4D5A846F4D5A846F4D5AA26F6E4A5AA270 -6E5C627002C091CAFC6219E0704B5A19F0704B5AA2706E485AA2706E485AA27002FE5B1A -7F19FF704B5AA2715DA27192CBFCA2715CA2715CA3715CA2715CA2715CA2715CA2725BA2 -7290CCFCA3725AA2725AA24E5AA24E5AA261187FA24E5AA24D5B13FE2603FF804A90CDFC -000F13E0486D4A5A487F486D4A5AA260B56C141F4D5AA24D5A17FF604C5B4A4990CEFC6C -5D4C5A6C49EB3FFC4A495A6C4948485A9026FE80075B270FFFC03F5B6C90B6CFFC6C5D6C -15F86C6C5C011F14C0010749D0FC9038007FE071857CDB7B>121 -D<C5BD12FEA7E70780BBE8>124 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: FA cmr12 12 28 -/FA 28 122 df<EC03F0EC0FF8EC3E1EEC7C0E4A7E49487E130302E07F01071301A3EB0F -C0A4150393CAFC14E05D1506150E5D1518010713386E5A156015E0ECF1C0DAFB800107B5 -12C06DB4C7FC5C4A9139007FFC000101EE1FE019806E6FC7FC0100160E497E495E496C6C -1418010E1638496C6C1430011816709026381FE05C01705E496C6C1301D801C06D5C0003 -01071403D807806D91C8FC000F6D6C5B001F0101140E003F6E130C90C7EB801C48027F5B -EEC0304891383FE070031F5B705AED0FF9923807FB806D6DB4C812C05E6F7E007F6E6D13 -016D6E6C14804C6C13036C6C496D1400001F912603CFF85B6C6C90260F07FC130E6C6C90 -263E01FE133C3D03FE01F800FF80F8C6B54890383FFFF0013F0180010713C0D907FCC890 -C7FC42497CC64C>38 D<121EEA7F80A2EAFFC0A4EA7F80A2EA1E000A0A78891B>46 -D<14FF010713E090381F81F890383E007C01FC133F4848EB1F8049130F4848EB07C04848 -EB03E0A2000F15F0491301001F15F8A2003F15FCA390C8FC4815FEA54815FFB3A46C15FE -A56D1301003F15FCA3001F15F8A26C6CEB03F0A36C6CEB07E0000315C06D130F6C6CEB1F -806C6CEB3F00013E137C90381F81F8903807FFE0010090C7FC28447CC131>48 -D<EC07FCEC3FFF91B512C0903903FC03E0903907E000F0D91FC0133849C71258017EEB01 -FC01FE1303491307485A485AA24848EB03F8000FEC01F092C7FC485AA3485AA3127FA290 -38007F80903801FFF090380780FC39FF0E003E49EB1F8049EB0FC049EB07E0136001E0EB -03F04914F8150116FC5BED00FEA390C812FFA47EA57F123FA216FE121F15016D14FC120F -ED03F86C7EED07F06C6C14E06C6CEB0FC06C6CEB1F80017EEB3F0090383F80FE90380FFF -F8010313E00100138028447CC131>54 D<121CA2EA1F8090B712C0A3481680A217005E00 -38C8120C0030151C00705D0060153016705E5E4814014B5A4BC7FCC81206150E5D151815 -385D156015E04A5AA24A5A140792C8FC5CA25C141E143EA2147E147CA214FCA21301A349 -5AA41307A6130FAA6D5AEB01C02A457BC231>I<16C04B7EA34B7EA34B7EA34B7EA3ED19 -FEA3ED30FFA203707FED607FA203E07FEDC03FA2020180ED801FA2DA03007F160FA20206 -801607A24A6D7EA34A6D7EA34A6D7EA20270810260147FA202E08191B7FCA249820280C7 -121FA249C87F170FA20106821707A2496F7EA3496F7EA3496F7EA201788313F8486C83D8 -0FFF03037FB500E0027FEBFFC0A342477DC649>65 D<DB0FFE146092B500C013E0020314 -F0913A0FFC01FC0191393FC0003E02FFC7EA0F83D903FCEC03C74948EC01E74948EC00FF -4948157F4948153F4948151F49C9120F485A491607120348481603A248481601A2484816 -00A2123FA2491760127FA31900485AAE6C7EA21960A2123F7FA2001F18E07F000F18C0A2 -6C6C160119806C6C160312016DEE07006C6C16066D6C150E6D6C5D6D6C5D6D6C15786D6C -5D6D6C4A5AD900FFEC0780DA3FC0011FC7FCDA0FFC13FC0203B512F0020014C0DB0FFEC8 -FC3B487BC546>67 D<B56C020FB5FC8080C6040013F06D6CED1F80D96FF8ED0F00A2D967 -FC1506EB63FEA2EB61FF01607FA26E7E6E7EA26E7E6E7EA26E7E6E7EA26E7E6E7FA26F7E -6F7EA26F7E6F7EA26F7E6F7EA26F7E6F1380A2EE7FC0EE3FE0A2EE1FF0EE0FF8A2EE07FC -EE03FEA2EE01FF701386A2EF7FC6EF3FE6A2EF1FF6EF0FFEA217071703A217011700A201 -F0167E183E487ED80FFF161EB500F0150EA2180640447CC349>78 -D<B712FCEEFFC017F800019039C0000FFC6C6C48EB01FF9338007F80EF1FE0170FEF07F0 -18F8EF03FCA218FE1701A218FFA718FEA2170318FCA2EF07F818F0EF0FE0EF1FC0EF7F80 -933801FE00EE0FFC91B612F017800280C9FCB3AA3801FFE0B612C0A338447CC342>80 -D<B712E016FF17C000019039C0003FF86C6C48EB03FCEE00FF717E717E717E717E717EA2 -84170384A760A21707604D5AA24D5A4D5A4DC8FCEE01FEEE07F8EE3FE091B6C9FC16FC91 -3980007F80EE0FE0707EEE03FC707E160083717EA2717EA784A71A6084171FA21AE0716C -13C02601FFE002071301B600C01680943801FC03943900FE0700CBEA3FFEF007F843467C -C348>82 D<49B41303010FEBE007013F13F89039FE00FE0FD801F8131FD807E0EB079F49 -EB03DF48486DB4FC48C8FC4881003E81127E82127C00FC81A282A37E82A27EA26C6C91C7 -FC7F7FEA3FF813FE381FFFE06C13FE6CEBFFE06C14FC6C14FF6C15C0013F14F0010F8001 -0180D9001F7F14019138001FFF03031380816F13C0167F163F161F17E000C0150FA31607 -A37EA36C16C0160F7E17806C151F6C16006C5D6D147ED8FBC05CD8F9F0495AD8F07C495A -90393FC00FE0D8E00FB51280010149C7FC39C0003FF02B487BC536>I<B600C0010FB5FC -A3000101E0C813F026007F80ED1F80F00F00A21806B3B3A7180E6D6C150CA2181C131F6E -1518010F163818306D6C1570606D6C14016D6C5D6D6CEC0780027F4AC7FC6E6C131EDA1F -E0137C913907FC03F00201B55A6E6C1380DB07FCC8FC40467CC349>85 -D<EB07FC90383FFF809038F80FE03903C003F048C66C7E000E6D7ED80FC0137E486C137F -6D6D7EA36F7EA26C5AEA0380C8FCA4EC0FFF49B5FC90380FFE1FEB3FC0EBFF00EA03FC48 -5A485A485A485A127F5B176048C7FCA3153FA36D137F007F14EF6D9038C7E0C0003F1301 -3A1FE00783F13B07F81E03FF802701FFFC0113003A001FE0007C2B2E7CAC31>97 -D<EC7F80903803FFF090380FC07C90383F000F01FCEB03804848EB01C00003140F4848EB -1FE049133F120F485AA2485AED1FC0007FEC070092C7FCA290C9FC5AAB7E7FA2123F1630 -7F001F15706C6C146016E06C6C14C06C6C13010001EC03806C6CEB0700013F131E90381F -C078903807FFF001001380242E7DAC2B>99 D<EB01FE903807FFC090381F03F090387E00 -FC49137E48487F485A4848EB1F80000F15C049130F121F484814E01507A2007F15F090C7 -FCA25AA390B6FCA290C9FCA67EA27FA2123F16306C7E1670000F15606D14E06C6C14C000 -0314016C6CEB03806C6CEB0700013E131E90381F80F8903803FFE0010090C7FC242E7DAC -2B>101 D<EA01FC12FFA3120712031201B3EC01FE913807FFC091381E07F091383801F8 -02707FECE000D9FDC07F5C01FF147F91C7FCA25BA35BB3A8486CECFF80B5D8F83F13FEA3 -2F457DC436>104 D<EA01E0EA07F8A2487EA46C5AA2EA01E0C8FCADEA01FC12FFA31207 -12031201B3B0487EB512F8A315437DC21C>I<143C14FFA2491380A46D1300A2143C91C7 -FCADEC7F80EB3FFFA31300147F143FB3B3AA123E127F39FF807F00A2147EA25C6C485A38 -3C01F06C485A3807FF80D801FEC7FC195785C21E>I<EA01FC12FFA3120712031201B3A2 -92381FFFE0A36F1300ED07F816E05E5E030EC7FC5D5D5D5D4A5A4A5A4AC8FC5CEC3F804A -7E14FF9038FDCFE09038FF8FF01407496C7E01FC7F14016E7E81816F7E82151F6F7E8215 -07826F7E8282486C491380B5D8F81F13F8A32D457DC433>I<EA01FC12FFA31207120312 -01B3B3B3A5487EB512F8A315457DC41C>I<D801FC01FFEC1FE000FF010701E0EBFFFC91 -3B0F03F801E07F913C3C01FC07803F800007903C7000FE0E001FC0000349D97E1C130F26 -01FDC0D97F38804A143001FFDA3FF06D7E91C75BA2495DA3495DB3A8486C4A6C497EB5D8 -F81FB50003B512E0A34B2C7DAB52>I<3901FC01FE00FF903807FFC091381E07F0913838 -01F8000701707F0003EBE0002601FDC07F5C01FF147F91C7FCA25BA35BB3A8486CECFF80 -B5D8F83F13FEA32F2C7DAB36>I<EC7F80903803FFF090380FC0FC90383E001F496D7E49 -6D7E48486D7E48486D7E48486D7E000F81A24848147E003F157FA290C87E481680A44816 -C0AA6C1680A26D147F003F1600A2001F157E6D14FE000F5D6D130100075D6C6C495A6C6C -495A6C6C495A013E49C7FC90381FC0FE903807FFF89038007F802A2E7DAC31>I<3903F8 -03F000FFEB1FFCEC3C3EEC707F0007EBE0FF3803F9C000015B13FBEC007E153C01FF1300 -5BA45BB3A748B4FCB512FEA3202C7DAB26>114 D<90383FE0183901FFFC383907E01F78 -390F0003F8001E1301481300007C1478127800F81438A21518A27EA27E6C6C13006C7E13 -FC383FFFE06C13FC6C13FF6C14C06C14E0C614F0011F13F81300EC0FFC140300C0EB01FE -1400157E7E153EA27EA36C143C6C147C15786C14F86CEB01F039F38003E039F1F00F8039 -E07FFE0038C00FF01F2E7DAC26>I<1306A5130EA4131EA3133E137EA213FE1201120700 -1FB512F0B6FCA2C648C7FCB3A4150CAA017E131C017F1318A26D133890381F8030ECC070 -903807E0E0903801FFC09038007F001E3E7EBC26>I<D801FC147F00FFEC3FFFA3000714 -01000380000181B3A85EA35DA212006D5B017E9038077F80017F010E13C06D011C13FE90 -380FC078903803FFF09026007F8013002F2D7DAB36>I<B539F001FFFCA3000790C7EA7F -E06C48EC1F8000011600160E0000150C6D141C6D1418A26E1338013F1430A26D6C5BA26E -13E0010F5CA26D6C485AA2ECF803010391C7FCA2903801FC06A2ECFE0E0100130CA2EC7F -18A215B8EC3FB0A2EC1FE0A36E5AA26E5AA36EC8FCA21406A35CA25CA2123C007E5BB4FC -5CA25CEAFE01387C0380D87007C9FCEA3C1EEA0FFCEA03F02E3F7EAA33>121 -D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: FB cmbx10 10.95 65 -/FB 65 122 df<EDFFFC021FEBFFFC147F49B6FC0107EBC01F90390FFE003FEB1FF8EB3F -E04948137F01FF143F5C5A91C7121F160FABB8FCA50001903880000FB3AC007FD9FE03B5 -12F0A534407EBF3A>13 D<DBFFF8903807FFC0021F01FE017F13F8027FD9FF83B57E49B6 -00CF14FF01079028C03FFFFE007F90270FFE000F01F0133FD91FF84901C0497ED93FE049 -90C712FF49484A497F13FF4A495A5A91C76C5AA2041F6E5B040F6F5A081EC7FC97C8FCA6 -F21FE0BCFCA50001902780000FFCC7FC1A7FB3AB007FD9FE03B5D8F01FB51280A551407E -BF57>I<EA0FC0EA1FE0EA3FF0EA7FF8EAFFFCA313FEA3127F123F121FEA0FDEEA001EA2 -133E133CA2137C1378A213F8EA01F0A2EA03E0EA07C0EA0F80121FEA3F00121E120C0F20 -79BE1D>39 D<EC0780140F141FEC3E0014FE495A495A5C495A130F495A495AA249C7FC5B -5B1201485AA212075BA2120F5B121FA3485AA4127F5BA512FFB0127FA57F123FA46C7EA3 -120F7F1207A27F1203A26C7E12007F7F6D7EA26D7E6D7E13076D7E806D7E6D7E143EEC1F -80140F1407195A77C329>I<127012F8127C7EEA3F806C7E6C7E12076C7E7F6C7E6C7EA2 -137F80133F806D7EA280130FA280130780A36D7EA4807FA51580B01500A55B5CA4495AA3 -5C130F5CA2131F5CA2495A5C137F91C7FC13FEA2485A485A5B485A120F485A485A003EC8 -FC5A5A1270195A7AC329>I<147C14FE497EA5260C00FE1360003FEC01F8D87F80EB03FC -01C0130701E0130F3AFFF87C3FFED87FFCEB7FFC01FE13FF263FFF7D13F8000F90B512E0 -00011500D8003F13F8010713C0A2013F13F848B6FC000F15E0003F017D13F8267FFE7C13 -FC01FC137FD8FFF8EB3FFE3A7FE0FE0FFC01C0130701801303D83F00EB01F8000CEC0060 -C6486C1300A56D5A147C27287AC334>I<EA0FC0EA1FE0EA3FF0EA7FF8EAFFFCA313FEA3 -127F123F121FEA0FDEEA001EA2133E133CA2137C1378A213F8EA01F0A2EA03E0EA07C0EA -0F80121FEA3F00121E120C0F20798D1D>44 D<B612E0A91B097F9823>I<EA0FC0EA1FE0 -EA3FF0EA7FF8EAFFFCA6EA7FF8EA3FF0EA1FE0EA0FC00E0E798D1D>I<161C163E167EA2 -16FE16FC150116F8A2150316F0A2150716E0150F16C0A2151F1680153F1600A25D157E15 -FE5DA214015DA214035D14075DA2140F5D141F5DA2143F92C7FC5C147EA214FE5CA21301 -5C13035CA213075C130F5CA2131F5C133F91C8FCA25B137EA213FE5B12015BA212035B12 -075BA2120F5B121F5BA2123F90C9FCA25A127E12FE5AA25A1278275B7AC334>I<ECFFE0 -010713FC011F13FF017F14C0D9FFE07F489038803FF03A03FE000FF848486D7EA248486D -7E001F81A348486D1380A3007F16C0A500FF16E0B3A2007F16C0A5003F16806D5BA2001F -1600A2000F5D6D13076C6C495A6C6C495A6C6D485A6C9038E0FFE06DB55A011F91C7FC01 -0713FC010013E02B3D7CBB34>I<140F143F5C495A130F48B5FCB6FCA313F7EAFE071200 -B3B3A8007FB612F0A5243C78BB34>I<903803FF80013F13F890B512FE00036E7E488126 -0FF80F7F261FC0037F4848C67F486C6D7E6D6D7E487E6D6D7EA26F1380A46C5A6C5A6C5A -0007C7FCC8FC4B1300A25E153F5E4B5AA24B5A5E4A5B4A5B4A48C7FC5D4A5AEC1FE04A5A -4A5A9139FF000F80EB01FC495A4948EB1F00495AEB1F8049C7FC017E5C5B48B7FC485D5A -5A5A5A5AB7FC5EA4293C7BBB34>I<903801FFE0010F13FE013F6D7E90B612E04801817F -3A03FC007FF8D807F06D7E82D80FFC131F6D80121F7FA56C5A5E6C48133FD801F05CC8FC -4B5A5E4B5A4A5B020F5B902607FFFEC7FC15F815FEEDFFC0D9000113F06E6C7E6F7E6F7E -6F7E1780A26F13C0A217E0EA0FC0487E487E487E487EA317C0A25D491580127F49491300 -D83FC0495A6C6C495A3A0FFE01FFF86CB65A6C5DC61580013F49C7FC010313E02B3D7CBB -34>I<ED01F815031507A2150F151F153FA2157F15FF5C5CA25C5CEC1FBFEC3F3F143E14 -7C14FCEB01F814F0EB03E01307EB0FC0EB1F801400133E137E5B485A5B485A1207485A5B -48C7FC5A127E5AB812F8A5C8387FF800AA49B612F8A52D3C7DBB34>I<00071538D80FE0 -EB01F801FE133F90B6FC5E5E5E5E93C7FC5D15F85D15C04AC8FC0180C9FCA9ECFFC00187 -13FC019F13FF90B67E020113E09039F8007FF0496D7E01C06D7E5B6CC77FC8120F82A317 -80A21207EA1FC0487E487E12FF7FA21700A25B4B5A6C5A01805C6CC7123F6D495AD81FE0 -495A260FFC075B6CB65A6C92C7FCC614FC013F13F0010790C8FC293D7BBB34>I<EC07FF -023F13C049B512F001078049EB03FC90383FF80090397FE001FE9038FFC0034849487E48 -495AA2485A120FA2485A6F5A003F6E5A6F5A92C8FC485AA21402EC3FFE00FF496C7E01F9 -B512E001FB809138E03FF89039FF800FFC4A6C7E825B6F13804915C0A317E05BA4127FA5 -123FA26D15C0121FA2000F4A13806D150012076C6C495A6C6D485A6C9038E07FF86DB55A -6D5C6D1480010749C7FC010013F02B3D7CBB34>I<121F7F13F890B712F0A45A17E017C0 -178017005E5E5A007EC7EA01F84B5A007C4A5A4B5A4B5A93C7FC485C157E5DC7485A4A5A -A24A5A140F5D141F143F5D147FA214FF92C8FC5BA25BA3495AA3130FA5131FAA6D5A6D5A -6D5A2C3F7ABD34>I<ECFFF0010713FE011F6D7E017F14E09039FFC07FF03A01FE001FF8 -48486D7E48486D7E1503485A8281121FA27F7F7F6D5B02C05B14F06C6D485A9138FE0FF8 -9138FF9FF06CECFFE06C5D5E6C92C7FC6C816D14E0011F80498090B67E48812607FE3F7F -48486C1480381FF807D9F00114C048486C7E007F8049010F13E0150348487F81167FA216 -3FA36D15C0127FEE7F807F6C6CECFF006C6C5B01FEEB07FE3A0FFFC03FFC6C90B55A0001 -15E06C6C5C011F49C7FC010113F02B3D7CBB34>I<903801FFE0010F13FC013F13FF90B6 -12C04801E07F489038003FF048486D7E000F6E7E485A6F7E123F48488081178012FFA217 -C0A517E0A4007F5CA4003F5C6C7E5D6C7E00075C3903FF80FB6C13FF6C6C13F36D13C301 -0F018313C090380008031400A24B1380EA03F0487E486C1500487E4B5AA25E151F4B5A49 -5C6C48EBFFE049485B2607FC0F5B6CB6C7FC6C14FC6C14F06D13C0D90FFEC8FC2B3D7CBB -34>I<EA0FC0EA1FE0EA3FF0EA7FF8EAFFFCA6EA7FF8EA3FF0EA1FE0EA0FC0C7FCACEA0F -C0EA1FE0EA3FF0EA7FF8EAFFFCA6EA7FF8EA3FF0EA1FE0EA0FC00E2879A71D>I<16FCA2 -4B7EA24B7EA34B7FA24B7FA34B7FA24B7FA34B7F157C03FC7FEDF87FA2020180EDF03F02 -03804B7E02078115C082020F814B7E021F811500824A81023E7F027E81027C7FA202FC81 -4A147F49B77EA34982A2D907E0C7001F7F4A80010F835C83011F8391C87E4983133E8301 -7E83017C81B500FC91B612FCA5463F7CBE4F>65 D<B812F8EFFF8018F018FC8426003FFC -C7EA3FFF050F13807113C07113E08319F0A27113F8A719F05FA24D13E019C04D13804D13 -00EF3FFE933801FFF891B712E0188018F818FE02FCC7380FFF80050313C07113E07113F0 -19F8F07FFCA2F03FFEA219FFA38460A419FE187FA2F0FFFC4D13F85F4D13F0053F13E0BA -12C0190018FC18F095C7FC403E7DBD4A>I<922607FFC0130E92B500FC131E020702FF13 -3E023FEDC07E91B7EAE1FE01039138803FFB499039F80003FF4901C01300013F90C8127F -4948151FD9FFF8150F48491507485B4A1503481701485B18004890CAFC197E5A5B193E12 -7FA349170012FFAC127F7F193EA2123FA27F6C187E197C6C7F19FC6C6D16F86C6D150119 -F06C6D15036C6DED07E0D97FFEED0FC06D6CED3F80010F01C0ECFF006D01F8EB03FE6D90 -39FF801FFC010091B55A023F15E002071580020002FCC7FC030713C03F407ABE4C>I<B8 -12F8EFFF8018F018FC18FF26003FFCC76C13C005077F05017F716C7E727E727E727E7213 -80A27213C0A27213E0A21AF084A21AF8A41AFCA5197FA319FFA51AF8A41AF0A2601AE0A2 -4E13C0A24E13804E1300604E5A4E5A4D485A050713E0057F5BBA5A4EC7FC18F818C005F8 -C8FC463E7DBD50>I<BAFCA4198026003FFEC7123F1707170183183FA2181FF00FC0A318 -07EE07C0A3F003E0A3160F95C7FC161F163F16FF91B6FCA54AC6FC163F161F040F147CA2 -160719F8A593C71201A219F01803A21807A2180FF01FE0183F18FF1703173FBAFCA219C0 -A33E3D7DBC45>I<B912FEA48426003FFEC77E170F1703170084A284F01F80A3180FA2EE -07C0A2F007C0A4040F90C7FCA2161F163F16FF91B6FCA54AC6FC163F161F160FA21607A6 -93C9FCACB712E0A53A3D7DBC42>I<922607FFC0130E92B500FC131E020702FF133E023F -EDC07E91B7EAE1FE01039138803FFB499039F80003FF4901C01300013F90C8127F494815 -1FD9FFF8150F48491507485B4A1503481701485B18004890CAFC197E5A5B193E127FA349 -94C7FC12FFAB0407B612FC127F7FA3003F92C7383FFE00A27F7EA26C7FA26C7F6C7FA26C -7F6C7FD97FFE157F6D6C7E010F01E014FF6D01F813036D9038FF801F010091B512F3023F -15C00207ED803E02009138FE000E030701E090C7FC46407ABE52>I<B71280A526003FFE -C7FCB3B3B0B71280A5213E7DBD28>73 D<B76C90B6FCA526003FFEC8D801FCC7FCF007F8 -4E5A4E5AF03F804EC8FC18FEEF03FC4D5A4D5AEF1FC04D5A4DC9FCEE01FE4C5A4C5AEE0F -E04C5A4C5A16FF4B7F4B7F5D4B7F4B7F037F7F92B5FC6E486C7E9238F83FFF03F0804B7E -4B6C7F4B6C7F0300804A7F707F707F84717E83717F85717F83717F85717F83727E85727F -84B7D88007B612C0A54A3E7DBD52>75 D<B712E0A526003FFEC9FCB3AD183EA4187E187C -A418FCA21701A2EF03F8A21707170F171F177FEE01FF160FB9FC18F0A4373E7DBD3F>I< -B6051FB512C06F5EA26F5EA2D8003F97C7FC6F16F7A26E6CED01E7A26E6CED03C7A36E6C -ED0787A26E6CED0F07A26E6C151EA36E6D143CA26E6D1478A26E6D14F0A26F6CEB01E0A3 -6F6CEB03C0A26F6CEB0780A26F6CEB0F00A36F6C131EA26F6D5AA26F6D5AA26F6D5AA393 -387FF1E0A293383FFBC0A270B45AA37090C7FCA2705AA2705AB600C0031FB612C0A2705A -A2705A5A3E7CBD63>I<B6037FB512E0A2818181D8003F6D9139001F800081A281816E7E -6E7F6E7F80826E7F6E7F6E7F6E7F157F826F7F6F7F6F7F6F7F81836F7F6F7F707E701380 -A27013C07013E07013F07013F87013FCA27013FEEF7FFF71139F7113DF8319FF83838383 -84A28484848484A284B600C080197F193F191FA24B3E7DBD52>I<ED3FFF0203B512F002 -1F14FE027F6E7E902701FFF80713E00107D9C00013F84990C7EA3FFCD93FFCEC0FFF4948 -6E7F49486E7F48496E7F4A80488448496F7EA24890C96C7E4884A249161F003F84A34848 -701380A400FF19C0AD007F19806D5EA3003F1900A26D5E6C60A26C6D4B5AA26C6D4B5A6C -6D4A5BA26C6D4A5B6C6D4A5B6D6C4A5B6DB4023F90C7FC6D01C0EBFFFE0107D9F80713F8 -010190B612E06D5E021F4AC8FC020314F0DA003F90C9FC42407ABE4F>I<B812F017FF18 -C018F018FC26003FFCC77FEF1FFF7113807113C07113E0A27113F0A319F8A819F0A34D13 -E019C05F4D1380053F1300EFFFFE91B712F860188005FCC7FC4ACAFCB3A4B77EA53D3E7D -BD47>I<B87E17FCEFFF8018F08428003FFC000113FE9338003FFF050F7F717F717FA285 -8385A761A25F61614D5B4D90C8FCEF3FFE4CB45A91B712F018C04DC9FC717E9126FC000F -7F040113F0707F717EA2717EA2717EA685A6F207C019C0A271140F07E01380B76DEBF01F -719038FC3F007190B5FC716C5B061F13F8CB000113E04A3F7DBD4E>82 -D<903A03FFC001C0011FEBF803017FEBFE0748B6128F4815DF48010013FFD80FF8130F48 -481303497F4848EB007F127F49143F161F12FF160FA27F1607A27F7F01FC91C7FCEBFF80 -6C13F8ECFFC06C14FCEDFF806C15E016F86C816C816C816C16806C6C15C07F010715E0EB -007F020714F0EC003F1503030013F8167F163F127800F8151FA2160FA27EA217F07E161F -6C16E06D143F01E015C001F8EC7F8001FEEB01FF9026FFE00713004890B55A486C14F8D8 -F81F5CD8F00314C027E0003FFEC7FC2D407ABE3A>I<003FB912FCA5903BFE003FFE003F -D87FF0EE0FFE01C0160349160190C71500197E127EA2007C183EA400FC183F48181FA5C8 -1600B3AF010FB712F8A5403D7CBC49>I<B76C90B61280A526003FFEC9003EC7FCB3B3A4 -197E011F177C80A26D17FC616D6D14014E5A6D6D4A5A6D6D140F6D01F8EC3FC0DA7FFEEC -FF8091273FFFC00F90C8FC020F90B512FC02035D020015E0031F1480030101F8C9FC493F -7DBD50>I<B600FC020FB512C0A5C66C48C9381F8000013F95C7FC80616D173E6F157E6D -177C6F15FC6D5F8118016D6D5D18036D5F6F14076D5F6F140F027F5E81181F023F93C8FC -6F5C6E153E70137E6E157C8218FC6E6D5B17016E5DEEF0036E5DEEF8076E5D16FC170F03 -7F5CEEFE1F033F91C9FC705A6F133E17BE17FE6F5BA26F5BA26F5BA26F5BA36F5BA2705A -A270CAFCA24A3F7EBD4F>I<B6D8FC03B600F090B512FEA5C601FCC7000301F0C8EA7E00 -017F6F177C856E6E17FC013F63856D6C037F4B5AA26F4A6C14036D634D7F6F18076D634D -806F02EF150F6D636F01076E131F6D04C793C7FC050F806F02835D6D1A3E051F806F0201 -157E027F197C6F013F6E13FC023FDA3E005D057E806F017C017F13016E6105FC14FE7048 -013F13036E6104C1EDFF076E4A6D5C04C31687DCE3E06D138F6E6104E716CFDCF7C06D13 -DF6E96C8FC04FF16FF6E4A6D5BA294C77E6F5FA24C80033F5FA26F486F5AA24C153F030F -5FA24C151F03075FA26F486F5A673F7EBD6C>I<007FB6013FB512F0A5D8001F01C0D900 -3FC7FC6D6D147E18FE6D6D5C6D6D495A6D4B5A6F13076D6D5C6E6C495A4D5A6EEB803F6E -01C090C8FC6E147E705A6E13F16EEBF9F86EEBFBF0EEFFE0806F5B5F816F7F81836F7F81 -834B7F4B7F5D83DB3F3F7FED7E1F03FE804B6C7F4A486C7F4A487E0207814B6C7F4A487E -4A4880023F6E7E92C76C7F027E804A8201016F7F4A6E7F495A49486E7F010F6F7F4A80B6 -00C0017F90B5FCA5483E7DBD4F>I<B600FE020FB512C0A5C66C90C9381F80006D6D4BC7 -FC6D6D157EA26D6D5D6D6D4A5A816D4C5A6D6D4A5A816D4C5A6E6C4A5A6E7F4EC8FC6E6D -137E6E7F606E6D485A6E13F84D5A6E6D485A6E13FE70485A6F495A6F139F05FFC9FC6F5B -815F6F5B816F5B5FB3A20207B612F8A54A3E7EBD4F>I<903807FFC0013F13F848B6FC48 -812607FE037F260FF8007F6DEB3FF0486C806F7EA36F7EA26C5A6C5AEA01E0C8FC153F91 -B5FC130F137F3901FFFE0F4813E0000F1380381FFE00485A5B485A12FF5BA4151F7F007F -143F6D90387BFF806C6C01FB13FE391FFF07F36CEBFFE100031480C6EC003FD91FF890C7 -FC2F2B7DA933>97 D<13FFB5FCA512077EAFEDFFE0020713FC021FEBFF80027F80DAFF81 -13F09139FC003FF802F06D7E4A6D7E4A13074A80701380A218C082A318E0AA18C0A25E18 -80A218005E6E5C6E495A6E495A02FCEB7FF0903AFCFF01FFE0496CB55AD9F01F91C7FCD9 -E00713FCC7000113C033407DBE3A>I<EC7FF00107B5FC011F14C0017F14E09039FFF01F -F0489038800FF848EB001F4848EB3FFC120F485AA2485AA2007FEC1FF849EB0FF0ED03C0 -00FF91C7FCAB127F7FA3003F153E7F001F157E6C6C147C6C6C14FC91388001F86C9038C0 -03F0C69038F81FE06DB512C0011F14800107EBFE009038007FF0272B7DA92E>I<EE07F8 -ED07FFA5ED003F161FAFEC7FF0903807FFFE011FEBFF9F017F14DF9039FFF01FFF48EBC0 -0348EB00014848EB007F485A001F153F5B123FA2127F5BA212FFAA127FA37F123FA26C6C -147F120F6D14FF6C6C01037F6C6D48EBFFE06CEBF03F6C6CB512BF6D143F010713FC0100 -01E0EBE00033407DBE3A>I<ECFFF0010713FE011F6D7E017F809039FFE07FE048903880 -1FF048496C7E48486D7E48486D7E121F491301003F81A2485A6F1380A212FFA290B7FCA4 -01F0C9FCA5127FA27F123FEE0F806C7E161F6C6C15006C6C5C6C6D137E6C9038E001FC6C -9038F80FF8013FB55A6D14C0010391C7FC9038007FF8292B7DA930>I<EC07FE91387FFF -8049B512C0010714E090390FFE3FF0EB1FF090393FE07FF8EB7FC013FF1480A248903800 -3FF0ED1FE0ED0FC092C7FCAAB612E0A500010180C7FCB3AC007FEBFF80A525407DBF20> -I<903A03FF8007F0013F9038F83FF8499038FCFFFC48B712FE48018313F93A07FC007FC3 -4848EB3FE1001FEDF1FC4990381FF0F81700003F81A7001F5DA26D133F000F5D6C6C495A -3A03FF83FF8091B5C7FC4814FC01BF5BD80F03138090CAFCA2487EA27F13F06CB6FC16F0 -16FC6C15FF17806C16C06C16E01207001F16F0393FE000034848EB003F49EC1FF800FF15 -0F90C81207A56C6CEC0FF06D141F003F16E001F0147FD81FFC903801FFC02707FF800F13 -006C90B55AC615F8013F14E0010101FCC7FC2F3D7DA834>I<13FFB5FCA512077EAFED1F -F8EDFFFE02036D7E4A80DA0FE07F91381F007F023C805C4A6D7E5CA25CA35CB3A4B5D8FE -0FB512E0A5333F7CBE3A>I<EA01F8487E487E487E481380A66C13006C5A6C5A6C5AC8FC -A913FFB5FCA512077EB3ABB512F8A515407CBF1D>I<13FFB5FCA512077EB3B3AFB512FC -A5163F7CBE1D>108 D<01FFD91FF8ECFFC0B590B5010713F80203DAC01F13FE4A6E487F -DA0FE09026F07F077F91261F003FEBF8010007013EDAF9F0806C0178ECFBC04A6DB4486C -7FA24A92C7FC4A5CA34A5CB3A4B5D8FE07B5D8F03FEBFF80A551297CA858>I<01FFEB1F -F8B5EBFFFE02036D7E4A80DA0FE07F91381F007F0007013C806C5B4A6D7E5CA25CA35CB3 -A4B5D8FE0FB512E0A533297CA83A>I<EC7FF0903803FFFE011FEBFFC0017F14F09039FF -E03FF8489038800FFC3A03FE0003FE48486D7E000F168048486D13C0A2003F16E049147F -007F16F0A400FF16F8AA007F16F0A46C6CECFFE0A2001F16C06C6C491380A26C6C491300 -3A03FF800FFE6C9038E03FFC6C6CB512F0011F14C0010791C7FC9038007FF02D2B7DA934 ->I<01FFEBFFE0B5000713FC021FEBFF80027F80DAFF8113F09139FC007FF8000701F06D -7E6C496D7E4A130F4A6D7E1880A27013C0A38218E0AA4C13C0A318805E18005E6E5C6E49 -5A6E495A02FCEBFFF0DAFF035B92B55A029F91C7FC028713FC028113C00280C9FCACB512 -FEA5333B7DA83A>I<3901FE01FE00FF903807FF804A13E04A13F0EC3F1F91387C3FF800 -0713F8000313F0EBFFE0A29138C01FF0ED0FE091388007C092C7FCA391C8FCB3A2B6FCA5 -25297DA82B>114 D<90383FFC1E48B512BE000714FE5A381FF00F383F800148C7FC007E -147EA200FE143EA27E7F6D90C7FC13F8EBFFE06C13FF15C06C14F06C806C806C806C80C6 -1580131F1300020713C014000078147F00F8143F151F7EA27E16806C143F6D140001E013 -FF9038F803FE90B55A15F0D8F87F13C026E00FFEC7FC222B7DA929>I<EB07C0A5130FA4 -131FA3133F137FA213FF5A1207001FEBFFFEB6FCA40001EBC000B3151FA96CEBE03EA201 -7F137EECF8FC90383FFFF86D13F0010713E001001380203B7EB929>I<D9FF80EB0FF8B5 -EB0FFFA50007EC007F6C153FB3A5167FA316FF6C5C4B7F6C903AC007DFFFE09138F01F9F -6DB5121F6D13FE010F13F8010101E0EBE000332A7CA83A>I<B500FC90383FFFC0A50001 -01C0903803E0006E1307A26C5E6E130F017F5D6E131F013F92C7FC6E5B011F143E6E137E -010F147C6E13FCA26D5C15816D5C15C36D5C15E76D5C15FF6E5BA36E90C8FCA26E5AA26E -5AA26E5AA26E5AA232287EA737>I<B53CFC3FFFFC03FFFEA50003D980009039C0000F80 -6E161F6C037F15006E496C5B6C183E836E48157E017F177C6E486D13FC013F02EF5C83DA -FC071401011F02C75CDAFE0FEBFE03010F02835C17FFDAFF1F14076D02015C03BF148F6D -D9BE005C18CF03FE14DF6D49017F90C7FC18FF6D496D5AA36E486D5AA26E486D5AA36E48 -6D5AA26E486D5A47287EA74C>I<B5D8FC03B51280A5C69026E0007FC7FC6E13FE6D6C5B -6D6C485A6D6C485A010F13076D6C485AED9FC06DEBFF806D91C8FC6D5B6E5AA2143F6E7E -140F814A7F4A7F4A7F02FE7F903801FC7F49486C7E02F07F49486C7E49486C7E011F7F49 -486C7FD97F008001FE6D7FB5D8C007EBFFC0A532287EA737>I<B500FC90383FFFC0A500 -0101C0903803E0006E1307A26C5E6E130F017F5D6E131F013F92C7FC6E5B011F143E6E13 -7E010F147C6E13FCA26D5C15816D5C15C36D5C15E76D5C15FF6E5BA36E90C8FCA26E5AA2 -6E5AA26E5AA26E5AA35D14075D000E130FD83F805B387FC01FD8FFE090C9FC5C143E147E -5CEBC1F8387FC3F0387E0FE06CB45A6C5B6C48CAFCEA03F8323B7EA737>I -E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: FC cmcsc10 10.95 17 -/FC 17 122 df<ED03C0A34B7EA24B7EA34B7EA3ED3BFCA3ED71FEA2EDF1FF15E0A20201 -80EDC07FA2DA03807F163FA24A486C7EA24A80020E130FA2021E80021C1307A2023C8002 -381303A24A6D7EA34A6D7EA249B77EA3D903C0C76C7E4A143FA249C87F171FA2010E6F7E -A2011E82011C1507A2013C820138150313788401FC1501486C4B7ED80FFF030F1380B500 -F049B6FCA340417CC04A>65 D<B612F0A3000101E0C9FC38007F80B3B0EF01C0A5170318 -80A41707A3170FA2171F173F177FEFFF00160348486C133FB9FCA3323E7BBD3E>76 -D<B712E016FE707E00019039C0007FF06C6C48EB0FF8EE03FE707E707F717E717EA28417 -1F84A760173F60604D5A4DC8FC4C5A4C5AEE0FF0EE7FC091B500FEC9FC16F891388000FE -EE3F80EE0FE0707E707E83160183160083A384A484A4725AF10380A2177F18F0053FEB07 -002601FFE015F8B600C0011F5B94380FFC0E943803FE1CCBEAFFF8F01FE041407BBD49> -82 D<EC01E0A24A7EA34A7EA34A7EA24A7E141CA2EC3CFFEC387FA24A6C7EA34A6C7EA2 -010180ECC00FA249486C7EA349486C7EA24980010E1301010FB5FC4980A2011CC7FC4914 -7FA20178810170143FA201F08149141F1201486C811207486CEC3FF8D8FFFE49B512C0A3 -32317DB038>97 D<B612FEEDFFC016F03A03FC0007F86C48EB01FE1500167F1780163F17 -C0A61780167F170016FE4B5AED07F0ED7FE090B6128016F09039F80001FC6F7EEE7F8016 -3FEE1FC017E0160F17F0A617E0161FA2EE3FC0EE7F80923801FF00486CEB07FEB712F85E -93C7FC2C2F7CAE35>I<B612FCEDFFC016F03A03FE000FF86C48EB01FEED007FEE3F80EE -1FC0EE0FE0EE07F0160317F8160117FCA2EE00FEA417FFAA17FEA3EE01FCA3EE03F817F0 -1607EE0FE017C0EE3F80EE7F00ED01FE486CEB0FFCB712F016C04BC7FC302F7CAE39> -100 D<B8FCA33903FE00016C489038003F80161F160F1607A21603A317C0ED1C01A393C7 -FCA2153CA215FC90B5FCA3EBFC00153CA2151CA21770A392C712E0A41601A2EE03C0A216 -07160F161F486C14FFB81280A32C2F7CAE33>I<B712FEA33903FE00036C48EB007F8282 -82A282A3EE0380A21538A293C7FCA31578A2EC01F890B5FCA3EBFC01EC0078A21538A592 -C8FCAA487EB512FCA3292F7CAE31>I<B5D8F81FB5FCA3D803FEC7EA7FC06C48EC3F80B1 -90B7FCA301FCC7123FB3486CEC7FC0B5D8F81FB5FCA3302F7CAE38>104 -D<B512FCA3D803FEC8FC6C5AB3A7160EA4161CA4163CA2167C16FC1501ED03F8486C131F -B7FCA3272F7CAE2F>108 D<D8FFFC49B5FC7F7F00019138001FF06EEB0FE06EEB07C0EE -0380EBDFE0EBCFF013C780EBC3FC13C180EBC0FF801580EC3FC0EC1FE0A2EC0FF0EC07F8 -A2EC03FCEC01FE140015FFED7F83153F16C3ED1FE3ED0FF3A2ED07FBED03FFA28181A216 -7F163F486C141F487E486C140FB56C1307A21603302F7CAE38>110 -D<EC1FF891B5FC903907F00FE090390FC003F0013FC712FC017E147E49804848EC1F8048 -48EC0FC04848EC07E0000F16F0491403001F16F8491401003F16FCA2007F16FE90C9FCA3 -4816FFAA6C6CEC01FEA3003F16FCA26D1403001F16F86C6CEC07F0A26C6CEC0FE0000316 -C06C6CEC1F806C6CEC3F00017E147E6D5C90390FC003F0903907F00FE00100B5C7FCEC1F -F830317BAF3A>I<B612FCEDFF8016E03A03FE000FF86C48EB03FCED00FE167FA2EE3F80 -A217C0A61780A2EE7F00A216FEED03F8ED0FF090B612C093C7FC01FCC9FCB2487EB512F8 -A32A2F7CAE33>I<B612E015FE6F7E3A03FE003FE06C48EB07F8ED01FC6F7EA2828283A5 -94C7FC5E5E4B5A4B5A4B5AED3FC090B500FEC8FC5D9038FC007FED1F806F7E826F7EA26F -7EA582A4EF01C016FEA21501486CED0380B538F800FF93383F8700EE1FFEC9EA03F83230 -7CAE37>114 D<007FB712F8A39039801FF0073A7E000FE00000781678A20070163800F0 -163CA348161CA5C71500B3A8EC3FF8011FB512F0A32E2E7CAD36>116 -D<B5D8F801B5FCA3D803FEC7EA1FF06C48EC0FE0EE07C0EE0380B3AB16076C6C1500A201 -7E5C017F141E6D141C6D6C133C6D6C5B6D6C485A903903FC07E00100B51280DA3FFEC7FC -EC07F830307CAE38>I<B500E0903807FFF0A3000790C7000113800001923800FE006C16 -F86E5C017F4A5A6D7E6E495A011F5D6D6C13076E49C7FC0107140E6D6C131E6E5B010114 -386D6C13786F5A027F5BEC3FC191381FE3C05EEC0FF76EB4C8FC5D14036E5AB04A7E91B5 -12F0A3342F7EAE38>121 D E -%EndDVIPSBitmapFont -%DVIPSBitmapFont: FD cmr10 10.95 91 -/FD 91 125 df<16E04B7EA24B7EA24B7EA24B7EA2ED1DFFA203387FA29238787FC01570 -9238F03FE015E002016D7E15C002036D7E158002076D7E15004A6D7E140E021E6D7E141C -023C6D7F143802786E7E147002F06E7E5C01016F7E5C01036F7E5C01076F7E91C8FC496F -7E130E011E6F7E131C013C6F7F13380178707E137001F0707E5B0001717E5B0003717E5B -0007717E90CAFC48717E120E001E717E001FBAFC481980A24819C0A2BB12E0A243417CC0 -4C>1 D<913801FFC0021F13FC9139FF007F80D903F8EB0FE0D90FF0EB07F8D91FC0EB01 -FCD97F806DB4FC49C86C7E48486F7E00038348486F7E000F8349150F001F83491507003F -83A348486F7EAA6C6C4B5AA3001F5FA26C6C4B5AA200075F6D151F00035FA26C6C4B5A00 -005FA2017F4BC7FC6D157EA26D6C5C010F5DA26D6C495A00E0EF0380010315E0D8700192 -38C007006E130301001580A36C0160EC000E003C017049131E263FFFF0ECFFFEA36C5FA3 -39407CBF42>10 D<4AB4EB0FE0021F9038E03FFC913A7F00F8FC1ED901FC90383FF03FD9 -07F090397FE07F80494801FF13FF4948485BD93F805C137F0200ED7F00EF003E01FE6D91 -C7FC82ADB97EA3C648C76CC8FCB3AE486C4A7E007FD9FC3FEBFF80A339407FBF35>I<EC -03FE91383FFF809138FE03E0903903F800F0D90FE013384948137C90393F8001FE90387F -00035B5BA2485A6F5AED007093C7FCAA16FEB7FCA33901FC000315011500B3AC486C497E -B5D8F87F13FCA32E407EBF33>I<EC03FF023F13EE9138FE01FEEB03F090380FE003EB1F -C0EB3F80EB7F005B5B150148481300AEB7FCA3D801FCC7FCB3AE486C497EB5D8F87F13FC -A32E407EBF33>I<DA03FE49B4FC91273FFF801F13C0913BFE03E07F01F0903C03F000F1 -FC0078D90FE0D97FF0131C49484948133E4948484913FF494848495A5B491500A248485C -03016E5A0300153896C7FCAA197FBBFCA3D801FCC738FE00018485B3AC486C496CECFF80 -B5D8F87FD9FC3F13FEA347407EBF4C>I<121EEA7F80EAFFC0A9EA7F80ACEA3F00AC121E -AB120CC7FCA8121EEA7F80A2EAFFC0A4EA7F80A2EA1E000A4179C019>33 -D<001E130F397F803FC000FF137F01C013E0A201E013F0A3007F133F391E600F30000013 -00A401E01370491360A3000114E04913C00003130101001380481303000EEB070048130E -0018130C0038131C003013181C1C7DBE2D>I<013F1603D9FFC04B7E2601E0E0150F2607 -C070151F48486C4BC7FC023E157E48486C15FE48D90FC0EB03FC003ED90EF0EB0FF8DA0F -3F13FD007E903A070FFFF1F0007C0200EB03E0160000FC6D6C495A170F604DC8FC5F173E -5F17FC5F4C5A1603007CD907005B4C5A007E150F003E495C020E49C9FC003F5D6C49133E -260F803C5B023813FC6C6C485B3A01E0E001F03800FFC090273F0003E0133F90C70007EC -FFC09339C001E0E0923A0F8007C070031F49487E0400143C033E90381F001C037E497F03 -7C133E4B150F0201027E7F4B137C4A5A020702FCEB03805D4A5A141F92C7FC143E147E14 -7C5CA2495A0103037CEB07005C4948147E010F033E5B4A160E49C8123F496F5B013E9238 -0F803C49173801FC6F6C5A49923801E0E0496FB45A0160043FC7FC41497BC34C>37 -D<EC0F80EC7FE0ECF870903803E0380107133CECC01CEB0F80011F131E150EA2EB3F00A5 -5D1480A25D157815705D6D6C5A14C1ECC38002C7CAFC02EE91387FFFFCEB0FEC14FC4A02 -0713C06D48913801FE006E5DEF00F06D7E01074B5A496C5D011D1503D939FF4A5A017093 -C7FC496D5B0001017F140E496C6C131E00036E131C2607801F143C000F6E5B001F6D6C13 -70263F000714F0486E485ADA03FE5B913801FF03486D495A0487C8FCED7FCFED3FFE6F48 -14386D5C150F007F6E6C14786D6D6C1470003F4A6C14F06D496C6C13E0001F91393E3FC0 -016C6C903AFC1FF003C03D07FC07F007FC1F800001B5D8C001B512006C6C90C7EA7FFCD9 -0FF8EC0FF03E437CC047>I<121EEA7F8012FF13C0A213E0A3127FEA1E601200A413E013 -C0A312011380120313005A120E5A1218123812300B1C79BE19>I<1430147014E0EB01C0 -EB03801307EB0F00131E133E133C5B13F85B12015B1203A2485AA2120F5BA2121F90C7FC -A25AA3123E127EA6127C12FCB2127C127EA6123E123FA37EA27F120FA27F1207A26C7EA2 -12017F12007F13787F133E131E7FEB07801303EB01C0EB00E014701430145A77C323>I< -12C07E12707E7E121E7E6C7E7F12036C7E7F12007F1378137CA27FA2133F7FA21480130F -A214C0A3130714E0A6130314F0B214E01307A614C0130FA31480A2131F1400A25B133EA2 -5BA2137813F85B12015B485A12075B48C7FC121E121C5A5A5A5A145A7BC323>I<150615 -0FB3A9007FB912E0BA12F0A26C18E0C8000FC9FCB3A915063C3C7BB447>43 -D<121EEA7F8012FF13C0A213E0A3127FEA1E601200A413E013C0A312011380120313005A -120E5A1218123812300B1C798919>I<B512FEA617067F961E>I<121EEA7F80A2EAFFC0A4 -EA7F80A2EA1E000A0A798919>I<ED0180ED03C01507A21680150FA216005DA2151E153E -A2153C157CA2157815F8A25D1401A25D1403A25D1407A25D140FA24AC7FCA2141E143EA2 -143C147CA2147814F8A25C1301A25C1303A25C1307A25C130FA291C8FC5BA2131E133EA2 -5BA2137813F8A25B1201A25B1203A25B1207A25B120FA290C9FC5AA2121E123EA2123C12 -7CA2127812F8A25A1260225B7BC32D>I<EB01FE90380FFFC090383F03F090387C00F849 -137C48487F48487F4848EB0F80A2000F15C04848EB07E0A3003F15F0A290C712034815F8 -A64815FCB3A26C15F8A56C6CEB07F0A3001F15E0A36C6CEB0FC0A26C6CEB1F8000031500 -6C6C133E6C6C5B017C5B90383F03F090380FFFC0D901FEC7FC263F7DBC2D>I<EB01C013 -031307131F137FEA07FFB5FC139FEAF81F1200B3B3ACEB7FF0B612F8A31D3D78BC2D>I< -EB07FC90383FFF8090B512E03903F01FF83907C007FC390F0001FE001E6D7E001C158000 -3CEC7FC05AED3FE01270B4FC6DEB1FF07FA56C5A6CC7FC120CC813E0153FA216C0157F16 -8015FF16004A5A5D4A5A4A5A5D4A5A4A5A4AC7FC147E147C5C495A495A495A495A49C712 -70133E133C5B4914E0485A485A485A48C7120148B6FCA25A4815C0B7FCA3243D7CBC2D> -I<EB07FC90383FFF809038F80FE03901E003F839078001FCD80F007F000E6D7E001E1580 -D81F80137F486C14C07FA27F5BA2121F6C5AC8138015FF1600A24A5AA24A5A5DEC07E04A -5A023FC7FCEB1FFCECFF809038000FE0EC07F86E7E6E7E6E7E1680ED7FC0A216E0153FA2 -16F0A2120C123F487E487EA316E0A249137F6CC713C01278EDFF807E6C4913006C495A39 -07C007FC3903F80FF0C6B55A013F1380D907F8C7FC243F7CBC2D>I<150E151E153EA215 -7EA215FE1401A21403EC077E1406140E141CA214381470A214E0EB01C0A2EB0380EB0700 -A2130E5BA25B5BA25B5B1201485A90C7FC5A120E120C121C5AA25A5AB8FCA3C8EAFE00AC -4A7E49B6FCA3283E7EBD2D>I<00061403D80780131F01F813FE90B5FC5D5D5D15C092C7 -FC14FCEB3FE090C9FCACEB01FE90380FFF8090383E03E090387001F8496C7E49137E497F -90C713800006141FC813C0A216E0150FA316F0A3120C127F7F12FFA416E090C7121F12FC -007015C012780038EC3F80123C6CEC7F00001F14FE6C6C485A6C6C485A3903F80FE0C6B5 -5A013F90C7FCEB07F8243F7CBC2D>I<EC1FE0ECFFF8903803F03E90380FC00F90391F00 -0780133E017EEB1FC049133F4848137F12035B12074848EB3F80ED1F00001F91C7FC5BA2 -123FA3485AA214FE903887FF8039FF8F07E090389C01F09038B800FC01B0137E13F0497F -16804914C0A2ED1FE0A34914F0A5127FA6123F6D14E0A2121FED3FC0A26C6C1480A20007 -EC7F006C6C137E6C6C5B6C6C485A90387E07F06DB45A010F1380D903FCC7FC243F7CBC2D ->I<1238123C123F90B612FCA316F85A16F016E00078C712010070EC03C0ED078016005D -48141E151C153C5DC8127015F04A5A5D14034A5A92C7FC5C141EA25CA2147C147814F8A2 -13015C1303A31307A3130F5CA2131FA6133FAA6D5A0107C8FC26407BBD2D>I<EB03FC90 -381FFF8090387C07E09038F001F83901E0007C48487F48487F48C7FCED0F80121E16C000 -3E1407A4123FA26DEB0F807F6C6C131F6D140001FC133E6C6C5B9038FF80786C6D5A6CEB -F3E06CEBFF806C91C7FC133F6D13C06D7F013F13F801787F48486C7E3903E01FFF48486C -1380260F800313C048487E489038007FE0003E143F007E141F007CEC0FF01507481403A3 -1501A46C15E0007C1403A2007E15C06C14076CEC0F806DEB1F006C6C133ED807F05B3901 -FC03F86CB512E0011F1380D903FCC7FC243F7CBC2D>I<EB03FCEB1FFF90387E07C09038 -FC03F048486C7E48486C7E4848137C000F147E4848137F81003F15805B007F15C0A2151F -12FF16E0A516F0A5127F153FA36C7EA2001F147F120F6C6C13FF6D13DF000313013900F8 -039F90387E0F1FD91FFE13E0EB07F090C7FCA2ED3FC0A41680157FD80F801400487E486C -13FEA24A5A5D49485AEB8007391E000FE0001F495A260FC07FC7FC3803FFFE6C13F83800 -3FC0243F7CBC2D>I<121EEA7F80A2EAFFC0A4EA7F80A2EA1E00C7FCB3121EEA7F80A2EA -FFC0A4EA7F80A2EA1E000A2779A619>I<121EEA7F80A2EAFFC0A4EA7F80A2EA1E00C7FC -B3121E127FEAFF80A213C0A4127F121E1200A412011380A3120313005A1206120E120C12 -1C5A1230A20A3979A619>I<007FB912E0BA12F0A26C18E0CDFCAE007FB912E0BA12F0A2 -6C18E03C167BA147>61 D<EB1FF890B5FC3903E01FC0390F0007F0001EEB03F848EB01FC -4814FE140000FE14FF7E7FA46CC7FC123EC7EA01FEA2EC03FCEC07F815F0EC0FC0EC1F80 -EC3F00143E5C147814F85C13015CA2495AA25CAB91C7FC90C8FCA8EB0780EB1FE0A2497E -A46D5AA2EB078020407BBF2B>63 D<15074B7EA34B7EA34B7EA34B7EA34B7E15E7A29138 -01C7FC15C3A291380381FEA34AC67EA3020E6D7EA34A6D7EA34A6D7EA34A6D7EA34A6D7E -A349486D7E91B6FCA249819138800001A249C87EA24982010E157FA2011E82011C153FA2 -013C820138151FA2017882170F13FC00034C7ED80FFF4B7EB500F0010FB512F8A33D417D -C044>65 D<B712FCEEFF8017F00001903980000FF86C6CC7EA03FE707E701380EF7FC0EF -3FE0A2EF1FF0A218F8A3170F171FA318F0A2EF3FE0177F18C0EFFF804C1300EE03FCEE0F -F8EE7FE091B6C7FC17E091C7EA07FCEE01FE933800FF80EF7FC0EF3FE0EF1FF018F8170F -18FC1707A218FEA718FC170FA2EF1FF818F0173FEF7FE0EFFFC00403138048486C90380F -FE00B85A17E094C7FC373E7DBD40>I<DB3FF01306912603FFFE130E020F9038FF801E91 -3A3FF007E03E9139FF8000F8D903FEC7EA7C7ED907F8EC1EFE4948140FD93FE014074948 -1403495A91C812014848150012034848167E5B000F173EA24848161EA2123F5B180E127F -A349160012FFAC127F7F180EA2123FA27F001F171E181C6C7EA20007173C6D16386C6C16 -78000117706C6C16F06EEC01E06D6C15C06D6C1403D90FF0EC07806D6CEC1F00D903FE14 -3E902600FF8013F891393FF007F0020FB512C0020391C7FC9138003FF037427BBF42>I< -B712FCEEFF8017E000019039C0001FF86C6C48EB03FEEE00FF717E717EEF0FE084717E71 -7E170184717EA21980187F19C0A3F03FE0A519F0AB19E0A5F07FC0A21980A218FF19004D -5AA24D5A6017074D5A4D5AEF7FC04DC7FCEE03FE48486CEB1FF8B85A178004FCC8FC3C3E -7DBD45>I<B912E0A300019038C000016C6C48EB001FEF0FF01703A217011700A31870A4 -18381638A41800A21678A216F81501150791B5FCA3EC8007150115001678A21638A2180E -A3181C93C7FCA4183C1838A21878A318F8EF01F0A21707170F173F48486CEB03FFB912E0 -A3373E7DBD3E>I<B91280A300019038C000036C6C48EB007FEF1FC0170F1707A21703A3 -1701A4EF00E0A21638A31800A31678A216F81501150791B5FCA3EC8007150115001678A2 -1638A693C8FCAF3801FFE0B612F0A3333E7DBD3B>I<DB3FE0130C912603FFFE131C021F -9038FF803C913A7FF00FC07C9139FF0001F0D903FC90380078FC4948143DD91FE0141F49 -48140F4948140701FF15034890C8FC491501485A000716005B000F177C5B001F173CA248 -5AA2181C127FA25B95C7FC12FFAB041FB512F0127FA26D9139000FFE00EF03FC123FA27F -121FA26C7EA212077F12036C7E7F6C7F6D6C14076D7E6D6C140FD907F8141ED903FEEC3C -7C902600FF80EBF83C913A7FF007F01C021FB5EAC00C020391C8FC9138003FF03C427BBF -47>I<B6D8C01FB512F8A3000101E0C7383FFC0026007F80EC0FF0B3A691B7FCA30280C7 -120FB3A92601FFE0EC3FFCB6D8C01FB512F8A33D3E7DBD44>I<B612F0A3C6EBF000EB3F -C0B3B3B2EBFFF0B612F0A31C3E7EBD21>I<011FB512FCA3D9000713006E5A1401B3B3A6 -123FEA7F80EAFFC0A44A5A1380D87F005B007C130700385C003C495A6C495A6C495A2603 -E07EC7FC3800FFF8EB3FC026407CBD2F>I<B600C090387FFFFCA3000101E0C7000F1380 -26007F80913807FE0018F818E0604D5A4DC7FC173E5F5F4C5A4C5A4C5A4C5A4CC8FC163E -5E5E4B5A4B5AED07804B7E151F4B7E4B7E15FF913881EFF8913883C7FCEC878791388F03 -FE91389E01FF14BCDAF8007F4A6D7E5C4A6D7E4A6D7EA2707E707EA2707E707EA2707F71 -7E84173F717E717EA2717E848419802601FFE04A13C0B600C090B6FCA3403E7DBD47>I< -B612F8A3000101E0C9FC38007F80B3B0EF0380A517071800A45FA35FA25F5F5F4C5A1607 -48486C133FB8FCA3313E7DBD39>I<B500C093B512C0A300016D4BEBE000D8007F1880D9 -77F0ED03BFA3D973F8ED073FA3D971FC150EA2D970FE151CA3027F1538A36E6C1470A36E -6C14E0A26E6CEB01C0A36E6CEB0380A36E6CEB0700A26E6C130EA36E6C5BA3037F5BA26F -6C5AA36F6C5AA392380FE1C0A3923807F380A26FB4C7FCA36F5AA213F8486C6D5AD807FF -EFFFE0B500F80178017FEBFFC0A34A3E7CBD53>I<B56C91B512F88080D8007F03071300 -6EEC01FC6E6E5A1870EB77FCEB73FEA2EB71FF01707FA26E7E6E7EA26E7E6E7EA26E7E6E -7EA26E7E6E7FA26F7E6F7EA26F7E6F7EA26F7E6F7EA26F7E6F1380A2EE7FC0EE3FE0A2EE -1FF0EE0FF8A2EE07FCEE03FEA2EE01FF7013F0A2177F173FA2171F170FA2170701F81503 -487ED807FF1501B500F81400A218703D3E7DBD44>I<ED7FE0913807FFFE91391FC03F80 -91397E0007E04948EB03F8D907F0EB00FE4948147F49486E7E49486E7E49C86C7E01FE6F -7E00018349150300038348486F7EA248486F7EA2001F188049167F003F18C0A3007F18E0 -49163FA300FF18F0AC007F18E06D167FA4003F18C0A26C6CEEFF80A36C6C4B1300A26C6C -4B5A00035F6D150700015F6C6C4B5A6D5E6D6C4A5A6D6C4A5A6D6C4AC7FC6D6C14FED901 -FCEB03F8D9007FEB0FE091391FC03F80912607FFFEC8FC9138007FE03C427BBF47>I<B7 -12F8EEFF8017E000019039C0003FF86C6C48EB07FCEE01FE707EEF7F80EF3FC018E0A2EF -1FF0A218F8A818F0A2EF3FE0A218C0EF7F80EFFF004C5AEE07FCEE3FF091B612C04CC7FC -0280C9FCB3A73801FFE0B612C0A3353E7DBD3E>I<ED7FE0913807FFFE91391FC03F8091 -397F000FE0D901FCEB03F8D907F0EB00FE4948147F49486E7E49486E7E49C86C7E498248 -486F7E49150300038348486F7EA2000F834981001F1880A24848EE7FC0A3007F18E0A249 -163FA200FF18F0AC007F18E0A26D167FA3003F18C0A26C6CEEFF80A3000F18006D5D0007 -DA0F805B6C6C90393FE003FCED70706C6C496C485A6C6C48486C485A017FD9800E5BD93F -819038061FC0D91FC19038073F80D90FE14AC7FCD907F1EB03FE902601FDC013F8903A00 -7EE007E091271FF03FC013180207B5FC9139007FE1E0DB0001143883711378A2706C13F0 -EFFF0318FFA27113E0A37113C0711380711300715AEF01F83D527BBF47>I<B712C016FC -EEFF800001D9C00013E06C6C48EB1FF0EE07FCEE01FE707E84717EA2717EA284A760177F -606017FF95C7FCEE01FCEE07F8EE1FE0EEFF8091B500FCC8FC16F091388001FCED003FEE -1FC0707E707E83160383160183A383A484A4F0C004190EA28218E0057F131E2601FFE016 -1CB600C0EB3FF094381FF83805071370CA3801FFE09438003F803F407DBD43>I<D907FC -131890391FFF8038017FEBE0783901FC03F83A03F0007CF8D807C0133F4848130F001F14 -0748C7FC003E1403007E1401A2007C140012FC1678A46C1538A27EA26C6C14007F7FEA3F -F8EBFF806C13F86CEBFF806C14F06C14FC6C14FF6C15C0013F14E0010714F0EB007F0207 -13F89138007FFC150FED07FE15031501ED00FFA200E0157FA3163FA27EA3163E7E167E6C -157C6C15FC6C15F86D13016DEB03F06DEB07E0D8F9FCEB0FC03AF07F803F8090391FFFFE -00D8E00713F839C0007FC028427BBF33>I<003FB91280A3903AF0007FE001018090393F -C0003F48C7ED1FC0007E1707127C00781703A300701701A548EF00E0A5C81600B3B14B7E -4B7E0107B612FEA33B3D7DBC42>I<B600C090B512F8A3000101E0C70007130026007F80 -EC01FC715A1870B3B3A4013F16F06E5DA21701011F5E80010F15036E4A5A010793C7FC6D -6C5C6D6C141E6D6C5C027F14F86E6C485A91390FF00FE00203B51280020049C8FCED1FF0 -3D407DBD44>I<B691380FFFFEA3000301E0020113E06C01809138007F806CEF3F00017F -163E181C6E153C013F1638A26E1578011F1670A26D6C5DA26E140101075EA26E14030103 -5EA26D6C4AC7FCA2806D150EA26F131E027F141CA26F133C023F1438A26E6C5BA26F13F0 -020F5CA2EDF80102075CA26E6C485AA2EDFE07020191C8FCA26F5A6E130EA2ED7F9CA216 -DCED3FF8A36F5AA36F5AA26F5AA36F5A3F407EBD44>I<B500FE017FB5D88007B5FCA300 -0301C0010101E0C713F86C90C849EC3FE07148EC0F807E7215006E143F017F190E84A26D -6C60A24D7E6D6C60A2EFE7F86D6C60A2933801C3FC6E18F001076104037F6E0281140101 -036104077F17006D6C4D5AA2040EEB7F806D6C4DC7FCA24CEB3FC0DA7F80160EA24CEB1F -E003C0161E023F171C047814F0DBE070010F133C021F173804F014F84C1307DA0FF05EA2 -DBF1C0EB03FCDA07F95EA2DBFB80EB01FEDA03FF6F5AA293C8FCA26E5FA24B157F020094 -C8FCA24B81037C153EA20378151E0338151C58407EBD5D>I<007FB5D8C003B512E0A3C6 -49C7EBFC00D93FF8EC3FE06D48EC1F806D6C92C7FC171E6D6C141C6D6C143C5F6D6C1470 -6D6D13F04C5ADA7FC05B023F13036F485ADA1FF090C8FC020F5BEDF81E913807FC1C163C -6E6C5A913801FF7016F06E5B6F5AA26F7E6F7EA28282153FED3BFEED71FF15F103E07F91 -3801C07F0203804B6C7EEC07004A6D7E020E6D7E5C023C6D7E02386D7E14784A6D7E4A6D -7F130149486E7E4A6E7E130749C86C7E496F7E497ED9FFC04A7E00076DEC7FFFB500FC01 -03B512FEA33F3E7EBD44>I<B66C0103B51280A3000101F0C8EBF8006C6C48ED3FC0725A -013F041EC7FC6D7E606D6C15386D6C1578606D6C5D6E14016D5E6D6D1303606E6C49C8FC -6E6C5B170E6E6C131E171C6E6C5B6E6C137817706E6C13F06F5B6E13016EEB83C05FED7F -C7DB3FE7C9FC16EFED1FFE5E150F6F5AB3A4ED1FFC020FB512FCA3413E7FBD44>I<003F -B712F8A391C7EA1FF013F801E0EC3FE00180EC7FC090C8FC003EEDFF80A2003C4A130000 -7C4A5A12784B5A4B5AA200704A5AA24B5A4B5AA2C8485A4A90C7FCA24A5A4A5AA24A5AA2 -4A5A4A5AA24A5A4A5AA24990C8FCA2495A4948141CA2495A495AA2495A495A173C495AA2 -4890C8FC485A1778485A484815F8A24848140116034848140F4848143FED01FFB8FCA32E -3E7BBD38>I<EAFFFCA4EAF000B3B3B3B3ABEAFFFCA40E5B77C319>I<486C13C000031301 -01001380481303000EEB070048130E0018130C0038131C003013180070133800601330A3 -00E01370481360A400CFEB678039FFC07FE001E013F0A3007F133FA2003F131F01C013E0 -390F0007801C1C73BE2D>I<EAFFFCA4EA003CB3B3B3B3ABEAFFFCA40E5B7FC319>I<121E -EA7F80A2EAFFC0A4EA7F80A2EA1E000A0A79BD19>95 D<EA0180120313005A120E5A1218 -1238123012701260A312E05AA412CFEAFFC013E0A3127FA2123F13C0EA0F000B1C7ABE19 ->I<EB0FF8EBFFFE3903F01F8039078007E0000F6D7E9038E001F8D81FF07F6E7EA3157F -6C5AEA0380C8FCA4EC1FFF0103B5FC90381FF87FEB7F803801FC00EA07F8EA0FE0485A48 -5AA248C7FCEE038012FEA315FFA3007F5BEC03BF3B3F80071F8700261FC00E13CF3A07F0 -3C0FFE3A01FFF807FC3A003FC001F0292A7DA82D>I<EA01FC12FFA3120712031201B1EC -03FC91381FFF8091387C07E09039FDE001F09039FFC000FC4A137E91C77E49158049141F -17C0EE0FE0A217F0A2160717F8AA17F0A2160FA217E0161F17C06D1580EE3F006D5C6E13 -FE9039F3C001F89039F1E003F09039E0780FC09026C03FFFC7FCC7EA07F82D407EBE33> -I<49B4FC010F13E090383F00F8017C131E4848131F4848137F0007ECFF80485A5B121FA2 -4848EB7F00151C007F91C7FCA290C9FC5AAB6C7EA3003FEC01C07F001F140316806C6C13 -076C6C14000003140E6C6C131E6C6C137890383F01F090380FFFC0D901FEC7FC222A7DA8 -28>I<ED01FC15FFA3150715031501B114FF010713E190381F80F990387E003D49131FD8 -03F81307485A49130348481301121F123F5B127FA290C7FCA25AAA7E7FA2123FA26C7E00 -0F14037F000714076C6C497E6C6C497ED8007C017913F890383F01F190380FFFC1903A01 -FE01FC002D407DBE33>I<EB01FE90380FFFC090383F03F09038FC01F848486C7E484813 -7E48487F000F158049131F001F15C04848130FA2127F16E090C7FCA25AA290B6FCA290C9 -FCA67EA27F123F16E06C7E1501000F15C06C6C13036DEB07806C6C1400C66C131E017E5B -90381F80F8903807FFE0010090C7FC232A7EA828>I<EC1FC0EC7FF8903801F83C903807 -E07E90380FC0FFEB1FC1EB3F811401137FEC00FE01FE137C1500AEB6FCA3C648C7FCB3AE -487E007F13FFA320407EBF1C>I<167C903903F801FF903A1FFF078F8090397E0FDE1F90 -38F803F83803F001A23B07E000FC0600000F6EC7FC49137E001F147FA8000F147E6D13FE -00075C6C6C485AA23901F803E03903FE0FC026071FFFC8FCEB03F80006CAFC120EA3120F -A27F7F6CB512E015FE6C6E7E6C15E06C810003813A0FC0001FFC48C7EA01FE003E140048 -157E825A82A46C5D007C153E007E157E6C5D6C6C495A6C6C495AD803F0EB0FC0D800FE01 -7FC7FC90383FFFFC010313C0293D7EA82D>I<EA01FC12FFA3120712031201B1EC01FE91 -3807FFC091381E07E091387803F09138E001F8D9FDC07F148001FF6D7E91C7FCA25BA25B -B3A6486C497EB5D8F87F13FCA32E3F7DBE33>I<EA01E0EA07F8A2487EA46C5AA2EA01E0 -C8FCACEA01FC127FA3120712031201B3AC487EB512F0A3143E7DBD1A>I<1478EB01FEA2 -EB03FFA4EB01FEA2EB00781400AC147FEB7FFFA313017F147FB3B3A5123E127F38FF807E -14FEA214FCEB81F8EA7F01387C03F0381E07C0380FFF803801FC00185185BD1C>I<EA01 -FC12FFA3120712031201B292B51280A392383FFC0016E0168093C7FC153C5D5D4A5AEC07 -C04A5A4AC8FC143E147F4A7E13FD9038FFDFC0EC9FE0140F496C7E01FC7F496C7E140181 -6E7E81826F7E151F826F7EA282486C14FEB539F07FFFE0A32B3F7EBE30>I<EA01FC12FF -A3120712031201B3B3B1487EB512F8A3153F7DBE1A>I<2701F801FE14FF00FF902707FF -C00313E0913B1E07E00F03F0913B7803F03C01F80007903BE001F87000FC2603F9C06D48 -7F000101805C01FBD900FF147F91C75B13FF4992C7FCA2495CB3A6486C496CECFF80B5D8 -F87FD9FC3F13FEA347287DA74C>I<3901F801FE00FF903807FFC091381E07E091387803 -F000079038E001F82603F9C07F0001138001FB6D7E91C7FC13FF5BA25BB3A6486C497EB5 -D8F87F13FCA32E287DA733>I<14FF010713E090381F81F890387E007E01F8131F4848EB -0F804848EB07C04848EB03E0000F15F04848EB01F8A2003F15FCA248C812FEA44815FFA9 -6C15FEA36C6CEB01FCA3001F15F86C6CEB03F0A26C6CEB07E06C6CEB0FC06C6CEB1F80D8 -007EEB7E0090383F81FC90380FFFF0010090C7FC282A7EA82D>I<3901FC03FC00FF9038 -1FFF8091387C0FE09039FDE003F03A07FFC001FC6C496C7E6C90C7127F49EC3F805BEE1F -C017E0A2EE0FF0A3EE07F8AAEE0FF0A4EE1FE0A2EE3FC06D1580EE7F007F6E13FE9138C0 -01F89039FDE007F09039FC780FC0DA3FFFC7FCEC07F891C9FCAD487EB512F8A32D3A7EA7 -33>I<02FF131C0107EBC03C90381F80F090397F00387C01FC131CD803F8130E4848EB0F -FC150748481303121F485A1501485AA448C7FCAA6C7EA36C7EA2001F14036C7E15076C6C -130F6C7E6C6C133DD8007E137990383F81F190380FFFC1903801FE0190C7FCAD4B7E92B5 -12F8A32D3A7DA730>I<3901F807E000FFEB1FF8EC787CECE1FE3807F9C100031381EA01 -FB1401EC00FC01FF1330491300A35BB3A5487EB512FEA31F287EA724>I<90383FC06039 -01FFF8E03807C03F381F000F003E1307003C1303127C0078130112F81400A27E7E7E6D13 -00EA7FF8EBFFC06C13F86C13FE6C7F6C1480000114C0D8003F13E0010313F0EB001FEC0F -F800E01303A214017E1400A27E15F07E14016C14E06CEB03C0903880078039F3E01F0038 -E0FFFC38C01FE01D2A7DA824>I<131CA6133CA4137CA213FCA2120112031207001FB512 -C0B6FCA2D801FCC7FCB3A215E0A912009038FE01C0A2EB7F03013F138090381F8700EB07 -FEEB01F81B397EB723>I<D801FC14FE00FF147FA3000714030003140100011400B3A515 -01A31503120015076DEB06FF017E010E13806D4913FC90381FC078903807FFE001009038 -80FE002E297DA733>I<B539E00FFFE0A32707FE000313006C48EB00FC5E00015D7F0000 -5DA26D13016D5CA26D6C485AA2ECC007011F91C7FCA290380FE00EA2ECF01E0107131CA2 -6D6C5AA2ECFC7801011370A2ECFEF001005BA2EC7FC0A36E5AA26EC8FCA3140E2B287EA6 -30>I<B53BC3FFFE03FFF8A3290FFE003FE00013C06C486D48EB3F806C4817006D010F14 -1E00016F131C15076D163C00004A6C1338A2017F5E4B7E151DD93F805DED3DFC1538D91F -C04A5AED78FE9238707E03D90FE0017F5BEDE03F02F0140701070387C7FC9138F1C01F02 -F9148F010315CE9138FB800F02FF14DE6D15FCED00076D5DA24A1303027E5CA2027C1301 -023C5C023813003D287EA642>I<B539F01FFFE0A30003D9C00F1300C690388007F8D97F -0013E002805BD93FC05B011F49C7FC90380FE00EECF01E6D6C5A01035B6D6C5A6E5AEB00 -FF6E5A6E5A81141F814A7E81147BECF1FC903801E1FEECC0FF01037F49486C7ED90F007F -011E6D7E013E130F496D7E01FC80486C80000F4A7EB539803FFFF8A32D277FA630>I<B5 -39E00FFFE0A32707FE000313006C48EB01FC6F5A00015D7F00005DA2017F495AA2EC8003 -013F5CA26D6C48C7FCA26E5A010F130EA26D6C5AA2ECF83C01031338A26D6C5AA2ECFEF0 -01005BA2EC7FC0A36E5AA36EC8FCA2140EA2141E141C143C1438A2147800181370127EB4 -5BA2495AA248485AD87E07C9FCEA780EEA3C3CEA1FF8EA07E02B3A7EA630>I<001FB612 -80A2EBE0000180140049485A001E495A121C4A5A003C495A141F00385C4A5A147F5D4AC7 -FCC6485AA2495A495A130F5C495A90393FC00380A2EB7F80EBFF005A5B48481307120749 -1400485A48485BA248485B4848137F00FF495A90B6FCA221277EA628>I<B812F0A22C02 -80982D>I<BE12C0A25A0280985B>I E -%EndDVIPSBitmapFont -end -%%EndProlog -%%BeginSetup -%%Feature: *Resolution 600dpi -TeXDict begin -%%PaperSize: A4 - -%%EndSetup -%%Page: 1 1 -1 0 bop 0 351 a FD(CCLR)m(C)29 b(/)i FC(R)m(utherf)n(ord)h(Appleton)h -(Labora)-6 b(tor)g(y)1228 b FB(SUN/67.70)0 464 y FA(P)m(article)32 -b(Ph)m(ysics)i(&)e(Astronom)m(y)h(Researc)m(h)h(Council)0 -577 y(Starlink)d(Pro)5 b(ject)0 690 y(Starlink)31 b(User)j(Note)e -(67.70)3271 927 y FD(P)-8 b(.)15 b(T.)g(W)-8 b(allace)3053 -1040 y(19)31 b(Decem)m(b)s(er)h(2005)p 0 1183 3780 12 -v 177 1788 a Fz(SLALIB)77 b(|)g(P)-6 b(ositional)76 b(Astronom)-6 -b(y)1510 2037 y(Library)1719 2449 y Fy(2.5-3)751 2856 -y Fz(Programmer's)75 b(Man)-6 b(ual)1633 3566 y Fx(Abstract)0 -3828 y FD(SLALIB)42 b(is)g(a)h(library)d(used)i(b)m(y)h(writers)e(of)i -(p)s(ositional-astronom)m(y)f(applications.)76 b(Most)43 -b(of)g(the)g(188)0 3941 y(routines)30 b(are)i(concerned)f(with)f -(astronomical)h(p)s(osition)e(and)i(time,)g(but)g(a)g(n)m(um)m(b)s(er)f -(ha)m(v)m(e)j(wider)c(trigono-)0 4054 y(metrical,)h(n)m(umerical)f(or)h -(general)h(applications.)p eop -%%Page: 2 2 -2 1 bop 0 52 a FD(ii)0 351 y Fx(Con)l(ten)l(ts)0 555 -y FB(1)84 b(INTR)m(ODUCTION)2732 b(1)136 668 y FD(1.1)94 -b(Purp)s(ose)61 b(.)45 b(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.) -h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h -(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)151 b(1)136 -781 y(1.2)94 b(Example)30 b(Application)38 b(.)45 b(.)h(.)g(.)g(.)f(.)h -(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.) -g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)151 b(1)136 894 -y(1.3)94 b(Scop)s(e)84 b(.)46 b(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g -(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.) -g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)151 -b(2)136 1007 y(1.4)94 b(Ob)5 b(jectiv)m(es)38 b(.)46 -b(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h -(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.) -h(.)g(.)f(.)h(.)151 b(3)136 1120 y(1.5)94 b(F)-8 b(ortran)32 -b(V)-8 b(ersion)43 b(.)i(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.) -g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g -(.)g(.)f(.)h(.)g(.)f(.)h(.)151 b(4)136 1233 y(1.6)94 -b(C)30 b(V)-8 b(ersion)65 b(.)46 b(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g -(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.) -f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)151 b(4)136 -1345 y(1.7)94 b(F)-8 b(uture)31 b(V)-8 b(ersions)43 b(.)i(.)h(.)g(.)f -(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.) -h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)151 -b(4)136 1458 y(1.8)94 b(New)31 b(F)-8 b(unctions)77 b(.)45 -b(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f -(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.) -h(.)151 b(5)136 1571 y(1.9)94 b(Ac)m(kno)m(wledgemen)m(ts)60 -b(.)46 b(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.) -h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h -(.)151 b(5)0 1775 y FB(2)84 b(LINKING)3120 b(5)0 1979 -y(3)84 b(SUBPR)m(OGRAM)37 b(SPECIFICA)-9 b(TIONS)1881 -b(6)0 2183 y(4)84 b(EXPLANA)-9 b(TION)34 b(AND)h(EXAMPLES)1803 -b(171)136 2296 y FD(4.1)94 b(Spherical)29 b(T)-8 b(rigonometry)85 -b(.)46 b(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.) -h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(171)136 2409 y(4.2)94 b(V)-8 b(ectors)32 b(and)e(Matrices)38 -b(.)45 b(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.) -g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(174)136 2521 y(4.3)94 b(Celestial)30 b(Co)s(ordinate)f(Systems)69 -b(.)46 b(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.) -f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 b(176)136 -2634 y(4.4)94 b(Precession)30 b(and)g(Nutation)46 b(.)g(.)g(.)f(.)h(.)g -(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.) -f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 b(179)136 2747 -y(4.5)94 b(Mean)31 b(Places)c(.)46 b(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.) -f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f -(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 b(181)136 -2860 y(4.6)94 b(Ep)s(o)s(c)m(h)62 b(.)46 b(.)f(.)h(.)g(.)g(.)f(.)h(.)g -(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.) -f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(181)136 2973 y(4.7)94 b(Prop)s(er)30 b(Motion)80 b(.)45 -b(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f -(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.) -h(.)60 b(182)136 3086 y(4.8)94 b(P)m(arallax)31 b(and)e(Radial)g(V)-8 -b(elo)s(cit)m(y)87 b(.)46 b(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g -(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(182)136 3199 y(4.9)94 b(Ab)s(erration)c(.)46 b(.)g(.)f(.)h(.)g(.)f(.) -h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h -(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(183)136 3312 y(4.10)49 b(Di\013eren)m(t)31 b(Sorts)f(of)h(Mean)g -(Place)55 b(.)46 b(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h -(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(184)136 3425 y(4.11)49 b(Mean)31 b(Place)g(T)-8 b(ransformations)90 -b(.)46 b(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.) -f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 b(185)136 -3538 y(4.12)49 b(Mean)31 b(Place)g(to)g(Apparen)m(t)g(Place)81 -b(.)46 b(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.) -h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 b(187)136 -3651 y(4.13)49 b(Apparen)m(t)31 b(Place)f(to)i(Observ)m(ed)d(Place)73 -b(.)46 b(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.) -f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 b(188)136 3763 -y(4.14)49 b(The)30 b(Hipparcos)g(Catalogue)h(and)f(the)g(ICRS)63 -b(.)46 b(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.) -g(.)f(.)h(.)g(.)f(.)h(.)60 b(191)136 3876 y(4.15)49 b(Time)30 -b(Scales)50 b(.)c(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h -(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.) -g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 b(191)136 3989 y(4.16)49 -b(Calendars)59 b(.)46 b(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g -(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.) -f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 b(196)136 4102 -y(4.17)49 b(Geo)s(cen)m(tric)32 b(Co)s(ordinates)86 b(.)46 -b(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g -(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(196)136 4215 y(4.18)49 b(Ephemerides)88 b(.)46 b(.)f(.)h(.)g(.)f(.)h -(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.) -g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(197)136 4328 y(4.19)49 b(Radial)30 b(V)-8 b(elo)s(cit)m(y)31 -b(and)e(Ligh)m(t-Time)h(Corrections)47 b(.)f(.)f(.)h(.)g(.)f(.)h(.)g(.) -g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(206)136 4441 y(4.20)49 b(F)-8 b(o)s(cal-Plane)31 b(Astrometry)71 -b(.)46 b(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.) -h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(207)136 4554 y(4.21)49 b(Numerical)30 b(Metho)s(ds)d(.)46 -b(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g -(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)g(.)g(.)f(.)h(.)g(.)f(.)h(.)60 -b(208)0 4758 y FB(5)84 b(SUMMAR)-9 b(Y)37 b(OF)d(CALLS)2369 -b(212)p eop -%%Page: 1 3 -1 2 bop 0 52 a Fw(SUN/67.70)3297 b FD(1)0 351 y Fx(1)135 -b(INTR)l(ODUCTION)0 605 y Fv(1.1)112 b(Purp)s(ose)0 824 -y FD(SLALIB)330 791 y Fu(1)404 824 y FD(is)34 b(a)h(library)d(of)j -(routines)f(in)m(tended)g(to)h(mak)m(e)h(accurate)g(and)f(reliable)d(p) -s(ositional-astronom)m(y)0 937 y(applications)i(easier)h(to)h(write.)56 -b(Most)36 b(SLALIB)f(routines)f(are)i(concerned)g(with)e(astronomical)h -(p)s(osition)0 1049 y(and)k(time,)k(but)c(a)h(n)m(um)m(b)s(er)f(ha)m(v) -m(e)i(wider)d(trigonometrical,)k(n)m(umerical)d(or)g(general)h -(applications.)68 b(The)0 1162 y(applications)20 b(ASTR)m(OM,)h(COCO,)f -(R)-10 b(V)22 b(and)e(TPOINT)h(all)f(mak)m(e)i(extensiv)m(e)g(use)f(of) -h(the)f(SLALIB)g(routines,)0 1275 y(as)31 b(do)f(a)h(n)m(um)m(b)s(er)e -(of)h(telescop)s(e)h(con)m(trol)g(systems)f(around)g(the)g(w)m(orld.)40 -b(The)30 b(SLALIB)g(v)m(ersions)f(curren)m(tly)0 1388 -y(in)i(service)h(are)g(written)f(in)g(F)-8 b(ortran)32 -b(77)h(and)f(run)e(on)i(V)-10 b(AX/VMS,)33 b(sev)m(eral)f(Unix)f -(platforms)g(and)h(PC.)f(A)0 1501 y(proprietary)k(ANSI)h(C)g(v)m -(ersion)f(is)h(also)g(a)m(v)-5 b(ailable)35 b(from)h(the)h(author;)i -(it)d(is)f(functionally)f(similar)f(to)k(the)0 1614 y(F)-8 -b(ortran)31 b(v)m(ersion)f(up)s(on)f(whic)m(h)g(the)h(presen)m(t)h(do)s -(cumen)m(t)f(concen)m(trates.)0 1904 y Fv(1.2)112 b(Example)37 -b(Application)0 2122 y FD(Here)31 b(is)e(a)i(simple)d(example)i(of)h -(an)f(application)f(program)h(written)g(using)e(SLALIB)i(calls:)430 -2375 y Ft(PROGRAM)45 b(FK4FK5)143 2487 y(*)143 2600 y(*)95 -b(Read)47 b(a)g(B1950)g(position)e(from)i(I/O)g(unit)g(5)g(and)g(reply) -f(on)h(I/O)g(unit)g(6)143 2713 y(*)95 b(with)47 b(the)g(J2000)f -(equivalent.)93 b(Enter)46 b(a)i(period)e(to)h(quit.)143 -2826 y(*)430 2939 y(IMPLICIT)e(NONE)430 3052 y(CHARACTER)g(C*80,S)430 -3165 y(INTEGER)g(I,J,IHMSF\(4\),IDMSF\(4\))430 3278 y(DOUBLE)h -(PRECISION)f(R4,D4,R5,D5)430 3391 y(LOGICAL)g(BAD)143 -3617 y(*)143 b(Loop)47 b(until)f(a)i(period)e(is)h(entered)430 -3729 y(C)g(=)g(')h(')430 3842 y(DO)f(WHILE)f(\(C\(:1\).NE.'.'\))143 -4068 y(*)239 b(Read)46 b(h)i(m)f(s)h(d)f(')g(")573 4181 -y(READ)f(\(5,'\(A\)'\))g(C)573 4294 y(IF)h(\(C\(:1\).NE.'.'\))d(THEN) -716 4407 y(BAD)j(=)g(.TRUE.)143 4633 y(*)382 b(Decode)46 -b(the)h(RA)716 4746 y(I)g(=)h(1)716 4859 y(CALL)f -(sla_DAFIN\(C,I,R4,J\))716 4971 y(IF)g(\(J.EQ.0\))f(THEN)859 -5084 y(R4)h(=)h(15D0*R4)143 5310 y(*)525 b(Decode)46 -b(the)h(Dec)859 5423 y(CALL)g(sla_DAFIN\(C,I,D4,J\))859 -5536 y(IF)g(\(J.EQ.0\))f(THEN)p 0 5607 1512 4 v 104 5661 -a Fs(1)138 5693 y Fr(The)26 b(name)f(isn't)h(an)g(acron)n(ym;)f(it)g -(just)h(stands)g(for)h(\\Subprogram)d(Library)i(A".)p -eop -%%Page: 2 4 -2 3 bop 0 52 a FD(2)143 464 y Ft(*)668 b(FK4)47 b(to)g(FK5)1002 -577 y(CALL)g(sla_FK45Z\(R4,D4,1950D0,R)o(5,D5)o(\))143 -803 y(*)668 b(Format)46 b(and)h(output)f(the)h(result)1002 -916 y(CALL)g(sla_DR2TF\(2,R5,S,IHMSF\))1002 1029 y(CALL)g -(sla_DR2AF\(1,D5,S,IDMSF\))1002 1142 y(WRITE)g(\(6,)382 -1255 y(:)334 b('\(1X,I2.2,2I3.2,''.'',I)o(2.2,)o(2X,)o(A,I2)o(.2,2)o -(I3.)o(2,'')o(.'',)o(I1\))o('\))382 1367 y(:)2529 b(IHMSF,S,IDMSF)1002 -1480 y(BAD)47 b(=)h(.FALSE.)859 1593 y(END)f(IF)716 1706 -y(END)g(IF)716 1819 y(IF)g(\(BAD\))f(WRITE)h(\(6,'\(1X,''?''\)'\))573 -1932 y(END)g(IF)430 2045 y(END)f(DO)430 2271 y(END)0 -2518 y FD(In)36 b(this)g(example,)i(SLALIB)f(not)g(only)f(pro)m(vides)g -(the)h(complicated)g(FK4)g(to)h(FK5)f(transformation)f(but)0 -2631 y(also)28 b(simpli\014es)d(the)j(tedious)g(and)g(error-prone)f -(tasks)i(of)f(deco)s(ding)g(and)f(formatting)h(angles)h(expressed)e(as) -0 2744 y(hours,)i(min)m(utes)g Fq(etc)p FD(.)40 b(The)30 -b(example)f(incorp)s(orates)h(range)g(c)m(hec)m(king,)h(and)e(a)m(v)m -(oids)h(the)g(notorious)g(\\min)m(us)0 2857 y(zero")24 -b(problem)d(\(an)i(often-p)s(erp)s(etrated)g(bug)f(where)h -(declinations)e(b)s(et)m(w)m(een)i(0)2754 2824 y Fp(\016)2817 -2857 y FD(and)f Fo(\000)p FD(1)3102 2824 y Fp(\016)3165 -2857 y FD(lose)g(their)g(min)m(us)0 2970 y(sign\).)37 -b(With)22 b(a)h(little)e(extra)i(elab)s(oration)f(and)g(a)g(few)g(more) -h(calls)e(to)j(SLALIB,)e(defaulting)e(can)j(b)s(e)f(pro)m(vided)0 -3083 y(\(enabling)31 b(un)m(used)g(\014elds)f(to)j(b)s(e)f(replaced)g -(with)f(commas)i(to)f(a)m(v)m(oid)h(ret)m(yping\),)g(prop)s(er)e -(motions)h(can)g(b)s(e)0 3196 y(handled,)37 b(di\013eren)m(t)f(ep)s(o)s -(c)m(hs)g(can)h(b)s(e)f(sp)s(eci\014ed,)h(and)f(so)h(on.)60 -b(See)37 b(the)g(program)g(COCO)e(\(SUN/56\))k(for)0 -3308 y(further)29 b(ideas.)0 3596 y Fv(1.3)112 b(Scop)s(e)0 -3814 y FD(SLALIB)30 b(con)m(tains)g(188)i(routines)d(co)m(v)m(ering)j -(the)e(follo)m(wing)f(topics:)136 4038 y Fo(\017)46 b -FD(String)29 b(Deco)s(ding,)i(Sexagesimal)f(Con)m(v)m(ersions)136 -4222 y Fo(\017)46 b FD(Angles,)30 b(V)-8 b(ectors)32 -b(&)e(Rotation)i(Matrices)136 4406 y Fo(\017)46 b FD(Calendars,)30 -b(Time)f(Scales)136 4590 y Fo(\017)46 b FD(Precession)30 -b(&)g(Nutation)136 4774 y Fo(\017)46 b FD(Prop)s(er)30 -b(Motion)136 4958 y Fo(\017)46 b FD(FK4/FK5/Hipparcos,)32 -b(Elliptic)27 b(Ab)s(erration)136 5141 y Fo(\017)46 b -FD(Geo)s(cen)m(tric)32 b(Co)s(ordinates)136 5325 y Fo(\017)46 -b FD(Apparen)m(t)31 b(&)f(Observ)m(ed)f(Place)136 5509 -y Fo(\017)46 b FD(Azim)m(uth)30 b(&)g(Elev)-5 b(ation)136 -5693 y Fo(\017)46 b FD(Refraction)31 b(&)f(Air)f(Mass)p -eop -%%Page: 3 5 -3 4 bop 0 52 a Fw(SUN/67.70)3297 b FD(3)136 351 y Fo(\017)46 -b FD(Ecliptic,)29 b(Galactic,)j(Sup)s(ergalactic)d(Co)s(ordinates)136 -547 y Fo(\017)46 b FD(Ephemerides)136 743 y Fo(\017)g -FD(Astrometry)136 938 y Fo(\017)g FD(Numerical)29 b(Metho)s(ds)0 -1245 y Fv(1.4)112 b(Ob)6 b(jectiv)m(es)0 1473 y FD(SLALIB)26 -b(w)m(as)h(designed)f(to)h(giv)m(e)g(application)e(programmers)h(a)h -(basic)f(set)h(of)g(p)s(ositional-astronom)m(y)f(to)s(ols)0 -1586 y(whic)m(h)j(w)m(ere)i(accurate)h(and)e(easy)h(to)g(use.)40 -b(T)-8 b(o)31 b(this)e(end,)h(the)h(library)d(is:)136 -1833 y Fo(\017)46 b FD(Readily)29 b(a)m(v)-5 b(ailable,)30 -b(including)d(source)k(co)s(de)f(and)g(do)s(cumen)m(tation.)136 -2029 y Fo(\017)46 b FD(Supp)s(orted)28 b(and)i(main)m(tained.)136 -2225 y Fo(\017)46 b FD(P)m(ortable)23 b({)h(co)s(ded)e(in)g(standard)g -(languages)h(and)f(a)m(v)-5 b(ailable)22 b(for)h(m)m(ultiple)d -(computers)j(and)f(op)s(erating)227 2337 y(systems.)136 -2533 y Fo(\017)46 b FD(Thoroughly)21 b(commen)m(ted,)k(b)s(oth)d(for)h -(main)m(tainabilit)m(y)d(and)h(to)j(assist)e(those)h(wishing)d(to)j -(cannibalize)227 2646 y(the)31 b(co)s(de.)136 2842 y -Fo(\017)46 b FD(Stable.)136 3038 y Fo(\017)g FD(T)-8 -b(rust)m(w)m(orth)m(y)22 b({)g(some)h(care)f(has)g(gone)g(in)m(to)g -(testing)g(SLALIB,)f(b)s(oth)g(b)m(y)h(comparison)f(with)f(published) -227 3150 y(data)31 b(and)f(b)m(y)g(c)m(hec)m(ks)i(for)e(in)m(ternal)f -(consistency)-8 b(.)136 3346 y Fo(\017)46 b FD(Rigorous)27 -b({)h(corners)f(are)h(not)g(cut,)g(ev)m(en)h(where)e(the)g(practical)g -(consequences)h(w)m(ould,)g(as)f(a)h(rule,)f(b)s(e)227 -3459 y(negligible.)136 3655 y Fo(\017)46 b FD(Comprehensiv)m(e,)28 -b(without)f(including)e(to)s(o)k(man)m(y)g(esoteric)g(features)f -(required)f(only)g(b)m(y)h(sp)s(ecialists.)136 3850 y -Fo(\017)46 b FD(Practical)40 b({)h(almost)f(all)f(the)h(routines)f(ha)m -(v)m(e)i(b)s(een)e(written)g(to)i(satisfy)f(real)f(needs)h(encoun)m -(tered)227 3963 y(during)28 b(the)j(dev)m(elopmen)m(t)g(of)f(real-life) -f(applications.)136 4159 y Fo(\017)46 b FD(En)m(vironmen)m(t-indep)s -(enden)m(t)28 b({)j(the)f(pac)m(k)-5 b(age)33 b(is)c(completely)h(free) -h(of)f(pauses,)g(stops,)h(I/O)f Fq(etc)p FD(.)136 4355 -y Fo(\017)46 b FD(Self-con)m(tained)30 b({)h(SLALIB)f(calls)f(no)i -(other)f(libraries.)0 4602 y(A)g(few)h Fq(c)-5 b(ave)g(ats)p -FD(:)136 4850 y Fo(\017)46 b FD(SLALIB)30 b(do)s(es)g(not)g(pretend)g -(to)h(b)s(e)e(canonical.)41 b(It)30 b(is)f(in)g(essence)i(an)f(an)m -(thology)-8 b(,)32 b(and)e(the)g(adopted)227 4963 y(algorithms)g(are)g -(liable)f(to)i(c)m(hange)g(as)g(more)f(up-to-date)i(ones)e(b)s(ecome)h -(a)m(v)-5 b(ailable.)136 5159 y Fo(\017)46 b FD(The)26 -b(functions)e(aren't)i(orthogonal)h({)f(there)g(are)g(sev)m(eral)g -(cases)h(of)f(di\013eren)m(t)f(routines)g(doing)g(similar)227 -5271 y(things,)30 b(and)f(man)m(y)h(examples)g(where)g(sequences)g(of)g -(SLALIB)g(calls)f(ha)m(v)m(e)j(simply)27 b(b)s(een)j(pac)m(k)-5 -b(aged,)227 5384 y(all)30 b(to)h(mak)m(e)g(applications)e(less)g -(trouble)h(to)h(write.)136 5580 y Fo(\017)46 b FD(There)20 -b(are)h(omissions)d({)j(for)f(example)g(there)g(are)h(no)f(routines)f -(for)h(calculating)g(ph)m(ysical)f(ephemerides)227 5693 -y(of)31 b(Solar-System)f(b)s(o)s(dies.)p eop -%%Page: 4 6 -4 5 bop 0 52 a FD(4)136 351 y Fo(\017)46 b FD(SLALIB)33 -b(is)f(not)h(homogeneous,)i(though)e(imp)s(ortan)m(t)f(subsets)g(\(for) -h(example)g(the)g(FK4/FK5)i(rou-)227 464 y(tines\))30 -b(are.)136 657 y Fo(\017)46 b FD(The)28 b(library)e(is)i(not)h(fo)s -(olpro)s(of.)38 b(Y)-8 b(ou)29 b(ha)m(v)m(e)h(to)f(kno)m(w)g(what)f(y)m -(ou)h(are)g(trying)e(to)i(do)g(\()p Fq(e.g.)f FD(b)m(y)g(reading)227 -769 y(textb)s(o)s(oks)j(on)f(p)s(ositional)e(astronom)m(y\),)k(and)d -(it)h(is)f(the)i(caller's)f(resp)s(onsibilit)m(y)c(to)31 -b(supply)c(sensible)227 882 y(argumen)m(ts)k(\(although)f(enough)g(in)m -(ternal)f(v)-5 b(alidation)29 b(is)g(done)i(to)g(a)m(v)m(oid)g -(arithmetic)e(errors\).)136 1075 y Fo(\017)46 b FD(Without)32 -b(b)s(eing)e(written)h(in)f(a)i(w)m(asteful)f(manner,)h(SLALIB)f(is)f -(nonetheless)h(optimized)g(for)g(main-)227 1188 y(tainabilit)m(y)e -(rather)h(than)g(sp)s(eed.)39 b(In)30 b(addition,)f(there)h(are)h(man)m -(y)f(places)g(where)g(considerable)e(sim-)227 1301 y(pli\014cation)c(w) -m(ould)h(b)s(e)h(p)s(ossible)e(if)h(some)i(sp)s(eci\014ed)d(amoun)m(t)j -(of)f(accuracy)i(could)d(b)s(e)h(sacri\014ced;)h(suc)m(h)227 -1413 y(compromises)g(are)h(left)f(to)h(the)g(individual)23 -b(programmer)k(and)g(are)g(not)h(allo)m(w)m(ed)f(to)i(limit)c(SLALIB's) -227 1526 y(v)-5 b(alue)30 b(as)h(a)f(source)h(of)g(comparison)e -(results.)0 1828 y Fv(1.5)112 b(F)-9 b(ortran)38 b(V)-9 -b(ersion)0 2052 y FD(The)26 b(F)-8 b(ortran)26 b(v)m(ersions)g(of)g -(SLALIB)f(use)h(ANSI)g(F)-8 b(ortran)26 b(77)h(with)e(a)h(few)g -(commonplace)g(extensions.)39 b(Just)0 2165 y(three)33 -b(out)g(of)g(the)h(188)g(routines)e(require)f(platform-sp)s(eci\014c)g -(tec)m(hniques)i(and)f(accordingly)g(are)i(supplied)0 -2278 y(in)42 b(di\013eren)m(t)g(forms.)78 b(SLALIB)43 -b(has)g(b)s(een)f(implemen)m(ted)g(on)h(the)g(follo)m(wing)e -(platforms:)65 b(V)-10 b(AX/VMS,)0 2391 y(PC)37 b(\(Microsoft)h(F)-8 -b(ortran,)40 b(Lin)m(ux\),)e(DECstation)g(\(Ultrix\),)h(DEC)e(Alpha)f -(\(DEC)i(Unix\),)g(Sun)e(\(SunOS,)0 2504 y(Solaris\),)29 -b(Hewlett)i(P)m(ac)m(k)-5 b(ard)32 b(\(HP-UX\),)g(CONVEX,)e(P)m -(erkin-Elmer)f(and)g(F)-8 b(ujitsu.)0 2805 y Fv(1.6)112 -b(C)38 b(V)-9 b(ersion)0 3030 y FD(An)41 b(ANSI)g(C)g(v)m(ersion)g(of)h -(SLALIB)f(is)g(a)m(v)-5 b(ailable)41 b(from)g(the)g(author)h(but)e(is)h -(not)h(part)f(of)h(the)g(Starlink)0 3143 y(release.)57 -b(The)36 b(functionalit)m(y)e(of)i(this)e(\(proprietary\))i(C)f(v)m -(ersion)g(closely)g(matc)m(hes)i(that)g(of)f(the)g(Starlink)0 -3256 y(F)-8 b(ortran)39 b(SLALIB,)e(partly)g(for)h(the)g(con)m(v)m -(enience)h(of)f(existing)f(users)g(of)h(the)g(F)-8 b(ortran)39 -b(v)m(ersion,)g(some)f(of)0 3369 y(whom)28 b(ha)m(v)m(e)j(in)c(the)j -(past)f(implemen)m(ted)e(C)i(\\wrapp)s(ers".)39 b(The)29 -b(function)e(names)i(cannot)h(b)s(e)f(the)g(same)g(as)0 -3482 y(the)34 b(F)-8 b(ortran)35 b(v)m(ersions)f(b)s(ecause)g(of)h(p)s -(oten)m(tial)e(linking)f(problems)g(when)h(b)s(oth)h(forms)f(of)i(the)f -(library)e(are)0 3595 y(presen)m(t;)40 b(the)d(C)g(routine)f(whic)m(h)f -(is)h(the)h(equiv)-5 b(alen)m(t)37 b(of)g(\(for)g(example\))g -Ft(SLA_REFRO)d FD(is)i Ft(slaRefro)p FD(.)58 b(The)0 -3708 y(t)m(yp)s(es)37 b(of)f(argumen)m(ts)h(follo)m(w)f(the)h(F)-8 -b(ortran)37 b(v)m(ersion,)h(except)g(that)f(in)m(tegers)g(are)g -Ft(int)f FD(rather)g(than)h Ft(long)0 3821 y FD(\(the)29 -b(one)f(exception)g(b)s(eing)f Ft(slaIntin)p FD(,)f(whic)m(h)h(returns) -g(a)h Ft(long)f FD(and)g(is)g(supplemen)m(ted)g(b)m(y)h(an)g -(additional)0 3933 y(routine,)23 b(not)f(presen)m(t)g(in)e(the)i(F)-8 -b(ortran)23 b(SLALIB,)f(called)f Ft(slaInt2in)p FD(,)g(whic)m(h)g -(returns)f(an)i Ft(int)p FD(\).)37 b(Argumen)m(t)0 4046 -y(passing)28 b(is)g(b)m(y)h(v)-5 b(alue)29 b(\(except)h(for)f(arra)m -(ys)h(and)e(strings)g(of)i(course\))f(for)g(giv)m(en)g(argumen)m(ts)h -(and)e(b)m(y)h(p)s(oin)m(ter)0 4159 y(for)h(returned)f(argumen)m(ts.)41 -b(All)29 b(the)i(C)f(functions)f(are)i(re-en)m(tran)m(t.)0 -4324 y(The)f(F)-8 b(ortran)31 b(routines)e Ft(sla_GRESID)p -FD(,)f Ft(sla_RANDOM)g FD(and)h Ft(sla_WAIT)f FD(ha)m(v)m(e)k(no)e(C)g -(coun)m(terparts.)0 4489 y(F)-8 b(urther)31 b(details)f(of)i(the)f(C)g -(v)m(ersion)f(of)i(SLALIB)e(are)i(a)m(v)-5 b(ailable)31 -b(from)f(the)i(author.)43 b(The)31 b(de\014nitiv)m(e)e(guide)0 -4602 y(to)i(the)g(calling)e(sequences)h(is)g(the)g(\014le)g -Ft(slalib.h)p FD(.)0 4904 y Fv(1.7)112 b(F)-9 b(uture)38 -b(V)-9 b(ersions)0 5128 y FD(The)24 b(homogeneit)m(y)i(and)e(ease)i(of) -f(use)g(of)g(SLALIB)f(could)g(p)s(erhaps)g(b)s(e)g(impro)m(v)m(ed)g(in) -g(the)h(future)f(b)m(y)g(turning)0 5241 y(to)30 b(ob)5 -b(ject-orien)m(ted)30 b(tec)m(hniques,)f(in)f(particular)f(through)h -(the)h(C++)f(and)h(Ja)m(v)-5 b(a)30 b(languages.)40 b(F)-8 -b(or)30 b(example)0 5354 y(\\celestial)21 b(p)s(osition")f(could)g(b)s -(e)g(a)i(class)f(and)f(man)m(y)h(of)h(the)f(transformations)f(could)g -(happ)s(en)g(automatically)-8 b(.)0 5467 y(This)22 b(requires)h -(further)g(study)g(and)g(w)m(ould)g(result)g(in)g(a)h(complete)h -(redesign.)37 b(V)-8 b(arious)24 b(attempts)h(ha)m(v)m(e)g(b)s(een)0 -5580 y(made)36 b(to)h(do)g(this,)g(but)e(none)h(as)h(y)m(et)g(has)g -(the)f(author's)g(seal)h(of)f(appro)m(v)-5 b(al.)58 b(F)-8 -b(urthermore,)38 b(the)f(impact)0 5693 y(of)c(F)-8 b(ortran)33 -b(90)h(has)e(y)m(et)i(to)g(b)s(e)e(assessed.)48 b(Should)30 -b(compilers)i(b)s(ecome)h(widely)e(a)m(v)-5 b(ailable,)33 -b(some)g(in)m(ternal)p eop -%%Page: 5 7 -5 6 bop 0 52 a Fw(SUN/67.70)3297 b FD(5)0 351 y(reco)s(ding)33 -b(ma)m(y)i(b)s(e)f(w)m(orth)m(while)f(in)g(order)g(to)i(simplify)c -(parts)j(of)h(the)f(co)s(de.)53 b(Ho)m(w)m(ev)m(er,)37 -b(as)e(with)e(C++,)h(a)0 464 y(redesign)d(of)i(the)f(application)f(in)m -(terfaces)i(will)d(b)s(e)h(needed)h(if)g(the)g(capabilities)e(of)j(the) -f(new)g(language)h(are)0 577 y(to)e(b)s(e)f(exploited)f(to)i(the)g -(full.)0 865 y Fv(1.8)112 b(New)37 b(F)-9 b(unctions)0 -1083 y FD(In)39 b(a)i(pac)m(k)-5 b(age)41 b(lik)m(e)f(SLALIB)f(it)h(is) -f(di\016cult)f(to)i(kno)m(w)g(ho)m(w)g(far)g(to)h(go.)70 -b(Is)39 b(it)h(enough)g(to)g(pro)m(vide)f(the)0 1196 -y(primitiv)m(e)20 b(op)s(erations,)k(or)f(should)e(more)i(complicated)f -(functions)f(b)s(e)h(pac)m(k)-5 b(aged?)40 b(Is)22 b(it)g(w)m(orth)h -(encroac)m(hing)0 1309 y(on)37 b(sp)s(ecialist)e(areas,)k(where)d -(individual)d(exp)s(erts)j(ha)m(v)m(e)i(all)e(written)g(their)g(o)m(wn) -g(soft)m(w)m(are)j(already?)59 b(T)-8 b(o)0 1422 y(what)44 -b(exten)m(t)i(should)d(CPU)h(e\016ciency)h(b)s(e)f(an)g(issue?)82 -b(Ho)m(w)45 b(m)m(uc)m(h)f(supp)s(ort)f(of)i(di\013eren)m(t)f(n)m -(umerical)0 1535 y(precisions)28 b(is)i(required?)38 -b(And)30 b(so)h(on.)0 1694 y(In)38 b(practice,)k(almost)d(all)f(the)h -(routines)f(in)f(SLALIB)i(are)g(there)g(b)s(ecause)g(they)g(w)m(ere)h -(needed)e(for)h(some)0 1807 y(sp)s(eci\014c)27 b(application,)g(and)g -(this)g(is)h(lik)m(ely)e(to)j(remain)e(the)h(pattern)g(for)g(an)m(y)h -(enhancemen)m(ts)f(in)f(the)h(future.)0 1920 y(Suggestions)i(for)g -(additional)e(SLALIB)i(routines)f(should)g(b)s(e)h(addressed)f(to)i -(the)g(author.)0 2207 y Fv(1.9)112 b(Ac)m(kno)m(wledgemen)m(ts)0 -2425 y FD(SLALIB)39 b(is)f(descended)h(from)g(a)h(pac)m(k)-5 -b(age)42 b(of)d(routines)g(written)f(for)i(the)f(AA)m(O)h(16-bit)g -(minicomputers)0 2538 y(in)33 b(the)h(mid-1970s.)51 b(The)33 -b(coming)h(of)g(the)g(V)-10 b(AX)34 b(allo)m(w)m(ed)g(a)g(m)m(uc)m(h)g -(more)g(comprehensiv)m(e)f(and)h(thorough)0 2651 y(pac)m(k)-5 -b(age)38 b(to)f(b)s(e)f(designed)f(for)h(Starlink,)g(esp)s(ecially)f -(imp)s(ortan)m(t)g(at)i(a)g(time)f(when)f(the)i(adoption)f(of)g(the)0 -2764 y(IA)m(U)f(1976)h(resolutions)d(mean)m(t)i(that)g(astronomers)g(w) -m(ould)e(ha)m(v)m(e)j(to)f(cop)s(e)f(with)f(a)i(mixture)e(of)i -(reference)0 2877 y(frames,)30 b(time)g(scales)h(and)f(nomenclature.)0 -3036 y(Muc)m(h)k(of)h(the)f(preparatory)g(w)m(ork)g(on)g(SLALIB)g(w)m -(as)h(done)f(b)m(y)g(Althea)g(Wilkinson)e(of)i(Manc)m(hester)h(Uni-)0 -3149 y(v)m(ersit)m(y)-8 b(.)98 b(During)48 b(its)h(dev)m(elopmen)m(t,) -54 b(Andrew)48 b(Murra)m(y)-8 b(,)55 b(Catherine)48 b(Hohenk)m(erk,)55 -b(Andrew)48 b(Sinclair,)0 3262 y(Bernard)25 b(Y)-8 b(allop)25 -b(and)g(Brian)f(Emerson)h(of)h(Her)f(Ma)5 b(jest)m(y's)28 -b(Nautical)d(Almanac)g(O\016ce)h(w)m(ere)g(consulted)f(on)0 -3375 y(man)m(y)f(o)s(ccasions;)i(their)d(advice)h(w)m(as)g(indisp)s -(ensable.)34 b(I)23 b(am)h(esp)s(ecially)e(grateful)i(to)g(Catherine)f -(Hohenk)m(erk)0 3488 y(for)34 b(supplying)c(preprin)m(ts)i(of)i(pap)s -(ers,)g(and)f(test)i(data.)52 b(A)34 b(n)m(um)m(b)s(er)f(of)h -(enhancemen)m(ts)g(to)h(SLALIB)e(w)m(ere)0 3601 y(at)39 -b(the)g(suggestion)g(of)g(Russell)d(Ow)m(en,)41 b(Univ)m(ersit)m(y)d -(of)g(W)-8 b(ashington,)41 b(the)e(late)g(Phil)e(Hill,)h(St)h(Andrews)0 -3714 y(Univ)m(ersit)m(y)-8 b(,)37 b(Bill)d(V)-8 b(acca,)40 -b(JILA,)c(Boulder)f(and)g(Ron)h(Maddalena,)i(NRA)m(O.)e(Mark)g -(Calabretta,)i(CSIR)m(O)0 3826 y(Radioph)m(ysics,)c(Sydney)e(supplied)f -(c)m(hanges)k(to)g(suit)e(Con)m(v)m(ex.)53 b(I)33 b(am)h(indebted)f(to) -i(Derek)f(Jones)g(\(R)m(GO\))0 3939 y(for)c(in)m(tro)s(ducing)e(me)j -(to)g(the)f(\\univ)m(ersal)f(v)-5 b(ariables")30 b(metho)s(d)g(of)g -(calculating)g(orbits.)0 4099 y(The)j(\014rst)g(C)g(v)m(ersion)f(of)i -(SLALIB)f(w)m(as)h(a)g(hand-co)s(ded)e(transcription)f(of)j(the)g -(Starlink)d(F)-8 b(ortran)34 b(v)m(ersion)0 4211 y(carried)j(out)i(b)m -(y)f(Stev)m(e)h(Eaton)f(\(Univ)m(ersit)m(y)g(of)g(Leeds\))h(in)e(the)h -(course)g(of)g(MSc)h(w)m(ork.)64 b(This)36 b(w)m(as)i(later)0 -4324 y(enhanced)29 b(b)m(y)g(John)f(Straede)h(\(AA)m(O\))h(and)f -(Martin)f(Shepherd)f(\(Caltec)m(h\).)41 b(The)29 b(curren)m(t)g(C)f -(SLALIB)h(is)f(a)0 4437 y(complete)21 b(rewrite)f(b)m(y)h(the)f(presen) -m(t)h(author)g(and)f(includes)e(a)j(comprehensiv)m(e)f(v)-5 -b(alidation)19 b(suite.)37 b(Additional)0 4550 y(commen)m(ts)31 -b(on)g(the)f(C)g(v)m(ersion)g(came)h(from)f(Bob)h(P)m(a)m(yne)g(\(NRA)m -(O\))h(and)d(Jerem)m(y)i(Bailey)f(\(AA)m(O\).)0 4881 -y Fx(2)135 b(LINKING)0 5130 y FD(On)30 b(Unix)f(systems)h(\(Lin)m(ux,)g -(Sun,)f(DEC)h(Alpha)f Fq(etc.)p FD(\):)227 5355 y Ft(\045)95 -b(f77)47 b(progname.o)e(-L/star/lib)g(`sla_link`)g(-o)i(progname)0 -5580 y FD(\(The)29 b(ab)s(o)m(v)m(e)i(assumes)e(that)h(all)e(Starlink)g -(directories)g(ha)m(v)m(e)j(b)s(een)d(added)h(to)h(the)g -Ft(LD_LIBRARY_PATH)25 b FD(and)0 5693 y Ft(PATH)k FD(en)m(vironmen)m(t) -h(v)-5 b(ariables)29 b(as)i(describ)s(ed)d(in)h(SUN/202.\))p -eop -%%Page: 6 8 -6 7 bop 0 52 a FD(6)0 351 y Fx(3)135 b(SUBPR)l(OGRAM)44 -b(SPECIFICA)-11 b(TIONS)p 0 465 3780 8 v 0 578 a(SLA)p -Fn(_)p Fx(ADDET)383 b Fm(Add)39 b(E-terms)d(of)i(Ab)s(erration)382 -b Fx(SLA)p Fn(_)p Fx(ADDET)0 928 y FB(A)m(CTION)44 b -FD(:)61 b(Add)40 b(the)h(E-terms)g(\(elliptic)e(comp)s(onen)m(t)i(of)g -(ann)m(ual)e(ab)s(erration\))i(to)g(a)g(pre)f(IA)m(U)i(1976)227 -1041 y(mean)31 b(place)f(to)h(conform)f(to)i(the)e(old)g(catalogue)i -(con)m(v)m(en)m(tion.)0 1228 y FB(CALL)45 b FD(:)77 b -Ft(CALL)46 b(sla_ADDET)g(\(RM,)g(DM,)h(EQ,)g(RC,)g(DC\))0 -1629 y FB(GIVEN)e FD(:)277 1775 y Fq(RM,DM)409 b FB(D)565 -b FD([)15 b Fl(\013;)g(\016)20 b FD(])31 b(without)e(E-terms)i -(\(radians\))277 1888 y Fq(EQ)604 b FB(D)565 b FD(Besselian)30 -b(ep)s(o)s(c)m(h)g(of)g(mean)h(equator)g(and)f(equino)m(x)0 -2325 y FB(RETURNED)46 b FD(:)277 2497 y Fq(R)n(C,DC)445 -b FB(D)565 b FD([)15 b Fl(\013;)g(\016)20 b FD(])31 b(with)e(E-terms)i -(included)c(\(radians\))0 2943 y FB(NOTE)44 b FD(:)39 -b(Most)28 b(star)g(p)s(ositions)d(from)i(pre-1984)h(optical)f -(catalogues)i(\(or)e(obtained)g(b)m(y)g(astrometry)h(with)227 -3056 y(resp)s(ect)d(to)h(suc)m(h)f(stars\))h(ha)m(v)m(e)g(the)f -(E-terms)g(built-in.)36 b(If)25 b(it)f(is)h(necessary)g(to)h(con)m(v)m -(ert)h(a)e(formal)f(mean)227 3169 y(place)31 b(\(for)f(example)g(a)h -(pulsar)e(timing)f(p)s(osition\))h(to)i(one)g(consisten)m(t)g(with)e -(suc)m(h)h(a)h(star)g(catalogue,)227 3282 y(then)f(the)h([)15 -b Fl(\013;)g(\016)20 b FD(])31 b(should)d(b)s(e)i(adjusted)g(using)e -(this)i(routine.)0 3728 y FB(REFERENCE)44 b FD(:)56 b -Fq(Explanatory)42 b(Supplement)f(to)f(the)g(Astr)-5 b(onomic)g(al)43 -b(Ephemeris)p FD(,)e(section)d(2D,)h(page)227 3841 y(48.)p -0 3990 V 0 4103 a Fx(SLA)p Fn(_)p Fx(AFIN)274 b Fm(Sexagesimal)36 -b(c)m(haracter)g(string)h(to)i(angle)275 b Fx(SLA)p Fn(_)p -Fx(AFIN)0 4453 y FB(A)m(CTION)44 b FD(:)k(Deco)s(de)35 -b(a)g(free-format)g(sexagesimal)f(string)f(\(degrees,)j(arcmin)m(utes,) -f(arcseconds\))g(in)m(to)f(a)227 4566 y(single)29 b(precision)g -(\015oating)h(p)s(oin)m(t)g(n)m(um)m(b)s(er)f(\(radians\).)0 -4754 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_AFIN)g(\(STRING,)f -(NSTRT,)i(RESLT,)f(JF\))0 5154 y FB(GIVEN)f FD(:)277 -5300 y Fq(STRING)381 b FB(C*\(*\))i FD(string)29 b(con)m(taining)h -(deg,)h(arcmin,)f(arcsec)h(\014elds)277 5413 y Fq(NSTR)-7 -b(T)428 b FB(I)605 b FD(p)s(oin)m(ter)36 b(to)h(start)g(of)f(deco)s(de) -h(\(b)s(eginning)d(of)j(STRING)1658 5526 y(=)30 b(1\))p -eop -%%Page: 7 9 -7 8 bop 0 52 a Fw(SUN/67.70)3297 b FD(7)0 351 y FB(RETURNED)46 -b FD(:)277 497 y Fq(NSTR)-7 b(T)428 b FB(I)605 b FD(adv)-5 -b(anced)31 b(past)f(the)h(deco)s(ded)f(angle)277 610 -y Fq(RESL)-7 b(T)442 b FB(R)567 b FD(angle)31 b(in)e(radians)277 -723 y Fq(JF)629 b FB(I)605 b FD(status:)1825 836 y(0)31 -b(=)f(OK)1752 949 y(+1)h(=)f(default,)f(RESL)-8 b(T)30 -b(unc)m(hanged)g(\(note)h(2\))1752 1062 y Fo(\000)p FD(1)g(=)f(bad)f -(degrees)i(\(note)h(3\))1752 1175 y Fo(\000)p FD(2)f(=)f(bad)f(arcmin)m -(utes)h(\(note)i(3\))1752 1288 y Fo(\000)p FD(3)f(=)f(bad)f(arcseconds) -i(\(note)g(3\))0 1694 y FB(EXAMPLE)45 b FD(:)277 1840 -y Fq(ar)-5 b(gument)369 b(b)-5 b(efor)g(e)1235 b(after)277 -2066 y FD(STRING)1013 2033 y Fp(0)1036 2066 y Ft -(-57 17 44.806 12 34 56.7)2236 2033 y Fp(0)2476 2066 -y FD(unc)m(hanged)277 2179 y(NSTR)-8 b(T)426 b(1)1418 -b(16)32 b(\()p Fq(i.e.)e FD(p)s(oin)m(ting)e(to)j(12...\))277 -2292 y(RESL)-8 b(T)441 b(-)1433 b Fo(\000)p FD(1)p Fl(:)p -FD(00000)277 2405 y(JF)630 b(-)1433 b(0)0 2691 y(A)48 -b(further)e(call)g(to)j(sla)p Ft(_)p FD(AFIN,)e(without)g(adjustmen)m -(t)g(of)h(NSTR)-8 b(T,)47 b(will)d(deco)s(de)k(the)g(second)f(angle,)0 -2804 y(12)90 2771 y Fp(\016)145 2804 y FD(34)235 2767 -y Fk(0)278 2804 y FD(56)363 2767 y Fk(0)m(0)367 2804 -y Fl(:)p FD(7.)0 3098 y FB(NOTES)d FD(:)311 3307 y(1.)i(The)27 -b(\014rst)f(three)h(\\\014elds")f(in)g(STRING)g(are)h(degrees,)i -(arcmin)m(utes,)e(arcseconds,)h(separated)g(b)m(y)427 -3420 y(spaces)d(or)e(commas.)40 b(The)23 b(degrees)h(\014eld)f(ma)m(y)h -(b)s(e)g(signed,)g(but)f(not)h(the)g(others.)39 b(The)24 -b(deco)s(ding)427 3533 y(is)30 b(carried)f(out)i(b)m(y)f(the)h(sla)p -Ft(_)p FD(DFL)-8 b(TIN)30 b(routine)f(and)h(is)g(free-format.)311 -3689 y(2.)46 b(Successiv)m(e)24 b(\014elds)e(ma)m(y)i(b)s(e)f(absen)m -(t,)j(defaulting)c(to)j(zero.)39 b(F)-8 b(or)25 b(zero)f(status,)i(the) -e(only)e(com)m(bina-)427 3802 y(tions)31 b(allo)m(w)m(ed)g(are)g -(degrees)h(alone,)f(degrees)h(and)f(arcmin)m(utes,)g(and)f(all)g(three) -i(\014elds)d(presen)m(t.)427 3915 y(If)34 b(all)f(three)i(\014elds)d -(are)j(omitted,)h(a)e(status)h(of)f(+1)h(is)e(returned)g(and)h(RESL)-8 -b(T)33 b(is)h(unc)m(hanged.)427 4028 y(In)c(all)f(other)i(cases)g(RESL) --8 b(T)30 b(is)f(c)m(hanged.)311 4185 y(3.)46 b(Range)31 -b(c)m(hec)m(king:)506 4342 y Fo(\017)46 b FD(The)38 b(degrees)h -(\014eld)e(is)g(not)i(range)g(c)m(hec)m(k)m(ed.)66 b(Ho)m(w)m(ev)m(er,) -43 b(it)38 b(is)f(exp)s(ected)i(to)g(b)s(e)f(in)m(tegral)597 -4454 y(unless)29 b(the)i(other)f(t)m(w)m(o)i(\014elds)d(are)h(absen)m -(t.)506 4589 y Fo(\017)46 b FD(The)33 b(arcmin)m(utes)h(\014eld)e(is)g -(exp)s(ected)i(to)h(b)s(e)e(0-59,)j(and)d(in)m(tegral)g(if)g(the)h -(arcseconds)g(\014eld)597 4702 y(is)39 b(presen)m(t.)70 -b(If)40 b(the)g(arcseconds)g(\014eld)f(is)g(absen)m(t,)k(the)d(arcmin)m -(utes)g(is)f(exp)s(ected)h(to)h(b)s(e)597 4815 y(0-59.9999...)506 -4950 y Fo(\017)46 b FD(The)30 b(arcseconds)h(\014eld)e(is)g(exp)s -(ected)i(to)g(b)s(e)f(0-59.9999...)506 5085 y Fo(\017)46 -b FD(Deco)s(ding)40 b(con)m(tin)m(ues)g(ev)m(en)h(when)e(a)h(c)m(hec)m -(k)i(has)d(failed.)68 b(Under)39 b(these)i(circumstances)597 -5198 y(the)d(\014eld)e(tak)m(es)i(the)g(supplied)c(v)-5 -b(alue,)38 b(defaulting)e(to)i(zero,)i(and)c(the)i(result)e(RESL)-8 -b(T)36 b(is)597 5310 y(computed)30 b(and)g(returned.)311 -5467 y(4.)46 b(F)-8 b(urther)31 b(\014elds)f(after)h(the)g(three)h(exp) -s(ected)f(ones)g(are)h(not)f(treated)h(as)g(an)e(error.)43 -b(The)30 b(p)s(oin)m(ter)427 5580 y(NSTR)-8 b(T)35 b(is)g(left)g(in)f -(the)i(correct)h(state)f(for)g(further)e(deco)s(ding)g(with)h(the)g -(presen)m(t)h(routine)e(or)427 5693 y(with)29 b(sla)p -Ft(_)p FD(DFL)-8 b(TIN)31 b Fq(etc)p FD(.)40 b(See)31 -b(the)f(example,)h(ab)s(o)m(v)m(e.)p eop -%%Page: 8 10 -8 9 bop 0 52 a FD(8)311 351 y(5.)46 b(If)27 b(STRING)h(con)m(tains)f -(hours,)h(min)m(utes,)f(seconds)h(instead)f(of)h(degrees)g -Fq(etc)p FD(,)g(or)g(if)e(the)i(required)427 464 y(units)k(are)h(turns) -f(\(or)h(da)m(ys\))h(instead)e(of)i(radians,)e(the)h(result)f(RESL)-8 -b(T)33 b(should)e(b)s(e)h(m)m(ultiplied)427 577 y(as)f(follo)m(ws:)477 -723 y Fq(for)i(STRING)145 b(to)33 b(obtain)202 b(multiply)34 -b(RESL)-7 b(T)33 b(by)477 949 y Fo(\016)583 943 y Fp(0)65 -b(00)1122 949 y FD(radians)264 b(1)p Fl(:)p FD(0)477 -1062 y Fo(\016)583 1056 y Fp(0)65 b(00)1122 1062 y FD(turns)345 -b(1)p Fl(=)p FD(2)p Fl(\031)30 b FD(=)25 b(0)p Fl(:)p -FD(1591549430918)q(95)q(335)q(8)477 1175 y(h)30 b(m)g(s)422 -b(radians)264 b(15)p Fl(:)p FD(0)477 1288 y(h)30 b(m)g(s)422 -b(da)m(ys)377 b(15)p Fl(=)p FD(2)p Fl(\031)30 b FD(=)25 -b(2)p Fl(:)p FD(387324146378)q(43)q(003)q(65)p 0 1441 -3780 8 v 0 1554 a Fx(SLA)p Fn(_)p Fx(AIRMAS)781 b Fm(Air)38 -b(Mass)784 b Fx(SLA)p Fn(_)p Fx(AIRMAS)0 1904 y FB(A)m(CTION)44 -b FD(:)c(Air)30 b(mass)g(at)h(giv)m(en)g(zenith)e(distance)h(\(double)g -(precision\).)0 2092 y FB(CALL)45 b FD(:)77 b Ft(D)47 -b(=)h(sla_AIRMAS)d(\(ZD\))0 2444 y FB(GIVEN)g FD(:)277 -2616 y Fq(ZD)611 b FB(D)565 b FD(observ)m(ed)31 b(zenith)e(distance)h -(\(radians\))0 2989 y FB(RETURNED)46 b FD(:)277 3161 -y Fq(sla)p Ft(_)p Fq(AIRMAS)212 b FB(D)565 b FD(air)30 -b(mass)g(\(1)h(at)g(zenith\))0 3534 y FB(NOTES)44 b FD(:)311 -3726 y(1.)i(The)30 b Fq(observe)-5 b(d)41 b FD(zenith)30 -b(distance)g(referred)f(to)i(ab)s(o)m(v)m(e)h(means)e(\\as)h -(a\013ected)h(b)m(y)e(refraction".)311 3875 y(2.)46 b(The)32 -b(routine)g(uses)g(Hardie's)f(\(1962\))k(p)s(olynomial)30 -b(\014t)i(to)h(Bemp)s(orad's)f(data)i(for)e(the)g(relativ)m(e)427 -3987 y(air)i(mass,)h Fl(X)7 b FD(,)36 b(in)d(units)g(of)h(thic)m(kness) -g(at)h(the)f(zenith)g(as)h(tabulated)f(b)m(y)g(Sc)m(ho)s(en)m(b)s(erg)g -(\(1929\).)427 4100 y(This)39 b(is)g(adequate)j(for)e(all)f(normal)g -(needs)h(as)h(it)e(is)h(accurate)i(to)f(b)s(etter)f(than)g(0.1\045)h -(up)f(to)427 4213 y Fl(X)33 b FD(=)25 b(6)p Fl(:)p FD(8)h(and)f(b)s -(etter)h(than)f(1\045)h(up)e(to)i Fl(X)33 b FD(=)25 b(10.)40 -b(Bemp)s(orad's)25 b(tabulated)g(v)-5 b(alues)25 b(are)h(unlik)m(ely) -427 4326 y(to)42 b(b)s(e)f(trust)m(w)m(orth)m(y)h(to)f(suc)m(h)g -(accuracy)i(b)s(ecause)e(of)g(v)-5 b(ariations)40 b(in)g(densit)m(y)-8 -b(,)44 b(pressure)c(and)427 4439 y(other)31 b(conditions)e(in)g(the)h -(atmosphere)h(from)f(those)h(assumed)e(in)g(his)g(w)m(ork.)311 -4587 y(3.)46 b(The)30 b(sign)g(of)g(the)h(ZD)f(is)f(ignored.)311 -4736 y(4.)46 b(A)m(t)29 b(zenith)d(distances)h(greater)i(than)e(ab)s -(out)g Fl(\020)k FD(=)25 b(87)2241 4703 y Fp(\016)2309 -4736 y FD(the)i(air)g(mass)g(is)f(held)g(constan)m(t)j(to)f(a)m(v)m -(oid)427 4849 y(arithmetic)i(o)m(v)m(er\015o)m(ws.)0 -5222 y FB(REFERENCES)44 b FD(:)311 5414 y(1.)i(Hardie,)h(R.H.,)g(1962,) -i(in)42 b Fq(Astr)-5 b(onomic)g(al)47 b(T)-7 b(e)i(chniques)59 -b FD(ed.)80 b(W.A.)44 b(Hiltner,)i(Univ)m(ersit)m(y)c(of)427 -5527 y(Chicago)31 b(Press,)f(p180.)311 5675 y(2.)46 b(Sc)m(ho)s(en)m(b) -s(erg,)31 b(E.,)f(1929,)j(Hdb.)c(d.)h(Ap.,)h(Berlin,)e(Julius)e -(Springer,)i(2,)i(268.)p eop -%%Page: 9 11 -9 10 bop 0 52 a Fw(SUN/67.70)3297 b FD(9)p 0 267 3780 -8 v 0 380 a Fx(SLA)p Fn(_)p Fx(AL)-11 b(T)g(AZ)191 b -Fm(V)-10 b(elo)s(cities)37 b Fj(etc.)h Fm(for)g(Altazim)m(uth)d(Moun)m -(t)193 b Fx(SLA)p Fn(_)p Fx(AL)-11 b(T)g(AZ)0 730 y FB(A)m(CTION)44 -b FD(:)52 b(P)m(ositions,)38 b(v)m(elo)s(cities)d(and)h(accelerations)h -(for)f(an)g(altazim)m(uth)g(telescop)s(e)h(moun)m(t)g(that)f(is)227 -843 y(trac)m(king)31 b(a)g(star)f(\(double)g(precision\).)0 -1031 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_ALTAZ)g(\(HA,)g(DEC,)h -(PHI,)1192 1144 y(AZ,)f(AZD,)h(AZDD,)f(EL,)h(ELD,)g(ELDD,)f(PA,)h(PAD,) -g(PADD\))0 1490 y FB(GIVEN)e FD(:)277 1636 y Fq(HA)600 -b FB(D)565 b FD(hour)30 b(angle)277 1749 y Fq(DEC)540 -b FB(D)565 b FD(declination)277 1862 y Fq(PHI)571 b FB(D)565 -b FD(observ)-5 b(atory)31 b(latitude)0 2209 y FB(RETURNED)46 -b FD(:)277 2355 y Fq(AZ)612 b FB(D)565 b FD(azim)m(uth)277 -2468 y Fq(AZD)543 b FB(D)565 b FD(azim)m(uth)30 b(v)m(elo)s(cit)m(y)277 -2581 y Fq(AZDD)474 b FB(D)565 b FD(azim)m(uth)30 b(acceleration)277 -2694 y Fq(EL)617 b FB(D)565 b FD(elev)-5 b(ation)277 -2807 y Fq(ELD)548 b FB(D)565 b FD(elev)-5 b(ation)30 -b(v)m(elo)s(cit)m(y)277 2920 y Fq(ELDD)479 b FB(D)565 -b FD(elev)-5 b(ation)30 b(acceleration)277 3033 y Fq(P)-7 -b(A)613 b FB(D)565 b FD(parallactic)30 b(angle)277 3146 -y Fq(P)-7 b(AD)544 b FB(D)565 b FD(parallactic)30 b(angle)g(v)m(elo)s -(cit)m(y)277 3259 y Fq(P)-7 b(ADD)475 b FB(D)565 b FD(parallactic)30 -b(angle)g(acceleration)0 3606 y FB(NOTES)44 b FD(:)311 -3793 y(1.)i(Natural)32 b(units)e(are)i(used)f(throughout.)45 -b(HA,)33 b(DEC,)f(PHI,)g(AZ,)f(EL)h(and)f(ZD)h(are)g(in)f(radians.)427 -3906 y(The)41 b(v)m(elo)s(cities)g(and)g(accelerations)h(assume)g -(constan)m(t)h(declination)c(and)i(constan)m(t)i(rate)f(of)427 -4019 y(c)m(hange)36 b(of)e(hour)f(angle)i(\(as)f(for)g(trac)m(king)h(a) -g(star\);)i(the)d(units)f(of)h(AZD,)h(ELD)f(and)g(P)-8 -b(AD)35 b(are)427 4132 y(radians)e(p)s(er)g(radian)g(of)i(HA,)g(while)d -(the)j(units)d(of)j(AZDD,)g(ELDD)g(and)f(P)-8 b(ADD)35 -b(are)g(radians)427 4245 y(p)s(er)29 b(radian)g(of)h(HA)g(squared.)40 -b(T)-8 b(o)30 b(con)m(v)m(ert)i(in)m(to)e(practical)f(degree-)i(and)f -(second-based)g(units:)1121 4460 y(angles)99 b Fo(\002)p -FD(360)p Fl(=)p FD(2)p Fl(\031)770 b Fo(!)100 b FD(degrees)1002 -4573 y(v)m(elo)s(cities)f Fo(\002)p FD(\(2)p Fl(\031)s(=)p -FD(86400\))24 b Fo(\002)c FD(\(360)p Fl(=)p FD(2)p Fl(\031)s -FD(\))142 b Fo(!)100 b FD(degree/sec)858 4686 y(accelerations)g -Fo(\002)p FD(\(2)p Fl(\031)s(=)p FD(86400\))1974 4653 -y Fu(2)2038 4686 y Fo(\002)20 b FD(\(360)p Fl(=)p FD(2)p -Fl(\031)s FD(\))102 b Fo(!)e FD(degree/sec/sec)427 4901 -y(Note)33 b(that)f(the)f(seconds)g(here)g(are)h(sidereal)e(rather)h -(than)g(SI.)g(One)f(sidereal)g(second)h(is)g(ab)s(out)427 -5014 y(0.99727)j(SI)29 b(seconds.)427 5176 y(The)c(v)m(elo)s(cit)m(y)i -(and)e(acceleration)h(factors)h(assume)e(the)h(sidereal)e(trac)m(king)i -(case.)41 b(Their)24 b(resp)s(ec-)427 5289 y(tiv)m(e)31 -b(n)m(umerical)e(v)-5 b(alues)30 b(are)g(\(exactly\))i(1/240)h(and)d -(\(appro)m(ximately\))g(1/3300236.9.)311 5467 y(2.)46 -b(Azim)m(uth)31 b(is)g(returned)f(in)g(the)i(range)f([)15 -b(0)p Fl(;)g FD(2)p Fl(\031)20 b FD(];)33 b(north)e(is)f(zero,)j(and)e -(east)h(is)f(+)p Fl(\031)s(=)p FD(2.)44 b(Elev)-5 b(ation)427 -5580 y(and)32 b(parallactic)g(angle)g(are)h(returned)e(in)h(the)g -(range)h Fo(\006)p Fl(\031)s FD(.)47 b(P)m(osition)31 -b(angle)i(is)e(+v)m(e)i(for)f(a)h(star)427 5693 y(w)m(est)e(of)g(the)f -(meridian)e(and)i(is)g(the)g(angle)h(NP{star{zenith.)p -eop -%%Page: 10 12 -10 11 bop 0 52 a FD(10)311 351 y(3.)46 b(The)25 b(latitude)g(is)g(geo)s -(detic)h(as)g(opp)s(osed)e(to)j(geo)s(cen)m(tric.)40 -b(The)25 b(hour)g(angle)g(and)g(declination)f(are)427 -464 y(top)s(o)s(cen)m(tric.)47 b(Refraction)32 b(and)g(de\014ciencies)f -(in)f(the)j(telescop)s(e)g(moun)m(ting)e(are)i(ignored.)45 -b(The)427 577 y(purp)s(ose)30 b(of)i(the)g(routine)f(is)f(to)j(giv)m(e) -f(the)g(general)g(form)f(of)h(the)f(quan)m(tities.)44 -b(The)32 b(details)e(of)i(a)427 690 y(real)e(telescop)s(e)h(could)f -(profoundly)d(c)m(hange)32 b(the)f(results,)e(esp)s(ecially)f(close)j -(to)g(the)g(zenith.)311 866 y(4.)46 b(No)31 b(range)g(c)m(hec)m(king)g -(of)g(argumen)m(ts)f(is)g(carried)f(out.)311 1042 y(5.)46 -b(In)28 b(applications)e(whic)m(h)i(in)m(v)m(olv)m(e)g(man)m(y)h(suc)m -(h)f(calculations,)g(rather)g(than)g(calling)f(the)h(presen)m(t)427 -1155 y(routine)i(it)g(will)e(b)s(e)i(more)g(e\016cien)m(t)h(to)h(use)e -(inline)d(co)s(de,)k(ha)m(ving)g(previously)d(computed)i(\014xed)427 -1268 y(terms)g(suc)m(h)f(as)h(sine)f(and)g(cosine)g(of)h(latitude,)f -(and)g(\(for)h(trac)m(king)g(a)g(star\))g(sine)f(and)g(cosine)g(of)427 -1381 y(declination.)p 0 1489 3780 8 v 0 1602 a Fx(SLA)p -Fn(_)p Fx(AMP)775 b Fm(Apparen)m(t)37 b(to)h(Mean)777 -b Fx(SLA)p Fn(_)p Fx(AMP)0 1953 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m -(ert)32 b(star)e([)15 b Fl(\013;)g(\016)21 b FD(])30 -b(from)g(geo)s(cen)m(tric)i(apparen)m(t)e(to)h(mean)g(place)f(\(p)s -(ost)g(IA)m(U)h(1976\).)0 2140 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_AMP)g(\(RA,)h(DA,)g(DATE,)f(EQ,)h(RM,)g(DM\))0 -2481 y FB(GIVEN)e FD(:)277 2627 y Fq(RA,D)n(A)439 b FB(D)565 -b FD(apparen)m(t)31 b([)15 b Fl(\013;)g(\016)20 b FD(])31 -b(\(radians\))277 2740 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 -b FD(TDB)31 b(for)f(apparen)m(t)h(place)f(\(JD)p Fo(\000)p -FD(2400000.5\))277 2853 y Fq(EQ)604 b FB(D)565 b FD(equino)m(x:)40 -b(Julian)28 b(ep)s(o)s(c)m(h)i(of)h(mean)f(place)0 3191 -y FB(RETURNED)46 b FD(:)277 3363 y Fq(RM,DM)409 b FB(D)565 -b FD(mean)31 b([)15 b Fl(\013;)g(\016)20 b FD(])30 b(\(radians\))0 -3710 y FB(NOTES)44 b FD(:)311 3895 y(1.)i(The)35 b(distinction)e(b)s -(et)m(w)m(een)k(the)e(required)f(TDB)i(and)f(TT)g(is)f(alw)m(a)m(ys)i -(negligible.)54 b(Moreo)m(v)m(er,)427 4008 y(for)30 b(all)g(but)f(the)i -(most)g(critical)e(applications)f(UTC)i(is)g(adequate.)311 -4152 y(2.)46 b(Iterativ)m(e)41 b(tec)m(hniques)f(are)g(used)g(for)f -(the)i(ab)s(erration)e(and)g(ligh)m(t)g(de\015ection)h(corrections)g -(so)427 4265 y(that)i(the)g(routines)f(sla)p Ft(_)p FD(AMP)g(\(or)h -(sla)p Ft(_)p FD(AMPQK\))f(and)g(sla)p Ft(_)p FD(MAP)g(\(or)h(sla)p -Ft(_)p FD(MAPQK\))f(are)427 4378 y(accurate)d(in)m(v)m(erses;)i(ev)m -(en)d(at)g(the)g(edge)g(of)g(the)f(Sun's)f(disc)h(the)g(discrepancy)g -(is)f(only)h(ab)s(out)427 4491 y(1)31 b(nanoarcsecond.)311 -4635 y(3.)46 b(Where)31 b(m)m(ultiple)e(apparen)m(t)h(places)h(are)g -(to)g(b)s(e)f(con)m(v)m(erted)i(to)g(mean)f(places,)f(for)h(a)g -(\014xed)f(date)427 4748 y(and)35 b(equino)m(x,)h(it)e(is)h(more)g -(e\016cien)m(t)g(to)h(use)f(the)g(sla)p Ft(_)p FD(MAPP)-8 -b(A)36 b(routine)e(to)i(compute)f(the)g(re-)427 4860 -y(quired)29 b(parameters)i(once,)g(follo)m(w)m(ed)f(b)m(y)g(one)h(call) -e(to)j(sla)p Ft(_)p FD(AMPQK)d(p)s(er)g(star.)311 5004 -y(4.)46 b(F)-8 b(or)49 b(EQ=2000D0,)55 b(the)48 b(agreemen)m(t)i(with)c -(ICRS)h(sub-mas,)52 b(limited)46 b(b)m(y)i(the)g(precession-)427 -5117 y(n)m(utation)30 b(mo)s(del)e(\(IA)m(U)j(1976)g(precession,)f -(Shirai)d(&)i(F)-8 b(ukushima)28 b(2001)k(forced)e(n)m(utation)f(and) -427 5230 y(precession)h(corrections\).)311 5374 y(5.)46 -b(The)25 b(accuracy)h(is)d(further)h(limited)f(b)m(y)h(the)h(routine)f -(sla)p Ft(_)p FD(EVP)-8 b(,)25 b(called)f(b)m(y)h(sla)p -Ft(_)p FD(MAPP)-8 b(A,)25 b(whic)m(h)427 5487 y(computes)32 -b(the)g(Earth)f(p)s(osition)e(and)i(v)m(elo)s(cit)m(y)h(using)e(the)i -(metho)s(ds)f(of)g(Stump\013.)43 b(The)31 b(maxi-)427 -5600 y(m)m(um)f(error)g(is)f(ab)s(out)i(0.3)g(milliarcsecond.)p -eop -%%Page: 11 13 -11 12 bop 0 52 a Fw(SUN/67.70)3252 b FD(11)0 351 y FB(REFERENCES)44 -b FD(:)311 554 y(1.)i(1984)32 b Fq(Astr)-5 b(onomic)g(al)36 -b(A)n(lmanac)p FD(,)31 b(pp)e(B39-B41.)311 707 y(2.)46 -b(Lederle)30 b(&)g(Sc)m(h)m(w)m(an,)h(1984.)h Fq(Astr.Astr)-5 -b(ophys.)33 b FB(134)p FD(,)e(1-6.)p 0 855 3780 8 v 0 -968 a Fx(SLA)p Fn(_)p Fx(AMPQK)400 b Fm(Quic)m(k)38 b(Apparen)m(t)f(to) -h(Mean)402 b Fx(SLA)p Fn(_)p Fx(AMPQK)0 1318 y FB(A)m(CTION)44 -b FD(:)c(Con)m(v)m(ert)30 b(star)g([)15 b Fl(\013;)g(\016)20 -b FD(])30 b(from)f(geo)s(cen)m(tric)i(apparen)m(t)f(to)g(mean)f(place)h -(\(p)s(ost)f(IA)m(U)i(1976\).)42 b(Use)227 1431 y(of)31 -b(this)f(routine)g(is)f(appropriate)h(when)g(e\016ciency)h(is)e(imp)s -(ortan)m(t)h(and)g(where)h(man)m(y)g(star)g(p)s(ositions)227 -1544 y(are)38 b(all)d(to)j(b)s(e)e(transformed)h(for)f(one)h(ep)s(o)s -(c)m(h)g(and)f(equino)m(x.)60 b(The)37 b(star-indep)s(enden)m(t)e -(parameters)227 1657 y(can)c(b)s(e)f(obtained)f(b)m(y)i(calling)e(the)h -(sla)p Ft(_)p FD(MAPP)-8 b(A)31 b(routine.)0 1844 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_AMPQK)g(\(RA,)g(DA,)h(AMPRMS,)f(RM,)h -(DM\))0 2216 y FB(GIVEN)e FD(:)277 2362 y Fq(RA,D)n(A)439 -b FB(D)565 b FD(apparen)m(t)31 b([)15 b Fl(\013;)g(\016)20 -b FD(])31 b(\(radians\))277 2475 y Fq(AMPRMS)325 b FB(D\(21\))379 -b FD(star-indep)s(enden)m(t)29 b(mean-to-apparen)m(t)j(parameters:)537 -2588 y(\(1\))1006 b(time)30 b(in)m(terv)-5 b(al)30 b(for)g(prop)s(er)f -(motion)h(\(Julian)e(y)m(ears\))499 2701 y(\(2-4\))969 -b(barycen)m(tric)30 b(p)s(osition)f(of)h(the)h(Earth)f(\(A)m(U\))499 -2814 y(\(5-7\))969 b(helio)s(cen)m(tric)29 b(direction)g(of)i(the)f -(Earth)g(\(unit)g(v)m(ector\))537 2927 y(\(8\))1006 b(\(gra)m -(vitational)52 b(radius)e(of)i(Sun\))p Fo(\002)p FD(2)p -Fl(=)p FD(\(Sun-Earth)e(dis-)1658 3040 y(tance\))477 -3153 y(\(9-11\))946 b FB(v)p FD(:)41 b(barycen)m(tric)30 -b(Earth)g(v)m(elo)s(cit)m(y)h(in)e(units)g(of)i(c)514 -3299 y(\(12\))1658 3193 y Fi(q)p 1741 3193 302 4 v 106 -x FD(1)21 b Fo(\000)f(j)p FB(v)p Fo(j)2003 3257 y Fu(2)454 -3418 y FD(\(13-21\))924 b(precession-n)m(utation)30 b(3)21 -b Fo(\002)e FD(3)31 b(matrix)0 3809 y FB(RETURNED)46 -b FD(:)277 3980 y Fq(RM,DM)409 b FB(D)565 b FD(mean)31 -b([)15 b Fl(\013;)g(\016)20 b FD(])30 b(\(radians\))0 -4379 y FB(NOTES)44 b FD(:)311 4582 y(1.)i(Iterativ)m(e)41 -b(tec)m(hniques)f(are)g(used)g(for)f(the)i(ab)s(erration)e(and)g(ligh)m -(t)g(de\015ection)h(corrections)g(so)427 4695 y(that)i(the)g(routines)f -(sla)p Ft(_)p FD(AMP)g(\(or)h(sla)p Ft(_)p FD(AMPQK\))f(and)g(sla)p -Ft(_)p FD(MAP)g(\(or)h(sla)p Ft(_)p FD(MAPQK\))f(are)427 -4808 y(accurate)d(in)m(v)m(erses;)i(ev)m(en)d(at)g(the)g(edge)g(of)g -(the)f(Sun's)f(disc)h(the)g(discrepancy)g(is)f(only)h(ab)s(out)427 -4920 y(1)31 b(nanoarcsecond.)0 5319 y FB(REFERENCES)44 -b FD(:)311 5522 y(1.)i(1984)32 b Fq(Astr)-5 b(onomic)g(al)36 -b(A)n(lmanac)p FD(,)31 b(pp)e(B39-B41.)311 5675 y(2.)46 -b(Lederle)30 b(&)g(Sc)m(h)m(w)m(an,)h(1984.)h Fq(Astr.Astr)-5 -b(ophys.)33 b FB(134)p FD(,)e(1-6.)p eop -%%Page: 12 14 -12 13 bop 0 52 a FD(12)p 0 267 3780 8 v 0 380 a Fx(SLA)p -Fn(_)p Fx(A)l(OP)709 b Fm(Apparen)m(t)38 b(to)g(Observ)m(ed)710 -b Fx(SLA)p Fn(_)p Fx(A)l(OP)0 730 y FB(A)m(CTION)44 b -FD(:)c(Apparen)m(t)31 b(to)g(observ)m(ed)f(place,)h(for)f(sources)g -(distan)m(t)h(from)e(the)i(solar)f(system.)0 918 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_AOP)g(\(RAP,)h(DAP,)f(DATE,)h(DUT,)f -(ELONGM,)g(PHIM,)g(HM,)h(XP,)g(YP,)1096 1031 y(TDK,)g(PMB,)f(RH,)h(WL,) -g(TLR,)g(AOB,)f(ZOB,)h(HOB,)g(DOB,)f(ROB\))0 1361 y FB(GIVEN)f -FD(:)277 1507 y Fq(RAP,D)n(AP)315 b FB(D)565 b FD(geo)s(cen)m(tric)32 -b(apparen)m(t)e([)15 b Fl(\013;)g(\016)21 b FD(])30 b(\(radians\))277 -1620 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(UTC)140 b(date/time)i(\(Mo) -s(di\014ed)e(Julian)e(Date,)1658 1733 y(JD)p Fo(\000)p -FD(2400000.5\))277 1846 y Fq(DUT)534 b FB(D)565 b FD(\001UT:)30 -b(UT1)p Fo(\000)p FD(UTC)g(\(UTC)g(seconds\))277 1959 -y Fq(ELONGM)327 b FB(D)565 b FD(observ)m(er's)31 b(mean)f(longitude)f -(\(radians,)h(east)h(+v)m(e\))277 2072 y Fq(PHIM)489 -b FB(D)565 b FD(observ)m(er's)31 b(mean)f(geo)s(detic)h(latitude)f -(\(radians\))277 2185 y Fq(HM)586 b FB(D)565 b FD(observ)m(er's)31 -b(heigh)m(t)f(ab)s(o)m(v)m(e)i(sea)f(lev)m(el)f(\(metres\))277 -2297 y Fq(XP,YP)448 b FB(D)565 b FD(p)s(olar)29 b(motion)h([)15 -b Fl(x;)g(y)k FD(])31 b(co)s(ordinates)f(\(radians\))277 -2410 y Fq(TDK)532 b FB(D)565 b FD(lo)s(cal)30 b(am)m(bien)m(t)g(temp)s -(erature)g(\(K;)h(std=273.15D0\))277 2523 y Fq(PMB)528 -b FB(D)565 b FD(lo)s(cal)30 b(atmospheric)g(pressure)f(\(m)m(b;)h -(std=1013.25D0\))277 2636 y Fq(RH)602 b FB(D)565 b FD(lo)s(cal)30 -b(relativ)m(e)g(h)m(umidit)m(y)f(\(in)g(the)i(range)f(0D0)17 -b({)e(1D0\))277 2749 y Fq(WL)588 b FB(D)565 b FD(e\013ectiv)m(e)32 -b(w)m(a)m(v)m(elength)g(\()p Fl(\026)p FD(m,)e Fq(e.g.)g -FD(0.55D0\))277 2862 y Fq(TLR)548 b FB(D)565 b FD(trop)s(ospheric)84 -b(lapse)h(rate)h(\(K)f(p)s(er)f(metre,)100 b Fq(e.g.)1658 -2975 y FD(0.0065D0\))0 3294 y FB(RETURNED)46 b FD(:)277 -3440 y Fq(A)n(OB)536 b FB(D)565 b FD(observ)m(ed)31 b(azim)m(uth)f -(\(radians:)39 b(N=0,)31 b(E=90)3236 3407 y Fp(\016)3276 -3440 y FD(\))277 3553 y Fq(ZOB)546 b FB(D)565 b FD(observ)m(ed)31 -b(zenith)e(distance)h(\(radians\))277 3666 y Fq(HOB)534 -b FB(D)565 b FD(observ)m(ed)31 b(Hour)f(Angle)g(\(radians\))277 -3779 y Fq(DOB)533 b FB(D)565 b FD(observ)m(ed)31 b Fl(\016)j -FD(\(radians\))277 3892 y Fq(R)n(OB)538 b FB(D)565 b -FD(observ)m(ed)31 b Fl(\013)f FD(\(radians\))0 4212 y -FB(NOTES)44 b FD(:)311 4394 y(1.)i(This)28 b(routine)h(returns)f -(zenith)h(distance)g(rather)h(than)f(elev)-5 b(ation)30 -b(in)e(order)h(to)i(re\015ect)f(the)g(fact)427 4507 y(that)h(no)g(allo) -m(w)m(ance)g(is)e(made)h(for)h(depression)d(of)j(the)f(horizon.)311 -4648 y(2.)46 b(The)30 b(accuracy)i(of)f(the)g(result)e(is)h(limited)e -(b)m(y)j(the)g(corrections)g(for)f(refraction.)41 b(Pro)m(viding)29 -b(the)427 4761 y(meteorological)j(parameters)f(are)g(kno)m(wn)f -(accurately)h(and)f(there)h(are)g(no)f(gross)h(lo)s(cal)f(e\013ects,) -427 4874 y(the)f(predicted)e(azim)m(uth)h(and)g(elev)-5 -b(ation)28 b(should)e(b)s(e)i(within)e(ab)s(out)i(0)2869 -4837 y Fk(0)l(0)2873 4874 y Fl(:)p FD(1)h(for)f Fl(\020)k(<)25 -b FD(70)3367 4841 y Fp(\016)3407 4874 y FD(.)40 b(Ev)m(en)29 -b(at)427 4987 y(a)i(top)s(o)s(cen)m(tric)f(zenith)g(distance)g(of)g(90) -1800 4954 y Fp(\016)1840 4987 y FD(,)h(the)f(accuracy)i(in)c(elev)-5 -b(ation)31 b(should)d(b)s(e)h(b)s(etter)i(than)427 5100 -y(1)21 b(arcmin)m(ute;)j(useful)19 b(results)g(are)i(a)m(v)-5 -b(ailable)20 b(for)g(a)h(further)f(3)2512 5067 y Fp(\016)2551 -5100 y FD(,)j(b)s(ey)m(ond)d(whic)m(h)f(the)i(sla)p Ft(_)p -FD(REFR)m(O)427 5213 y(routine)26 b(returns)f(a)i(\014xed)f(v)-5 -b(alue)27 b(of)f(the)h(refraction.)39 b(The)27 b(complemen)m(tary)f -(routines)g(sla)p Ft(_)p FD(A)m(OP)427 5326 y(\(or)39 -b(sla)p Ft(_)p FD(A)m(OPQK\))f(and)g(sla)p Ft(_)p FD(O)m(AP)g(\(or)h -(sla)p Ft(_)p FD(O)m(APQK\))f(are)h(self-consisten)m(t)g(to)g(b)s -(etter)g(than)427 5439 y(1)31 b(microarcsecond)f(all)g(o)m(v)m(er)h -(the)g(celestial)f(sphere.)311 5580 y(3.)46 b(It)c(is)e(advisable)h(to) -h(tak)m(e)h(great)g(care)f(with)e(units,)j(as)f(ev)m(en)g(unlik)m(ely)d -(v)-5 b(alues)41 b(of)h(the)f(input)427 5693 y(parameters)31 -b(are)g(accepted)g(and)f(pro)s(cessed)g(in)f(accordance)j(with)d(the)i -(mo)s(dels)e(used.)p eop -%%Page: 13 15 -13 14 bop 0 52 a Fw(SUN/67.70)3252 b FD(13)311 351 y(4.)46 -b Fq(App)-5 b(ar)g(ent)35 b FD([)15 b Fl(\013;)g(\016)20 -b FD(])25 b(means)e(the)i(geo)s(cen)m(tric)g(apparen)m(t)f(righ)m(t)g -(ascension)f(and)h(declination,)g(whic)m(h)427 464 y(is)31 -b(obtained)g(from)g(a)h(catalogue)h(mean)f(place)g(b)m(y)f(allo)m(wing) -g(for)g(space)h(motion,)g(parallax,)f(the)427 577 y(Sun's)i(gra)m -(vitational)h(lens)e(e\013ect,)37 b(ann)m(ual)32 b(ab)s(erration,)i -(and)g(precession-n)m(utation.)50 b(F)-8 b(or)34 b(star)427 -690 y(p)s(ositions)44 b(in)g(the)h(FK5)h(system)f(\()p -Fq(i.e.)g FD(J2000\),)51 b(these)46 b(e\013ects)h(can)f(b)s(e)e -(applied)f(b)m(y)j(means)427 803 y(of)38 b(the)g(sla)p -Ft(_)p FD(MAP)f Fq(etc.)g FD(routines.)61 b(Starting)37 -b(from)g(other)h(mean)f(place)h(systems,)i(additional)427 -916 y(transformations)22 b(will)e(b)s(e)i(needed;)j(for)d(example,)i -(FK4)f(\()p Fq(i.e.)g FD(B1950\))i(mean)d(places)h(w)m(ould)e(\014rst) -427 1029 y(ha)m(v)m(e)32 b(to)f(b)s(e)f(con)m(v)m(erted)i(to)f(FK5,)g -(whic)m(h)e(can)i(b)s(e)e(done)h(with)g(the)g(sla)p Ft(_)p -FD(FK425)h Fq(etc.)f FD(routines.)311 1163 y(5.)46 b -Fq(Observe)-5 b(d)49 b FD([)15 b Fl(Az)t(;)g(E)5 b(l)42 -b FD(])d(means)g(the)g(p)s(osition)d(that)k(w)m(ould)d(b)s(e)i(seen)f -(b)m(y)h(a)g(p)s(erfect)g(theo)s(dolite)427 1276 y(lo)s(cated)33 -b(at)h(the)f(observ)m(er.)49 b(This)31 b(is)h(obtained)g(from)g(the)h -(geo)s(cen)m(tric)h(apparen)m(t)f([)15 b Fl(\013;)g(\016)21 -b FD(])33 b(b)m(y)g(al-)427 1389 y(lo)m(wing)25 b(for)g(Earth)h(orien)m -(tation)g(and)f(diurnal)d(ab)s(erration,)k(rotating)g(from)g(equator)g -(to)g(horizon)427 1501 y(co)s(ordinates,)f(and)d(then)h(adjusting)f -(for)h(refraction.)38 b(The)23 b([)15 b Fl(h;)g(\016)20 -b FD(])j(is)g(obtained)f(b)m(y)h(rotating)h(bac)m(k)427 -1614 y(in)m(to)38 b(equatorial)f(co)s(ordinates,)i(using)d(the)h(geo)s -(detic)h(latitude)f(corrected)h(for)f(p)s(olar)f(motion,)427 -1727 y(and)27 b(is)f(the)i(p)s(osition)d(that)j(w)m(ould)e(b)s(e)g -(seen)i(b)m(y)f(a)g(p)s(erfect)g(equatorial)g(lo)s(cated)h(at)g(the)f -(observ)m(er)427 1840 y(and)c(with)f(its)h(p)s(olar)f(axis)h(aligned)f -(to)i(the)g(Earth's)f(axis)g(of)h(rotation)f(\()p Fq(n.b.)h -FD(not)f(to)h(the)g(refracted)427 1953 y(p)s(ole\).)40 -b(Finally)-8 b(,)29 b(the)i Fl(\013)g FD(is)e(obtained)h(b)m(y)g -(subtracting)g(the)g Fq(h)38 b FD(from)30 b(the)h(lo)s(cal)e(apparen)m -(t)i(ST.)311 2087 y(6.)46 b(T)-8 b(o)37 b(predict)e(the)h(required)e -(setting)i(of)g(a)g(real)g(telescop)s(e,)i(the)e(observ)m(ed)g(place)g -(pro)s(duced)f(b)m(y)427 2200 y(this)28 b(routine)f(w)m(ould)g(ha)m(v)m -(e)j(to)f(b)s(e)e(adjusted)h(for)g(the)h(tilt)e(of)i(the)f(azim)m(uth)g -(or)h(p)s(olar)e(axis)h(of)g(the)427 2313 y(moun)m(ting)e(\(with)f -(appropriate)g(corrections)i(for)f(moun)m(t)g(\015exures\),)h(for)f -(non-p)s(erp)s(endicularit)m(y)427 2426 y(b)s(et)m(w)m(een)j(the)g -(moun)m(ting)e(axes,)j(for)e(the)g(p)s(osition)e(of)j(the)f(rotator)i -(axis)d(and)h(the)h(p)s(oin)m(ting)d(axis)427 2539 y(relativ)m(e)38 -b(to)g(it,)g(for)f(tub)s(e)g(\015exure,)h(for)f(gear)i(and)d(enco)s -(der)h(errors,)i(and)e(\014nally)e(for)i(enco)s(der)427 -2652 y(zero)c(p)s(oin)m(ts.)45 b(Some)32 b(telescop)s(es)g(w)m(ould,)g -(of)g(course,)h(exhibit)d(other)i(prop)s(erties)f(whic)m(h)g(w)m(ould) -427 2765 y(need)f(to)i(b)s(e)d(accoun)m(ted)j(for)e(at)h(the)g -(appropriate)e(p)s(oin)m(t)h(in)f(the)h(sequence.)311 -2899 y(7.)46 b(This)36 b(routine)g(tak)m(es)i(time)f(to)h(execute,)i -(due)d(mainly)e(to)j(the)f(rigorous)f(in)m(tegration)h(used)g(to)427 -3012 y(ev)-5 b(aluate)33 b(the)f(refraction.)44 b(F)-8 -b(or)33 b(pro)s(cessing)d(m)m(ultiple)f(stars)j(for)g(one)g(lo)s -(cation)f(and)g(time,)h(call)427 3124 y(sla)p Ft(_)p -FD(A)m(OPP)-8 b(A)41 b(once)h(follo)m(w)m(ed)f(b)m(y)g(one)g(call)g(p)s -(er)f(star)h(to)h(sla)p Ft(_)p FD(A)m(OPQK.)e(Where)h(a)h(range)f(of) -427 3237 y(times)31 b(within)d(a)j(limited)e(p)s(erio)s(d)f(of)j(a)h -(few)e(hours)g(is)g(in)m(v)m(olv)m(ed,)h(and)f(the)h(highest)f -(precision)f(is)427 3350 y(not)g(required,)e(call)g(sla)p -Ft(_)p FD(A)m(OPP)-8 b(A)28 b(once,)i(follo)m(w)m(ed)e(b)m(y)g(a)g -(call)g(to)h(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)g(T)28 b(eac)m(h)h(time)f -(the)427 3463 y(time)i(c)m(hanges,)i(follo)m(w)m(ed)e(b)m(y)g(one)h -(call)f(p)s(er)f(star)h(to)i(sla)p Ft(_)p FD(A)m(OPQK.)311 -3597 y(8.)46 b(The)26 b(D)m(A)-8 b(TE)27 b(argumen)m(t)g(is)e(UTC)h -(expressed)g(as)g(an)g(MJD.)h(This)e(is,)h(strictly)f(sp)s(eaking,)i -(wrong,)427 3710 y(b)s(ecause)33 b(of)g(leap)g(seconds.)48 -b(Ho)m(w)m(ev)m(er,)35 b(as)e(long)g(as)g(the)g(\001UT)f(and)h(the)g -(UTC)f(are)h(consisten)m(t)427 3823 y(there)j(are)h(no)f -(di\016culties,)f(except)i(during)d(a)i(leap)g(second.)57 -b(In)36 b(this)f(case,)j(the)f(start)f(of)g(the)427 3936 -y(61st)i(second)f(of)g(the)g(\014nal)f(min)m(ute)g(should)f(b)s(egin)g -(a)j(new)e(MJD)h(da)m(y)h(and)e(the)h(old)f(pre-leap)427 -4049 y(\001UT)i(should)e(con)m(tin)m(ue)i(to)h(b)s(e)e(used.)63 -b(As)38 b(the)g(61st)h(second)f(completes,)j(the)d(MJD)g(should)427 -4162 y(rev)m(ert)31 b(to)h(the)e(start)h(of)g(the)f(da)m(y)h(as,)g(sim) -m(ultaneously)-8 b(,)29 b(the)h(\001UT)g(c)m(hanges)h(b)m(y)g(one)f -(second)h(to)427 4275 y(its)f(p)s(ost-leap)g(new)g(v)-5 -b(alue.)311 4409 y(9.)46 b(The)27 b(\001UT)h(\(UT1)p -Fo(\000)p FD(UTC\))g(is)e(tabulated)i(in)e(IERS)h(circulars)f(and)h -(elsewhere.)39 b(It)28 b(increases)g(b)m(y)427 4522 y(exactly)k(one)f -(second)f(at)i(the)f(end)f(of)h(eac)m(h)g(UTC)f(leap)h(second,)g(in)m -(tro)s(duced)e(in)g(order)h(to)i(k)m(eep)427 4635 y(\001UT)e(within)e -Fo(\006)p FD(0)1066 4602 y Fu(s)1071 4635 y Fl(:)p FD(9.)266 -4769 y(10.)46 b(IMPOR)-8 b(T)g(ANT)39 b({)g(T)-8 b(AKE)38 -b(CARE)g(WITH)h(THE)f(LONGITUDE)h(SIGN)f(CONVENTION.)427 -4882 y(The)33 b(longitude)f(required)g(b)m(y)h(the)g(presen)m(t)h -(routine)e(is)h FB(east-p)s(ositiv)m(e)p FD(,)h(in)e(accordance)j(with) -427 4994 y(geographical)f(con)m(v)m(en)m(tion)g(\(and)f(righ)m -(t-handed\).)49 b(In)32 b(particular,)h(note)h(that)g(the)f(longitudes) -427 5107 y(returned)d(b)m(y)i(the)f(sla)p Ft(_)p FD(OBS)f(routine)h -(are)h(w)m(est-p)s(ositiv)m(e)f(\(as)h(in)e(the)i Fq(Astr)-5 -b(onomic)g(al)36 b(A)n(lmanac)427 5220 y FD(b)s(efore)30 -b(1984\))j(and)c(m)m(ust)i(b)s(e)e(rev)m(ersed)i(in)e(sign)g(b)s(efore) -h(use)h(in)e(the)h(presen)m(t)h(routine.)266 5354 y(11.)46 -b(The)37 b(p)s(olar)f(co)s(ordinates)h(XP)-8 b(,YP)38 -b(can)f(b)s(e)g(obtained)f(from)h(IERS)f(circulars)f(and)i(equiv)-5 -b(alen)m(t)427 5467 y(publications.)36 b(The)24 b(maxim)m(um)f -(amplitude)g(is)g(ab)s(out)h(0)2373 5430 y Fk(0)m(0)2377 -5467 y Fl(:)p FD(3.)40 b(If)24 b(XP)-8 b(,YP)25 b(v)-5 -b(alues)24 b(are)h(una)m(v)-5 b(ailable,)427 5580 y(use)31 -b(XP=YP=0D0.)43 b(See)32 b(page)g(B60)g(of)f(the)g(1988)i -Fq(Astr)-5 b(onomic)g(al)36 b(A)n(lmanac)h FD(for)30 -b(a)i(de\014nition)427 5693 y(of)f(the)f(t)m(w)m(o)i(angles.)p -eop -%%Page: 14 16 -14 15 bop 0 52 a FD(14)266 351 y(12.)46 b(The)35 b(heigh)m(t)g(ab)s(o)m -(v)m(e)h(sea)f(lev)m(el)g(of)g(the)g(observing)f(station,)i(HM,)g(can)f -(b)s(e)g(obtained)f(from)g(the)427 464 y Fq(Astr)-5 b(onomic)g(al)33 -b(A)n(lmanac)f FD(\(Section)c(J)e(in)g(the)i(1988)g(edition\),)f(or)h -(via)e(the)i(routine)e(sla)p Ft(_)p FD(OBS.)g(If)427 -577 y(P)-8 b(,)27 b(the)f(pressure)e(in)h(millibars,)e(is)i(a)m(v)-5 -b(ailable,)26 b(an)g(adequate)h(estimate)f(of)g(HM)h(can)f(b)s(e)f -(obtained)427 690 y(from)30 b(the)h(follo)m(wing)e(expression:)597 -873 y Ft(HM=-29.3D0*TSL*LOG\(P/1013)o(.25D)o(0\))427 -1055 y FD(where)22 b(TSL)f(is)h(the)g(appro)m(ximate)h(sea-lev)m(el)g -(air)e(temp)s(erature)h(in)f(K)h(\(see)i Fq(Astr)-5 b(ophysic)g(al)28 -b(Quan-)427 1168 y(tities)p FD(,)k(C.W.Allen,)g(3rd)f(edition,)f -Fo(x)p FD(52\).)46 b(Similarly)-8 b(,)29 b(if)h(the)i(pressure)e(P)h -(is)g(not)h(kno)m(wn,)f(it)g(can)427 1281 y(b)s(e)f(estimated)h(from)f -(the)g(heigh)m(t)g(of)h(the)f(observing)g(station,)h(HM)f(as)h(follo)m -(ws:)597 1464 y Ft(P=1013.25D0*EXP\(-HM/\(29.3)o(D0*T)o(SL\)\))427 -1647 y FD(Note,)g(ho)m(w)m(ev)m(er,)g(that)f(the)f(refraction)g(is)g -(nearly)f(prop)s(ortional)f(to)j(the)f(pressure)f(and)h(that)h(an)427 -1759 y(accurate)i(P)e(v)-5 b(alue)30 b(is)g(imp)s(ortan)m(t)f(for)h -(precise)g(w)m(ork.)266 1942 y(13.)46 b(The)31 b(azim)m(uths)g -Fq(etc.)g FD(used)g(b)m(y)g(the)h(presen)m(t)f(routine)g(are)h(with)e -(resp)s(ect)h(to)h(the)g(celestial)f(p)s(ole.)427 2055 -y(Corrections)f(to)h(the)g(terrestrial)e(p)s(ole)h(can)g(b)s(e)g -(computed)g(using)f(sla)p Ft(_)p FD(POLMO.)p 0 2261 3780 -8 v 0 2374 a Fx(SLA)p Fn(_)p Fx(A)l(OPP)-11 b(A)464 b -Fm(Appt-to-Obs)37 b(P)m(arameters)462 b Fx(SLA)p Fn(_)p -Fx(A)l(OPP)-11 b(A)0 2724 y FB(A)m(CTION)44 b FD(:)60 -b(Pre-compute)40 b(the)h(set)f(of)g(apparen)m(t)h(to)g(observ)m(ed)f -(place)g(parameters)g(required)e(b)m(y)i(the)227 2837 -y(\\quic)m(k")31 b(routines)e(sla)p Ft(_)p FD(A)m(OPQK)h(and)f(sla)p -Ft(_)p FD(O)m(APQK.)0 3025 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_AOPPA)g(\(DATE,)g(DUT,)g(ELONGM,)g(PHIM,)h(HM,)f(XP,)h(YP,)1192 -3138 y(TDK,)f(PMB,)h(RH,)g(WL,)f(TLR,)h(AOPRMS\))0 3597 -y FB(GIVEN)e FD(:)277 3743 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 -b FD(UTC)140 b(date/time)i(\(Mo)s(di\014ed)e(Julian)e(Date,)1658 -3856 y(JD)p Fo(\000)p FD(2400000.5\))277 3969 y Fq(DUT)534 -b FB(D)565 b FD(\001UT:)30 b(UT1)p Fo(\000)p FD(UTC)g(\(UTC)g -(seconds\))277 4082 y Fq(ELONGM)327 b FB(D)565 b FD(observ)m(er's)31 -b(mean)f(longitude)f(\(radians,)h(east)h(+v)m(e\))277 -4195 y Fq(PHIM)489 b FB(D)565 b FD(observ)m(er's)31 b(mean)f(geo)s -(detic)h(latitude)f(\(radians\))277 4308 y Fq(HM)586 -b FB(D)565 b FD(observ)m(er's)31 b(heigh)m(t)f(ab)s(o)m(v)m(e)i(sea)f -(lev)m(el)f(\(metres\))277 4420 y Fq(XP,YP)448 b FB(D)565 -b FD(p)s(olar)29 b(motion)h([)15 b Fl(x;)g(y)k FD(])31 -b(co)s(ordinates)f(\(radians\))277 4533 y Fq(TDK)532 -b FB(D)565 b FD(lo)s(cal)30 b(am)m(bien)m(t)g(temp)s(erature)g(\(K;)h -(std=273.15D0\))277 4646 y Fq(PMB)528 b FB(D)565 b FD(lo)s(cal)30 -b(atmospheric)g(pressure)f(\(m)m(b;)h(std=1013.25D0\))277 -4759 y Fq(RH)602 b FB(D)565 b FD(lo)s(cal)30 b(relativ)m(e)g(h)m -(umidit)m(y)f(\(in)g(the)i(range)f(0D0)17 b({)e(1D0\))277 -4872 y Fq(WL)588 b FB(D)565 b FD(e\013ectiv)m(e)32 b(w)m(a)m(v)m -(elength)g(\()p Fl(\026)p FD(m,)e Fq(e.g.)g FD(0.55D0\))277 -4985 y Fq(TLR)548 b FB(D)565 b FD(trop)s(ospheric)84 -b(lapse)h(rate)h(\(K)f(p)s(er)f(metre,)100 b Fq(e.g.)1658 -5098 y FD(0.0065D0\))0 5634 y FB(RETURNED)46 b FD(:)p -eop -%%Page: 15 17 -15 16 bop 0 52 a Fw(SUN/67.70)3252 b FD(15)277 339 y -Fq(A)n(OPRMS)339 b FB(D\(14\))379 b FD(star-indep)s(enden)m(t)85 -b(apparen)m(t-to-observ)m(ed)j(parame-)1658 452 y(ters:)537 -565 y(\(1\))1006 b(geo)s(detic)31 b(latitude)f(\(radians\))502 -678 y(\(2,3\))971 b(sine)29 b(and)h(cosine)g(of)h(geo)s(detic)g -(latitude)537 791 y(\(4\))1006 b(magnitude)30 b(of)g(diurnal)e(ab)s -(erration)h(v)m(ector)537 904 y(\(5\))1006 b(heigh)m(t)30 -b(\(HM\))537 1016 y(\(6\))1006 b(am)m(bien)m(t)31 b(temp)s(erature)f -(\(TDK\))537 1129 y(\(7\))1006 b(pressure)29 b(\(PMB\))537 -1242 y(\(8\))1006 b(relativ)m(e)31 b(h)m(umidit)m(y)d(\(RH\))537 -1355 y(\(9\))1006 b(w)m(a)m(v)m(elength)32 b(\(WL\))514 -1468 y(\(10\))984 b(lapse)30 b(rate)h(\(TLR\))456 1581 -y(\(11,12\))927 b(refraction)30 b(constan)m(ts)i(A)e(and)g(B)h -(\(radians\))514 1694 y(\(13\))984 b(longitude)41 b(+)h(eqn)h(of)f -(equino)m(xes)g(+)h(\\sidereal)e(\001UT")1658 1807 y(\(radians\))514 -1920 y(\(14\))984 b(lo)s(cal)30 b(apparen)m(t)g(sidereal)f(time)h -(\(radians\))0 2311 y FB(NOTES)44 b FD(:)311 2513 y(1.)i(It)c(is)e -(advisable)h(to)h(tak)m(e)h(great)g(care)f(with)e(units,)j(as)f(ev)m -(en)g(unlik)m(ely)d(v)-5 b(alues)41 b(of)h(the)f(input)427 -2626 y(parameters)31 b(are)g(accepted)g(and)f(pro)s(cessed)g(in)f -(accordance)j(with)d(the)i(mo)s(dels)e(used.)311 2780 -y(2.)46 b(The)26 b(D)m(A)-8 b(TE)27 b(argumen)m(t)g(is)e(UTC)h -(expressed)g(as)g(an)g(MJD.)h(This)e(is,)h(strictly)f(sp)s(eaking,)i -(wrong,)427 2893 y(b)s(ecause)33 b(of)g(leap)g(seconds.)48 -b(Ho)m(w)m(ev)m(er,)35 b(as)e(long)g(as)g(the)g(\001UT)f(and)h(the)g -(UTC)f(are)h(consisten)m(t)427 3006 y(there)j(are)h(no)f -(di\016culties,)f(except)i(during)d(a)i(leap)g(second.)57 -b(In)36 b(this)f(case,)j(the)f(start)f(of)g(the)427 3118 -y(61st)i(second)f(of)g(the)g(\014nal)f(min)m(ute)g(should)f(b)s(egin)g -(a)j(new)e(MJD)h(da)m(y)h(and)e(the)h(old)f(pre-leap)427 -3231 y(\001UT)i(should)e(con)m(tin)m(ue)i(to)h(b)s(e)e(used.)63 -b(As)38 b(the)g(61st)h(second)f(completes,)j(the)d(MJD)g(should)427 -3344 y(rev)m(ert)31 b(to)h(the)e(start)h(of)g(the)f(da)m(y)h(as,)g(sim) -m(ultaneously)-8 b(,)29 b(the)h(\001UT)g(c)m(hanges)h(b)m(y)g(one)f -(second)h(to)427 3457 y(its)f(p)s(ost-leap)g(new)g(v)-5 -b(alue.)311 3611 y(3.)46 b(The)27 b(\001UT)h(\(UT1)p -Fo(\000)p FD(UTC\))g(is)e(tabulated)i(in)e(IERS)h(circulars)f(and)h -(elsewhere.)39 b(It)28 b(increases)g(b)m(y)427 3724 y(exactly)k(one)f -(second)f(at)i(the)f(end)f(of)h(eac)m(h)g(UTC)f(leap)h(second,)g(in)m -(tro)s(duced)e(in)g(order)h(to)i(k)m(eep)427 3837 y(\001UT)38 -b(within)d Fo(\006)p FD(0)1081 3804 y Fu(s)1086 3837 -y Fl(:)p FD(9.)64 b(The)37 b(\\sidereal)g(\001UT")h(whic)m(h)f(forms)g -(part)h(of)g(A)m(OPRMS\(13\))h(is)e(the)427 3950 y(same)27 -b(quan)m(tit)m(y)-8 b(,)29 b(but)d(con)m(v)m(erted)i(from)f(solar)f(to) -i(sidereal)d(seconds)i(and)f(expressed)g(in)g(radians.)311 -4103 y(4.)46 b(IMPOR)-8 b(T)g(ANT)39 b({)g(T)-8 b(AKE)38 -b(CARE)g(WITH)h(THE)f(LONGITUDE)h(SIGN)f(CONVENTION.)427 -4216 y(The)33 b(longitude)f(required)g(b)m(y)h(the)g(presen)m(t)h -(routine)e(is)h FB(east-p)s(ositiv)m(e)p FD(,)h(in)e(accordance)j(with) -427 4329 y(geographical)f(con)m(v)m(en)m(tion)g(\(and)f(righ)m -(t-handed\).)49 b(In)32 b(particular,)h(note)h(that)g(the)f(longitudes) -427 4442 y(returned)d(b)m(y)i(the)f(sla)p Ft(_)p FD(OBS)f(routine)h -(are)h(w)m(est-p)s(ositiv)m(e)f(\(as)h(in)e(the)i Fq(Astr)-5 -b(onomic)g(al)36 b(A)n(lmanac)427 4555 y FD(b)s(efore)30 -b(1984\))j(and)c(m)m(ust)i(b)s(e)e(rev)m(ersed)i(in)e(sign)g(b)s(efore) -h(use)h(in)e(the)h(presen)m(t)h(routine.)311 4708 y(5.)46 -b(The)37 b(p)s(olar)f(co)s(ordinates)h(XP)-8 b(,YP)38 -b(can)f(b)s(e)g(obtained)f(from)h(IERS)f(circulars)f(and)i(equiv)-5 -b(alen)m(t)427 4821 y(publications.)36 b(The)24 b(maxim)m(um)f -(amplitude)g(is)g(ab)s(out)h(0)2373 4784 y Fk(0)m(0)2377 -4821 y Fl(:)p FD(3.)40 b(If)24 b(XP)-8 b(,YP)25 b(v)-5 -b(alues)24 b(are)h(una)m(v)-5 b(ailable,)427 4934 y(use)31 -b(XP=YP=0D0.)43 b(See)32 b(page)g(B60)g(of)f(the)g(1988)i -Fq(Astr)-5 b(onomic)g(al)36 b(A)n(lmanac)h FD(for)30 -b(a)i(de\014nition)427 5047 y(of)f(the)f(t)m(w)m(o)i(angles.)311 -5201 y(6.)46 b(The)35 b(heigh)m(t)g(ab)s(o)m(v)m(e)h(sea)f(lev)m(el)g -(of)g(the)g(observing)f(station,)i(HM,)g(can)f(b)s(e)g(obtained)f(from) -g(the)427 5314 y Fq(Astr)-5 b(onomic)g(al)33 b(A)n(lmanac)f -FD(\(Section)c(J)e(in)g(the)i(1988)g(edition\),)f(or)h(via)e(the)i -(routine)e(sla)p Ft(_)p FD(OBS.)g(If)427 5427 y(P)-8 -b(,)27 b(the)f(pressure)e(in)h(millibars,)e(is)i(a)m(v)-5 -b(ailable,)26 b(an)g(adequate)h(estimate)f(of)g(HM)h(can)f(b)s(e)f -(obtained)427 5539 y(from)30 b(the)h(follo)m(wing)e(expression:)597 -5693 y Ft(HM=-29.3D0*TSL*LOG\(P/1013)o(.25D)o(0\))p eop -%%Page: 16 18 -16 17 bop 0 52 a FD(16)427 351 y(where)22 b(TSL)f(is)h(the)g(appro)m -(ximate)h(sea-lev)m(el)g(air)e(temp)s(erature)h(in)f(K)h(\(see)i -Fq(Astr)-5 b(ophysic)g(al)28 b(Quan-)427 464 y(tities)p -FD(,)k(C.W.Allen,)g(3rd)f(edition,)f Fo(x)p FD(52\).)46 -b(Similarly)-8 b(,)29 b(if)h(the)i(pressure)e(P)h(is)g(not)h(kno)m(wn,) -f(it)g(can)427 577 y(b)s(e)f(estimated)h(from)f(the)g(heigh)m(t)g(of)h -(the)f(observing)g(station,)h(HM)f(as)h(follo)m(ws:)597 -718 y Ft(P=1013.25D0*EXP\(-HM/\(29.3)o(D0*T)o(SL\)\))427 -859 y FD(Note,)g(ho)m(w)m(ev)m(er,)g(that)f(the)f(refraction)g(is)g -(nearly)f(prop)s(ortional)f(to)j(the)f(pressure)f(and)h(that)h(an)427 -972 y(accurate)i(P)e(v)-5 b(alue)30 b(is)g(imp)s(ortan)m(t)f(for)h -(precise)g(w)m(ork.)311 1114 y(7.)46 b(Rep)s(eated,)e -(computationally-exp)s(ensiv)m(e,)e(calls)d(to)i(sla)p -Ft(_)p FD(A)m(OPP)-8 b(A)41 b(for)f(times)g(that)h(are)g(v)m(ery)427 -1226 y(close)21 b(together)h(can)e(b)s(e)g(a)m(v)m(oided)g(b)m(y)h -(calling)d(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)21 b(just)e(once)i(and)f -(then)g(using)f(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)g(T)427 -1339 y(for)23 b(the)g(subsequen)m(t)f(times.)38 b(F)-8 -b(resh)23 b(calls)f(to)i(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)22 -b(will)f(b)s(e)h(needed)h(only)f(when)f(c)m(hanges)427 -1452 y(in)34 b(the)i(precession)e(ha)m(v)m(e)j(gro)m(wn)e(to)h -(unacceptable)g(lev)m(els)f(or)g(when)f(an)m(ything)h(a\013ecting)h -(the)427 1565 y(refraction)30 b(has)h(c)m(hanged.)p 0 -1683 3780 8 v 0 1796 a Fx(SLA)p Fn(_)p Fx(A)l(OPP)-11 -b(A)g(T)172 b Fm(Up)s(date)39 b(Appt-to-Obs)e(P)m(arameters)172 -b Fx(SLA)p Fn(_)p Fx(A)l(OPP)-11 b(A)g(T)0 2146 y FB(A)m(CTION)44 -b FD(:)k(Recompute)35 b(the)f(sidereal)f(time)h(in)f(the)h(apparen)m(t) -h(to)g(observ)m(ed)f(place)g(star-indep)s(enden)m(t)227 -2259 y(parameter)d(blo)s(c)m(k.)0 2447 y FB(CALL)45 b -FD(:)77 b Ft(CALL)46 b(sla_AOPPAT)f(\(DATE,)h(AOPRMS\))0 -2777 y FB(GIVEN)f FD(:)277 2923 y Fq(D)n(A)-7 b(TE)481 -b FB(D)565 b FD(UTC)140 b(date/time)i(\(Mo)s(di\014ed)e(Julian)e(Date,) -1658 3036 y(JD)p Fo(\000)p FD(2400000.5\))277 3149 y -Fq(A)n(OPRMS)339 b FB(D\(14\))379 b FD(star-indep)s(enden)m(t)85 -b(apparen)m(t-to-observ)m(ed)j(parame-)1658 3262 y(ters:)477 -3375 y(\(1-12\))946 b(not)31 b(required)514 3487 y(\(13\))984 -b(longitude)41 b(+)h(eqn)h(of)f(equino)m(xes)g(+)h(\\sidereal)e -(\001UT")1658 3600 y(\(radians\))514 3713 y(\(14\))984 -b(not)31 b(required)0 4032 y FB(RETURNED)46 b FD(:)277 -4178 y Fq(A)n(OPRMS)339 b FB(D\(14\))379 b FD(star-indep)s(enden)m(t)85 -b(apparen)m(t-to-observ)m(ed)j(parame-)1658 4291 y(ters:)477 -4404 y(\(1-13\))946 b(not)31 b(c)m(hanged)514 4517 y(\(14\))984 -b(lo)s(cal)30 b(apparen)m(t)g(sidereal)f(time)h(\(radians\))0 -4837 y FB(NOTE)44 b FD(:)d(F)-8 b(or)31 b(more)g(information,)d(see)j -(sla)p Ft(_)p FD(A)m(OPP)-8 b(A.)p 0 4955 V 0 5068 a -Fx(SLA)p Fn(_)p Fx(A)l(OPQK)443 b Fm(Quic)m(k)38 b(Appt-to-Observ)m(ed) -443 b Fx(SLA)p Fn(_)p Fx(A)l(OPQK)0 5418 y FB(A)m(CTION)44 -b FD(:)c(Quic)m(k)30 b(apparen)m(t)h(to)g(observ)m(ed)f(place)h(\(but)f -(see)h(Note)g(8,)g(b)s(elo)m(w\).)0 5606 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_AOPQK)g(\(RAP,)g(DAP,)h(AOPRMS,)e(AOB,)i -(ZOB,)g(HOB,)f(DOB,)h(ROB\))p eop -%%Page: 17 19 -17 18 bop 0 52 a Fw(SUN/67.70)3252 b FD(17)0 351 y FB(GIVEN)45 -b FD(:)277 497 y Fq(RAP,D)n(AP)315 b FB(D)565 b FD(geo)s(cen)m(tric)32 -b(apparen)m(t)e([)15 b Fl(\013;)g(\016)21 b FD(])30 b(\(radians\))277 -610 y Fq(A)n(OPRMS)339 b FB(D\(14\))379 b FD(star-indep)s(enden)m(t)85 -b(apparen)m(t-to-observ)m(ed)j(parame-)1658 723 y(ters:)537 -836 y(\(1\))1006 b(geo)s(detic)31 b(latitude)f(\(radians\))502 -949 y(\(2,3\))971 b(sine)29 b(and)h(cosine)g(of)h(geo)s(detic)g -(latitude)537 1062 y(\(4\))1006 b(magnitude)30 b(of)g(diurnal)e(ab)s -(erration)h(v)m(ector)537 1175 y(\(5\))1006 b(heigh)m(t)30 -b(\(metres\))537 1288 y(\(6\))1006 b(am)m(bien)m(t)31 -b(temp)s(erature)f(\(K\))537 1401 y(\(7\))1006 b(pressure)29 -b(\(m)m(b\))537 1514 y(\(8\))1006 b(relativ)m(e)31 b(h)m(umidit)m(y)d -(\(0)16 b({)g(1\))537 1626 y(\(9\))1006 b(w)m(a)m(v)m(elength)32 -b(\()p Fl(\026)p FD(m\))514 1739 y(\(10\))984 b(lapse)30 -b(rate)h(\(K)f(p)s(er)g(metre\))456 1852 y(\(11,12\))927 -b(refraction)30 b(constan)m(ts)i(A)e(and)g(B)h(\(radians\))514 -1965 y(\(13\))984 b(longitude)41 b(+)h(eqn)h(of)f(equino)m(xes)g(+)h -(\\sidereal)e(\001UT")1658 2078 y(\(radians\))514 2191 -y(\(14\))984 b(lo)s(cal)30 b(apparen)m(t)g(sidereal)f(time)h -(\(radians\))0 2497 y FB(RETURNED)46 b FD(:)277 2643 -y Fq(A)n(OB)536 b FB(D)565 b FD(observ)m(ed)31 b(azim)m(uth)f -(\(radians:)39 b(N=0,)31 b(E=90)3236 2610 y Fp(\016)3276 -2643 y FD(\))277 2756 y Fq(ZOB)546 b FB(D)565 b FD(observ)m(ed)31 -b(zenith)e(distance)h(\(radians\))277 2869 y Fq(HOB)534 -b FB(D)565 b FD(observ)m(ed)31 b(Hour)f(Angle)g(\(radians\))277 -2982 y Fq(DOB)533 b FB(D)565 b FD(observ)m(ed)31 b(Declination)e -(\(radians\))277 3095 y Fq(R)n(OB)538 b FB(D)565 b FD(observ)m(ed)31 -b(Righ)m(t)f(Ascension)g(\(radians\))0 3401 y FB(NOTES)44 -b FD(:)311 3581 y(1.)i(This)28 b(routine)h(returns)f(zenith)h(distance) -g(rather)h(than)f(elev)-5 b(ation)30 b(in)e(order)h(to)i(re\015ect)f -(the)g(fact)427 3694 y(that)h(no)g(allo)m(w)m(ance)g(is)e(made)h(for)h -(depression)d(of)j(the)f(horizon.)311 3834 y(2.)46 b(The)30 -b(accuracy)i(of)f(the)g(result)e(is)h(limited)e(b)m(y)j(the)g -(corrections)g(for)f(refraction.)41 b(Pro)m(viding)29 -b(the)427 3947 y(meteorological)j(parameters)f(are)g(kno)m(wn)f -(accurately)h(and)f(there)h(are)g(no)f(gross)h(lo)s(cal)f(e\013ects,) -427 4059 y(the)f(predicted)e(azim)m(uth)h(and)g(elev)-5 -b(ation)28 b(should)e(b)s(e)i(within)e(ab)s(out)i(0)2869 -4023 y Fk(0)l(0)2873 4059 y Fl(:)p FD(1)h(for)f Fl(\020)k(<)25 -b FD(70)3367 4026 y Fp(\016)3407 4059 y FD(.)40 b(Ev)m(en)29 -b(at)427 4172 y(a)i(top)s(o)s(cen)m(tric)f(zenith)g(distance)g(of)g(90) -1800 4139 y Fp(\016)1840 4172 y FD(,)h(the)f(accuracy)i(in)c(elev)-5 -b(ation)31 b(should)d(b)s(e)h(b)s(etter)i(than)427 4285 -y(1)21 b(arcmin)m(ute;)j(useful)19 b(results)g(are)i(a)m(v)-5 -b(ailable)20 b(for)g(a)h(further)f(3)2512 4252 y Fp(\016)2551 -4285 y FD(,)j(b)s(ey)m(ond)d(whic)m(h)f(the)i(sla)p Ft(_)p -FD(REFR)m(O)427 4398 y(routine)26 b(returns)f(a)i(\014xed)f(v)-5 -b(alue)27 b(of)f(the)h(refraction.)39 b(The)27 b(complemen)m(tary)f -(routines)g(sla)p Ft(_)p FD(A)m(OP)427 4511 y(\(or)39 -b(sla)p Ft(_)p FD(A)m(OPQK\))f(and)g(sla)p Ft(_)p FD(O)m(AP)g(\(or)h -(sla)p Ft(_)p FD(O)m(APQK\))f(are)h(self-consisten)m(t)g(to)g(b)s -(etter)g(than)427 4624 y(1)31 b(microarcsecond)f(all)g(o)m(v)m(er)h -(the)g(celestial)f(sphere.)311 4763 y(3.)46 b(It)c(is)e(advisable)h(to) -h(tak)m(e)h(great)g(care)f(with)e(units,)j(as)f(ev)m(en)g(unlik)m(ely)d -(v)-5 b(alues)41 b(of)h(the)f(input)427 4876 y(parameters)31 -b(are)g(accepted)g(and)f(pro)s(cessed)g(in)f(accordance)j(with)d(the)i -(mo)s(dels)e(used.)311 5016 y(4.)46 b Fq(App)-5 b(ar)g(ent)35 -b FD([)15 b Fl(\013;)g(\016)20 b FD(])25 b(means)e(the)i(geo)s(cen)m -(tric)g(apparen)m(t)f(righ)m(t)g(ascension)f(and)h(declination,)g(whic) -m(h)427 5128 y(is)31 b(obtained)g(from)g(a)h(catalogue)h(mean)f(place)g -(b)m(y)f(allo)m(wing)g(for)g(space)h(motion,)g(parallax,)f(the)427 -5241 y(Sun's)k(gra)m(vitational)h(lens)f(e\013ect,)40 -b(ann)m(ual)35 b(ab)s(erration)g(and)g(precession-n)m(utation.)57 -b(F)-8 b(or)37 b(star)427 5354 y(p)s(ositions)44 b(in)g(the)h(FK5)h -(system)f(\()p Fq(i.e.)g FD(J2000\),)51 b(these)46 b(e\013ects)h(can)f -(b)s(e)e(applied)f(b)m(y)j(means)427 5467 y(of)38 b(the)g(sla)p -Ft(_)p FD(MAP)f Fq(etc.)g FD(routines.)61 b(Starting)37 -b(from)g(other)h(mean)f(place)h(systems,)i(additional)427 -5580 y(transformations)22 b(will)e(b)s(e)i(needed;)j(for)d(example,)i -(FK4)f(\()p Fq(i.e.)g FD(B1950\))i(mean)d(places)h(w)m(ould)e(\014rst) -427 5693 y(ha)m(v)m(e)32 b(to)f(b)s(e)f(con)m(v)m(erted)i(to)f(FK5,)g -(whic)m(h)e(can)i(b)s(e)e(done)h(with)g(the)g(sla)p Ft(_)p -FD(FK425)h Fq(etc.)f FD(routines.)p eop -%%Page: 18 20 -18 19 bop 0 52 a FD(18)311 351 y(5.)46 b Fq(Observe)-5 -b(d)49 b FD([)15 b Fl(Az)t(;)g(E)5 b(l)42 b FD(])d(means)g(the)g(p)s -(osition)d(that)k(w)m(ould)d(b)s(e)i(seen)f(b)m(y)h(a)g(p)s(erfect)g -(theo)s(dolite)427 464 y(lo)s(cated)33 b(at)h(the)f(observ)m(er.)49 -b(This)31 b(is)h(obtained)g(from)g(the)h(geo)s(cen)m(tric)h(apparen)m -(t)f([)15 b Fl(\013;)g(\016)21 b FD(])33 b(b)m(y)g(al-)427 -577 y(lo)m(wing)25 b(for)g(Earth)h(orien)m(tation)g(and)f(diurnal)d(ab) -s(erration,)k(rotating)g(from)g(equator)g(to)g(horizon)427 -690 y(co)s(ordinates,)f(and)d(then)h(adjusting)f(for)h(refraction.)38 -b(The)23 b([)15 b Fl(h;)g(\016)20 b FD(])j(is)g(obtained)f(b)m(y)h -(rotating)h(bac)m(k)427 803 y(in)m(to)38 b(equatorial)f(co)s -(ordinates,)i(using)d(the)h(geo)s(detic)h(latitude)f(corrected)h(for)f -(p)s(olar)f(motion,)427 916 y(and)27 b(is)f(the)i(p)s(osition)d(that)j -(w)m(ould)e(b)s(e)g(seen)i(b)m(y)f(a)g(p)s(erfect)g(equatorial)g(lo)s -(cated)h(at)g(the)f(observ)m(er)427 1029 y(and)c(with)f(its)h(p)s(olar) -f(axis)h(aligned)f(to)i(the)g(Earth's)f(axis)g(of)h(rotation)f(\()p -Fq(n.b.)h FD(not)f(to)h(the)g(refracted)427 1142 y(p)s(ole\).)40 -b(Finally)-8 b(,)29 b(the)i Fl(\013)g FD(is)e(obtained)h(b)m(y)g -(subtracting)g(the)g Fq(h)38 b FD(from)30 b(the)h(lo)s(cal)e(apparen)m -(t)i(ST.)311 1345 y(6.)46 b(T)-8 b(o)37 b(predict)e(the)h(required)e -(setting)i(of)g(a)g(real)g(telescop)s(e,)i(the)e(observ)m(ed)g(place)g -(pro)s(duced)f(b)m(y)427 1458 y(this)28 b(routine)f(w)m(ould)g(ha)m(v)m -(e)j(to)f(b)s(e)e(adjusted)h(for)g(the)h(tilt)e(of)i(the)f(azim)m(uth)g -(or)h(p)s(olar)e(axis)h(of)g(the)427 1571 y(moun)m(ting)e(\(with)f -(appropriate)g(corrections)i(for)f(moun)m(t)g(\015exures\),)h(for)f -(non-p)s(erp)s(endicularit)m(y)427 1684 y(b)s(et)m(w)m(een)j(the)g -(moun)m(ting)e(axes,)j(for)e(the)g(p)s(osition)e(of)j(the)f(rotator)i -(axis)d(and)h(the)h(p)s(oin)m(ting)d(axis)427 1797 y(relativ)m(e)38 -b(to)g(it,)g(for)f(tub)s(e)g(\015exure,)h(for)f(gear)i(and)d(enco)s -(der)h(errors,)i(and)e(\014nally)e(for)i(enco)s(der)427 -1910 y(zero)c(p)s(oin)m(ts.)45 b(Some)32 b(telescop)s(es)g(w)m(ould,)g -(of)g(course,)h(exhibit)d(other)i(prop)s(erties)f(whic)m(h)g(w)m(ould) -427 2023 y(need)f(to)i(b)s(e)d(accoun)m(ted)j(for)e(at)h(the)g -(appropriate)e(p)s(oin)m(t)h(in)f(the)h(sequence.)311 -2226 y(7.)46 b(The)40 b(star-indep)s(enden)m(t)f(apparen)m(t-to-observ) -m(ed-place)k(parameters)e(in)e(A)m(OPRMS)i(ma)m(y)g(b)s(e)427 -2339 y(computed)31 b(b)m(y)f(means)g(of)h(the)g(sla)p -Ft(_)p FD(A)m(OPP)-8 b(A)30 b(routine.)40 b(If)30 b(nothing)g(has)g(c)m -(hanged)h(signi\014can)m(tly)427 2452 y(except)45 b(the)g(time,)i(the)d -(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)g(T)45 b(routine)e(ma)m(y)h(b)s(e)g -(used)f(to)i(p)s(erform)e(the)h(requisite)427 2565 y(partial)29 -b(recomputation)i(of)f(A)m(OPRMS.)311 2768 y(8.)46 b(A)m(t)32 -b(zenith)e(distances)h(b)s(ey)m(ond)f(ab)s(out)h(76)1890 -2735 y Fp(\016)1930 2768 y FD(,)g(the)g(need)g(for)f(sp)s(ecial)g(care) -i(with)d(the)i(corrections)427 2881 y(for)j(refraction)f(causes)h(a)g -(mark)m(ed)g(increase)f(in)f(execution)i(time.)50 b(Moreo)m(v)m(er,)37 -b(the)c(e\013ect)i(gets)427 2994 y(w)m(orse)k(with)d(increasing)h -(zenith)g(distance.)64 b(Adroit)37 b(programming)g(in)g(the)h(calling)e -(applica-)427 3107 y(tion)d(ma)m(y)h(allo)m(w)e(the)i(problem)d(to)j(b) -s(e)e(reduced.)49 b(Prepare)33 b(an)g(alternativ)m(e)g(A)m(OPRMS)g -(arra)m(y)-8 b(,)427 3220 y(computed)32 b(for)f(zero)h(air-pressure;)f -(this)f(will)f(disable)h(the)i(refraction)f(corrections)h(and)f(cause) -427 3333 y(rapid)25 b(execution.)40 b(Using)25 b(this)h(A)m(OPRMS)g -(arra)m(y)-8 b(,)29 b(a)e(preliminary)c(call)j(to)h(the)g(presen)m(t)f -(routine)427 3446 y(will,)e(dep)s(ending)f(on)j(the)g(application,)f -(pro)s(duce)f(a)i(rough)f(p)s(osition)f(whic)m(h)g(ma)m(y)i(b)s(e)f -(enough)h(to)427 3559 y(establish)g(whether)h(the)h(full,)e(slo)m(w)h -(calculation)g(\(using)g(the)g(real)h(A)m(OPRMS)f(arra)m(y\))i(is)d(w)m -(orth-)427 3672 y(while.)38 b(F)-8 b(or)28 b(example,)g(there)g(w)m -(ould)f(b)s(e)g(no)g(need)g(for)h(the)g(full)d(calculation)i(if)f(the)i -(preliminary)427 3785 y(call)i(had)f(already)h(established)f(that)i -(the)f(source)g(w)m(as)h(w)m(ell)e(b)s(elo)m(w)h(the)g(elev)-5 -b(ation)30 b(limits)e(for)i(a)427 3898 y(particular)f(telescop)s(e.)311 -4101 y(9.)46 b(The)31 b(azim)m(uths)g Fq(etc.)g FD(used)g(b)m(y)g(the)h -(presen)m(t)f(routine)g(are)h(with)e(resp)s(ect)h(to)h(the)g(celestial) -f(p)s(ole.)427 4214 y(Corrections)f(to)h(the)g(terrestrial)e(p)s(ole)h -(can)g(b)s(e)g(computed)g(using)f(sla)p Ft(_)p FD(POLMO.)p -0 4461 3780 8 v 0 4574 a Fx(SLA)p Fn(_)p Fx(A)-11 b(TMDSP)377 -b Fm(A)m(tmospheric)35 b(Disp)s(ersion)380 b Fx(SLA)p -Fn(_)p Fx(A)-11 b(TMDSP)0 4925 y FB(A)m(CTION)44 b FD(:)c(Apply)29 -b(atmospheric-disp)s(ersion)e(adjustmen)m(ts)j(to)h(refraction)f(co)s -(e\016cien)m(ts.)0 5112 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_ATMDSP)f(\(TDK,)i(PMB,)f(RH,)h(WL1,)g(A1,)g(B1,)g(WL2,)f(A2,)h -(B2\))0 5634 y FB(GIVEN)e FD(:)p eop -%%Page: 19 21 -19 20 bop 0 52 a Fw(SUN/67.70)3252 b FD(19)277 339 y -Fq(TDK)532 b FB(D)565 b FD(am)m(bien)m(t)31 b(temp)s(erature)f(at)h -(the)g(observ)m(er)f(\(K\))277 452 y Fq(PMB)528 b FB(D)565 -b FD(pressure)29 b(at)i(the)g(observ)m(er)f(\(m)m(b\))277 -565 y Fq(RH)602 b FB(D)565 b FD(relativ)m(e)31 b(h)m(umidit)m(y)d(at)j -(the)g(observ)m(er)f(\(range)h(0)16 b({)g(1\))277 678 -y Fq(WL1)542 b FB(D)565 b FD(base)31 b(w)m(a)m(v)m(elength)g(\()p -Fl(\026)p FD(m\))277 791 y Fq(A1)622 b FB(D)565 b FD(refraction)32 -b(co)s(e\016cien)m(t)g(A)g(for)f(w)m(a)m(v)m(elength)i(WL1)g(\(radi-) -1658 904 y(ans\))277 1016 y Fq(B1)626 b FB(D)565 b FD(refraction)32 -b(co)s(e\016cien)m(t)h(B)g(for)f(w)m(a)m(v)m(elength)i(WL1)f(\(radi-) -1658 1129 y(ans\))277 1242 y Fq(WL2)542 b FB(D)565 b -FD(w)m(a)m(v)m(elength)35 b(for)e(whic)m(h)f(adjusted)h(A,B)h(required) -e(\()p Fl(\026)p FD(m\))0 1772 y FB(RETURNED)46 b FD(:)277 -1918 y Fq(A2)622 b FB(D)565 b FD(refraction)32 b(co)s(e\016cien)m(t)g -(A)g(for)f(w)m(a)m(v)m(elength)i(WL2)g(\(radi-)1658 2031 -y(ans\))277 2144 y Fq(B2)626 b FB(D)565 b FD(refraction)32 -b(co)s(e\016cien)m(t)h(B)g(for)f(w)m(a)m(v)m(elength)i(WL2)f(\(radi-) -1658 2257 y(ans\))0 2674 y FB(NOTES)44 b FD(:)311 2887 -y(1.)i(T)-8 b(o)37 b(use)f(this)g(routine,)h(\014rst)e(call)h(sla)p -Ft(_)p FD(REF)m(CO)g(sp)s(ecifying)e(WL1)j(as)g(the)f(w)m(a)m(v)m -(elength.)60 b(This)427 3000 y(yields)29 b(refraction)h(co)s(e\016cien) -m(ts)h(A1,)h(B1,)f(correct)h(for)e(that)h(w)m(a)m(v)m(elength.)43 -b(Subsequen)m(tly)-8 b(,)29 b(calls)427 3113 y(to)i(sla)p -Ft(_)p FD(A)-8 b(TMDSP)29 b(sp)s(ecifying)e(di\013eren)m(t)i(w)m(a)m(v) -m(elengths)i(will)c(pro)s(duce)i(new,)g(sligh)m(tly)f(adjusted)427 -3226 y(refraction)i(co)s(e\016cien)m(ts)h(A2,)h(B2,)f(whic)m(h)e(apply) -g(to)i(the)g(sp)s(eci\014ed)e(w)m(a)m(v)m(elength.)311 -3385 y(2.)46 b(Most)26 b(of)g(the)f(atmospheric)g(disp)s(ersion)d(happ) -s(ens)h(b)s(et)m(w)m(een)j(0)p Fl(:)p FD(7)15 b Fl(\026)p -FD(m)26 b(and)e(the)i(UV)f(atmospheric)427 3498 y(cuto\013,)34 -b(and)e(the)g(e\013ect)i(increases)e(strongly)g(to)m(w)m(ards)h(the)f -(UV)h(end.)45 b(F)-8 b(or)34 b(this)d(reason)h(a)h(blue)427 -3611 y(reference)e(w)m(a)m(v)m(elength)h(is)d(recommended,)h(for)h -(example)f(0)p Fl(:)p FD(4)15 b Fl(\026)p FD(m.)311 3770 -y(3.)46 b(The)30 b(accuracy)-8 b(,)32 b(for)e(this)g(set)h(of)f -(conditions:)703 3974 y(heigh)m(t)g(ab)s(o)m(v)m(e)i(sea)f(lev)m(el)229 -b(2000)17 b(m)1257 4087 y(latitude)228 b(29)1884 4054 -y Fp(\016)1240 4200 y FD(pressure)g(793)17 b(m)m(b)1077 -4313 y(temp)s(erature)229 b(290)1929 4280 y Fp(\016)1985 -4313 y FD(K)1209 4426 y(h)m(umidit)m(y)e(0.5)32 b(\(50\045\))1180 -4539 y(lapse)e(rate)230 b(0)p Fl(:)p FD(0065)2044 4506 -y Fp(\016)2086 4539 y Fl(m)2166 4506 y Fp(\000)p Fu(1)744 -4652 y FD(reference)30 b(w)m(a)m(v)m(elength)231 b(0)p -Fl(:)p FD(4)15 b Fl(\026)p FD(m)1031 4765 y(star)31 b(elev)-5 -b(ation)229 b(15)1884 4732 y Fp(\016)427 4970 y FD(is)30 -b(ab)s(out)g(2.5)16 b(mas)31 b(RMS)f(b)s(et)m(w)m(een)h(0.3)g(and)f(1)p -Fl(:)p FD(0)15 b Fl(\026)p FD(m,)31 b(and)f(sta)m(ys)i(within)27 -b(4)16 b(mas)30 b(for)h(the)f(whole)427 5083 y(range)41 -b(longw)m(ard)e(of)h(0)p Fl(:)p FD(3)15 b Fl(\026)p FD(m)41 -b(\(compared)g(with)e(a)h(total)h(disp)s(ersion)c(from)j(0.3)h(to)g(20) -15 b Fl(\026)p FD(m)40 b(of)427 5195 y(ab)s(out)c(11)778 -5159 y Fk(0)l(0)819 5195 y FD(\).)56 b(These)36 b(errors)f(are)h(t)m -(ypical)f(for)g(ordinary)f(conditions;)j(in)e(extreme)h(conditions)427 -5308 y(v)-5 b(alues)30 b(a)h(few)f(times)g(this)f(size)h(ma)m(y)h(o)s -(ccur.)311 5467 y(4.)46 b(If)d(either)g(w)m(a)m(v)m(elength)i(exceeds)f -(100)15 b Fl(\026)p FD(m,)48 b(the)c(radio)e(case)j(is)d(assumed)h(and) -g(the)h(returned)427 5580 y(refraction)e(co)s(e\016cien)m(ts)i(are)f -(the)f(same)h(as)g(the)g(giv)m(en)f(ones.)77 b(Note)44 -b(that)f(radio)f(refraction)427 5693 y(co)s(e\016cien)m(ts)31 -b(cannot)g(b)s(e)f(turned)f(in)m(to)i(optical)f(v)-5 -b(alues)29 b(using)g(this)g(routine,)h(nor)g(vice)g(v)m(ersa.)p -eop -%%Page: 20 22 -20 21 bop 0 52 a FD(20)311 351 y(5.)46 b(The)29 b(algorithm)g(consists) -g(of)h(calculation)f(of)h(the)g(refractivit)m(y)f(of)h(the)g(air)f(at)h -(the)g(observ)m(er)g(for)427 464 y(the)f(t)m(w)m(o)g(w)m(a)m(v)m -(elengths,)h(using)d(the)h(metho)s(ds)f(of)h(the)h(sla)p -Ft(_)p FD(REFR)m(O)e(routine,)h(and)g(then)f(scaling)427 -577 y(of)22 b(the)g(t)m(w)m(o)h(refraction)e(co)s(e\016cien)m(ts)h -(according)g(to)g(classical)f(refraction)g(theory)-8 -b(.)38 b(This)20 b(amoun)m(ts)427 690 y(to)35 b(scaling)f(the)g(A)h(co) -s(e\016cien)m(t)g(in)e(prop)s(ortion)f(to)j(\()p Fl(\026)23 -b Fo(\000)g FD(1\))35 b(and)e(the)i(B)f(co)s(e\016cien)m(t)h(almost)g -(in)427 803 y(the)i(same)g(ratio)f(\(see)i(R.M.Green,)h -Fq(Spheric)-5 b(al)40 b(Astr)-5 b(onomy,)40 b FD(Cam)m(bridge)c(Univ)m -(ersit)m(y)g(Press,)427 916 y(1985\).)p 0 1062 3780 8 -v 0 1175 a Fx(SLA)p Fn(_)p Fx(A)-15 b(V2M)286 b Fm(Rotation)36 -b(Matrix)h(from)g(Axial)g(V)-10 b(ector)287 b Fx(SLA)p -Fn(_)p Fx(A)-15 b(V2M)0 1526 y FB(A)m(CTION)44 b FD(:)c(F)-8 -b(orm)31 b(the)g(rotation)g(matrix)e(corresp)s(onding)g(to)i(a)g(giv)m -(en)f(axial)g(v)m(ector)i(\(single)d(precision\).)0 1713 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_AV2M)g(\(AXVEC,)g(RMAT\))0 -2076 y FB(GIVEN)f FD(:)277 2248 y Fq(AXVEC)405 b FB(R\(3\))433 -b FD(axial)30 b(v)m(ector)i(\(radians\))0 2632 y FB(RETURNED)46 -b FD(:)277 2803 y Fq(RMA)-7 b(T)462 b FB(R\(3,3\))352 -b FD(rotation)31 b(matrix)0 3187 y FB(NOTES)44 b FD(:)311 -3384 y(1.)i(A)38 b(rotation)f(matrix)g(describ)s(es)e(a)j(rotation)g -(ab)s(out)f(some)g(arbitrary)f(axis,)j(called)d(the)i(Euler)427 -3497 y(axis.)58 b(The)35 b Fq(axial)40 b(ve)-5 b(ctor)36 -b FD(supplied)d(to)k(this)e(routine)g(has)h(the)h(same)f(direction)f -(as)i(the)f(Euler)427 3610 y(axis,)30 b(and)g(its)g(magnitude)f(is)h -(the)g(amoun)m(t)h(of)g(rotation)f(in)g(radians.)311 -3760 y(2.)46 b(If)30 b(AXVEC)h(is)e(n)m(ull,)g(the)h(unit)f(matrix)h -(is)f(returned.)311 3911 y(3.)46 b(The)28 b(reference)g(frame)g -(rotates)h(clo)s(c)m(kwise)e(as)i(seen)f(lo)s(oking)e(along)i(the)g -(axial)f(v)m(ector)j(from)d(the)427 4024 y(origin.)p -0 4165 V 0 4278 a Fx(SLA)p Fn(_)p Fx(BEAR)212 b Fm(Direction)37 -b(Bet)m(w)m(een)h(P)m(oin)m(ts)f(on)h(a)h(Sphere)213 -b Fx(SLA)p Fn(_)p Fx(BEAR)0 4628 y FB(A)m(CTION)44 b -FD(:)j(Returns)33 b(the)i(b)s(earing)d(\(p)s(osition)g(angle\))j(of)f -(one)g(p)s(oin)m(t)f(on)g(a)i(sphere)e(seen)h(from)f(another)227 -4741 y(\(single)d(precision\).)0 4929 y FB(CALL)45 b -FD(:)77 b Ft(R)47 b(=)h(sla_BEAR)d(\(A1,)i(B1,)g(A2,)g(B2\))0 -5292 y FB(GIVEN)e FD(:)277 5438 y Fq(A1,B1)484 b FB(R)567 -b FD(spherical)29 b(co)s(ordinates)h(of)g(one)h(p)s(oin)m(t)277 -5551 y Fq(A2,B2)484 b FB(R)567 b FD(spherical)29 b(co)s(ordinates)h(of) -g(the)h(other)g(p)s(oin)m(t)p eop -%%Page: 21 23 -21 22 bop 0 52 a Fw(SUN/67.70)3252 b FD(21)0 351 y FB(RETURNED)46 -b FD(:)277 523 y Fq(sla)p Ft(_)p Fq(BEAR)322 b FB(R)567 -b FD(b)s(earing)29 b(from)h(\014rst)g(p)s(oin)m(t)f(to)i(second)0 -810 y FB(NOTES)44 b FD(:)311 987 y(1.)i(The)30 b(spherical)f(co)s -(ordinates)h(are)h([)15 b Fl(\013;)g(\016)20 b FD(],)31 -b([)p Fl(\025;)15 b(\036)p FD(])31 b Fq(etc.)p FD(,)f(in)f(radians.)311 -1122 y(2.)46 b(The)33 b(result)f(is)h(the)h(b)s(earing)e(\(p)s(osition) -f(angle\),)k(in)d(radians,)h(of)h(p)s(oin)m(t)e([A2,B2])k(as)d(seen)h -(from)427 1235 y(p)s(oin)m(t)j([A1,B1].)65 b(It)38 b(is)f(in)g(the)h -(range)g Fo(\006)p Fl(\031)s FD(.)63 b(The)37 b(sense)h(is)f(suc)m(h)h -(that)g(if)f([A2,B2])j(is)d(a)h(small)427 1348 y(distance)f(due)f(east) -i(of)g([A1,B1])h(the)e(result)f(is)g(ab)s(out)h(+)p Fl(\031)s(=)p -FD(2.)61 b(Zero)37 b(is)f(returned)g(if)g(the)h(t)m(w)m(o)427 -1461 y(p)s(oin)m(ts)30 b(are)g(coinciden)m(t.)311 1596 -y(3.)46 b(If)32 b(either)g(B-co)s(ordinate)h(is)f(outside)f(the)i -(range)g Fo(\006)p Fl(\031)s(=)p FD(2,)g(the)g(result)e(ma)m(y)i -(corresp)s(ond)f(to)h(\\the)427 1709 y(long)d(w)m(a)m(y)i(round".)311 -1844 y(4.)46 b(The)f(routine)e(sla)p Ft(_)p FD(P)-8 b(A)e(V)45 -b(p)s(erforms)e(an)i(equiv)-5 b(alen)m(t)44 b(function)g(except)i(that) -f(the)g(p)s(oin)m(ts)f(are)427 1957 y(sp)s(eci\014ed)29 -b(in)g(the)i(form)e(of)i(Cartesian)f(unit)f(v)m(ectors.)p -0 2058 3780 8 v 0 2171 a Fx(SLA)p Fn(_)p Fx(CAF2R)331 -b Fm(Deg,Arcmin,Arcsec)35 b(to)j(Radians)332 b Fx(SLA)p -Fn(_)p Fx(CAF2R)0 2521 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 -b(degrees,)f(arcmin)m(utes,)f(arcseconds)h(to)g(radians)e(\(single)g -(precision\).)0 2709 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_CAF2R)g(\(IDEG,)g(IAMIN,)g(ASEC,)g(RAD,)h(J\))0 -3015 y FB(GIVEN)e FD(:)277 3162 y Fq(IDEG)500 b FB(I)605 -b FD(degrees)277 3274 y Fq(IAMIN)448 b FB(I)605 b FD(arcmin)m(utes)277 -3387 y Fq(ASEC)490 b FB(R)567 b FD(arcseconds)0 3666 -y FB(RETURNED)46 b FD(:)277 3812 y Fq(RAD)533 b FB(R)567 -b FD(angle)31 b(in)e(radians)277 3925 y Fq(J)688 b FB(I)605 -b FD(status:)1825 4038 y(1)31 b(=)f(IDEG)g(outside)g(range)h(0)p -Fo(\000)p FD(359)1825 4151 y(2)g(=)f(IAMIN)g(outside)g(range)h(0)p -Fo(\000)p FD(59)1825 4264 y(3)g(=)f(ASEC)f(outside)h(range)g(0)p -Fo(\000)p FD(59.999)p Fo(\001)15 b(\001)g(\001)0 4542 -y FB(NOTES)44 b FD(:)311 4719 y(1.)i(The)30 b(result)f(is)h(computed)g -(ev)m(en)h(if)e(an)m(y)i(of)g(the)f(range)h(c)m(hec)m(ks)h(fail.)311 -4854 y(2.)46 b(The)30 b(sign)g(m)m(ust)g(b)s(e)g(dealt)g(with)f -(outside)g(this)h(routine.)p 0 4955 V 0 5068 a Fx(SLA)p -Fn(_)p Fx(CALDJ)525 b Fm(Calendar)37 b(Date)h(to)h(MJD)527 -b Fx(SLA)p Fn(_)p Fx(CALDJ)0 5418 y FB(A)m(CTION)44 b -FD(:)c(Gregorian)31 b(Calendar)e(to)i(Mo)s(di\014ed)e(Julian)f(Date,)k -(with)d(cen)m(tury)i(default.)0 5606 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_CALDJ)g(\(IY,)g(IM,)h(ID,)g(DJM,)g(J\))p -eop -%%Page: 22 24 -22 23 bop 0 52 a FD(22)0 351 y FB(GIVEN)45 b FD(:)277 -523 y Fq(IY,IM,ID)356 b FB(I)605 b FD(y)m(ear,)32 b(mon)m(th,)e(da)m(y) -h(in)e(Gregorian)h(calendar)0 843 y FB(RETURNED)46 b -FD(:)277 989 y Fq(DJM)537 b FB(D)565 b FD(mo)s(di\014ed)28 -b(Julian)g(Date)k(\(JD)p Fo(\000)p FD(2400000.5\))j(for)30 -b(0)3385 956 y Fu(h)277 1102 y Fq(J)688 b FB(I)605 b -FD(status:)1825 1215 y(0)31 b(=)f(OK)1825 1328 y(1)h(=)f(bad)f(y)m(ear) -j(\(MJD)f(not)f(computed\))1825 1441 y(2)h(=)f(bad)f(mon)m(th)i(\(MJD)g -(not)f(computed\))1825 1554 y(3)h(=)f(bad)f(da)m(y)i(\(MJD)g -(computed\))0 1866 y FB(NOTES)44 b FD(:)311 2047 y(1.)i(This)29 -b(routine)g(supp)s(orts)g(the)h Fq(c)-5 b(entury)33 b(default)40 -b FD(feature.)h(Acceptable)31 b(y)m(ears)h(are:)506 2187 -y Fo(\017)46 b FD(00-49,)33 b(in)m(terpreted)d(as)g(2000)17 -b({)f(2049,)506 2314 y Fo(\017)46 b FD(50-99,)33 b(in)m(terpreted)d(as) -g(1950)17 b({)f(1999,)32 b(and)506 2440 y Fo(\017)46 -b FD(100)32 b(up)m(w)m(ards,)e(in)m(terpreted)f(literally)-8 -b(.)427 2581 y(F)g(or)31 b(1-100AD)i(use)e(the)f(routine)f(sla)p -Ft(_)p FD(CLDJ)h(instead.)311 2721 y(2.)46 b(F)-8 b(or)31 -b(y)m(ear)h Fl(n)p FD(BC)e(use)g(IY)g(=)g Fo(\000)p FD(\()p -Fl(n)20 b Fo(\000)g FD(1\).)311 2861 y(3.)46 b(When)d(an)g(in)m(v)-5 -b(alid)40 b(y)m(ear)k(or)f(mon)m(th)g(is)f(supplied)e(\(status)k(J)e(=) -h(1)g(or)g(2\))h(the)f(MJD)g(is)g FB(not)427 2974 y FD(computed.)e -(When)30 b(an)g(in)m(v)-5 b(alid)28 b(da)m(y)j(is)e(supplied)e -(\(status)k(J)f(=)g(3\))i(the)e(MJD)h FB(is)g FD(computed.)p -0 3094 3780 8 v 0 3206 a Fx(SLA)p Fn(_)p Fx(CAL)-11 b(YD)518 -b Fm(Calendar)37 b(to)h(Y)-10 b(ear,)37 b(Da)m(y)520 -b Fx(SLA)p Fn(_)p Fx(CAL)-11 b(YD)0 3557 y FB(A)m(CTION)44 -b FD(:)j(Gregorian)34 b(calendar)f(date)h(to)h(y)m(ear)f(and)f(da)m(y)h -(in)f(y)m(ear,)i(in)e(a)h(Julian)d(calendar)i(aligned)g(to)227 -3670 y(the)e(20th/21st)h(cen)m(tury)f(Gregorian)f(calendar,)h(with)e -(cen)m(tury)h(default.)0 3857 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_CALYD)g(\(IY,)g(IM,)h(ID,)g(NY,)g(ND,)g(J\))0 -4183 y FB(GIVEN)e FD(:)277 4329 y Fq(IY,IM,ID)356 b FB(I)605 -b FD(y)m(ear,)32 b(mon)m(th,)e(da)m(y)h(in)e(Gregorian)i(calendar:)40 -b(y)m(ear)31 b(ma)m(y)1658 4442 y(optionally)e(omit)h(the)h(cen)m(tury) -0 4754 y FB(RETURNED)46 b FD(:)277 4900 y Fq(NY)600 b -FB(I)605 b FD(y)m(ear)31 b(\(re-aligned)f(Julian)e(calendar\))277 -5013 y Fq(ND)599 b FB(I)605 b FD(da)m(y)31 b(in)e(y)m(ear)i(\(1)g(=)f -(Jan)m(uary)g(1st\))277 5126 y Fq(J)688 b FB(I)605 b -FD(status:)1825 5239 y(0)31 b(=)f(OK)1825 5352 y(1)h(=)f(bad)f(y)m(ear) -j(\(b)s(efore)e Fo(\000)p FD(4711\))1825 5465 y(2)h(=)f(bad)f(mon)m(th) -1825 5577 y(3)i(=)f(bad)f(da)m(y)p eop -%%Page: 23 25 -23 24 bop 0 52 a Fw(SUN/67.70)3252 b FD(23)0 351 y FB(NOTES)44 -b FD(:)311 534 y(1.)i(This)29 b(routine)g(supp)s(orts)g(the)h -Fq(c)-5 b(entury)33 b(default)40 b FD(feature.)h(Acceptable)31 -b(y)m(ears)h(are:)506 674 y Fo(\017)46 b FD(00-49,)33 -b(in)m(terpreted)d(as)g(2000)17 b({)f(2049,)506 801 y -Fo(\017)46 b FD(50-99,)33 b(in)m(terpreted)d(as)g(1950)17 -b({)f(1999,)32 b(and)506 928 y Fo(\017)46 b FD(other)31 -b(y)m(ears)g(after)g Fo(\000)p FD(4712,)h(in)m(terpreted)e(literally)-8 -b(.)427 1069 y(Use)31 b(sla)p Ft(_)p FD(CL)-8 b(YD)30 -b(for)g(y)m(ears)h(b)s(efore)f(100AD.)311 1209 y(2.)46 -b(The)30 b(purp)s(ose)f(of)h(sla)p Ft(_)p FD(CALDJ)g(is)f(to)i(supp)s -(ort)e(sla)p Ft(_)p FD(EAR)-8 b(TH,)30 b(sla)p Ft(_)p -FD(MOON)g(and)f(sla)p Ft(_)p FD(ECOR.)311 1350 y(3.)46 -b(Bet)m(w)m(een)31 b(1900)f(Marc)m(h)f(1)g(and)e(2100)k(F)-8 -b(ebruary)28 b(28)h(it)f(returns)f(answ)m(ers)h(whic)m(h)f(are)i -(consisten)m(t)427 1463 y(with)d(the)i(ordinary)e(Gregorian)h -(calendar.)39 b(Outside)26 b(this)h(range)h(there)f(will)e(b)s(e)i(a)h -(discrepancy)427 1576 y(whic)m(h)h(increases)h(b)m(y)h(one)f(da)m(y)h -(for)f(ev)m(ery)h(non-leap)f(cen)m(tury)h(y)m(ear.)311 -1717 y(4.)46 b(When)26 b(an)g(in)m(v)-5 b(alid)23 b(y)m(ear)k(or)f(mon) -m(th)g(is)f(supplied)e(\(status)k(J)e(=)h(1)g(or)g(J)g(=)f(2\))i(the)f -(results)f(are)i FB(not)427 1830 y FD(computed.)55 b(When)35 -b(a)g(da)m(y)h(is)e(supplied)e(whic)m(h)i(is)g(outside)g(the)h(con)m(v) -m(en)m(tional)h(range)g(\(status)427 1943 y(J)30 b(=)g(3\))h(the)g -(results)e FB(are)h FD(computed.)p 0 2064 3780 8 v 0 -2177 a Fx(SLA)p Fn(_)p Fx(CC2S)664 b Fm(Cartesian)37 -b(to)h(Spherical)664 b Fx(SLA)p Fn(_)p Fx(CC2S)0 2528 -y FB(A)m(CTION)44 b FD(:)c(Cartesian)30 b(co)s(ordinates)g(to)i -(spherical)c(co)s(ordinates)i(\(single)g(precision\).)0 -2715 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_CC2S)g(\(V,)h(A,)g(B\))0 -3043 y FB(GIVEN)e FD(:)277 3215 y Fq(V)668 b FB(R\(3\))433 -b FD([)15 b Fl(x;)g(y)s(;)g(z)21 b FD(])30 b(v)m(ector)0 -3540 y FB(RETURNED)46 b FD(:)277 3711 y Fq(A,B)576 b -FB(R)567 b FD(spherical)29 b(co)s(ordinates)h(in)f(radians)0 -4036 y FB(NOTES)44 b FD(:)311 4218 y(1.)i(The)d(spherical)f(co)s -(ordinates)i(are)g(longitude)e(\(+v)m(e)i(an)m(ticlo)s(c)m(kwise)g(lo)s -(oking)e(from)h(the)h(+v)m(e)427 4331 y(latitude)38 b(p)s(ole\))f(and)h -(latitude.)64 b(The)37 b(Cartesian)h(co)s(ordinates)g(are)h(righ)m(t)f -(handed,)h(with)e(the)427 4444 y Fq(x)p FD(-axis)31 b(at)g(zero)g -(longitude)e(and)h(latitude,)f(and)h(the)h Fq(z)p FD(-axis)f(at)h(the)g -(+v)m(e)f(latitude)g(p)s(ole.)311 4584 y(2.)46 b(If)30 -b(V)h(is)e(n)m(ull,)g(zero)i(A)f(and)g(B)h(are)g(returned.)311 -4725 y(3.)46 b(A)m(t)32 b(either)d(p)s(ole,)h(zero)h(A)g(is)e -(returned.)p 0 4842 V 0 4955 a Fx(SLA)p Fn(_)p Fx(CC62S)363 -b Fm(Cartesian)37 b(6-V)-10 b(ector)37 b(to)h(Spherical)362 -b Fx(SLA)p Fn(_)p Fx(CC62S)0 5305 y FB(A)m(CTION)44 b -FD(:)38 b(Con)m(v)m(ersion)25 b(of)g(p)s(osition)f(&)h(v)m(elo)s(cit)m -(y)g(in)f(Cartesian)h(co)s(ordinates)g(to)h(spherical)e(co)s(ordinates) -227 5418 y(\(single)30 b(precision\).)0 5606 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_CC62S)g(\(V,)h(A,)g(B,)g(R,)g(AD,)g(BD,)g -(RD\))p eop -%%Page: 24 26 -24 25 bop 0 52 a FD(24)0 351 y FB(GIVEN)45 b FD(:)277 -523 y Fq(V)668 b FB(R\(6\))433 b FD([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 -b FD(_)-43 b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 -b Fl(z)20 b FD(])0 821 y FB(RETURNED)46 b FD(:)277 967 -y Fq(A)668 b FB(R)567 b FD(longitude)29 b(\(radians\))h({)h(for)f -(example)g Fl(\013)277 1080 y Fq(B)672 b FB(R)567 b FD(latitude)30 -b(\(radians\))f({)i(for)f(example)g Fl(\016)277 1193 -y Fq(R)670 b FB(R)567 b FD(radial)29 b(co)s(ordinate)277 -1306 y Fq(AD)599 b FB(R)567 b FD(longitude)29 b(deriv)-5 -b(ativ)m(e)30 b(\(radians)f(p)s(er)h(unit)f(time\))277 -1419 y Fq(BD)603 b FB(R)567 b FD(latitude)30 b(deriv)-5 -b(ativ)m(e)29 b(\(radians)h(p)s(er)f(unit)g(time\))277 -1532 y Fq(RD)601 b FB(R)567 b FD(radial)29 b(deriv)-5 -b(ativ)m(e)p 0 1653 3780 8 v 0 1766 a Fx(SLA)p Fn(_)p -Fx(CD2TF)559 b Fm(Da)m(ys)38 b(to)g(Hour,Min,Sec)558 -b Fx(SLA)p Fn(_)p Fx(CD2TF)0 2116 y FB(A)m(CTION)44 b -FD(:)c(Con)m(v)m(ert)32 b(an)e(in)m(terv)-5 b(al)29 b(in)h(da)m(ys)g -(to)h(hours,)f(min)m(utes,)f(seconds)i(\(single)e(precision\).)0 -2304 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_CD2TF)g(\(NDP,)g(DAYS,)g -(SIGN,)h(IHMSF\))0 2617 y FB(GIVEN)e FD(:)277 2763 y -Fq(NDP)537 b FB(I)605 b FD(n)m(um)m(b)s(er)29 b(of)i(decimal)e(places)h -(of)h(seconds)277 2876 y Fq(D)n(A)-7 b(YS)489 b FB(R)567 -b FD(in)m(terv)-5 b(al)30 b(in)f(da)m(ys)0 3166 y FB(RETURNED)46 -b FD(:)277 3312 y Fq(SIGN)512 b FB(C)569 b FD(`+')31 -b(or)f(`)p Fo(\000)p FD(')277 3425 y Fq(IHMSF)441 b FB(I\(4\))471 -b FD(hours,)30 b(min)m(utes,)f(seconds,)i(fraction)0 -3714 y FB(NOTES)44 b FD(:)311 3893 y(1.)i(NDP)31 b(less)f(than)g(zero)h -(is)e(in)m(terpreted)h(as)h(zero.)311 4030 y(2.)46 b(The)41 -b(largest)h(useful)e(v)-5 b(alue)42 b(for)f(NDP)h(is)f(determined)f(b)m -(y)i(the)g(size)f(of)h(D)m(A)-8 b(YS,)43 b(the)f(format)427 -4143 y(of)34 b(REAL)g(\015oating-p)s(oin)m(t)f(n)m(um)m(b)s(ers)g(on)g -(the)i(target)g(mac)m(hine,)g(and)e(the)h(risk)f(of)h(o)m(v)m(er\015o)m -(wing)427 4256 y(IHMSF\(4\).)51 b(On)32 b(some)h(arc)m(hitectures,)i -(for)e(D)m(A)-8 b(YS)34 b(up)e(to)i(1.0,)h(the)f(a)m(v)-5 -b(ailable)32 b(\015oating-p)s(oin)m(t)427 4369 y(precision)k(corresp)s -(onds)g(roughly)g(to)i(NDP=3.)63 b(This)35 b(is)i(w)m(ell)f(b)s(elo)m -(w)h(the)g(ultimate)g(limit)e(of)427 4482 y(NDP=9)c(set)g(b)m(y)f(the)h -(capacit)m(y)h(of)e(a)h(t)m(ypical)f(32-bit)g(IHMSF\(4\).)311 -4619 y(3.)46 b(The)32 b(absolute)g(v)-5 b(alue)32 b(of)h(D)m(A)-8 -b(YS)34 b(ma)m(y)f(exceed)g(1.0.)48 b(In)32 b(cases)h(where)f(it)g(do)s -(es)g(not,)i(it)e(is)f(up)h(to)427 4732 y(the)f(caller)g(to)g(test)h -(for)f(and)f(handle)g(the)h(case)h(where)e(D)m(A)-8 b(YS)32 -b(is)e(v)m(ery)i(nearly)e(1.0)i(and)e(rounds)427 4844 -y(up)g(to)h(24)g(hours,)e(b)m(y)i(testing)f(for)g(IHMSF\(1\)=24)j(and)c -(setting)i(IHMSF\(1-4\))h(to)f(zero.)p 0 4955 V 0 5068 -a Fx(SLA)p Fn(_)p Fx(CLDJ)769 b Fm(Calendar)37 b(to)h(MJD)771 -b Fx(SLA)p Fn(_)p Fx(CLDJ)0 5418 y FB(A)m(CTION)44 b -FD(:)c(Gregorian)31 b(Calendar)e(to)i(Mo)s(di\014ed)e(Julian)f(Date.)0 -5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_CLDJ)g(\(IY,)h(IM,)f -(ID,)h(DJM,)g(J\))p eop -%%Page: 25 27 -25 26 bop 0 52 a Fw(SUN/67.70)3252 b FD(25)0 351 y FB(GIVEN)45 -b FD(:)277 523 y Fq(IY,IM,ID)356 b FB(I)605 b FD(y)m(ear,)32 -b(mon)m(th,)e(da)m(y)h(in)e(Gregorian)h(calendar)0 874 -y FB(RETURNED)46 b FD(:)277 1020 y Fq(DJM)537 b FB(D)565 -b FD(mo)s(di\014ed)28 b(Julian)g(Date)k(\(JD)p Fo(\000)p -FD(2400000.5\))j(for)30 b(0)3385 987 y Fu(h)277 1133 -y Fq(J)688 b FB(I)605 b FD(status:)1825 1246 y(0)31 b(=)f(OK)1825 -1359 y(1)h(=)f(bad)f(y)m(ear)1825 1471 y(2)i(=)f(bad)f(mon)m(th)1825 -1584 y(3)i(=)f(bad)f(da)m(y)0 1927 y FB(NOTES)44 b FD(:)311 -2113 y(1.)i(When)d(an)g(in)m(v)-5 b(alid)40 b(y)m(ear)k(or)f(mon)m(th)g -(is)f(supplied)e(\(status)k(J)e(=)h(1)g(or)g(2\))h(the)f(MJD)g(is)g -FB(not)427 2226 y FD(computed.)e(When)30 b(an)g(in)m(v)-5 -b(alid)28 b(da)m(y)j(is)e(supplied)e(\(status)k(J)f(=)g(3\))i(the)e -(MJD)h FB(is)g FD(computed.)311 2370 y(2.)46 b(The)30 -b(y)m(ear)h(m)m(ust)g(b)s(e)e Fo(\000)p FD(4699)j(\()p -Fq(i.e.)e FD(4700BC\))j(or)d(later.)41 b(F)-8 b(or)31 -b(y)m(ear)g Fl(n)p FD(BC)f(use)g(IY)h(=)f Fo(\000)p FD(\()p -Fl(n)19 b Fo(\000)h FD(1\).)311 2515 y(3.)46 b(An)35 -b(alternativ)m(e)g(to)h(the)f(presen)m(t)f(routine)g(is)g(sla)p -Ft(_)p FD(CALDJ,)g(whic)m(h)g(accepts)i(a)f(y)m(ear)h(with)d(the)427 -2628 y(cen)m(tury)e(missing.)0 2978 y FB(REFERENCE)44 -b FD(:)c(The)28 b(algorithm)f(is)h(adapted)g(from)h(Hatc)m(her,)h -Fq(Q.)15 b(Jl.)g(R.)h(astr.)h(So)-5 b(c.)29 b FD(\(1984\))i -FB(25)p FD(,)e(53-55.)p 0 3111 3780 8 v 0 3224 a Fx(SLA)p -Fn(_)p Fx(CL)-11 b(YD)620 b Fm(Calendar)37 b(to)h(Y)-10 -b(ear,)37 b(Da)m(y)622 b Fx(SLA)p Fn(_)p Fx(CL)-11 b(YD)0 -3575 y FB(A)m(CTION)44 b FD(:)j(Gregorian)34 b(calendar)f(date)h(to)h -(y)m(ear)f(and)f(da)m(y)h(in)f(y)m(ear,)i(in)e(a)h(Julian)d(calendar)i -(aligned)g(to)227 3687 y(the)e(20th/21st)h(cen)m(tury)f(Gregorian)f -(calendar.)0 3875 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_CLYD)g(\(IY,)h(IM,)f(ID,)h(NY,)g(ND,)g(J\))0 4218 -y FB(GIVEN)e FD(:)277 4390 y Fq(IY,IM,ID)356 b FB(I)605 -b FD(y)m(ear,)32 b(mon)m(th,)e(da)m(y)h(in)e(Gregorian)h(calendar)0 -4741 y FB(RETURNED)46 b FD(:)277 4887 y Fq(NY)600 b FB(I)605 -b FD(y)m(ear)31 b(\(re-aligned)f(Julian)e(calendar\))277 -5000 y Fq(ND)599 b FB(I)605 b FD(da)m(y)31 b(in)e(y)m(ear)i(\(1)g(=)f -(Jan)m(uary)g(1st\))277 5113 y Fq(J)688 b FB(I)605 b -FD(status:)1825 5226 y(0)31 b(=)f(OK)1825 5338 y(1)h(=)f(bad)f(y)m(ear) -j(\(b)s(efore)e Fo(\000)p FD(4711\))1825 5451 y(2)h(=)f(bad)f(mon)m(th) -1825 5564 y(3)i(=)f(bad)f(da)m(y)p eop -%%Page: 26 28 -26 27 bop 0 52 a FD(26)0 351 y FB(NOTES)44 b FD(:)311 -546 y(1.)i(The)30 b(purp)s(ose)f(of)h(sla)p Ft(_)p FD(CL)-8 -b(YD)30 b(is)g(to)h(supp)s(ort)e(sla)p Ft(_)p FD(EAR)-8 -b(TH,)30 b(sla)p Ft(_)p FD(MOON)f(and)h(sla)p Ft(_)p -FD(ECOR.)311 695 y(2.)46 b(Bet)m(w)m(een)31 b(1900)f(Marc)m(h)f(1)g -(and)e(2100)k(F)-8 b(ebruary)28 b(28)h(it)f(returns)f(answ)m(ers)h -(whic)m(h)f(are)i(consisten)m(t)427 808 y(with)d(the)i(ordinary)e -(Gregorian)h(calendar.)39 b(Outside)26 b(this)h(range)h(there)f(will)e -(b)s(e)i(a)h(discrepancy)427 921 y(whic)m(h)h(increases)h(b)m(y)h(one)f -(da)m(y)h(for)f(ev)m(ery)h(non-leap)f(cen)m(tury)h(y)m(ear.)311 -1070 y(3.)46 b(When)26 b(an)g(in)m(v)-5 b(alid)23 b(y)m(ear)k(or)f(mon) -m(th)g(is)f(supplied)e(\(status)k(J)e(=)h(1)g(or)g(J)g(=)f(2\))i(the)f -(results)f(are)i FB(not)427 1183 y FD(computed.)55 b(When)35 -b(a)g(da)m(y)h(is)e(supplied)e(whic)m(h)i(is)g(outside)g(the)h(con)m(v) -m(en)m(tional)h(range)g(\(status)427 1296 y(J)30 b(=)g(3\))h(the)g -(results)e FB(are)h FD(computed.)p 0 1440 3780 8 v 0 -1553 a Fx(SLA)p Fn(_)p Fx(COMBN)570 b Fm(Next)38 b(Com)m(bination)566 -b Fx(SLA)p Fn(_)p Fx(COMBN)0 1904 y FB(A)m(CTION)44 b -FD(:)39 b(Generate)29 b(the)e(next)h(com)m(bination,)f(a)h(subset)f(of) -g(a)h(sp)s(eci\014ed)e(size)h(c)m(hosen)h(from)e(a)i(sp)s(eci\014ed)227 -2017 y(n)m(um)m(b)s(er)h(of)i(items.)0 2204 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_COMBN)g(\(NSEL,)g(NCAND,)g(LIST,)g(J\))0 -2564 y FB(GIVEN)f FD(:)277 2710 y Fq(NSEL)498 b FB(I)605 -b FD(n)m(um)m(b)s(er)29 b(of)i(items)f(\(subset)g(size\))277 -2823 y Fq(NCAND)398 b FB(I)605 b FD(n)m(um)m(b)s(er)29 -b(of)i(candidates)f(\(set)h(size\))0 3194 y FB(GIVEN)j(and)h(RETURNED) -46 b FD(:)277 3365 y Fq(LIST)528 b FB(I\(NSEL\))251 b -FD(latest)31 b(com)m(bination,)f(LIST\(1\)=0)h(to)g(initialize)0 -3744 y FB(RETURNED)46 b FD(:)277 3890 y Fq(J)688 b FB(I)605 -b FD(status:)1825 4003 y Fo(\000)p FD(1)30 b(=)g(illegal)f(NSEL)h(or)g -(NCAND)1898 4116 y(0)g(=)g(OK)1825 4229 y(+1)g(=)g(no)h(more)f(com)m -(binations)g(a)m(v)-5 b(ailable)0 4599 y FB(NOTES)44 -b FD(:)311 4793 y(1.)i(NSEL)33 b(and)h(NCAND)g(m)m(ust)g(b)s(oth)f(b)s -(e)g(at)h(least)g(1,)i(and)d(NSEL)g(m)m(ust)g(b)s(e)h(less)f(than)g(or) -h(equal)427 4906 y(to)d(NCAND.)311 5055 y(2.)46 b(This)32 -b(routine)g(returns,)h(in)f(the)i(LIST)e(arra)m(y)-8 -b(,)35 b(a)f(subset)f(of)g(NSEL)g(in)m(tegers)h(c)m(hosen)f(from)g(the) -427 5168 y(range)h(1)h(to)f(NCAND)g(inclusiv)m(e,)f(in)g(ascending)g -(order.)50 b(Before)35 b(calling)d(the)i(routine)f(for)g(the)427 -5281 y(\014rst)f(time,)h(the)g(caller)f(m)m(ust)h(set)g(the)g(\014rst)f -(elemen)m(t)h(of)f(the)h(LIST)f(arra)m(y)h(to)g(zero)h(\(an)m(y)f(v)-5 -b(alue)427 5394 y(less)30 b(than)g(1)h(will)d(do\))i(to)h(cause)g -(initialization.)311 5544 y(3.)46 b(The)30 b(\014rst)g(com)m(bination)f -(to)j(b)s(e)d(generated)j(is:)597 5693 y(LIST\(1\)=1,)f(LIST\(2\)=2,)g -(.)15 b(.)g(.)h(,)30 b(LIST\(NSEL\)=NSEL)p eop -%%Page: 27 29 -27 28 bop 0 52 a Fw(SUN/67.70)3252 b FD(27)427 351 y(This)33 -b(is)h(also)h(the)g(com)m(bination)f(returned)g(for)h(the)g -(\\\014nished")e(\(J=1\))i(case.)55 b(The)35 b(\014nal)e(p)s(er-)427 -464 y(m)m(utation)e(to)g(b)s(e)f(generated)h(is:)597 -617 y(LIST\(1\)=NCAND,)g(LIST\(2\)=NCAND)p Fo(\000)p -FD(1,)g(.)16 b(.)f(.)g(,)1537 730 y(LIST\(NSEL\)=NCAND)p -Fo(\000)p FD(NSEL+1)311 883 y(4.)46 b(If)20 b(the)h(\\\014nished")e -(\(J=1\))i(status)g(is)f(ignored,)i(the)f(routine)e(con)m(tin)m(ues)i -(to)h(deliv)m(er)d(com)m(binations,)427 996 y(the)31 -b(pattern)f(rep)s(eating)g(ev)m(ery)h(NCAND!/\(NSEL!\(NCAND)p -Fo(\000)p FD(NSEL\)!\))i(calls.)311 1149 y(5.)46 b(The)30 -b(algorithm)g(is)f(b)m(y)h(R.)16 b(F.)f(W)-8 b(arren-Smith)30 -b(\(priv)-5 b(ate)30 b(comm)m(unication\).)p 0 1301 3780 -8 v 0 1414 a Fx(SLA)p Fn(_)p Fx(CR2AF)331 b Fm(Radians)38 -b(to)g(Deg,Arcmin,Arcsec)329 b Fx(SLA)p Fn(_)p Fx(CR2AF)0 -1764 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 b(an)e(angle)g(in)f -(radians)g(to)i(degrees,)h(arcmin)m(utes,)e(arcseconds)h(\(single)e -(precision\).)0 1952 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_CR2AF)g(\(NDP,)g(ANGLE,)g(SIGN,)g(IDMSF\))0 2323 -y FB(GIVEN)f FD(:)277 2469 y Fq(NDP)537 b FB(I)605 b -FD(n)m(um)m(b)s(er)29 b(of)i(decimal)e(places)h(of)h(arcseconds)277 -2582 y Fq(ANGLE)411 b FB(R)567 b FD(angle)31 b(in)e(radians)0 -2970 y FB(RETURNED)46 b FD(:)277 3116 y Fq(SIGN)512 b -FB(C)569 b FD(`+')31 b(or)f(`)p Fo(\000)p FD(')277 3229 -y Fq(IDMSF)440 b FB(I\(4\))471 b FD(degrees,)31 b(arcmin)m(utes,)f -(arcseconds,)h(fraction)0 3618 y FB(NOTES)44 b FD(:)311 -3819 y(1.)i(NDP)31 b(less)f(than)g(zero)h(is)e(in)m(terpreted)h(as)h -(zero.)311 3972 y(2.)46 b(The)36 b(largest)g(useful)e(v)-5 -b(alue)36 b(for)f(NDP)i(is)e(determined)f(b)m(y)i(the)g(size)g(of)g -(ANGLE,)h(the)f(format)427 4085 y(of)e(REAL)g(\015oating-p)s(oin)m(t)f -(n)m(um)m(b)s(ers)g(on)g(the)i(target)g(mac)m(hine,)g(and)e(the)h(risk) -f(of)h(o)m(v)m(er\015o)m(wing)427 4198 y(IDMSF\(4\).)41 -b(On)24 b(some)i(arc)m(hitectures,)h(for)f(ANGLE)f(up)g(to)h(2pi,)g -(the)f(a)m(v)-5 b(ailable)25 b(\015oating-p)s(oin)m(t)427 -4311 y(precision)36 b(corresp)s(onds)g(roughly)g(to)i(NDP=3.)63 -b(This)35 b(is)i(w)m(ell)f(b)s(elo)m(w)h(the)g(ultimate)g(limit)e(of) -427 4424 y(NDP=9)c(set)g(b)m(y)f(the)h(capacit)m(y)h(of)e(a)h(t)m -(ypical)f(32-bit)g(IDMSF\(4\).)311 4577 y(3.)46 b(The)29 -b(absolute)f(v)-5 b(alue)29 b(of)g(ANGLE)g(ma)m(y)g(exceed)h(2)p -Fl(\031)s FD(.)41 b(In)28 b(cases)i(where)e(it)g(do)s(es)h(not,)h(it)e -(is)g(up)g(to)427 4690 y(the)f(caller)g(to)g(test)h(for)f(and)f(handle) -f(the)j(case)g(where)e(ANGLE)h(is)f(v)m(ery)h(nearly)f(2)p -Fl(\031)31 b FD(and)26 b(rounds)427 4803 y(up)k(to)h(360)805 -4770 y Fp(\016)845 4803 y FD(,)g(b)m(y)f(testing)h(for)f -(IDMSF\(1\)=360)j(and)d(setting)g(IDMSF\(1-4\))j(to)e(zero.)p -0 4955 V 0 5068 a Fx(SLA)p Fn(_)p Fx(CR2TF)482 b Fm(Radians)38 -b(to)g(Hour,Min,Sec)481 b Fx(SLA)p Fn(_)p Fx(CR2TF)0 -5418 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 b(an)e(angle)g(in)f -(radians)g(to)i(hours,)f(min)m(utes,)g(seconds)g(\(single)f -(precision\).)0 5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_CR2TF)g(\(NDP,)g(ANGLE,)g(SIGN,)g(IHMSF\))p eop -%%Page: 28 30 -28 29 bop 0 52 a FD(28)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(NDP)537 b FB(I)605 b FD(n)m(um)m(b)s(er)29 b(of)i(decimal)e -(places)h(of)h(seconds)277 610 y Fq(ANGLE)411 b FB(R)567 -b FD(angle)31 b(in)e(radians)0 886 y FB(RETURNED)46 b -FD(:)277 1032 y Fq(SIGN)512 b FB(C)569 b FD(`+')31 b(or)f(`)p -Fo(\000)p FD(')277 1145 y Fq(IHMSF)441 b FB(I\(4\))471 -b FD(hours,)30 b(min)m(utes,)f(seconds,)i(fraction)0 -1421 y FB(NOTES)44 b FD(:)311 1597 y(1.)i(NDP)31 b(less)f(than)g(zero)h -(is)e(in)m(terpreted)h(as)h(zero.)311 1732 y(2.)46 b(The)36 -b(largest)g(useful)e(v)-5 b(alue)36 b(for)f(NDP)i(is)e(determined)f(b)m -(y)i(the)g(size)g(of)g(ANGLE,)h(the)f(format)427 1845 -y(of)e(REAL)g(\015oating-p)s(oin)m(t)f(n)m(um)m(b)s(ers)g(on)g(the)i -(target)g(mac)m(hine,)g(and)e(the)h(risk)f(of)h(o)m(v)m(er\015o)m(wing) -427 1958 y(IHMSF\(4\).)41 b(On)24 b(some)i(arc)m(hitectures,)i(for)d -(ANGLE)h(up)e(to)j(2pi,)f(the)f(a)m(v)-5 b(ailable)25 -b(\015oating-p)s(oin)m(t)427 2071 y(precision)36 b(corresp)s(onds)g -(roughly)g(to)i(NDP=3.)63 b(This)35 b(is)i(w)m(ell)f(b)s(elo)m(w)h(the) -g(ultimate)g(limit)e(of)427 2184 y(NDP=9)c(set)g(b)m(y)f(the)h(capacit) -m(y)h(of)e(a)h(t)m(ypical)f(32-bit)g(IHMSF\(4\).)311 -2319 y(3.)46 b(The)29 b(absolute)f(v)-5 b(alue)29 b(of)g(ANGLE)g(ma)m -(y)g(exceed)h(2)p Fl(\031)s FD(.)41 b(In)28 b(cases)i(where)e(it)g(do)s -(es)h(not,)h(it)e(is)g(up)g(to)427 2432 y(the)f(caller)g(to)g(test)h -(for)f(and)f(handle)f(the)j(case)g(where)e(ANGLE)h(is)f(v)m(ery)h -(nearly)f(2)p Fl(\031)31 b FD(and)26 b(rounds)427 2545 -y(up)k(to)h(24)g(hours,)e(b)m(y)i(testing)f(for)g(IHMSF\(1\)=24)j(and)c -(setting)i(IHMSF\(1-4\))h(to)f(zero.)p 0 2649 3780 8 -v 0 2762 a Fx(SLA)p Fn(_)p Fx(CS2C)664 b Fm(Spherical)38 -b(to)g(Cartesian)663 b Fx(SLA)p Fn(_)p Fx(CS2C)0 3112 -y FB(A)m(CTION)44 b FD(:)c(Spherical)29 b(co)s(ordinates)h(to)h -(Cartesian)f(co)s(ordinates)g(\(single)f(precision\).)0 -3300 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_CS2C)g(\(A,)h(B,)g(V\))0 -3605 y FB(GIVEN)e FD(:)277 3777 y Fq(A,B)576 b FB(R)567 -b FD(spherical)29 b(co)s(ordinates)h(in)f(radians:)39 -b([)15 b Fl(\013;)g(\016)20 b FD(])31 b Fq(etc.)0 4061 -y FB(RETURNED)46 b FD(:)277 4233 y Fq(V)668 b FB(R\(3\))433 -b FD([)15 b Fl(x;)g(y)s(;)g(z)21 b FD(])30 b(unit)f(v)m(ector)0 -4517 y FB(NOTE)44 b FD(:)65 b(The)42 b(spherical)f(co)s(ordinates)i -(are)g(longitude)e(\(+v)m(e)i(an)m(ticlo)s(c)m(kwise)g(lo)s(oking)e -(from)h(the)h(+v)m(e)227 4630 y(latitude)33 b(p)s(ole\))g(and)g -(latitude.)50 b(The)33 b(Cartesian)h(co)s(ordinates)f(are)h(righ)m(t)f -(handed,)h(with)f(the)h Fq(x)p FD(-axis)227 4743 y(at)d(zero)h -(longitude)d(and)g(latitude,)h(and)g(the)g Fq(z)p FD(-axis)h(at)g(the)f -(+v)m(e)h(latitude)f(p)s(ole.)p 0 4842 V 0 4955 a Fx(SLA)p -Fn(_)p Fx(CS2C6)377 b Fm(Spherical)37 b(P)m(os/V)-10 -b(el)37 b(to)h(Cartesian)375 b Fx(SLA)p Fn(_)p Fx(CS2C6)0 -5305 y FB(A)m(CTION)44 b FD(:)38 b(Con)m(v)m(ersion)25 -b(of)g(p)s(osition)f(&)h(v)m(elo)s(cit)m(y)g(in)f(spherical)g(co)s -(ordinates)h(to)h(Cartesian)f(co)s(ordinates)227 5418 -y(\(single)30 b(precision\).)0 5606 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_CS2C6)g(\(A,)h(B,)g(R,)g(AD,)g(BD,)g(RD,)g(V\))p -eop -%%Page: 29 31 -29 30 bop 0 52 a Fw(SUN/67.70)3252 b FD(29)0 351 y FB(GIVEN)45 -b FD(:)277 497 y Fq(A)668 b FB(R)567 b FD(longitude)29 -b(\(radians\))h({)h(for)f(example)g Fl(\013)277 610 y -Fq(B)672 b FB(R)567 b FD(latitude)30 b(\(radians\))f({)i(for)f(example) -g Fl(\016)277 723 y Fq(R)670 b FB(R)567 b FD(radial)29 -b(co)s(ordinate)277 836 y Fq(AD)599 b FB(R)567 b FD(longitude)29 -b(deriv)-5 b(ativ)m(e)30 b(\(radians)f(p)s(er)h(unit)f(time\))277 -949 y Fq(BD)603 b FB(R)567 b FD(latitude)30 b(deriv)-5 -b(ativ)m(e)29 b(\(radians)h(p)s(er)f(unit)g(time\))277 -1062 y Fq(RD)601 b FB(R)567 b FD(radial)29 b(deriv)-5 -b(ativ)m(e)0 1309 y FB(RETURNED)46 b FD(:)277 1480 y -Fq(V)668 b FB(R\(6\))433 b FD([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 -b FD(_)-43 b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 -b Fl(z)20 b FD(])0 1736 y FB(NOTE)44 b FD(:)65 b(The)42 -b(spherical)f(co)s(ordinates)i(are)g(longitude)e(\(+v)m(e)i(an)m(ticlo) -s(c)m(kwise)g(lo)s(oking)e(from)h(the)h(+v)m(e)227 1849 -y(latitude)33 b(p)s(ole\))g(and)g(latitude.)50 b(The)33 -b(Cartesian)h(co)s(ordinates)f(are)h(righ)m(t)f(handed,)h(with)f(the)h -Fq(x)p FD(-axis)227 1962 y(at)d(zero)h(longitude)d(and)g(latitude,)h -(and)g(the)g Fq(z)p FD(-axis)h(at)g(the)f(+v)m(e)h(latitude)f(p)s(ole.) -p 0 2049 3780 8 v 0 2161 a Fx(SLA)p Fn(_)p Fx(CTF2D)559 -b Fm(Hour,Min,Sec)36 b(to)i(Da)m(ys)560 b Fx(SLA)p Fn(_)p -Fx(CTF2D)0 2512 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 -b(hours,)d(min)m(utes,)h(seconds)g(to)h(da)m(ys)g(\(single)e -(precision\).)0 2699 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_CTF2D)g(\(IHOUR,)f(IMIN,)i(SEC,)f(DAYS,)h(J\))0 -2988 y FB(GIVEN)e FD(:)277 3134 y Fq(IHOUR)429 b FB(I)605 -b FD(hours)277 3247 y Fq(IMIN)516 b FB(I)605 b FD(min)m(utes)277 -3360 y Fq(SEC)558 b FB(R)567 b FD(seconds)0 3607 y FB(RETURNED)46 -b FD(:)277 3753 y Fq(D)n(A)-7 b(YS)489 b FB(R)567 b FD(in)m(terv)-5 -b(al)30 b(in)f(da)m(ys)277 3866 y Fq(J)688 b FB(I)605 -b FD(status:)1825 3979 y(0)31 b(=)f(OK)1825 4092 y(1)h(=)f(IHOUR)g -(outside)f(range)i(0-23)1825 4205 y(2)g(=)f(IMIN)g(outside)g(range)g -(0-59)1825 4318 y(3)h(=)f(SEC)f(outside)h(range)g(0-59.999)p -Fo(\001)15 b(\001)g(\001)0 4565 y FB(NOTES)44 b FD(:)311 -4737 y(1.)i(The)30 b(result)f(is)h(computed)g(ev)m(en)h(if)e(an)m(y)i -(of)g(the)f(range)h(c)m(hec)m(ks)h(fail.)311 4868 y(2.)46 -b(The)30 b(sign)g(m)m(ust)g(b)s(e)g(dealt)g(with)f(outside)g(this)h -(routine.)p 0 4955 V 0 5068 a Fx(SLA)p Fn(_)p Fx(CTF2R)482 -b Fm(Hour,Min,Sec)37 b(to)h(Radians)482 b Fx(SLA)p Fn(_)p -Fx(CTF2R)0 5418 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 -b(hours,)d(min)m(utes,)h(seconds)g(to)h(radians)e(\(single)h -(precision\).)0 5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_CTF2R)g(\(IHOUR,)f(IMIN,)i(SEC,)f(RAD,)h(J\))p -eop -%%Page: 30 32 -30 31 bop 0 52 a FD(30)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(IHOUR)429 b FB(I)605 b FD(hours)277 610 y Fq(IMIN)516 -b FB(I)605 b FD(min)m(utes)277 723 y Fq(SEC)558 b FB(R)567 -b FD(seconds)0 1202 y FB(RETURNED)46 b FD(:)277 1348 -y Fq(RAD)533 b FB(R)567 b FD(angle)31 b(in)e(radians)277 -1461 y Fq(J)688 b FB(I)605 b FD(status:)1825 1574 y(0)31 -b(=)f(OK)1825 1687 y(1)h(=)f(IHOUR)g(outside)f(range)i(0-23)1825 -1800 y(2)g(=)f(IMIN)g(outside)g(range)g(0-59)1825 1913 -y(3)h(=)f(SEC)f(outside)h(range)g(0-59.999)p Fo(\001)15 -b(\001)g(\001)0 2392 y FB(NOTES)44 b FD(:)311 2630 y(1.)i(The)30 -b(result)f(is)h(computed)g(ev)m(en)h(if)e(an)m(y)i(of)g(the)f(range)h -(c)m(hec)m(ks)h(fail.)311 2801 y(2.)46 b(The)30 b(sign)g(m)m(ust)g(b)s -(e)g(dealt)g(with)f(outside)g(this)h(routine.)p 0 2984 -3780 8 v 0 3097 a Fx(SLA)p Fn(_)p Fx(D)l(AF2R)329 b Fm -(Deg,Arcmin,Arcsec)35 b(to)j(Radians)330 b Fx(SLA)p Fn(_)p -Fx(D)l(AF2R)0 3448 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 -b(degrees,)f(arcmin)m(utes,)f(arcseconds)h(to)g(radians)e(\(double)g -(precision\).)0 3635 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_DAF2R)g(\(IDEG,)g(IAMIN,)g(ASEC,)g(RAD,)h(J\))0 -4060 y FB(GIVEN)e FD(:)277 4206 y Fq(IDEG)500 b FB(I)605 -b FD(degrees)277 4319 y Fq(IAMIN)448 b FB(I)605 b FD(arcmin)m(utes)277 -4432 y Fq(ASEC)490 b FB(D)565 b FD(arcseconds)0 4912 -y FB(RETURNED)46 b FD(:)277 5058 y Fq(RAD)533 b FB(D)565 -b FD(angle)31 b(in)e(radians)277 5171 y Fq(J)688 b FB(I)605 -b FD(status:)1825 5283 y(1)31 b(=)f(IDEG)g(outside)g(range)h(0)p -Fo(\000)p FD(359)1825 5396 y(2)g(=)f(IAMIN)g(outside)g(range)h(0)p -Fo(\000)p FD(59)1825 5509 y(3)g(=)f(ASEC)f(outside)h(range)g(0)p -Fo(\000)p FD(59.999)p Fo(\001)15 b(\001)g(\001)p eop -%%Page: 31 33 -31 32 bop 0 52 a Fw(SUN/67.70)3252 b FD(31)0 351 y FB(NOTES)44 -b FD(:)311 538 y(1.)i(The)30 b(result)f(is)h(computed)g(ev)m(en)h(if)e -(an)m(y)i(of)g(the)f(range)h(c)m(hec)m(ks)h(fail.)311 -683 y(2.)46 b(The)30 b(sign)g(m)m(ust)g(b)s(e)g(dealt)g(with)f(outside) -g(this)h(routine.)p 0 813 3780 8 v 0 926 a Fx(SLA)p Fn(_)p -Fx(D)l(AFIN)175 b Fm(Sexagesimal)36 b(c)m(haracter)g(string)h(to)i -(angle)175 b Fx(SLA)p Fn(_)p Fx(D)l(AFIN)0 1276 y FB(A)m(CTION)44 -b FD(:)k(Deco)s(de)35 b(a)g(free-format)g(sexagesimal)f(string)f -(\(degrees,)j(arcmin)m(utes,)f(arcseconds\))g(in)m(to)f(a)227 -1389 y(double)29 b(precision)g(\015oating)h(p)s(oin)m(t)f(n)m(um)m(b)s -(er)g(\(radians\).)0 1576 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_DAFIN)g(\(STRING,)f(NSTRT,)h(DRESLT,)g(JF\))0 1922 -y FB(GIVEN)f FD(:)277 2068 y Fq(STRING)381 b FB(C*\(*\))i -FD(string)29 b(con)m(taining)h(deg,)h(arcmin,)f(arcsec)h(\014elds)277 -2181 y Fq(NSTR)-7 b(T)428 b FB(I)605 b FD(p)s(oin)m(ter)36 -b(to)h(start)g(of)f(deco)s(de)h(\(b)s(eginning)d(of)j(STRING)1658 -2294 y(=)30 b(1\))0 2640 y FB(RETURNED)46 b FD(:)277 -2786 y Fq(NSTR)-7 b(T)428 b FB(I)605 b FD(adv)-5 b(anced)31 -b(past)f(the)h(deco)s(ded)f(angle)277 2899 y Fq(DRESL)-7 -b(T)373 b FB(D)565 b FD(angle)31 b(in)e(radians)277 3012 -y Fq(JF)629 b FB(I)605 b FD(status:)1825 3125 y(0)31 -b(=)f(OK)1752 3238 y(+1)h(=)f(default,)f(DRESL)-8 b(T)30 -b(unc)m(hanged)g(\(note)i(2\))1752 3351 y Fo(\000)p FD(1)f(=)f(bad)f -(degrees)i(\(note)h(3\))1752 3464 y Fo(\000)p FD(2)f(=)f(bad)f(arcmin)m -(utes)h(\(note)i(3\))1752 3577 y Fo(\000)p FD(3)f(=)f(bad)f(arcseconds) -i(\(note)g(3\))0 3923 y FB(EXAMPLE)45 b FD(:)277 4069 -y Fq(ar)-5 b(gument)369 b(b)-5 b(efor)g(e)1235 b(after)277 -4295 y FD(STRING)1013 4262 y Fp(0)1036 4295 y Ft -(-57 17 44.806 12 34 56.7)2236 4262 y Fp(0)2476 4295 -y FD(unc)m(hanged)277 4408 y(NSTR)-8 b(T)426 b(1)1418 -b(16)32 b(\()p Fq(i.e.)e FD(p)s(oin)m(ting)e(to)j(12...\))277 -4521 y(RESL)-8 b(T)441 b(-)1433 b Fo(\000)p FD(1)p Fl(:)p -FD(00000)p Ft(D0)277 4634 y FD(JF)630 b(-)1433 b(0)45 -4813 y(A)39 b(further)f(call)g(to)i(sla)p Ft(_)p FD(D)m(AFIN,)f -(without)f(adjustmen)m(t)h(of)g(NSTR)-8 b(T,)38 b(will)e(deco)s(de)j -(the)g(second)g(angle,)227 4926 y(12)317 4893 y Fp(\016)373 -4926 y FD(34)463 4889 y Fk(0)505 4926 y FD(56)590 4889 -y Fk(0)m(0)594 4926 y Fl(:)p FD(7.)0 5281 y FB(NOTES)44 -b FD(:)311 5467 y(1.)i(The)27 b(\014rst)f(three)h(\\\014elds")f(in)g -(STRING)g(are)h(degrees,)i(arcmin)m(utes,)e(arcseconds,)h(separated)g -(b)m(y)427 5580 y(spaces)d(or)e(commas.)40 b(The)23 b(degrees)h -(\014eld)f(ma)m(y)h(b)s(e)g(signed,)g(but)f(not)h(the)g(others.)39 -b(The)24 b(deco)s(ding)427 5693 y(is)30 b(carried)f(out)i(b)m(y)f(the)h -(sla)p Ft(_)p FD(DFL)-8 b(TIN)30 b(routine)f(and)h(is)g(free-format.)p -eop -%%Page: 32 34 -32 33 bop 0 52 a FD(32)311 351 y(2.)46 b(Successiv)m(e)24 -b(\014elds)e(ma)m(y)i(b)s(e)f(absen)m(t,)j(defaulting)c(to)j(zero.)39 -b(F)-8 b(or)25 b(zero)f(status,)i(the)e(only)e(com)m(bina-)427 -464 y(tions)31 b(allo)m(w)m(ed)g(are)g(degrees)h(alone,)f(degrees)h -(and)f(arcmin)m(utes,)g(and)f(all)g(three)i(\014elds)d(presen)m(t.)427 -577 y(If)h(all)e(three)i(\014elds)e(are)i(omitted,)g(a)g(status)g(of)g -(+1)g(is)f(returned)f(and)i(DRESL)-8 b(T)29 b(is)g(unc)m(hanged.)427 -690 y(In)h(all)f(other)i(cases)g(DRESL)-8 b(T)30 b(is)f(c)m(hanged.)311 -848 y(3.)46 b(Range)31 b(c)m(hec)m(king:)506 1006 y Fo(\017)46 -b FD(The)38 b(degrees)h(\014eld)e(is)g(not)i(range)g(c)m(hec)m(k)m(ed.) -66 b(Ho)m(w)m(ev)m(er,)43 b(it)38 b(is)f(exp)s(ected)i(to)g(b)s(e)f(in) -m(tegral)597 1119 y(unless)29 b(the)i(other)f(t)m(w)m(o)i(\014elds)d -(are)h(absen)m(t.)506 1254 y Fo(\017)46 b FD(The)33 b(arcmin)m(utes)h -(\014eld)e(is)g(exp)s(ected)i(to)h(b)s(e)e(0-59,)j(and)d(in)m(tegral)g -(if)g(the)h(arcseconds)g(\014eld)597 1367 y(is)39 b(presen)m(t.)70 -b(If)40 b(the)g(arcseconds)g(\014eld)f(is)g(absen)m(t,)k(the)d(arcmin)m -(utes)g(is)f(exp)s(ected)h(to)h(b)s(e)597 1480 y(0-59.9999...)506 -1615 y Fo(\017)46 b FD(The)30 b(arcseconds)h(\014eld)e(is)g(exp)s -(ected)i(to)g(b)s(e)f(0-59.9999...)506 1751 y Fo(\017)46 -b FD(Deco)s(ding)40 b(con)m(tin)m(ues)g(ev)m(en)h(when)e(a)h(c)m(hec)m -(k)i(has)d(failed.)68 b(Under)39 b(these)i(circumstances)597 -1864 y(the)33 b(\014eld)d(tak)m(es)k(the)e(supplied)d(v)-5 -b(alue,)32 b(defaulting)f(to)h(zero,)i(and)d(the)i(result)e(DRESL)-8 -b(T)31 b(is)597 1977 y(computed)f(and)g(returned.)311 -2134 y(4.)46 b(F)-8 b(urther)31 b(\014elds)f(after)h(the)g(three)h(exp) -s(ected)f(ones)g(are)h(not)f(treated)h(as)g(an)e(error.)43 -b(The)30 b(p)s(oin)m(ter)427 2247 y(NSTR)-8 b(T)35 b(is)g(left)g(in)f -(the)i(correct)h(state)f(for)g(further)e(deco)s(ding)g(with)h(the)g -(presen)m(t)h(routine)e(or)427 2360 y(with)29 b(sla)p -Ft(_)p FD(DFL)-8 b(TIN)31 b Fq(etc)p FD(.)40 b(See)31 -b(the)f(example,)h(ab)s(o)m(v)m(e.)311 2518 y(5.)46 b(If)27 -b(STRING)h(con)m(tains)f(hours,)h(min)m(utes,)f(seconds)h(instead)f(of) -h(degrees)g Fq(etc)p FD(,)g(or)g(if)e(the)i(required)427 -2631 y(units)e(are)j(turns)d(\(or)i(da)m(ys\))g(instead)f(of)h -(radians,)f(the)h(result)f(DRESL)-8 b(T)27 b(should)f(b)s(e)h(m)m -(ultiplied)427 2744 y(as)k(follo)m(ws:)477 2890 y Fq(for)i(STRING)145 -b(to)33 b(obtain)202 b(multiply)34 b(DRESL)-7 b(T)32 -b(by)477 3116 y Fo(\016)583 3110 y Fp(0)65 b(00)1122 -3116 y FD(radians)264 b(1)p Fl(:)p FD(0)p Ft(D0)477 3229 -y Fo(\016)583 3223 y Fp(0)65 b(00)1122 3229 y FD(turns)345 -b(1)p Fl(=)p FD(2)p Fl(\031)30 b FD(=)25 b(0)p Fl(:)p -FD(1591549430918)q(95)q(335)q(8)p Ft(D0)477 3342 y FD(h)30 -b(m)g(s)422 b(radians)264 b(15)p Fl(:)p FD(0)p Ft(D0)477 -3455 y FD(h)30 b(m)g(s)422 b(da)m(ys)377 b(15)p Fl(=)p -FD(2)p Fl(\031)30 b FD(=)25 b(2)p Fl(:)p FD(387324146378)q(43)q(003)q -(65)q Ft(D0)p 0 3627 3780 8 v 0 3740 a Fx(SLA)p Fn(_)p -Fx(D)l(A)-11 b(T)1008 b Fm(T)-10 b(AI)p Fh(\000)p Fm(UTC)1010 -b Fx(SLA)p Fn(_)p Fx(D)l(A)-11 b(T)0 4090 y FB(A)m(CTION)44 -b FD(:)38 b(Incremen)m(t)26 b(to)g(b)s(e)f(applied)e(to)k(Co)s -(ordinated)d(Univ)m(ersal)g(Time)h(UTC)g(to)h(giv)m(e)g(In)m -(ternational)227 4203 y(A)m(tomic)31 b(Time)f(T)-8 b(AI.)0 -4391 y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_DAT)d(\(UTC\))0 -4772 y FB(GIVEN)g FD(:)277 4944 y Fq(UTC)538 b FB(D)565 -b FD(UTC)30 b(date)h(as)g(a)f(mo)s(di\014ed)f(JD)h(\(JD)p -Fo(\000)p FD(2400000.5\))0 5364 y FB(RETURNED)46 b FD(:)277 -5536 y Fq(sla)p Ft(_)p Fq(D)n(A)-7 b(T)389 b FB(D)565 -b FD(T)-8 b(AI)p Fo(\000)p FD(UTC)30 b(in)f(seconds)p -eop -%%Page: 33 35 -33 34 bop 0 52 a Fw(SUN/67.70)3252 b FD(33)0 351 y FB(NOTES)44 -b FD(:)311 529 y(1.)i(The)32 b(UTC)f(is)g(sp)s(eci\014ed)f(to)i(b)s(e)f -(a)i(date)f(rather)g(than)f(a)h(time)g(to)g(indicate)f(that)i(care)f -(needs)g(to)427 642 y(b)s(e)g(tak)m(en)i(not)f(to)h(sp)s(ecify)d(an)i -(instan)m(t)g(whic)m(h)e(lies)h(within)e(a)j(leap)g(second.)48 -b(Though)32 b(in)f(most)427 755 y(cases)39 b(UTC)e(can)i(include)c(the) -j(fractional)g(part,)i(correct)f(b)s(eha)m(viour)d(on)i(the)g(da)m(y)h -(of)f(a)g(leap)427 868 y(second)31 b(can)f(b)s(e)g(guaran)m(teed)i -(only)d(up)g(to)i(the)g(end)f(of)g(the)h(second)f(23)2892 -835 y Fu(h)2952 868 y FD(59)3042 835 y Fu(m)3121 868 -y FD(59)3211 835 y Fu(s)3244 868 y FD(.)311 1004 y(2.)46 -b(F)-8 b(or)21 b(ep)s(o)s(c)m(hs)f(from)g(1961)i(Jan)m(uary)e(1)h(on)m -(w)m(ards,)h(the)e(expressions)f(from)h(the)h(\014le)e -Ft(ftp://maia.usno.navy.mil)o(/ser)o(7/ta)o(i-u)o(tc.d)o(at)427 -1117 y FD(are)32 b(used.)44 b(A)31 b(5ms)h(time)f(step)h(at)g(1961)h -(Jan)m(uary)f(1)f(is)g(tak)m(en)i(from)e(2.58.1)j(\(p87\))e(of)g(the)g -(1992)427 1230 y(Explanatory)e(Supplemen)m(t.)311 1366 -y(3.)46 b(UTC)26 b(b)s(egan)f(at)i(1960)h(Jan)m(uary)d(1.0)i(\(JD)f -(2436934.5\))k(and)c(it)f(is)g(improp)s(er)f(to)i(call)f(the)h(routine) -427 1479 y(with)34 b(an)i(earlier)e(ep)s(o)s(c)m(h.)56 -b(Ho)m(w)m(ev)m(er,)39 b(if)34 b(this)h(is)f(attempted,)k(the)e(T)-8 -b(AI)p Fo(\000)p FD(UTC)34 b(expression)h(for)427 1592 -y(the)c(y)m(ear)g(1960)h(is)e(used.)311 1728 y(4.)46 -b(This)35 b(routine)h(has)g(to)h(b)s(e)f(up)s(dated)f(on)i(eac)m(h)h(o) -s(ccasion)f(that)g(a)g(leap)f(second)g(is)g(announced,)427 -1841 y(and)28 b(programs)h(using)e(it)h(relink)m(ed.)38 -b(Refer)29 b(to)g(the)g(program)g(source)f(co)s(de)h(for)g(information) -e(on)427 1954 y(when)j(the)g(most)h(recen)m(t)g(leap)f(second)h(w)m(as) -f(added.)p 0 2058 3780 8 v 0 2171 a Fx(SLA)p Fn(_)p Fx(D)l(A)-15 -b(V2M)187 b Fm(Rotation)36 b(Matrix)h(from)g(Axial)g(V)-10 -b(ector)188 b Fx(SLA)p Fn(_)p Fx(D)l(A)-15 b(V2M)0 2521 -y FB(A)m(CTION)44 b FD(:)39 b(F)-8 b(orm)28 b(the)f(rotation)h(matrix)f -(corresp)s(onding)e(to)j(a)g(giv)m(en)f(axial)g(v)m(ector)h(\(double)f -(precision\).)0 2709 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_DAV2M)g(\(AXVEC,)f(RMAT\))0 3019 y FB(GIVEN)g FD(:)277 -3191 y Fq(AXVEC)405 b FB(D\(3\))431 b FD(axial)30 b(v)m(ector)i -(\(radians\))0 3484 y FB(RETURNED)46 b FD(:)277 3656 -y Fq(RMA)-7 b(T)462 b FB(D\(3,3\))350 b FD(rotation)31 -b(matrix)0 3949 y FB(NOTES)44 b FD(:)311 4127 y(1.)i(A)38 -b(rotation)f(matrix)g(describ)s(es)e(a)j(rotation)g(ab)s(out)f(some)g -(arbitrary)f(axis,)j(called)d(the)i(Euler)427 4240 y(axis.)58 -b(The)35 b Fq(axial)40 b(ve)-5 b(ctor)36 b FD(supplied)d(to)k(this)e -(routine)g(has)h(the)h(same)f(direction)f(as)i(the)f(Euler)427 -4353 y(axis,)30 b(and)g(its)g(magnitude)f(is)h(the)g(amoun)m(t)h(of)g -(rotation)f(in)g(radians.)311 4489 y(2.)46 b(If)30 b(AXVEC)h(is)e(n)m -(ull,)g(the)h(unit)f(matrix)h(is)f(returned.)311 4626 -y(3.)46 b(The)28 b(reference)g(frame)g(rotates)h(clo)s(c)m(kwise)e(as)i -(seen)f(lo)s(oking)e(along)i(the)g(axial)f(v)m(ector)j(from)d(the)427 -4739 y(origin.)p 0 4842 V 0 4955 a Fx(SLA)p Fn(_)p Fx(DBEAR)109 -b Fm(Direction)37 b(Bet)m(w)m(een)h(P)m(oin)m(ts)f(on)h(a)h(Sphere)110 -b Fx(SLA)p Fn(_)p Fx(DBEAR)0 5305 y FB(A)m(CTION)44 b -FD(:)h(Returns)31 b(the)i(b)s(earing)e(\(p)s(osition)f(angle\))j(of)g -(one)g(p)s(oin)m(t)e(on)h(a)h(sphere)f(relativ)m(e)g(to)h(another)227 -5418 y(\(double)d(precision\).)0 5606 y FB(CALL)45 b -FD(:)77 b Ft(D)47 b(=)h(sla_DBEAR)d(\(A1,)i(B1,)f(A2,)h(B2\))p -eop -%%Page: 34 36 -34 35 bop 0 52 a FD(34)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(A1,B1)484 b FB(D)565 b FD(spherical)29 b(co)s(ordinates)h(of)g -(one)h(p)s(oin)m(t)277 610 y Fq(A2,B2)484 b FB(D)565 -b FD(spherical)29 b(co)s(ordinates)h(of)g(the)h(other)g(p)s(oin)m(t)0 -889 y FB(RETURNED)46 b FD(:)277 1060 y Fq(sla)p Ft(_)p -Fq(DBEAR)253 b FB(D)565 b FD(b)s(earing)29 b(from)h(\014rst)g(p)s(oin)m -(t)f(to)i(second)0 1347 y FB(NOTES)44 b FD(:)311 1524 -y(1.)i(The)30 b(spherical)f(co)s(ordinates)h(are)h([)15 -b Fl(\013;)g(\016)20 b FD(],)31 b([)p Fl(\025;)15 b(\036)p -FD(])31 b Fq(etc.)p FD(,)f(in)f(radians.)311 1660 y(2.)46 -b(The)33 b(result)f(is)h(the)h(b)s(earing)e(\(p)s(osition)f(angle\),)k -(in)d(radians,)h(of)h(p)s(oin)m(t)e([A2,B2])k(as)d(seen)h(from)427 -1773 y(p)s(oin)m(t)j([A1,B1].)65 b(It)38 b(is)f(in)g(the)h(range)g -Fo(\006)p Fl(\031)s FD(.)63 b(The)37 b(sense)h(is)f(suc)m(h)h(that)g -(if)f([A2,B2])j(is)d(a)h(small)427 1885 y(distance)f(due)f(east)i(of)g -([A1,B1])h(the)e(result)f(is)g(ab)s(out)h(+)p Fl(\031)s(=)p -FD(2.)61 b(Zero)37 b(is)f(returned)g(if)g(the)h(t)m(w)m(o)427 -1998 y(p)s(oin)m(ts)30 b(are)g(coinciden)m(t.)311 2134 -y(3.)46 b(If)32 b(either)g(B-co)s(ordinate)h(is)f(outside)f(the)i -(range)g Fo(\006)p Fl(\031)s(=)p FD(2,)g(the)g(result)e(ma)m(y)i -(corresp)s(ond)f(to)h(\\the)427 2247 y(long)d(w)m(a)m(y)i(round".)311 -2382 y(4.)46 b(The)38 b(routine)g(sla)p Ft(_)p FD(DP)-8 -b(A)e(V)39 b(p)s(erforms)e(an)h(equiv)-5 b(alen)m(t)38 -b(function)f(except)j(that)f(the)g(p)s(oin)m(ts)e(are)427 -2495 y(sp)s(eci\014ed)29 b(in)g(the)i(form)e(of)i(Cartesian)f(v)m -(ectors.)p 0 2595 3780 8 v 0 2708 a Fx(SLA)p Fn(_)p Fx(DBJIN)262 -b Fm(Deco)s(de)40 b(String)d(to)h(B/J)h(Ep)s(o)s(c)m(h)f(\(DP\))263 -b Fx(SLA)p Fn(_)p Fx(DBJIN)0 3059 y FB(A)m(CTION)44 b -FD(:)64 b(Deco)s(de)42 b(a)h(c)m(haracter)g(string)e(in)m(to)h(a)g -(DOUBLE)g(PRECISION)f(n)m(um)m(b)s(er,)i(with)e(sp)s(ecial)227 -3172 y(pro)m(vision)21 b(for)h(Besselian)f(and)h(Julian)e(ep)s(o)s(c)m -(hs.)37 b(The)22 b(string)f(syn)m(tax)i(is)e(as)h(for)g(sla)p -Ft(_)p FD(DFL)-8 b(TIN,)23 b(pre\014xed)227 3285 y(b)m(y)31 -b(an)f(optional)f(`B')j(or)e(`J'.)0 3472 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DBJIN)g(\(STRING,)f(NSTRT,)h(DRESLT,)g -(J1,)h(J2\))0 3779 y FB(GIVEN)e FD(:)277 3925 y Fq(STRING)381 -b FB(C)569 b FD(string)29 b(con)m(taining)h(\014eld)f(to)i(b)s(e)f -(deco)s(ded)277 4038 y Fq(NSTR)-7 b(T)428 b FB(I)605 -b FD(p)s(oin)m(ter)30 b(to)h(\014rst)e(c)m(haracter)j(of)f(\014eld)e -(in)g(string)0 4317 y FB(RETURNED)46 b FD(:)277 4463 -y Fq(NSTR)-7 b(T)428 b FB(I)605 b FD(incremen)m(ted)30 -b(past)h(the)f(deco)s(ded)g(\014eld)277 4575 y Fq(DRESL)-7 -b(T)373 b FB(D)565 b FD(result)277 4688 y Fq(J1)642 b -FB(I)605 b FD(DFL)-8 b(TIN)31 b(status:)1752 4801 y Fo(\000)p -FD(1)g(=)f Fo(\000)p FD(OK)1825 4914 y(0)h(=)f(+OK)1825 -5027 y(1)h(=)f(n)m(ull)e(\014eld)1825 5140 y(2)j(=)f(error)277 -5253 y Fq(J2)642 b FB(I)605 b FD(syn)m(tax)31 b(\015ag:)1825 -5366 y(0)g(=)f(normal)f(DFL)-8 b(TIN)31 b(syn)m(tax)1825 -5479 y(1)g(=)f(`B')h(or)f(`b')1825 5592 y(2)h(=)f(`J')g(or)g(`j')p -eop -%%Page: 35 37 -35 36 bop 0 52 a Fw(SUN/67.70)3252 b FD(35)0 351 y FB(NOTES)44 -b FD(:)311 532 y(1.)i(The)27 b(purp)s(ose)f(of)i(the)g(syn)m(tax)g -(extensions)f(is)g(to)h(help)e(cop)s(e)i(with)e(mixed)h(FK4)h(and)e -(FK5)j(data,)427 645 y(allo)m(wing)g(\014elds)g(suc)m(h)h(as)h(`B1950') -i(or)d(`J2000')j(to)e(b)s(e)e(deco)s(ded.)311 785 y(2.)46 -b(In)30 b(addition)e(to)i(the)h(syn)m(tax)f(accepted)i(b)m(y)d(sla)p -Ft(_)p FD(DFL)-8 b(TIN,)31 b(the)f(follo)m(wing)e(t)m(w)m(o)k -(extensions)d(are)427 898 y(recognized)i(b)m(y)f(sla)p -Ft(_)p FD(DBJIN:)436 1037 y(\(a\))46 b(A)31 b(v)-5 b(alid)28 -b(non-n)m(ull)h(\014eld)f(preceded)j(b)m(y)f(the)g(c)m(haracter)i(`B')g -(\(or)e(`b'\))h(is)e(accepted.)431 1164 y(\(b\))45 b(A)31 -b(v)-5 b(alid)28 b(non-n)m(ull)h(\014eld)f(preceded)j(b)m(y)f(the)g(c)m -(haracter)i(`J')f(\(or)g(`j'\))g(is)e(accepted.)311 1303 -y(3.)46 b(The)33 b(calling)e(program)h(is)g(told)g(of)h(the)g(`B')h(or) -e(`J')h(through)f(an)h(supplemen)m(tary)e(status)i(argu-)427 -1416 y(men)m(t.)41 b(The)30 b(rest)h(of)f(the)h(argumen)m(ts)g(are)f -(as)h(for)f(sla)p Ft(_)p FD(DFL)-8 b(TIN.)p 0 1529 3780 -8 v 0 1642 a Fx(SLA)p Fn(_)p Fx(DC62S)357 b Fm(Cartesian)37 -b(6-V)-10 b(ector)37 b(to)h(Spherical)356 b Fx(SLA)p -Fn(_)p Fx(DC62S)0 1993 y FB(A)m(CTION)44 b FD(:)38 b(Con)m(v)m(ersion) -25 b(of)g(p)s(osition)f(&)h(v)m(elo)s(cit)m(y)g(in)f(Cartesian)h(co)s -(ordinates)g(to)h(spherical)e(co)s(ordinates)227 2106 -y(\(double)30 b(precision\).)0 2293 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_DC62S)g(\(V,)h(A,)g(B,)g(R,)g(AD,)g(BD,)g(RD\))0 -2617 y FB(GIVEN)e FD(:)277 2788 y Fq(V)668 b FB(D\(6\))431 -b FD([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 b FD(_)-43 b Fl(x)r(;)32 -b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 b FD(])0 -3105 y FB(RETURNED)46 b FD(:)277 3251 y Fq(A)668 b FB(D)565 -b FD(longitude)29 b(\(radians\))277 3364 y Fq(B)672 b -FB(D)565 b FD(latitude)30 b(\(radians\))277 3477 y Fq(R)670 -b FB(D)565 b FD(radial)29 b(co)s(ordinate)277 3590 y -Fq(AD)599 b FB(D)565 b FD(longitude)29 b(deriv)-5 b(ativ)m(e)30 -b(\(radians)f(p)s(er)h(unit)f(time\))277 3703 y Fq(BD)603 -b FB(D)565 b FD(latitude)30 b(deriv)-5 b(ativ)m(e)29 -b(\(radians)h(p)s(er)f(unit)g(time\))277 3816 y Fq(RD)601 -b FB(D)565 b FD(radial)29 b(deriv)-5 b(ativ)m(e)p 0 3945 -V 0 4058 a Fx(SLA)p Fn(_)p Fx(DCC2S)561 b Fm(Cartesian)37 -b(to)h(Spherical)561 b Fx(SLA)p Fn(_)p Fx(DCC2S)0 4408 -y FB(A)m(CTION)44 b FD(:)c(Cartesian)30 b(co)s(ordinates)g(to)i -(spherical)c(co)s(ordinates)i(\(double)f(precision\).)0 -4596 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DCC2S)g(\(V,)h(A,)g(B\)) -0 4919 y FB(GIVEN)e FD(:)277 5091 y Fq(V)668 b FB(D\(3\))431 -b FD([)15 b Fl(x;)g(y)s(;)g(z)21 b FD(])30 b(v)m(ector)0 -5408 y FB(RETURNED)46 b FD(:)277 5579 y Fq(A,B)576 b -FB(D)565 b FD(spherical)29 b(co)s(ordinates)h(in)f(radians)p -eop -%%Page: 36 38 -36 37 bop 0 52 a FD(36)0 351 y FB(NOTES)44 b FD(:)311 -545 y(1.)i(The)d(spherical)f(co)s(ordinates)i(are)g(longitude)e(\(+v)m -(e)i(an)m(ticlo)s(c)m(kwise)g(lo)s(oking)e(from)h(the)h(+v)m(e)427 -658 y(latitude)38 b(p)s(ole\))f(and)h(latitude.)64 b(The)37 -b(Cartesian)h(co)s(ordinates)g(are)h(righ)m(t)f(handed,)h(with)e(the) -427 771 y Fq(x)p FD(-axis)31 b(at)g(zero)g(longitude)e(and)h(latitude,) -f(and)h(the)h Fq(z)p FD(-axis)f(at)h(the)g(+v)m(e)f(latitude)g(p)s -(ole.)311 920 y(2.)46 b(If)30 b(V)h(is)e(n)m(ull,)g(zero)i(A)f(and)g(B) -h(are)g(returned.)311 1070 y(3.)46 b(A)m(t)32 b(either)d(p)s(ole,)h -(zero)h(A)g(is)e(returned.)p 0 1209 3780 8 v 0 1322 a -Fx(SLA)p Fn(_)p Fx(DCMPF)558 b Fm(In)m(terpret)37 b(Linear)h(Fit)559 -b Fx(SLA)p Fn(_)p Fx(DCMPF)0 1672 y FB(A)m(CTION)44 b -FD(:)c(Decomp)s(ose)31 b(an)e([)15 b Fl(x;)g(y)k FD(])30 -b(linear)e(\014t)h(in)m(to)h(its)f(constituen)m(t)h(parameters:)41 -b(zero)30 b(p)s(oin)m(ts,)f(scales,)227 1785 y(nonp)s(erp)s -(endicularit)m(y)d(and)k(orien)m(tation.)0 1973 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DCMPF)g(\(COEFFS,XZ,YZ,XS,YS,PER)o(P,OR)o -(IEN)o(T\))0 2332 y FB(GIVEN)f FD(:)277 2504 y Fq(COEFFS)370 -b FB(D\(6\))431 b FD(transformation)30 b(co)s(e\016cien)m(ts)h(\(see)g -(note\))0 2882 y FB(RETURNED)46 b FD(:)277 3028 y Fq(XZ)612 -b FB(D)565 b Fq(x)31 b FD(zero)g(p)s(oin)m(t)277 3141 -y Fq(YZ)612 b FB(D)565 b Fq(y)31 b FD(zero)g(p)s(oin)m(t)277 -3254 y Fq(XS)617 b FB(D)565 b Fq(x)31 b FD(scale)277 -3366 y Fq(YS)617 b FB(D)565 b Fq(y)31 b FD(scale)277 -3479 y Fq(PERP)484 b FB(D)565 b FD(nonp)s(erp)s(endicularit)m(y)26 -b(\(radians\))277 3592 y Fq(ORIENT)370 b FB(D)565 b FD(orien)m(tation) -31 b(\(radians\))0 3962 y FB(NOTES)44 b FD(:)311 4156 -y(1.)i(The)30 b(mo)s(del)f(relates)h(t)m(w)m(o)h(sets)g(of)f([)15 -b Fl(x;)g(y)k FD(])30 b(co)s(ordinates)f(as)i(follo)m(ws.)39 -b(Naming)30 b(the)g(six)f(elemen)m(ts)427 4269 y(of)23 -b(COEFFS)g Fl(a;)15 b(b;)g(c;)g(d;)g(e)25 b FD(&)e Fl(f)10 -b FD(,)24 b(the)f(mo)s(del)f(transforms)g(co)s(ordinates)g([)p -Fl(x)2922 4283 y Fu(1)2962 4269 y Fl(;)15 b(y)3047 4283 -y Fu(1)3102 4269 y FD(])23 b(in)m(to)g(co)s(ordinates)427 -4382 y([)p Fl(x)504 4396 y Fu(2)544 4382 y Fl(;)15 b(y)629 -4396 y Fu(2)683 4382 y FD(])31 b(as)g(follo)m(ws:)597 -4531 y Fl(x)649 4545 y Fu(2)714 4531 y FD(=)25 b Fl(a)20 -b FD(+)g Fl(bx)1060 4545 y Fu(1)1120 4531 y FD(+)g Fl(cy)1295 -4545 y Fu(1)597 4644 y Fl(y)642 4658 y Fu(2)707 4644 -y FD(=)k Fl(d)d FD(+)f Fl(ex)1055 4658 y Fu(1)1115 4644 -y FD(+)g Fl(f)10 b(y)1306 4658 y Fu(1)427 4793 y FD(The)30 -b(sla)p Ft(_)p FD(DCMPF)g(routine)g(decomp)s(oses)g(this)f -(transformation)h(in)m(to)h(four)e(steps:)436 4943 y(\(a\))46 -b(Zero)31 b(p)s(oin)m(ts:)752 5074 y Fl(x)804 5041 y -Fp(0)852 5074 y FD(=)25 b Fl(x)1000 5088 y Fu(1)1060 -5074 y FD(+)20 b(XZ)752 5187 y Fl(y)800 5154 y Fp(0)848 -5187 y FD(=)25 b Fl(y)989 5201 y Fu(1)1048 5187 y FD(+)20 -b(YZ)431 5318 y(\(b\))45 b(Scales:)752 5449 y Fl(x)804 -5416 y Fp(00)871 5449 y FD(=)25 b Fl(x)1019 5416 y Fp(0)1043 -5449 y FD(XS)752 5562 y Fl(y)800 5529 y Fp(00)867 5562 -y FD(=)g Fl(y)1011 5529 y Fp(0)1034 5562 y FD(YS)441 -5693 y(\(c\))46 b(Nonp)s(erp)s(endicularit)m(y:)p eop -%%Page: 37 39 -37 38 bop 0 52 a Fw(SUN/67.70)3252 b FD(37)752 351 y -Fl(x)804 318 y Fp(000)891 351 y FD(=)25 b(+)p Fl(x)1110 -318 y Fp(00)1167 351 y FD(cos)16 b(PERP)o Fl(=)p FD(2)21 -b(+)f Fl(y)1806 318 y Fp(00)1864 351 y FD(sin)13 b(PERP)p -Fl(=)p FD(2)752 464 y Fl(y)800 431 y Fp(000)886 464 y -FD(=)25 b(+)p Fl(x)1105 431 y Fp(00)1163 464 y FD(sin)13 -b(PERP)p Fl(=)p FD(2)21 b(+)f Fl(y)1792 431 y Fp(00)1849 -464 y FD(cos)c(PERP)p Fl(=)p FD(2)431 596 y(\(d\))45 -b(Orien)m(tation:)752 728 y Fl(x)804 742 y Fu(2)868 728 -y FD(=)25 b(+)p Fl(x)1087 695 y Fp(000)1164 728 y FD(cos)16 -b(ORIENT)j(+)h Fl(y)1826 695 y Fp(000)1903 728 y FD(sin)13 -b(ORIENT)752 841 y Fl(y)797 855 y Fu(2)861 841 y FD(=)25 -b Fo(\000)p Fl(x)1080 808 y Fp(000)1156 841 y FD(sin)14 -b(ORIENT)20 b(+)f Fl(y)1808 808 y Fp(000)1885 841 y FD(cos)d(ORIENT)311 -992 y(2.)46 b(See)31 b(also)f(sla)p Ft(_)p FD(FITXY,)g(sla)p -Ft(_)p FD(PXY,)g(sla)p Ft(_)p FD(INVF,)h(sla)p Ft(_)p -FD(XY2XY.)p 0 1135 3780 8 v 0 1248 a Fx(SLA)p Fn(_)p -Fx(DCS2C)561 b Fm(Spherical)38 b(to)g(Cartesian)560 b -Fx(SLA)p Fn(_)p Fx(DCS2C)0 1598 y FB(A)m(CTION)44 b FD(:)c(Spherical)29 -b(co)s(ordinates)h(to)h(Cartesian)f(co)s(ordinates)g(\(double)f -(precision\).)0 1786 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_DCS2C)g(\(A,)h(B,)g(V\))0 2151 y FB(GIVEN)e FD(:)277 -2322 y Fq(A,B)576 b FB(D)565 b FD(spherical)29 b(co)s(ordinates)h(in)f -(radians:)39 b([)15 b Fl(\013;)g(\016)20 b FD(])31 b -Fq(etc.)0 2710 y FB(RETURNED)46 b FD(:)277 2881 y Fq(V)668 -b FB(D\(3\))431 b FD([)15 b Fl(x;)g(y)s(;)g(z)21 b FD(])30 -b(unit)f(v)m(ector)0 3268 y FB(NOTE)44 b FD(:)65 b(The)42 -b(spherical)f(co)s(ordinates)i(are)g(longitude)e(\(+v)m(e)i(an)m(ticlo) -s(c)m(kwise)g(lo)s(oking)e(from)h(the)h(+v)m(e)227 3381 -y(latitude)33 b(p)s(ole\))g(and)g(latitude.)50 b(The)33 -b(Cartesian)h(co)s(ordinates)f(are)h(righ)m(t)f(handed,)h(with)f(the)h -Fq(x)p FD(-axis)227 3494 y(at)d(zero)h(longitude)d(and)g(latitude,)h -(and)g(the)g Fq(z)p FD(-axis)h(at)g(the)f(+v)m(e)h(latitude)f(p)s(ole.) -p 0 3637 V 0 3750 a Fx(SLA)p Fn(_)p Fx(DD2TF)553 b Fm(Da)m(ys)38 -b(to)g(Hour,Min,Sec)552 b Fx(SLA)p Fn(_)p Fx(DD2TF)0 -4100 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 b(an)e(in)m(terv)-5 -b(al)29 b(in)h(da)m(ys)g(in)m(to)g(hours,)g(min)m(utes,)g(seconds)g -(\(double)f(precision\).)0 4288 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_DD2TF)g(\(NDP,)g(DAYS,)g(SIGN,)h(IHMSF\))0 -4653 y FB(GIVEN)e FD(:)277 4799 y Fq(NDP)537 b FB(I)605 -b FD(n)m(um)m(b)s(er)29 b(of)i(decimal)e(places)h(of)h(seconds)277 -4912 y Fq(D)n(A)-7 b(YS)489 b FB(D)565 b FD(in)m(terv)-5 -b(al)30 b(in)f(da)m(ys)0 5290 y FB(RETURNED)46 b FD(:)277 -5437 y Fq(SIGN)512 b FB(C)569 b FD(`+')31 b(or)f(`)p -Fo(\000)p FD(')277 5549 y Fq(IHMSF)441 b FB(I\(4\))471 -b FD(hours,)30 b(min)m(utes,)f(seconds,)i(fraction)p -eop -%%Page: 38 40 -38 39 bop 0 52 a FD(38)0 351 y FB(NOTES)44 b FD(:)311 -532 y(1.)i(NDP)31 b(less)f(than)g(zero)h(is)e(in)m(terpreted)h(as)h -(zero.)311 672 y(2.)46 b(The)34 b(largest)g(useful)e(v)-5 -b(alue)34 b(for)g(NDP)g(is)f(determined)g(b)m(y)h(the)g(size)g(of)g(D)m -(A)-8 b(YS,)36 b(the)e(format)g(of)427 785 y(DOUBLE)h(PRECISION)f -(\015oating-p)s(oin)m(t)g(n)m(um)m(b)s(ers)f(on)i(the)g(target)i(mac)m -(hine,)e(and)g(the)g(risk)427 898 y(of)29 b(o)m(v)m(er\015o)m(wing)g -(IHMSF\(4\).)42 b(On)27 b(some)i(arc)m(hitectures,)h(for)e(D)m(A)-8 -b(YS)30 b(up)e(to)h(1D0,)h(the)f(a)m(v)-5 b(ailable)427 -1010 y(\015oating-p)s(oin)m(t)21 b(precision)f(corresp)s(onds)h -(roughly)f(to)j(NDP=12.)39 b(Ho)m(w)m(ev)m(er,)25 b(the)d(practical)g -(limit)427 1123 y(is)30 b(NDP=9,)h(set)g(b)m(y)f(the)h(capacit)m(y)g -(of)g(a)g(t)m(ypical)f(32-bit)g(IHMSF\(4\).)311 1263 -y(3.)46 b(The)30 b(absolute)g(v)-5 b(alue)29 b(of)i(D)m(A)-8 -b(YS)31 b(ma)m(y)g(exceed)g(1D0.)42 b(In)29 b(cases)i(where)f(it)f(do)s -(es)h(not,)h(it)e(is)h(up)f(to)427 1376 y(the)g(caller)e(to)i(test)g -(for)f(and)g(handle)e(the)j(case)g(where)f(D)m(A)-8 b(YS)29 -b(is)e(v)m(ery)i(nearly)e(1D0)j(and)d(rounds)427 1489 -y(up)j(to)h(24)g(hours,)e(b)m(y)i(testing)f(for)g(IHMSF\(1\)=24)j(and)c -(setting)i(IHMSF\(1-4\))h(to)f(zero.)p 0 1606 3780 8 -v 0 1719 a Fx(SLA)p Fn(_)p Fx(DE2H)885 b Fg(h;)20 b(\016)44 -b Fm(to)38 b(Az,El)884 b Fx(SLA)p Fn(_)p Fx(DE2H)0 2070 -y FB(A)m(CTION)44 b FD(:)c(Equatorial)30 b(to)h(horizon)f(co)s -(ordinates)g(\(double)f(precision\).)0 2257 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DE2H)g(\(HA,)h(DEC,)f(PHI,)h(AZ,)g(EL\))0 -2580 y FB(GIVEN)e FD(:)277 2726 y Fq(HA)600 b FB(D)565 -b FD(hour)30 b(angle)g(\(radians\))277 2839 y Fq(DEC)540 -b FB(D)565 b FD(declination)29 b(\(radians\))277 2952 -y Fq(PHI)571 b FB(D)565 b FD(latitude)30 b(\(radians\))0 -3259 y FB(RETURNED)46 b FD(:)277 3405 y Fq(AZ)612 b FB(D)565 -b FD(azim)m(uth)30 b(\(radians\))277 3518 y Fq(EL)617 -b FB(D)565 b FD(elev)-5 b(ation)30 b(\(radians\))0 3825 -y FB(NOTES)44 b FD(:)311 4006 y(1.)i(Azim)m(uth)28 b(is)g(returned)f -(in)g(the)i(range)g(0)q Fo(\000)q FD(2)p Fl(\031)s FD(;)h(north)e(is)g -(zero,)i(and)e(east)h(is)f(+)p Fl(\031)s(=)p FD(2.)41 -b(Elev)-5 b(ation)27 b(is)427 4119 y(returned)i(in)h(the)g(range)h -Fo(\006)p Fl(\031)s FD(.)311 4258 y(2.)46 b(The)32 b(latitude)f(m)m -(ust)i(b)s(e)e(geo)s(detic.)48 b(In)31 b(critical)h(applications,)f -(corrections)i(for)f(p)s(olar)f(motion)427 4371 y(should)e(b)s(e)g -(applied.)311 4511 y(3.)46 b(In)36 b(some)h(applications)e(it)i(will)d -(b)s(e)i(imp)s(ortan)m(t)g(to)h(sp)s(ecify)f(the)h(correct)h(t)m(yp)s -(e)f(of)g(hour)e(angle)427 4624 y(and)f(declination)f(in)g(order)h(to)h -(pro)s(duce)e(the)i(required)d(t)m(yp)s(e)j(of)g(azim)m(uth)f(and)f -(elev)-5 b(ation.)53 b(In)427 4737 y(particular,)25 b(it)f(ma)m(y)h(b)s -(e)f(imp)s(ortan)m(t)g(to)h(distinguish)c(b)s(et)m(w)m(een)26 -b(elev)-5 b(ation)24 b(as)h(a\013ected)h(b)m(y)f(refrac-)427 -4850 y(tion,)g(whic)m(h)d(w)m(ould)h(require)f(the)i -Fq(observe)-5 b(d)24 b FD([)15 b Fl(h;)g(\016)20 b FD(],)26 -b(and)d(the)g(elev)-5 b(ation)24 b Fq(in)i(vacuo)p FD(,)f(whic)m(h)e(w) -m(ould)427 4962 y(require)35 b(the)h Fq(top)-5 b(o)g(c)g(entric)39 -b FD([)15 b Fl(h;)g(\016)20 b FD(].)59 b(If)35 b(the)i(e\013ects)g(of)f -(diurnal)d(ab)s(erration)j(can)g(b)s(e)g(neglected,)427 -5075 y(the)31 b Fq(app)-5 b(ar)g(ent)33 b FD([)15 b Fl(h;)g(\016)20 -b FD(])31 b(ma)m(y)g(b)s(e)f(used)f(instead)h(of)g(the)h(top)s(o)s(cen) -m(tric)f([)15 b Fl(h;)g(\016)21 b FD(].)311 5215 y(4.)46 -b(No)31 b(range)g(c)m(hec)m(king)g(of)g(argumen)m(ts)f(is)g(carried)f -(out.)311 5354 y(5.)46 b(In)28 b(applications)e(whic)m(h)i(in)m(v)m -(olv)m(e)g(man)m(y)h(suc)m(h)f(calculations,)g(rather)g(than)g(calling) -f(the)h(presen)m(t)427 5467 y(routine)i(it)g(will)e(b)s(e)i(more)g -(e\016cien)m(t)h(to)h(use)e(inline)d(co)s(de,)k(ha)m(ving)g(previously) -d(computed)i(\014xed)427 5580 y(terms)g(suc)m(h)f(as)h(sine)f(and)g -(cosine)g(of)h(latitude,)f(and)g(\(for)h(trac)m(king)g(a)g(star\))g -(sine)f(and)g(cosine)g(of)427 5693 y(declination.)p eop -%%Page: 39 41 -39 40 bop 0 52 a Fw(SUN/67.70)3252 b FD(39)p 0 267 3780 -8 v 0 380 a Fx(SLA)p Fn(_)p Fx(DEULER)168 b Fm(Euler)37 -b(Angles)h(to)g(Rotation)f(Matrix)166 b Fx(SLA)p Fn(_)p -Fx(DEULER)0 730 y FB(A)m(CTION)44 b FD(:)k(F)-8 b(orm)35 -b(a)f(rotation)h(matrix)e(from)h(the)g(Euler)f(angles)h({)h(three)f -(successiv)m(e)g(rotations)h(ab)s(out)227 843 y(sp)s(eci\014ed)29 -b(Cartesian)h(axes)h(\(double)e(precision\).)0 1031 y -FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DEULER)f(\(ORDER,)h(PHI,)h -(THETA,)f(PSI,)h(RMAT\))0 1326 y FB(GIVEN)e FD(:)277 -1472 y Fq(ORDER)403 b FB(C)569 b FD(sp)s(eci\014es)29 -b(ab)s(out)h(whic)m(h)f(axes)i(the)g(rotations)g(o)s(ccur)277 -1585 y Fq(PHI)571 b FB(D)565 b FD(1st)31 b(rotation)g(\(radians\))277 -1698 y Fq(THET)-7 b(A)415 b FB(D)565 b FD(2nd)30 b(rotation)h -(\(radians\))277 1811 y Fq(PSI)588 b FB(D)565 b FD(3rd)30 -b(rotation)h(\(radians\))0 2070 y FB(RETURNED)46 b FD(:)277 -2241 y Fq(RMA)-7 b(T)462 b FB(D\(3,3\))350 b FD(rotation)31 -b(matrix)0 2509 y FB(NOTES)44 b FD(:)311 2683 y(1.)i(A)30 -b(rotation)h(is)e(p)s(ositiv)m(e)f(when)h(the)h(reference)h(frame)f -(rotates)h(an)m(ticlo)s(c)m(kwise)e(as)i(seen)f(lo)s(oking)427 -2796 y(to)m(w)m(ards)h(the)g(origin)e(from)h(the)g(p)s(ositiv)m(e)g -(region)g(of)g(the)h(sp)s(eci\014ed)d(axis.)311 2928 -y(2.)46 b(The)25 b(c)m(haracters)i(of)e(ORDER)g(de\014ne)g(whic)m(h)f -(axes)i(the)f(three)h(successiv)m(e)f(rotations)h(are)f(ab)s(out.)427 -3041 y(A)40 b(t)m(ypical)e(v)-5 b(alue)39 b(is)f(`ZXZ',)h(indicating)e -(that)j(RMA)-8 b(T)40 b(is)e(to)i(b)s(ecome)f(the)h(direction)e(cosine) -427 3154 y(matrix)29 b(corresp)s(onding)f(to)j(rotations)f(of)g(the)g -(reference)g(frame)g(through)f(PHI)g(radians)g(ab)s(out)427 -3267 y(the)21 b(old)e Fq(z)p FD(-axis,)k(follo)m(w)m(ed)d(b)m(y)g(THET) --8 b(A)20 b(radians)f(ab)s(out)h(the)h(resulting)d Fq(x)p -FD(-axis,)k(then)e(PSI)g(radians)427 3380 y(ab)s(out)30 -b(the)h(resulting)d Fq(z)p FD(-axis.)311 3512 y(3.)46 -b(The)34 b(axis)f(names)h(can)g(b)s(e)g(an)m(y)g(of)g(the)h(follo)m -(wing,)e(in)g(an)m(y)h(order)g(or)g(com)m(bination:)47 -b(X,)34 b(Y,)h(Z,)427 3625 y(upp)s(ercase)30 b(or)g(lo)m(w)m(ercase,)i -(1,)f(2,)g(3.)42 b(Normal)30 b(axis)g(lab)s(elling/n)m(um)m(b)s(ering) -25 b(con)m(v)m(en)m(tions)32 b(apply;)427 3738 y(the)k -Fq(xyz)g FD(\()p Fo(\021)f FD(123\))i(triad)e(is)g(righ)m(t-handed.)55 -b(Th)m(us,)37 b(the)f(`ZXZ')f(example)h(giv)m(en)f(ab)s(o)m(v)m(e)i -(could)427 3851 y(b)s(e)f(written)f(`zxz')i(or)f(`313')i(\(or)f(ev)m -(en)g(`ZxZ')e(or)h(`3xZ'\).)h(ORDER)f(is)f(terminated)h(b)m(y)g(length) -427 3964 y(or)j(b)m(y)g(the)g(\014rst)f(unrecognized)g(c)m(haracter.)68 -b(F)-8 b(ew)m(er)40 b(than)f(three)g(rotations)g(are)g(acceptable,)427 -4077 y(in)g(whic)m(h)g(case)i(the)f(later)g(angle)g(argumen)m(ts)g(are) -g(ignored.)69 b(Zero)39 b(rotations)i(pro)s(duces)d(the)427 -4190 y(iden)m(tit)m(y)30 b(RMA)-8 b(T.)p 0 4282 V 0 4395 -a Fx(SLA)p Fn(_)p Fx(DFL)d(TIN)150 b Fm(Deco)s(de)39 -b(a)f(Double)h(Precision)e(Num)m(b)s(er)150 b Fx(SLA)p -Fn(_)p Fx(DFL)-11 b(TIN)0 4745 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m -(ert)32 b(free-format)f(input)d(in)m(to)j(double)e(precision)f -(\015oating)i(p)s(oin)m(t.)0 4933 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_DFLTIN)f(\(STRING,)h(NSTRT,)g(DRESLT,)g(JFLAG\))0 -5228 y FB(GIVEN)f FD(:)277 5374 y Fq(STRING)381 b FB(C)569 -b FD(string)29 b(con)m(taining)h(n)m(um)m(b)s(er)f(to)j(b)s(e)d(deco)s -(ded)277 5487 y Fq(NSTR)-7 b(T)428 b FB(I)605 b FD(p)s(oin)m(ter)30 -b(to)h(where)f(deco)s(ding)f(is)g(to)i(commence)277 5600 -y Fq(DRESL)-7 b(T)373 b FB(D)565 b FD(curren)m(t)30 b(v)-5 -b(alue)30 b(of)h(result)p eop -%%Page: 40 42 -40 41 bop 0 52 a FD(40)0 351 y FB(RETURNED)46 b FD(:)277 -497 y Fq(NSTR)-7 b(T)428 b FB(I)605 b FD(adv)-5 b(anced)31 -b(to)g(next)f(n)m(um)m(b)s(er)277 610 y Fq(DRESL)-7 b(T)373 -b FB(D)565 b FD(result)277 723 y Fq(JFLA)n(G)436 b FB(I)605 -b FD(status:)65 b Fo(\000)p FD(1)43 b(=)f Fo(\000)p FD(OK,)f(0)i(=)f -(+OK,)g(1)h(=)f(n)m(ull)e(result,)1658 836 y(2)31 b(=)f(error)0 -1174 y FB(NOTES)44 b FD(:)311 1359 y(1.)i(The)37 b(reason)h(sla)p -Ft(_)p FD(DFL)-8 b(TIN)37 b(has)g(separate)h(`OK')f(status)h(v)-5 -b(alues)36 b(for)h(+)g(and)g Fo(\000)g FD(is)f(to)i(enable)427 -1472 y(min)m(us)28 b(zero)j(to)g(b)s(e)e(detected.)42 -b(This)28 b(is)g(of)i(crucial)f(imp)s(ortance)g(when)g(deco)s(ding)g -(mixed-radix)427 1585 y(n)m(um)m(b)s(ers.)68 b(F)-8 b(or)40 -b(example,)j(an)c(angle)h(expressed)f(as)i(degrees,)i(arcmin)m(utes)c -(and)g(arcseconds)427 1698 y(ma)m(y)31 b(ha)m(v)m(e)h(a)f(leading)e -(min)m(us)f(sign)i(but)f(a)i(zero)g(degrees)g(\014eld.)311 -1842 y(2.)46 b(A)32 b(T)-8 b(AB)32 b(is)f(in)m(terpreted)g(as)h(a)g -(space,)h(and)e(lo)m(w)m(ercase)i(c)m(haracters)g(are)f(in)m(terpreted) -f(as)h(upp)s(er-)427 1955 y(case.)42 b Fq(n.b.)30 b FD(The)g(test)h -(for)f(T)-8 b(AB)31 b(is)f(ASCI)s(I-sp)s(eci\014c.)311 -2098 y(3.)46 b(The)38 b(basic)f(format)h(is)f(the)h(sequence)h(of)f -(\014elds)e Fo(\006)p Fl(n:nx)24 b Fo(\006)h Fl(n)p FD(,)40 -b(where)d Fo(\006)h FD(is)f(a)h(sign)f(c)m(haracter)427 -2211 y(`+')f(or)g(`)p Fo(\000)p FD(',)i Fl(n)e FD(means)f(a)i(string)e -(of)h(decimal)f(digits,)h(`.')58 b(is)35 b(a)h(decimal)f(p)s(oin)m(t,)i -(and)e Fl(x)p FD(,)j(whic)m(h)427 2324 y(indicates)30 -b(an)h(exp)s(onen)m(t,)h(means)f(`D')h(or)f(`E'.)h(V)-8 -b(arious)31 b(com)m(binations)f(of)h(these)h(\014elds)e(can)h(b)s(e)427 -2437 y(omitted,)g(and)f(em)m(b)s(edded)f(blanks)g(are)i(p)s(ermissible) -26 b(in)j(certain)h(places.)311 2581 y(4.)46 b(Spaces:)506 -2725 y Fo(\017)g FD(Leading)30 b(spaces)h(are)g(ignored.)506 -2853 y Fo(\017)46 b FD(Em)m(b)s(edded)38 b(spaces)i(are)g(allo)m(w)m -(ed)f(only)f(after)i(+,)i Fo(\000)p FD(,)g(D)d(or)h(E,)f(and)g(after)h -(the)f(decimal)597 2966 y(p)s(oin)m(t)30 b(if)f(the)i(\014rst)e -(sequence)i(of)f(digits)f(is)h(absen)m(t.)506 3095 y -Fo(\017)46 b FD(T)-8 b(railing)38 b(spaces)i(are)h(ignored;)j(the)c -(\014rst)f(signi\014es)f(end)h(of)h(deco)s(ding)f(and)g(subsequen)m(t) -597 3207 y(ones)31 b(are)g(skipp)s(ed.)311 3351 y(5.)46 -b(Delimiters:)506 3495 y Fo(\017)g FD(An)m(y)32 b(c)m(haracter)h(other) -f(than)f(+,)p Fo(\000)p FD(,0-9,.,D,E)j(or)e(space)g(ma)m(y)g(b)s(e)f -(used)g(to)h(signal)e(the)i(end)597 3608 y(of)f(the)f(n)m(um)m(b)s(er)f -(and)h(terminate)h(deco)s(ding.)506 3736 y Fo(\017)46 -b FD(Comma)29 b(is)e(recognized)i(b)m(y)f(sla)p Ft(_)p -FD(DFL)-8 b(TIN)28 b(as)h(a)g(sp)s(ecial)e(case;)j(it)e(is)g(skipp)s -(ed,)e(lea)m(ving)i(the)597 3849 y(p)s(oin)m(ter)i(on)g(the)g(next)h(c) -m(haracter.)42 b(See)31 b(13,)g(b)s(elo)m(w.)506 3978 -y Fo(\017)46 b FD(Deco)s(ding)31 b(will)c(in)i(all)h(cases)h(terminate) -f(if)g(end)f(of)i(string)e(is)h(reac)m(hed.)311 4122 -y(6.)46 b(Both)31 b(signs)f(are)g(optional.)40 b(The)30 -b(default)g(is)f(+.)311 4265 y(7.)46 b(The)30 b(man)m(tissa)g -Fl(n:n)g FD(defaults)g(to)h(unit)m(y)-8 b(.)311 4409 -y(8.)46 b(The)30 b(exp)s(onen)m(t)h Fl(x)5 b Fo(\006)g -Fl(n)29 b FD(defaults)h(to)h(`D0'.)311 4553 y(9.)46 b(The)30 -b(strings)f(of)i(decimal)e(digits)g(ma)m(y)i(b)s(e)f(of)g(an)m(y)h -(length.)266 4697 y(10.)46 b(The)30 b(decimal)f(p)s(oin)m(t)h(is)f -(optional)h(for)g(whole)g(n)m(um)m(b)s(ers.)266 4841 -y(11.)46 b(A)28 b Fq(nul)5 b(l)30 b(r)-5 b(esult)37 b -FD(o)s(ccurs)28 b(when)e(the)i(string)f(of)h(c)m(haracters)h(b)s(eing)d -(deco)s(ded)h(do)s(es)h(not)g(b)s(egin)e(with)427 4954 -y(+,)p Fo(\000)p FD(,0-9,.,D)44 b(or)d(E,)g(or)g(consists)g(en)m -(tirely)f(of)h(spaces.)74 b(When)41 b(this)f(condition)g(is)g -(detected,)427 5067 y(JFLA)m(G)31 b(is)f(set)h(to)g(1)g(and)e(DRESL)-8 -b(T)30 b(is)g(left)g(un)m(touc)m(hed.)266 5210 y(12.)46 -b(NSTR)-8 b(T)30 b(=)g(1)h(for)f(the)g(\014rst)g(c)m(haracter)i(in)d -(the)i(string.)266 5354 y(13.)46 b(On)21 b(return)f(from)h(sla)p -Ft(_)p FD(DFL)-8 b(TIN,)21 b(NSTR)-8 b(T)21 b(is)f(set)i(ready)f(for)g -(the)g(next)h(deco)s(de)f({)h(follo)m(wing)d(trail-)427 -5467 y(ing)31 b(blanks)g(and)g(an)m(y)h(comma.)47 b(If)31 -b(a)i(delimiter)c(other)j(than)g(comma)h(is)e(b)s(eing)f(used,)i(NSTR) --8 b(T)427 5580 y(m)m(ust)36 b(b)s(e)f(incremen)m(ted)g(b)s(efore)g -(the)h(next)g(call)f(to)h(sla)p Ft(_)p FD(DFL)-8 b(TIN,)36 -b(otherwise)f(all)f(subsequen)m(t)427 5693 y(calls)c(will)e(return)h(a) -i(n)m(ull)d(result.)p eop -%%Page: 41 43 -41 42 bop 0 52 a Fw(SUN/67.70)3252 b FD(41)266 351 y(14.)46 -b(Errors)30 b(\(JFLA)m(G=2\))i(o)s(ccur)e(when:)506 491 -y Fo(\017)46 b FD(a)31 b(+,)f Fo(\000)p FD(,)h(D)f(or)h(E)f(is)f(left)h -(unsatis\014ed;)f(or)506 617 y Fo(\017)46 b FD(the)30 -b(decimal)e(p)s(oin)m(t)h(is)f(presen)m(t)i(without)f(at)h(least)g(one) -f(decimal)g(digit)f(b)s(efore)h(or)h(after)g(it;)597 -730 y(or)506 856 y Fo(\017)46 b FD(an)31 b(exp)s(onen)m(t)f(more)g -(than)h(100)g(has)f(b)s(een)g(presen)m(ted.)266 996 y(15.)46 -b(When)31 b(an)f(error)h(has)f(b)s(een)g(detected,)j(NSTR)-8 -b(T)30 b(is)g(left)g(p)s(oin)m(ting)f(to)j(the)f(c)m(haracter)h(follo)m -(wing)427 1109 y(the)41 b(last)g(one)g(used)g(b)s(efore)f(the)h(error)g -(came)h(to)f(ligh)m(t.)72 b(This)39 b(ma)m(y)j(b)s(e)e(after)i(the)f(p) -s(oin)m(t)f(at)427 1222 y(whic)m(h)g(a)h(more)f(sophisticated)g -(program)h(could)e(ha)m(v)m(e)j(detected)g(the)f(error.)71 -b(F)-8 b(or)42 b(example,)427 1334 y(sla)p Ft(_)p FD(DFL)-8 -b(TIN)28 b(do)s(es)f(not)h(detect)h(that)f(`1D999')i(is)d(unacceptable) -g(\(on)h(a)g(computer)f(where)h(this)427 1447 y(is)i(so\))h(un)m(til)d -(the)j(en)m(tire)f(n)m(um)m(b)s(er)f(has)h(b)s(een)g(deco)s(ded.)266 -1587 y(16.)46 b(Certain)28 b(highly)f(unlik)m(ely)g(com)m(binations)h -(of)h(man)m(tissa)g(and)f(exp)s(onen)m(t)h(can)h(cause)f(arithmetic)427 -1700 y(faults)j(during)e(the)i(deco)s(de,)i(in)d(some)i(cases)g -(despite)e(the)i(fact)g(that)g(they)g(together)h(could)d(b)s(e)427 -1813 y(construed)f(as)h(a)g(v)-5 b(alid)28 b(n)m(um)m(b)s(er.)266 -1952 y(17.)46 b(Deco)s(ding)31 b(is)e(left)h(to)h(righ)m(t,)f(one)h -(pass.)266 2092 y(18.)46 b(See)31 b(also)f(sla)p Ft(_)p -FD(FLOTIN)f(and)h(sla)p Ft(_)p FD(INTIN.)p 0 2196 3780 -8 v 0 2309 a Fx(SLA)p Fn(_)p Fx(DH2E)885 b Fm(Az,El)38 -b(to)g Fg(h;)20 b(\016)890 b Fx(SLA)p Fn(_)p Fx(DH2E)0 -2659 y FB(A)m(CTION)44 b FD(:)c(Horizon)31 b(to)g(equatorial)f(co)s -(ordinates)g(\(double)f(precision\).)0 2847 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DH2E)g(\(AZ,)h(EL,)f(PHI,)h(HA,)g(DEC\))0 -3170 y FB(GIVEN)e FD(:)277 3316 y Fq(AZ)612 b FB(D)565 -b FD(azim)m(uth)30 b(\(radians\))277 3429 y Fq(EL)617 -b FB(D)565 b FD(elev)-5 b(ation)30 b(\(radians\))277 -3542 y Fq(PHI)571 b FB(D)565 b FD(latitude)30 b(\(radians\))0 -3849 y FB(RETURNED)46 b FD(:)277 3995 y Fq(HA)600 b FB(D)565 -b FD(hour)30 b(angle)g(\(radians\))277 4108 y Fq(DEC)540 -b FB(D)565 b FD(declination)29 b(\(radians\))0 4416 y -FB(NOTES)44 b FD(:)311 4597 y(1.)i(The)30 b(sign)g(con)m(v)m(en)m(tion) -h(for)f(azim)m(uth)g(is)g(north)f(zero,)j(east)f(+)p -Fl(\031)s(=)p FD(2.)311 4736 y(2.)46 b(HA)31 b(is)e(returned)h(in)f -(the)h(range)h Fo(\006)p Fl(\031)s FD(.)40 b(Declination)30 -b(is)f(returned)h(in)f(the)h(range)h Fo(\006)p Fl(\031)s(=)p -FD(2.)311 4876 y(3.)46 b(The)33 b(latitude)g(is)f(\(in)h(principle\))d -(geo)s(detic.)51 b(In)33 b(critical)f(applications,)h(corrections)g -(for)h(p)s(olar)427 4989 y(motion)c(should)f(b)s(e)g(applied)g(\(see)i -(sla)p Ft(_)p FD(POLMO\).)311 5128 y(4.)46 b(In)34 b(some)g -(applications)e(it)i(will)d(b)s(e)j(imp)s(ortan)m(t)f(to)i(sp)s(ecify)e -(the)h(correct)h(t)m(yp)s(e)f(of)h(elev)-5 b(ation)34 -b(in)427 5241 y(order)42 b(to)h(pro)s(duce)f(the)g(required)f(t)m(yp)s -(e)h(of)h([)15 b Fl(h;)g(\016)20 b FD(].)77 b(In)42 b(particular,)i(it) -e(ma)m(y)h(b)s(e)e(imp)s(ortan)m(t)427 5354 y(to)f(distinguish)35 -b(b)s(et)m(w)m(een)k(the)g(elev)-5 b(ation)39 b(as)g(a\013ected)h(b)m -(y)f(refraction,)i(whic)m(h)c(will)f(yield)h(the)427 -5467 y Fq(observe)-5 b(d)32 b FD([)15 b Fl(h;)g(\016)20 -b FD(],)31 b(and)e(the)i(elev)-5 b(ation)30 b Fq(in)j(vacuo)p -FD(,)e(whic)m(h)e(will)f(yield)g(the)j Fq(top)-5 b(o)g(c)g(entric)33 -b FD([)15 b Fl(h;)g(\016)20 b FD(].)41 b(If)427 5580 -y(the)28 b(e\013ects)h(of)f(diurnal)d(ab)s(erration)i(can)h(b)s(e)f -(neglected,)i(the)f(top)s(o)s(cen)m(tric)g([)15 b Fl(h;)g(\016)20 -b FD(])28 b(ma)m(y)g(b)s(e)f(used)427 5693 y(as)k(an)f(appro)m -(ximation)f(to)j(the)e Fq(app)-5 b(ar)g(ent)33 b FD([)15 -b Fl(h;)g(\016)21 b FD(].)p eop -%%Page: 42 44 -42 43 bop 0 52 a FD(42)311 351 y(5.)46 b(No)31 b(range)g(c)m(hec)m -(king)g(of)g(argumen)m(ts)f(is)g(carried)f(out.)311 490 -y(6.)46 b(In)28 b(applications)e(whic)m(h)i(in)m(v)m(olv)m(e)g(man)m(y) -h(suc)m(h)f(calculations,)g(rather)g(than)g(calling)f(the)h(presen)m(t) -427 603 y(routine)i(it)g(will)e(b)s(e)i(more)g(e\016cien)m(t)h(to)h -(use)e(inline)d(co)s(de,)k(ha)m(ving)g(previously)d(computed)i(\014xed) -427 716 y(terms)h(suc)m(h)f(as)g(sine)g(and)f(cosine)h(of)h(latitude.)p -0 809 3780 8 v 0 922 a Fx(SLA)p Fn(_)p Fx(DIMXV)375 b -Fm(Apply)38 b(3D)h(Rev)m(erse)f(Rotation)375 b Fx(SLA)p -Fn(_)p Fx(DIMXV)0 1273 y FB(A)m(CTION)44 b FD(:)c(Multiply)28 -b(a)j(3-v)m(ector)i(b)m(y)d(the)h(in)m(v)m(erse)f(of)g(a)h(rotation)g -(matrix)f(\(double)f(precision\).)0 1460 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DIMXV)g(\(DM,)g(VA,)h(VB\))0 -1781 y FB(GIVEN)e FD(:)277 1927 y Fq(DM)585 b FB(D\(3,3\))350 -b FD(rotation)31 b(matrix)277 2040 y Fq(V)-9 b(A)609 -b FB(D\(3\))431 b FD(v)m(ector)32 b(to)f(b)s(e)f(rotated)0 -2343 y FB(RETURNED)46 b FD(:)277 2515 y Fq(VB)604 b FB(D\(3\))431 -b FD(result)29 b(v)m(ector)0 2826 y FB(NOTES)44 b FD(:)311 -3006 y(1.)i(This)29 b(routine)g(p)s(erforms)g(the)i(op)s(eration:)597 -3145 y FB(b)g FD(=)f FB(M)886 3112 y Ff(T)941 3145 y -Fo(\001)p FB(a)427 3284 y FD(where)g FB(a)f FD(and)g -FB(b)h FD(are)g(the)g(3-v)m(ectors)i(V)-10 b(A)30 b(and)f(VB)i(resp)s -(ectiv)m(ely)-8 b(,)30 b(and)f FB(M)h FD(is)f(the)h(3)19 -b Fo(\002)g FD(3)30 b(matrix)427 3397 y(DM.)311 3536 -y(2.)46 b(The)34 b(main)g(function)f(of)i(this)e(routine)h(is)f(apply)g -(an)i(in)m(v)m(erse)f(rotation;)j(under)c(these)i(circum-)427 -3649 y(stances,)d FB(M)e FD(is)g Fq(ortho)-5 b(gonal)p -FD(,)34 b(with)29 b(its)g(in)m(v)m(erse)i(the)f(same)h(as)g(its)e -(transp)s(ose.)311 3788 y(3.)46 b(T)-8 b(o)25 b(comply)f(with)g(the)h -(ANSI)f(F)-8 b(ortran)26 b(77)f(standard,)g(V)-10 b(A)25 -b(and)f(VB)i(m)m(ust)e FB(not)h FD(b)s(e)f(the)h(same)g(ar-)427 -3901 y(ra)m(y)-8 b(.)40 b(The)25 b(routine)f(is,)i(in)e(fact,)k(co)s -(ded)d(so)g(as)h(to)g(w)m(ork)f(prop)s(erly)f(on)h(the)g(V)-10 -b(AX)26 b(and)f(man)m(y)g(other)427 4014 y(systems)31 -b(ev)m(en)g(if)e(this)g(rule)g(is)h(violated,)g(something)g(that)h(is)e -FB(not)p FD(,)i(ho)m(w)m(ev)m(er,)h(recommended.)p 0 -4125 V 0 4238 a Fx(SLA)p Fn(_)p Fx(DJCAL)347 b Fm(MJD)40 -b(to)e(Gregorian)e(for)i(Output)347 b Fx(SLA)p Fn(_)p -Fx(DJCAL)0 4588 y FB(A)m(CTION)44 b FD(:)39 b(Mo)s(di\014ed)27 -b(Julian)f(Date)j(to)g(Gregorian)f(Calendar)f(Date,)k(expressed)c(in)g -(a)i(form)e(con)m(v)m(enien)m(t)227 4701 y(for)22 b(formatting)g -(messages)i(\(namely)e(rounded)e(to)j(a)g(sp)s(eci\014ed)d(precision,)j -(and)e(with)g(the)i(\014elds)d(stored)227 4814 y(in)29 -b(a)i(single)e(arra)m(y\).)0 5001 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_DJCAL)g(\(NDP,)g(DJM,)h(IYMDF,)f(J\))0 -5322 y FB(GIVEN)f FD(:)277 5468 y Fq(NDP)537 b FB(I)605 -b FD(n)m(um)m(b)s(er)29 b(of)i(decimal)e(places)h(of)h(da)m(ys)f(in)f -(fraction)277 5581 y Fq(DJM)537 b FB(D)565 b FD(mo)s(di\014ed)28 -b(Julian)g(Date)k(\(JD)p Fo(\000)p FD(2400000.5\))p eop -%%Page: 43 45 -43 44 bop 0 52 a Fw(SUN/67.70)3252 b FD(43)0 351 y FB(RETURNED)46 -b FD(:)277 497 y Fq(IYMDF)423 b FB(I\(4\))471 b FD(y)m(ear,)32 -b(mon)m(th,)e(da)m(y)-8 b(,)32 b(fraction)e(in)f(Gregorian)h(calendar) -277 610 y Fq(J)688 b FB(I)605 b FD(status:)41 b(nonzero)31 -b(=)f(out)g(of)h(range)0 977 y FB(NOTES)44 b FD(:)311 -1169 y(1.)i(An)m(y)31 b(date)g(after)g(4701BC)h(Marc)m(h)f(1)g(is)e -(accepted.)311 1318 y(2.)46 b(Large)31 b(NDP)g(v)-5 b(alues)30 -b(risk)f(in)m(ternal)g(o)m(v)m(er\015o)m(ws.)42 b(It)30 -b(is)g(t)m(ypically)f(safe)i(to)g(use)f(up)f(to)i(NDP=4.)0 -1693 y FB(REFERENCE)44 b FD(:)c(The)28 b(algorithm)f(is)h(adapted)g -(from)h(Hatc)m(her,)h Fq(Q.)15 b(Jl.)g(R.)h(astr.)h(So)-5 -b(c.)29 b FD(\(1984\))i FB(25)p FD(,)e(53-55.)p 0 1836 -3780 8 v 0 1949 a Fx(SLA)p Fn(_)p Fx(DJCL)456 b Fm(MJD)40 -b(to)e(Y)-10 b(ear,Mon)m(th,Da)m(y)g(,F)g(rac)452 b Fx(SLA)p -Fn(_)p Fx(DJCL)0 2299 y FB(A)m(CTION)44 b FD(:)c(Mo)s(di\014ed)29 -b(Julian)f(Date)k(to)f(Gregorian)g(y)m(ear,)g(mon)m(th,)g(da)m(y)-8 -b(,)31 b(and)f(fraction)g(of)h(a)f(da)m(y)-8 b(.)0 2487 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DJCL)g(\(DJM,)g(IY,)h(IM,)g -(ID,)g(FD,)g(J\))0 2844 y FB(GIVEN)e FD(:)277 3016 y -Fq(DJM)537 b FB(D)565 b FD(mo)s(di\014ed)28 b(Julian)g(Date)k(\(JD)p -Fo(\000)p FD(2400000.5\))0 3390 y FB(RETURNED)46 b FD(:)277 -3536 y Fq(IY)633 b FB(I)605 b FD(y)m(ear)277 3649 y Fq(IM)619 -b FB(I)605 b FD(mon)m(th)277 3762 y Fq(ID)632 b FB(I)605 -b FD(da)m(y)277 3875 y Fq(FD)j FB(D)565 b FD(fraction)30 -b(of)h(da)m(y)277 3988 y Fq(J)688 b FB(I)605 b FD(status:)1795 -4101 y(0)30 b(=)g(OK)1722 4214 y Fo(\000)p FD(1)g(=)g(unacceptable)h -(date)2085 4327 y(\(b)s(efore)g(4701)17 b(BC)30 b(Marc)m(h)h(1\))0 -4699 y FB(REFERENCE)44 b FD(:)c(The)28 b(algorithm)f(is)h(adapted)g -(from)h(Hatc)m(her,)h Fq(Q.)15 b(Jl.)g(R.)h(astr.)h(So)-5 -b(c.)29 b FD(\(1984\))i FB(25)p FD(,)e(53-55.)p 0 4842 -V 0 4955 a Fx(SLA)p Fn(_)p Fx(DM2A)-15 b(V)250 b Fm(Rotation)36 -b(Matrix)h(to)h(Axial)f(V)-10 b(ector)251 b Fx(SLA)p -Fn(_)p Fx(DM2A)-15 b(V)0 5305 y FB(A)m(CTION)44 b FD(:)49 -b(F)-8 b(rom)35 b(a)g(rotation)g(matrix,)g(determine)e(the)i(corresp)s -(onding)e(axial)g(v)m(ector)k(\(double)c(preci-)227 5418 -y(sion\).)0 5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_DM2AV)g(\(RMAT,)g(AXVEC\))p eop -%%Page: 44 46 -44 45 bop 0 52 a FD(44)0 351 y FB(GIVEN)45 b FD(:)277 -523 y Fq(RMA)-7 b(T)462 b FB(D\(3,3\))350 b FD(rotation)31 -b(matrix)0 997 y FB(RETURNED)46 b FD(:)277 1169 y Fq(AXVEC)405 -b FB(D\(3\))431 b FD(axial)30 b(v)m(ector)i(\(radians\))0 -1643 y FB(NOTES)44 b FD(:)311 1876 y(1.)i(A)38 b(rotation)f(matrix)g -(describ)s(es)e(a)j(rotation)g(ab)s(out)f(some)g(arbitrary)f(axis,)j -(called)d(the)i(Euler)427 1989 y(axis.)53 b(The)34 b -Fq(axial)k(ve)-5 b(ctor)35 b FD(returned)e(b)m(y)i(this)e(routine)h -(has)g(the)h(same)g(direction)e(as)i(the)g(Euler)427 -2102 y(axis,)30 b(and)g(its)g(magnitude)f(is)h(the)g(amoun)m(t)h(of)g -(rotation)f(in)g(radians.)311 2270 y(2.)46 b(The)35 b(magnitude)g(and)g -(direction)f(of)i(the)g(axial)f(v)m(ector)i(can)f(b)s(e)f(separated)h -(b)m(y)f(means)h(of)f(the)427 2383 y(routine)30 b(sla)p -Ft(_)p FD(D)m(VN.)311 2552 y(3.)46 b(The)28 b(reference)g(frame)g -(rotates)h(clo)s(c)m(kwise)e(as)i(seen)f(lo)s(oking)e(along)i(the)g -(axial)f(v)m(ector)j(from)d(the)427 2665 y(origin.)311 -2833 y(4.)46 b(If)30 b(RMA)-8 b(T)31 b(is)e(n)m(ull,)g(so)i(is)e(the)i -(result.)p 0 3011 3780 8 v 0 3124 a Fx(SLA)p Fn(_)p Fx(DMA)-11 -b(T)385 b Fm(Solv)m(e)38 b(Sim)m(ultaneous)d(Equations)385 -b Fx(SLA)p Fn(_)p Fx(DMA)-11 b(T)0 3474 y FB(A)m(CTION)44 -b FD(:)c(Matrix)31 b(in)m(v)m(ersion)e(and)h(solution)f(of)h(sim)m -(ultaneous)f(equations)h(\(double)f(precision\).)0 3662 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DMAT)g(\(N,)h(A,)g(Y,)g(D,)g -(JF,)g(IW\))0 4079 y FB(GIVEN)e FD(:)277 4225 y Fq(N)668 -b FB(I)605 b FD(n)m(um)m(b)s(er)29 b(of)i(unkno)m(wns)277 -4338 y Fq(A)668 b FB(D\(N,N\))290 b FD(matrix)277 4451 -y Fq(Y)668 b FB(D\(N\))401 b FD(v)m(ector)0 4917 y FB(RETURNED)46 -b FD(:)277 5063 y Fq(A)668 b FB(D\(N,N\))290 b FD(matrix)30 -b(in)m(v)m(erse)277 5176 y Fq(Y)668 b FB(D\(N\))401 b -FD(solution)277 5289 y Fq(D)667 b FB(D)565 b FD(determinan)m(t)277 -5402 y Fq(JF)629 b FB(I)605 b FD(singularit)m(y)28 b(\015ag:)41 -b(0=OK)277 5515 y Fq(IW)610 b FB(I\(N\))441 b FD(w)m(orkspace)p -eop -%%Page: 45 47 -45 46 bop 0 52 a Fw(SUN/67.70)3252 b FD(45)0 351 y FB(NOTES)44 -b FD(:)311 579 y(1.)i(F)-8 b(or)31 b(the)g(set)g(of)f -Fl(n)g FD(sim)m(ultaneous)f(linear)g(equations)h(in)f -Fl(n)h FD(unkno)m(wns:)597 746 y FB(A)p Fo(\001)p FB(y)h -FD(=)f FB(x)427 912 y FD(where:)506 1078 y Fo(\017)46 -b FB(A)31 b FD(is)e(a)i(non-singular)d Fl(n)20 b Fo(\002)f -Fl(n)30 b FD(matrix,)506 1218 y Fo(\017)46 b FB(y)31 -b FD(is)e(the)i(v)m(ector)h(of)e Fl(n)g FD(unkno)m(wns,)f(and)506 -1358 y Fo(\017)46 b FB(x)31 b FD(is)e(the)i(kno)m(wn)f(v)m(ector,)427 -1524 y(sla)p Ft(_)p FD(DMA)-8 b(T)31 b(computes:)506 -1690 y Fo(\017)46 b FD(the)31 b(in)m(v)m(erse)f(of)h(matrix)e -FB(A)p FD(,)506 1830 y Fo(\017)46 b FD(the)31 b(determinan)m(t)f(of)g -(matrix)g FB(A)p FD(,)h(and)506 1969 y Fo(\017)46 b FD(the)31 -b(v)m(ector)h(of)e Fl(n)g FD(unkno)m(wns)f FB(y)p FD(.)427 -2136 y(Argumen)m(t)h(N)f(is)g(the)h(order)f Fl(n)p FD(,)g(A)h(\(giv)m -(en\))g(is)e(the)i(matrix)f FB(A)p FD(,)g(Y)h(\(giv)m(en\))g(is)f(the)g -(v)m(ector)i FB(x)f FD(and)427 2249 y(Y)g(\(returned\))g(is)f(the)i(v)m -(ector)g FB(y)p FD(.)41 b(The)30 b(argumen)m(t)g(A)g(\(returned\))g(is) -f(the)h(in)m(v)m(erse)g(matrix)g FB(A)3660 2216 y Fp(\000)p -Fu(1)3754 2249 y FD(,)427 2362 y(and)g(D)h(is)e Fq(det)9 -b FD(\()p FB(A)p FD(\).)311 2528 y(2.)46 b(JF)40 b(is)e(the)i -(singularit)m(y)d(\015ag.)68 b(If)39 b(the)g(matrix)g(is)f -(non-singular,)i(JF=0)f(is)g(returned.)66 b(If)39 b(the)427 -2641 y(matrix)29 b(is)f(singular,)g(JF=)p Fo(\000)p FD(1)h(and)g(D=0D0) -i(are)e(returned.)40 b(In)28 b(the)i(latter)f(case,)i(the)f(con)m(ten)m -(ts)427 2754 y(of)h(arra)m(y)g(A)f(on)g(return)g(are)g(unde\014ned.)311 -2920 y(3.)46 b(The)38 b(algorithm)g(is)f(Gaussian)h(elimination)e(with) -h(partial)h(piv)m(oting.)64 b(This)37 b(metho)s(d)h(is)f(v)m(ery)427 -3033 y(fast;)49 b(some)43 b(m)m(uc)m(h)f(slo)m(w)m(er)h(algorithms)e -(can)i(giv)m(e)f(b)s(etter)h(accuracy)-8 b(,)47 b(but)42 -b(only)f(b)m(y)h(a)h(small)427 3146 y(factor.)311 3312 -y(4.)j(This)29 b(routine)g(replaces)h(the)h(obsolete)g(sla)p -Ft(_)p FD(DMA)-8 b(TRX.)p 0 3485 3780 8 v 0 3598 a Fx(SLA)p -Fn(_)p Fx(DMOON)455 b Fm(Appro)m(x)38 b(Mo)s(on)g(P)m(os/V)-10 -b(el)455 b Fx(SLA)p Fn(_)p Fx(DMOON)0 3949 y FB(A)m(CTION)44 -b FD(:)c(Appro)m(ximate)31 b(geo)s(cen)m(tric)g(p)s(osition)e(and)g(v)m -(elo)s(cit)m(y)i(of)g(the)f(Mo)s(on)h(\(double)e(precision\).)0 -4136 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DMOON)g(\(DATE,)g(PV\))0 -4547 y FB(GIVEN)f FD(:)277 4693 y Fq(D)n(A)-7 b(TE)481 -b FB(D)565 b FD(TDB)61 b(\(lo)s(osely)f(ET\))h(as)g(a)g(Mo)s(di\014ed)e -(Julian)g(Date)1658 4805 y(\(JD)p Fo(\000)p FD(2400000.5\))0 -5260 y FB(RETURNED)46 b FD(:)277 5406 y Fq(PV)606 b FB(D\(6\))431 -b FD(Mo)s(on)41 b([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 b FD(_)-43 -b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 -b FD(],)44 b(mean)d(equator)h(and)f(equino)m(x)1658 5519 -y(of)31 b(date)g(\(A)m(U,)g(A)m(U)h(s)2389 5486 y Fp(\000)p -Fu(1)2483 5519 y FD(\))p eop -%%Page: 46 48 -46 47 bop 0 52 a FD(46)0 351 y FB(NOTES)44 b FD(:)311 -531 y(1.)i(This)27 b(routine)g(is)g(a)i(full)d(implemen)m(tation)h(of)h -(the)h(algorithm)e(published)d(b)m(y)29 b(Meeus)f(\(see)h(refer-)427 -644 y(ence\).)311 781 y(2.)46 b(Meeus)e(quotes)g(accuracies)g(of)f(10) -1664 745 y Fk(0)m(0)1748 781 y FD(in)f(longitude,)j(3)2347 -745 y Fk(0)m(0)2431 781 y FD(in)d(latitude)g(and)h(0)3131 -745 y Fk(0)l(0)3135 781 y Fl(:)p FD(2)h(arcsec)h(in)c(HP)427 -894 y(\(equiv)-5 b(alen)m(t)43 b(to)h(ab)s(out)f(20)h(km)f(in)f -(distance\).)80 b(Comparison)41 b(with)h(JPL)h(DE200)i(o)m(v)m(er)f -(the)427 1007 y(in)m(terv)-5 b(al)31 b(1960-2025)k(giv)m(es)c(RMS)g -(errors)g(of)g(3)2041 970 y Fk(0)m(0)2045 1007 y Fl(:)p -FD(7)i(and)d(83)i(mas/hour)f(in)f(longitude,)g(2)3435 -970 y Fk(0)l(0)3439 1007 y Fl(:)p FD(3)i(arcsec)427 1120 -y(and)e(48)h(mas/hour)f(in)f(latitude,)g(11)i(km)f(and)g(81)h(mm/s)f -(in)f(distance.)40 b(The)30 b(maxim)m(um)f(errors)427 -1233 y(o)m(v)m(er)46 b(the)e(same)h(in)m(terv)-5 b(al)43 -b(are)i(18)1641 1196 y Fk(0)m(0)1726 1233 y FD(and)f(0)1957 -1196 y Fk(0)l(0)1961 1233 y Fl(:)p FD(50/hour)h(in)e(longitude,)k(11) -2996 1196 y Fk(0)l(0)3081 1233 y FD(and)d(0)3312 1196 -y Fk(0)l(0)3316 1233 y Fl(:)p FD(24/hour)h(in)427 1346 -y(latitude,)30 b(40)h(km)f(and)g(0.29)i(m/s)e(in)f(distance.)311 -1484 y(3.)46 b(The)40 b(original)e(algorithm)h(is)g(expressed)g(in)f -(terms)i(of)g(the)g(obsolete)h(time)e(scale)i Fq(Ephemeris)427 -1597 y(Time)p FD(.)71 b(Either)39 b(TDB)h(or)g(TT)g(can)g(b)s(e)g -(used,)i(but)e(not)g(UT)g(without)f(incurring)f(signi\014can)m(t)427 -1710 y(errors)30 b(\(30)806 1673 y Fk(0)m(0)878 1710 -y FD(at)h(the)g(presen)m(t)f(time\))g(due)g(to)h(the)g(Mo)s(on's)g(0) -2503 1673 y Fk(0)l(0)2507 1710 y Fl(:)p FD(5/s)g(mo)m(v)m(emen)m(t.)311 -1847 y(4.)46 b(The)38 b(algorithm)f(is)g(based)g(on)h(pre)g(IA)m(U)g -(1976)i(standards.)62 b(Ho)m(w)m(ev)m(er,)42 b(the)d(result)d(has)i(b)s -(een)427 1960 y(mo)m(v)m(ed)27 b(on)m(to)f(the)g(new)f(\(FK5\))i -(equino)m(x,)f(an)f(adjustmen)m(t)g(whic)m(h)g(is)f(in)g(an)m(y)i(case) -g(m)m(uc)m(h)g(smaller)427 2073 y(than)k(the)h(in)m(trinsic)d(accuracy) -j(of)g(the)f(pro)s(cedure.)311 2211 y(5.)46 b(V)-8 b(elo)s(cit)m(y)31 -b(is)f(obtained)f(b)m(y)i(a)f(complete)h(analytical)f(di\013eren)m -(tiation)f(of)i(the)f(Meeus)h(mo)s(del.)0 2515 y FB(REFERENCE)44 -b FD(:)d(Meeus,)31 b Fq(l'Astr)-5 b(onomie)p FD(,)32 -b(June)e(1984,)i(p348.)p 0 2623 3780 8 v 0 2736 a Fx(SLA)p -Fn(_)p Fx(DMXM)497 b Fm(Multiply)37 b(3)27 b Fh(\002)f -Fm(3)39 b(Matrices)498 b Fx(SLA)p Fn(_)p Fx(DMXM)0 3086 -y FB(A)m(CTION)44 b FD(:)c(Pro)s(duct)30 b(of)h(t)m(w)m(o)g(3)21 -b Fo(\002)f FD(3)31 b(matrices)f(\(double)f(precision\).)0 -3274 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DMXM)g(\(A,)h(B,)g(C\))0 -3591 y FB(GIVEN)e FD(:)277 3737 y Fq(A)668 b FB(D\(3,3\))350 -b FD(matrix)30 b FB(A)277 3850 y Fq(B)672 b FB(D\(3,3\))350 -b FD(matrix)30 b FB(B)0 4145 y(RETURNED)46 b FD(:)277 -4317 y Fq(C)671 b FB(D\(3,3\))350 b FD(matrix)30 b(result:)40 -b FB(A)p Fo(\002)p FB(B)0 4621 y(NOTE)k FD(:)c(T)-8 b(o)30 -b(comply)e(with)g(the)h(ANSI)g(F)-8 b(ortran)29 b(77)h(standard,)f(A,)h -(B)f(and)f(C)h(m)m(ust)g(b)s(e)f(di\013eren)m(t)h(arra)m(ys.)227 -4734 y(Ho)m(w)m(ev)m(er,)34 b(the)e(routine)e(is)h(co)s(ded)g(so)h(as)g -(to)g(w)m(ork)f(prop)s(erly)f(on)h(man)m(y)g(platforms)g(ev)m(en)h(if)e -(this)h(rule)227 4847 y(is)f(violated,)g(something)g(that)h(is)e -FB(not)p FD(,)i(ho)m(w)m(ev)m(er,)h(recommended.)p 0 -4955 V 0 5068 a Fx(SLA)p Fn(_)p Fx(DMXV)641 b Fm(Apply)38 -b(3D)h(Rotation)640 b Fx(SLA)p Fn(_)p Fx(DMXV)0 5418 -y FB(A)m(CTION)44 b FD(:)c(Multiply)28 b(a)j(3-v)m(ector)i(b)m(y)d(a)h -(rotation)f(matrix)g(\(double)f(precision\).)0 5606 y -FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DMXV)g(\(DM,)h(VA,)f(VB\))p -eop -%%Page: 47 49 -47 48 bop 0 52 a Fw(SUN/67.70)3252 b FD(47)0 351 y FB(GIVEN)45 -b FD(:)277 497 y Fq(DM)585 b FB(D\(3,3\))350 b FD(rotation)31 -b(matrix)277 610 y Fq(V)-9 b(A)609 b FB(D\(3\))431 b -FD(v)m(ector)32 b(to)f(b)s(e)f(rotated)0 967 y FB(RETURNED)46 -b FD(:)277 1138 y Fq(VB)604 b FB(D\(3\))431 b FD(result)29 -b(v)m(ector)0 1503 y FB(NOTES)44 b FD(:)311 1692 y(1.)i(This)29 -b(routine)g(p)s(erforms)g(the)i(op)s(eration:)597 1839 -y FB(b)g FD(=)f FB(M)p Fo(\001)p FB(a)427 1985 y FD(where)g -FB(a)f FD(and)g FB(b)h FD(are)g(the)g(3-v)m(ectors)i(V)-10 -b(A)30 b(and)f(VB)i(resp)s(ectiv)m(ely)-8 b(,)30 b(and)f -FB(M)h FD(is)f(the)h(3)19 b Fo(\002)g FD(3)30 b(matrix)427 -2098 y(DM.)311 2245 y(2.)46 b(The)30 b(main)f(function)g(of)i(this)e -(routine)g(is)h(apply)f(a)h(rotation;)h(under)e(these)i(circumstances,) -f FB(M)427 2358 y FD(is)g(a)g Fq(pr)-5 b(op)g(er)36 b(r)-5 -b(e)g(al)34 b(ortho)-5 b(gonal)43 b FD(matrix.)311 2505 -y(3.)j(T)-8 b(o)35 b(comply)e(with)f(the)i(ANSI)g(F)-8 -b(ortran)34 b(77)h(standard,)f(V)-10 b(A)34 b(and)f(VB)h(m)m(ust)g -FB(not)g FD(b)s(e)f(the)h(same)427 2618 y(arra)m(y)-8 -b(.)83 b(The)43 b(routine)g(is,)k(in)42 b(fact,)49 b(co)s(ded)43 -b(so)i(as)f(to)g(w)m(ork)g(prop)s(erly)e(with)h(man)m(y)h(F)-8 -b(ortran)427 2731 y(compilers)26 b(ev)m(en)h(if)f(this)g(rule)f(is)h -(violated,)i(something)e(that)i(is)e FB(not)p FD(,)h(ho)m(w)m(ev)m(er,) -j(recommended.)p 0 2864 3780 8 v 0 2977 a Fx(SLA)p Fn(_)p -Fx(DP)-11 b(A)c(V)178 b Fm(P)m(osition-Angle)35 b(Bet)m(w)m(een)i(Tw)m -(o)h(Directions)178 b Fx(SLA)p Fn(_)p Fx(DP)-11 b(A)c(V)0 -3328 y FB(A)m(CTION)44 b FD(:)66 b(Returns)43 b(the)h(b)s(earing)e(\(p) -s(osition)f(angle\))j(of)g(one)f(celestial)g(direction)f(with)g(resp)s -(ect)i(to)227 3441 y(another)31 b(\(double)e(precision\).)0 -3628 y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_DPAV)d(\(V1,)i(V2\))0 -3980 y FB(GIVEN)e FD(:)277 4126 y Fq(V1)622 b FB(D\(3\))431 -b FD(v)m(ector)32 b(to)f(one)g(p)s(oin)m(t)277 4239 y -Fq(V2)622 b FB(D\(3\))431 b FD(v)m(ector)32 b(to)f(the)g(other)f(p)s -(oin)m(t)0 4595 y FB(RETURNED)46 b FD(:)277 4767 y Fq(sla)p -Ft(_)p Fq(DP)-7 b(A)e(V)331 b FB(D)565 b FD(p)s(osition-angle)29 -b(of)i(2nd)e(p)s(oin)m(t)h(with)f(resp)s(ect)h(to)h(1st)0 -5132 y FB(NOTES)44 b FD(:)311 5320 y(1.)i(The)30 b(co)s(ordinate)g -(frames)h(corresp)s(ond)e(to)i([)15 b Fl(\013;)g(\016)20 -b FD(],)31 b([)p Fl(\025;)15 b(\036)p FD(])31 b Fq(etc.)p -FD(.)311 5467 y(2.)46 b(The)30 b(result)e(is)h(the)h(b)s(earing)f(\(p)s -(osition)f(angle\),)j(in)d(radians,)h(of)h(p)s(oin)m(t)f(V2)h(as)g -(seen)g(from)f(p)s(oin)m(t)427 5580 y(V1.)48 b(It)33 -b(is)f(in)f(the)i(range)g Fo(\006)p Fl(\031)s FD(.)47 -b(The)33 b(sense)f(is)g(suc)m(h)g(that)h(if)f(V2)h(is)f(a)h(small)e -(distance)h(due)g(east)427 5693 y(of)f(V1)g(the)f(result)g(is)f(ab)s -(out)h(+)p Fl(\031)s(=)p FD(2.)41 b(Zero)31 b(is)e(returned)g(if)h(the) -g(t)m(w)m(o)i(p)s(oin)m(ts)d(are)i(coinciden)m(t.)p eop -%%Page: 48 50 -48 49 bop 0 52 a FD(48)311 351 y(3.)46 b(There)30 b(is)g(no)g -(requiremen)m(t)f(for)i(either)e(v)m(ector)j(to)f(b)s(e)f(of)h(unit)e -(length.)311 495 y(4.)46 b(The)31 b(routine)f(sla)p Ft(_)p -FD(DBEAR)h(p)s(erforms)f(an)h(equiv)-5 b(alen)m(t)31 -b(function)f(except)i(that)g(the)f(p)s(oin)m(ts)f(are)427 -608 y(sp)s(eci\014ed)f(in)g(the)i(form)e(of)i(spherical)e(co)s -(ordinates.)p 0 734 3780 8 v 0 847 a Fx(SLA)p Fn(_)p -Fx(DR2AF)369 b Fm(Radians)38 b(to)g(Deg,Min,Sec,F)-10 -b(rac)368 b Fx(SLA)p Fn(_)p Fx(DR2AF)0 1197 y FB(A)m(CTION)44 -b FD(:)49 b(Con)m(v)m(ert)36 b(an)e(angle)h(in)f(radians)f(to)i -(degrees,)i(arcmin)m(utes,)f(arcseconds,)g(fraction)f(\(double)227 -1310 y(precision\).)0 1498 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_DR2AF)g(\(NDP,)g(ANGLE,)g(SIGN,)g(IDMSF\))0 1839 -y FB(GIVEN)f FD(:)277 1985 y Fq(NDP)537 b FB(I)605 b -FD(n)m(um)m(b)s(er)29 b(of)i(decimal)e(places)h(of)h(arcseconds)277 -2098 y Fq(ANGLE)411 b FB(D)565 b FD(angle)31 b(in)e(radians)0 -2436 y FB(RETURNED)46 b FD(:)277 2582 y Fq(SIGN)512 b -FB(C)569 b FD(`+')31 b(or)f(`)p Fo(\000)p FD(')277 2695 -y Fq(IDMSF)440 b FB(I\(4\))471 b FD(degrees,)31 b(arcmin)m(utes,)f -(arcseconds,)h(fraction)0 3033 y FB(NOTES)44 b FD(:)311 -3219 y(1.)i(NDP)31 b(less)f(than)g(zero)h(is)e(in)m(terpreted)h(as)h -(zero.)311 3363 y(2.)46 b(The)28 b(largest)h(useful)e(v)-5 -b(alue)29 b(for)f(NDP)h(is)f(determined)f(b)m(y)i(the)g(size)f(of)h -(ANGLE,)g(the)g(format)g(of)427 3476 y(DOUBLE)d(PRECISION)d -(\015oating-p)s(oin)m(t)h(n)m(um)m(b)s(ers)g(on)h(the)g(target)i(mac)m -(hine,)f(and)e(the)i(risk)d(of)427 3589 y(o)m(v)m(er\015o)m(wing)34 -b(IDMSF\(4\).)52 b(On)32 b(some)i(arc)m(hitectures,)h(for)e(ANGLE)h(up) -f(to)h(2pi,)f(the)h(a)m(v)-5 b(ailable)427 3701 y(\015oating-p)s(oin)m -(t)21 b(precision)f(corresp)s(onds)h(roughly)f(to)j(NDP=12.)39 -b(Ho)m(w)m(ev)m(er,)25 b(the)d(practical)g(limit)427 -3814 y(is)30 b(NDP=9,)h(set)g(b)m(y)f(the)h(capacit)m(y)g(of)g(a)g(t)m -(ypical)f(32-bit)g(IDMSF\(4\).)311 3958 y(3.)46 b(The)29 -b(absolute)f(v)-5 b(alue)29 b(of)g(ANGLE)g(ma)m(y)g(exceed)h(2)p -Fl(\031)s FD(.)41 b(In)28 b(cases)i(where)e(it)g(do)s(es)h(not,)h(it)e -(is)g(up)g(to)427 4071 y(the)f(caller)g(to)g(test)h(for)f(and)f(handle) -f(the)j(case)g(where)e(ANGLE)h(is)f(v)m(ery)h(nearly)f(2)p -Fl(\031)31 b FD(and)26 b(rounds)427 4184 y(up)k(to)h(360)805 -4151 y Fp(\016)845 4184 y FD(,)g(b)m(y)f(testing)h(for)f -(IDMSF\(1\)=360)j(and)d(setting)g(IDMSF\(1-4\))j(to)e(zero.)p -0 4315 V 0 4428 a Fx(SLA)p Fn(_)p Fx(DR2TF)348 b Fm(Radians)38 -b(to)g(Hour,Min,Sec,F)-10 b(rac)347 b Fx(SLA)p Fn(_)p -Fx(DR2TF)0 4779 y FB(A)m(CTION)44 b FD(:)37 b(Con)m(v)m(ert)25 -b(an)f(angle)g(in)e(radians)h(to)h(hours,)g(min)m(utes,)h(seconds,)g -(fraction)f(\(double)f(precision\).)0 4966 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DR2TF)g(\(NDP,)g(ANGLE,)g(SIGN,)g(IHMSF\)) -0 5307 y FB(GIVEN)f FD(:)277 5453 y Fq(NDP)537 b FB(I)605 -b FD(n)m(um)m(b)s(er)29 b(of)i(decimal)e(places)h(of)h(seconds)277 -5566 y Fq(ANGLE)411 b FB(D)565 b FD(angle)31 b(in)e(radians)p -eop -%%Page: 49 51 -49 50 bop 0 52 a Fw(SUN/67.70)3252 b FD(49)0 351 y FB(RETURNED)46 -b FD(:)277 497 y Fq(SIGN)512 b FB(C)569 b FD(`+')31 b(or)f(`)p -Fo(\000)p FD(')277 610 y Fq(IHMSF)441 b FB(I\(4\))471 -b FD(hours,)30 b(min)m(utes,)f(seconds,)i(fraction)0 -1018 y FB(NOTES)44 b FD(:)311 1227 y(1.)i(NDP)31 b(less)f(than)g(zero)h -(is)e(in)m(terpreted)h(as)h(zero.)311 1384 y(2.)46 b(The)28 -b(largest)h(useful)e(v)-5 b(alue)29 b(for)f(NDP)h(is)f(determined)f(b)m -(y)i(the)g(size)f(of)h(ANGLE,)g(the)g(format)g(of)427 -1497 y(DOUBLE)d(PRECISION)d(\015oating-p)s(oin)m(t)h(n)m(um)m(b)s(ers)g -(on)h(the)g(target)i(mac)m(hine,)f(and)e(the)i(risk)d(of)427 -1610 y(o)m(v)m(er\015o)m(wing)34 b(IHMSF\(4\).)52 b(On)33 -b(some)h(arc)m(hitectures,)h(for)e(ANGLE)h(up)e(to)j(2pi,)e(the)h(a)m -(v)-5 b(ailable)427 1723 y(\015oating-p)s(oin)m(t)21 -b(precision)f(corresp)s(onds)h(roughly)f(to)j(NDP=12.)39 -b(Ho)m(w)m(ev)m(er,)25 b(the)d(practical)g(limit)427 -1836 y(is)30 b(NDP=9,)h(set)g(b)m(y)f(the)h(capacit)m(y)g(of)g(a)g(t)m -(ypical)f(32-bit)g(IHMSF\(4\).)311 1993 y(3.)46 b(The)29 -b(absolute)f(v)-5 b(alue)29 b(of)g(ANGLE)g(ma)m(y)g(exceed)h(2)p -Fl(\031)s FD(.)41 b(In)28 b(cases)i(where)e(it)g(do)s(es)h(not,)h(it)e -(is)g(up)g(to)427 2106 y(the)f(caller)g(to)g(test)h(for)f(and)f(handle) -f(the)j(case)g(where)e(ANGLE)h(is)f(v)m(ery)h(nearly)f(2)p -Fl(\031)31 b FD(and)26 b(rounds)427 2219 y(up)k(to)h(24)g(hours,)e(b)m -(y)i(testing)f(for)g(IHMSF\(1\)=24)j(and)c(setting)i(IHMSF\(1-4\))h(to) -f(zero.)p 0 2378 3780 8 v 0 2491 a Fx(SLA)p Fn(_)p Fx(DRANGE)304 -b Fm(Put)38 b(Angle)g(in)m(to)f(Range)h Fh(\006)p Fg(\031)310 -b Fx(SLA)p Fn(_)p Fx(DRANGE)0 2841 y FB(A)m(CTION)44 -b FD(:)c(Normalize)31 b(an)f(angle)g(in)m(to)h(the)f(range)h -Fo(\006)p Fl(\031)i FD(\(double)c(precision\).)0 3029 -y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_DRANGE)d(\(ANGLE\))0 -3407 y FB(GIVEN)g FD(:)277 3579 y Fq(ANGLE)411 b FB(D)565 -b FD(angle)31 b(in)e(radians)0 3995 y FB(RETURNED)46 -b FD(:)277 4167 y Fq(sla)p Ft(_)p Fq(DRANGE)179 b FB(D)565 -b FD(ANGLE)31 b(expressed)f(in)f(the)h(range)h Fo(\006)p -Fl(\031)s FD(.)p 0 4337 V 0 4450 a Fx(SLA)p Fn(_)p Fx(DRANRM)204 -b Fm(Put)39 b(Angle)e(in)m(to)h(Range)g(0)7 b Fh(\000)g -Fm(2)p Fg(\031)209 b Fx(SLA)p Fn(_)p Fx(DRANRM)0 4800 -y FB(A)m(CTION)44 b FD(:)c(Normalize)31 b(an)f(angle)g(in)m(to)h(the)f -(range)h(0)5 b Fo(\000)g FD(2)p Fl(\031)34 b FD(\(double)29 -b(precision\).)0 4988 y FB(CALL)45 b FD(:)77 b Ft(D)47 -b(=)h(sla_DRANRM)d(\(ANGLE\))0 5366 y FB(GIVEN)g FD(:)277 -5538 y Fq(ANGLE)411 b FB(D)565 b FD(angle)31 b(in)e(radians)p -eop -%%Page: 50 52 -50 51 bop 0 52 a FD(50)0 351 y FB(RETURNED)46 b FD(:)277 -523 y Fq(sla)p Ft(_)p Fq(DRANRM)163 b FB(D)565 b FD(ANGLE)31 -b(expressed)f(in)f(the)h(range)h(0)5 b Fo(\000)g FD(2)p -Fl(\031)p 0 678 3780 8 v 0 791 a Fx(SLA)p Fn(_)p Fx(DS2C6)371 -b Fm(Spherical)37 b(P)m(os/V)-10 b(el)37 b(to)h(Cartesian)369 -b Fx(SLA)p Fn(_)p Fx(DS2C6)0 1141 y FB(A)m(CTION)44 b -FD(:)38 b(Con)m(v)m(ersion)25 b(of)g(p)s(osition)f(&)h(v)m(elo)s(cit)m -(y)g(in)f(spherical)g(co)s(ordinates)h(to)h(Cartesian)f(co)s(ordinates) -227 1254 y(\(double)30 b(precision\).)0 1441 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DS2C6)g(\(A,)h(B,)g(R,)g(AD,)g(BD,)g(RD,)g -(V\))0 1800 y FB(GIVEN)e FD(:)277 1946 y Fq(A)668 b FB(D)565 -b FD(longitude)29 b(\(radians\))h({)h(for)f(example)g -Fl(\013)277 2059 y Fq(B)672 b FB(D)565 b FD(latitude)30 -b(\(radians\))f({)i(for)f(example)g Fl(\016)277 2172 -y Fq(R)670 b FB(D)565 b FD(radial)29 b(co)s(ordinate)277 -2285 y Fq(AD)599 b FB(D)565 b FD(longitude)29 b(deriv)-5 -b(ativ)m(e)30 b(\(radians)f(p)s(er)h(unit)f(time\))277 -2398 y Fq(BD)603 b FB(D)565 b FD(latitude)30 b(deriv)-5 -b(ativ)m(e)29 b(\(radians)h(p)s(er)f(unit)g(time\))277 -2511 y Fq(RD)601 b FB(D)565 b FD(radial)29 b(deriv)-5 -b(ativ)m(e)0 2879 y FB(RETURNED)46 b FD(:)277 3051 y -Fq(V)668 b FB(D\(6\))431 b FD([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 -b FD(_)-43 b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 -b Fl(z)20 b FD(])p 0 3206 V 0 3319 a Fx(SLA)p Fn(_)p -Fx(DS2TP)442 b Fm(Spherical)37 b(to)h(T)-10 b(angen)m(t)38 -b(Plane)442 b Fx(SLA)p Fn(_)p Fx(DS2TP)0 3669 y FB(A)m(CTION)44 -b FD(:)c(Pro)5 b(jection)31 b(of)f(spherical)f(co)s(ordinates)h(on)m -(to)i(the)e(tangen)m(t)i(plane)d(\(double)h(precision\).)0 -3857 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DS2TP)g(\(RA,)g(DEC,)h -(RAZ,)g(DECZ,)f(XI,)h(ETA,)f(J\))0 4215 y FB(GIVEN)f -FD(:)277 4361 y Fq(RA,DEC)378 b FB(D)565 b FD(spherical)29 -b(co)s(ordinates)h(of)g(star)h(\(radians\))277 4474 y -Fq(RAZ,DECZ)266 b FB(D)565 b FD(spherical)29 b(co)s(ordinates)h(of)g -(tangen)m(t)i(p)s(oin)m(t)e(\(radians\))0 4843 y FB(RETURNED)46 -b FD(:)277 4989 y Fq(XI,ET)-7 b(A)417 b FB(D)565 b FD(tangen)m(t)32 -b(plane)d(co)s(ordinates)h(\(radians\))277 5102 y Fq(J)688 -b FB(I)605 b FD(status:)1825 5215 y(0)31 b(=)f(OK,)g(star)g(on)g -(tangen)m(t)i(plane)1825 5328 y(1)f(=)f(error,)g(star)g(to)s(o)h(far)g -(from)f(axis)1825 5441 y(2)h(=)f(error,)g(an)m(tistar)g(on)h(tangen)m -(t)h(plane)1825 5554 y(3)f(=)f(error,)g(an)m(tistar)g(to)s(o)i(far)e -(from)g(axis)p eop -%%Page: 51 53 -51 52 bop 0 52 a Fw(SUN/67.70)3252 b FD(51)0 351 y FB(NOTES)44 -b FD(:)311 537 y(1.)i(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i -Fq(gnomonic)31 b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s -(ordinates)f([)15 b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 -649 y(called)30 b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 762 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 906 y(2.)46 b(When)26 b(w)m(orking)g(in)e([)15 -b Fl(x;)g(y)s(;)g(z)21 b FD(])26 b(rather)g(than)g(spherical)e(co)s -(ordinates,)j(the)f(equiv)-5 b(alen)m(t)26 b(Cartesian)427 -1019 y(routine)k(sla)p Ft(_)p FD(D)m(V2TP)g(is)g(a)m(v)-5 -b(ailable.)p 0 1136 3780 8 v 0 1249 a Fx(SLA)p Fn(_)p -Fx(DSEP)329 b Fm(Angle)38 b(Bet)m(w)m(een)f(2)i(P)m(oin)m(ts)e(on)h -(Sphere)330 b Fx(SLA)p Fn(_)p Fx(DSEP)0 1599 y FB(A)m(CTION)44 -b FD(:)c(Angle)31 b(b)s(et)m(w)m(een)g(t)m(w)m(o)g(p)s(oin)m(ts)f(on)g -(a)h(sphere)e(\(double)g(precision\).)0 1787 y FB(CALL)45 -b FD(:)77 b Ft(D)47 b(=)h(sla_DSEP)d(\(A1,)i(B1,)g(A2,)g(B2\))0 -2127 y FB(GIVEN)e FD(:)277 2273 y Fq(A1,B1)484 b FB(D)565 -b FD(spherical)29 b(co)s(ordinates)h(of)g(one)h(p)s(oin)m(t)e -(\(radians\))277 2386 y Fq(A2,B2)484 b FB(D)565 b FD(spherical)26 -b(co)s(ordinates)i(of)h(the)f(other)g(p)s(oin)m(t)g(\(radians\))0 -2723 y FB(RETURNED)46 b FD(:)277 2895 y Fq(sla)p Ft(_)p -Fq(DSEP)338 b FB(D)565 b FD(angle)31 b(b)s(et)m(w)m(een)g([A1,B1])h -(and)e([A2,B2])i(in)d(radians)0 3240 y FB(NOTES)44 b -FD(:)311 3425 y(1.)i(The)26 b(spherical)e(co)s(ordinates)h(are)h(righ)m -(t)g(ascension)f(and)g(declination,)h(longitude)e(and)h(latitude,)427 -3538 y Fq(etc.)p FD(,)31 b(in)e(radians.)311 3682 y(2.)46 -b(The)30 b(result)f(is)h(alw)m(a)m(ys)h(p)s(ositiv)m(e.)p -0 3808 V 0 3921 a Fx(SLA)p Fn(_)p Fx(DSEPV)471 b Fm(Angle)38 -b(Bet)m(w)m(een)g(2)g(V)-10 b(ectors)472 b Fx(SLA)p Fn(_)p -Fx(DSEPV)0 4271 y FB(A)m(CTION)44 b FD(:)c(Angle)31 b(b)s(et)m(w)m(een) -g(t)m(w)m(o)g(v)m(ectors)h(\(double)d(precision\).)0 -4459 y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_DSEPV)d(\(V1,)i(V2\))0 -4799 y FB(GIVEN)e FD(:)277 4945 y Fq(V1)622 b FB(D\(3\))431 -b FD(\014rst)30 b(v)m(ector)277 5058 y Fq(V2)622 b FB(D\(3\))431 -b FD(second)31 b(v)m(ector)0 5395 y FB(RETURNED)46 b -FD(:)277 5567 y Fq(sla)p Ft(_)p Fq(DSEPV)270 b FB(D)565 -b FD(angle)31 b(b)s(et)m(w)m(een)g(V1)f(and)g(V2)h(in)e(radians)p -eop -%%Page: 52 54 -52 53 bop 0 52 a FD(52)0 351 y FB(NOTES)44 b FD(:)311 -523 y(1.)i(There)30 b(is)g(no)g(requiremen)m(t)f(for)i(either)e(v)m -(ector)j(to)f(b)s(e)f(of)h(unit)e(length.)311 654 y(2.)46 -b(If)30 b(either)g(v)m(ector)i(is)d(n)m(ull,)g(zero)i(is)f(returned.) -311 784 y(3.)46 b(The)30 b(result)f(is)h(alw)m(a)m(ys)h(p)s(ositiv)m -(e.)p 0 870 3780 8 v 0 983 a Fx(SLA)p Fn(_)p Fx(DT)661 -b Fm(Appro)m(ximate)35 b(ET)j(min)m(us)f(UT)662 b Fx(SLA)p -Fn(_)p Fx(DT)0 1334 y FB(A)m(CTION)44 b FD(:)d(Estimate)31 -b(\001T,)g(the)g(o\013set)h(b)s(et)m(w)m(een)f(dynamical)e(time)i(and)f -(Univ)m(ersal)g(Time,)g(for)g(a)h(giv)m(en)227 1447 y(historical)e(ep)s -(o)s(c)m(h.)0 1634 y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_DT)e -(\(EPOCH\))0 1918 y FB(GIVEN)f FD(:)277 2089 y Fq(EPOCH)409 -b FB(D)565 b FD(\(Julian\))29 b(ep)s(o)s(c)m(h)h(\()p -Fq(e.g.)g FD(1850D0\))0 2342 y FB(RETURNED)46 b FD(:)277 -2488 y Fq(sla)p Ft(_)p Fq(DT)448 b FB(D)565 b FD(appro)m(ximate)50 -b(ET)p Fo(\000)p FD(UT)f(\(after)h(1984,)57 b(TT)p Fo(\000)p -FD(UT1\))49 b(in)1658 2601 y(seconds)0 2846 y FB(NOTES)44 -b FD(:)311 3018 y(1.)i(Dep)s(ending)29 b(on)h(the)h(ep)s(o)s(c)m(h,)f -(one)h(of)f(three)h(parab)s(olic)e(appro)m(ximations)g(is)g(used:)554 -3169 y(b)s(efore)h(AD)g(979)318 b(Stephenson)30 b(&)g(Morrison's)f(390) -j(BC)e(to)h(AD)g(948)h(mo)s(del)554 3282 y(AD)e(979)i(to)f(AD)g(1708) -100 b(Stephenson)30 b(&)g(Morrison's)f(AD)i(948)h(to)f(AD)g(1600)h(mo)s -(del)554 3395 y(after)e(AD)h(1708)331 b(McCarth)m(y)32 -b(&)e(Bab)s(co)s(c)m(k's)h(p)s(ost-1650)h(mo)s(del)427 -3547 y(The)42 b(breakp)s(oin)m(ts)f(are)h(c)m(hosen)h(to)g(ensure)e -(con)m(tin)m(uit)m(y:)64 b(they)42 b(o)s(ccur)g(at)h(places)f(where)f -(the)427 3659 y(adjacen)m(t)32 b(mo)s(dels)d(giv)m(e)i(the)f(same)h -(answ)m(er)f(as)h(eac)m(h)h(other.)311 3790 y(2.)46 b(The)d(accuracy)i -(is)e(mo)s(dest,)k(with)42 b(errors)h(of)h(up)e(to)i(20)2447 -3757 y Fu(s)2524 3790 y FD(during)d(the)j(in)m(terv)-5 -b(al)43 b(since)f(1650,)427 3903 y(rising)27 b(to)i(p)s(erhaps)e(30) -1213 3870 y Fu(m)1306 3903 y FD(b)m(y)h(1000)j(BC.)e(Comparativ)m(ely)f -(accurate)i(v)-5 b(alues)28 b(from)g(AD)i(1600)g(are)427 -4016 y(tabulated)g(in)f(the)i Fq(Astr)-5 b(onomic)g(al)35 -b(A)n(lmanac)h FD(\(see)c(section)e(K8)h(of)f(the)h(1995)h(edition\).) -311 4146 y(3.)46 b(The)34 b(use)h(of)f Ft(DOUBLE)46 b(PRECISION)32 -b FD(for)j(b)s(oth)f(argumen)m(t)h(and)f(result)f(is)h(simply)e(for)i -(compati-)427 4259 y(bilit)m(y)29 b(with)g(other)h(SLALIB)g(time)g -(routines.)311 4390 y(4.)46 b(The)28 b(mo)s(dels)g(used)f(are)i(based)f -(on)h(a)g(lunar)e(tidal)g(acceleration)i(v)-5 b(alue)28 -b(of)h Fo(\000)p FD(26)3157 4353 y Fk(0)l(0)3161 4390 -y Fl(:)p FD(00)h(p)s(er)e(cen)m(tury)-8 b(.)0 4643 y -FB(REFERENCE)44 b FD(:)50 b(Seidelmann,)33 b(P)-8 b(.K.)36 -b(\(ed\),)g(1992.)56 b Fq(Explanatory)39 b(Supplement)f(to)g(the)f -(Astr)-5 b(onomic)g(al)227 4756 y(A)n(lmanac,)38 b FD(ISBN)d -(0-935702-68-7.)62 b(This)34 b(con)m(tains)i(references)g(to)g(the)g -(pap)s(ers)f(b)m(y)g(Stephenson)g(&)227 4869 y(Morrison)30 -b(and)f(b)m(y)i(McCarth)m(y)g(&)f(Bab)s(co)s(c)m(k)h(whic)m(h)e -(describ)s(e)g(the)i(mo)s(dels)e(used)g(here.)p 0 4955 -V 0 5068 a Fx(SLA)p Fn(_)p Fx(DTF2D)553 b Fm(Hour,Min,Sec)36 -b(to)i(Da)m(ys)554 b Fx(SLA)p Fn(_)p Fx(DTF2D)0 5418 -y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 b(hours,)d(min)m(utes,)h -(seconds)g(to)h(da)m(ys)g(\(double)e(precision\).)0 5606 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DTF2D)g(\(IHOUR,)f(IMIN,)i -(SEC,)f(DAYS,)h(J\))p eop -%%Page: 53 55 -53 54 bop 0 52 a Fw(SUN/67.70)3252 b FD(53)0 351 y FB(GIVEN)45 -b FD(:)277 497 y Fq(IHOUR)429 b FB(I)605 b FD(hours)277 -610 y Fq(IMIN)516 b FB(I)605 b FD(min)m(utes)277 723 -y Fq(SEC)558 b FB(D)565 b FD(seconds)0 1180 y FB(RETURNED)46 -b FD(:)277 1326 y Fq(D)n(A)-7 b(YS)489 b FB(D)565 b FD(in)m(terv)-5 -b(al)30 b(in)f(da)m(ys)277 1439 y Fq(J)688 b FB(I)605 -b FD(status:)1825 1552 y(0)31 b(=)f(OK)1825 1665 y(1)h(=)f(IHOUR)g -(outside)f(range)i(0-23)1825 1778 y(2)g(=)f(IMIN)g(outside)g(range)g -(0-59)1825 1890 y(3)h(=)f(SEC)f(outside)h(range)g(0-59.999)p -Fo(\001)15 b(\001)g(\001)0 2347 y FB(NOTES)44 b FD(:)311 -2576 y(1.)i(The)30 b(result)f(is)h(computed)g(ev)m(en)h(if)e(an)m(y)i -(of)g(the)f(range)h(c)m(hec)m(ks)h(fail.)311 2743 y(2.)46 -b(The)30 b(sign)g(m)m(ust)g(b)s(e)g(dealt)g(with)f(outside)g(this)h -(routine.)p 0 2917 3780 8 v 0 3030 a Fx(SLA)p Fn(_)p -Fx(DTF2R)476 b Fm(Hour,Min,Sec)37 b(to)h(Radians)476 -b Fx(SLA)p Fn(_)p Fx(DTF2R)0 3380 y FB(A)m(CTION)44 b -FD(:)c(Con)m(v)m(ert)32 b(hours,)d(min)m(utes,)h(seconds)g(to)h -(radians)e(\(double)g(precision\).)0 3568 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DTF2R)g(\(IHOUR,)f(IMIN,)i(SEC,)f(RAD,)h -(J\))0 3979 y FB(GIVEN)e FD(:)277 4125 y Fq(IHOUR)429 -b FB(I)605 b FD(hours)277 4238 y Fq(IMIN)516 b FB(I)605 -b FD(min)m(utes)277 4351 y Fq(SEC)558 b FB(D)565 b FD(seconds)0 -4808 y FB(RETURNED)46 b FD(:)277 4954 y Fq(RAD)533 b -FB(D)565 b FD(angle)31 b(in)e(radians)277 5067 y Fq(J)688 -b FB(I)605 b FD(status:)1825 5180 y(0)31 b(=)f(OK)1825 -5292 y(1)h(=)f(IHOUR)g(outside)f(range)i(0-23)1825 5405 -y(2)g(=)f(IMIN)g(outside)g(range)g(0-59)1825 5518 y(3)h(=)f(SEC)f -(outside)h(range)g(0-59.999)p Fo(\001)15 b(\001)g(\001)p -eop -%%Page: 54 56 -54 55 bop 0 52 a FD(54)0 351 y FB(NOTES)44 b FD(:)311 -537 y(1.)i(The)30 b(result)f(is)h(computed)g(ev)m(en)h(if)e(an)m(y)i -(of)g(the)f(range)h(c)m(hec)m(ks)h(fail.)311 680 y(2.)46 -b(The)30 b(sign)g(m)m(ust)g(b)s(e)g(dealt)g(with)f(outside)g(this)h -(routine.)p 0 806 3780 8 v 0 919 a Fx(SLA)p Fn(_)p Fx(DTP2S)442 -b Fm(T)-10 b(angen)m(t)37 b(Plane)h(to)g(Spherical)442 -b Fx(SLA)p Fn(_)p Fx(DTP2S)0 1269 y FB(A)m(CTION)44 b -FD(:)c(T)-8 b(ransform)28 b(tangen)m(t)i(plane)e(co)s(ordinates)h(in)m -(to)f(spherical)g(co)s(ordinates)g(\(double)g(precision\))0 -1457 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DTP2S)g(\(XI,)g(ETA,)h -(RAZ,)g(DECZ,)f(RA,)h(DEC\))0 1797 y FB(GIVEN)e FD(:)277 -1943 y Fq(XI,ET)-7 b(A)417 b FB(D)565 b FD(tangen)m(t)32 -b(plane)d(rectangular)i(co)s(ordinates)f(\(radians\))277 -2056 y Fq(RAZ,DECZ)266 b FB(D)565 b FD(spherical)29 b(co)s(ordinates)h -(of)g(tangen)m(t)i(p)s(oin)m(t)e(\(radians\))0 2393 y -FB(RETURNED)46 b FD(:)277 2565 y Fq(RA,DEC)378 b FB(D)565 -b FD(spherical)29 b(co)s(ordinates)h(\(radians\))0 2910 -y FB(NOTES)44 b FD(:)311 3096 y(1.)i(The)24 b(pro)5 b(jection)25 -b(is)f(called)f(the)i Fq(gnomonic)31 b FD(pro)5 b(jection;)27 -b(the)d(Cartesian)h(co)s(ordinates)f([)15 b Fl(\030)t(;)g(\021)k -FD(])25 b(are)427 3209 y(called)30 b Fq(standar)-5 b(d)37 -b(c)-5 b(o)g(or)g(dinates.)45 b FD(The)30 b(latter)i(are)f(in)f(units)f -(of)i(the)h(distance)e(from)h(the)g(tangen)m(t)427 3322 -y(plane)f(to)h(the)f(pro)5 b(jection)30 b(p)s(oin)m(t,)g -Fq(i.e.)g FD(radians)f(near)h(the)h(origin.)311 3465 -y(2.)46 b(When)26 b(w)m(orking)g(in)e([)15 b Fl(x;)g(y)s(;)g(z)21 -b FD(])26 b(rather)g(than)g(spherical)e(co)s(ordinates,)j(the)f(equiv) --5 b(alen)m(t)26 b(Cartesian)427 3578 y(routine)k(sla)p -Ft(_)p FD(DTP2V)g(is)f(a)m(v)-5 b(ailable.)p 0 3695 V -0 3808 a Fx(SLA)p Fn(_)p Fx(DTP2V)201 b Fm(T)-10 b(angen)m(t)37 -b(Plane)h(to)g(Direction)f(Cosines)202 b Fx(SLA)p Fn(_)p -Fx(DTP2V)0 4158 y FB(A)m(CTION)44 b FD(:)63 b(Giv)m(en)42 -b(the)g(tangen)m(t-plane)h(co)s(ordinates)e(of)h(a)g(star)g(and)f(the)h -(direction)f(cosines)g(of)h(the)227 4271 y(tangen)m(t)32 -b(p)s(oin)m(t,)e(determine)f(the)i(direction)e(cosines)h(of)g(the)h -(star)g(\(double)e(precision\).)0 4459 y FB(CALL)45 b -FD(:)77 b Ft(CALL)46 b(sla_DTP2V)g(\(XI,)g(ETA,)h(V0,)g(V\))0 -4799 y FB(GIVEN)e FD(:)277 4945 y Fq(XI,ET)-7 b(A)417 -b FB(D)565 b FD(tangen)m(t)32 b(plane)d(co)s(ordinates)h(of)h(star)g -(\(radians\))277 5058 y Fq(V0)622 b FB(D\(3\))431 b FD(direction)29 -b(cosines)h(of)h(tangen)m(t)h(p)s(oin)m(t)0 5395 y FB(RETURNED)46 -b FD(:)277 5567 y Fq(V)668 b FB(D\(3\))431 b FD(direction)29 -b(cosines)h(of)h(star)p eop -%%Page: 55 57 -55 56 bop 0 52 a Fw(SUN/67.70)3252 b FD(55)0 351 y FB(NOTES)44 -b FD(:)311 536 y(1.)i(If)30 b(v)m(ector)i(V0)f(is)f(not)g(of)h(unit)e -(length,)h(the)g(returned)f(v)m(ector)j(V)f(will)d(b)s(e)h(wrong.)311 -680 y(2.)46 b(If)35 b(v)m(ector)i(V0)f(p)s(oin)m(ts)e(at)i(a)f(p)s -(ole,)h(the)g(returned)e(v)m(ector)j(V)e(will)e(b)s(e)h(based)h(on)g -(the)h(arbitrary)427 793 y(assumption)29 b(that)i Fl(\013)26 -b FD(=)f(0)31 b(at)g(the)f(tangen)m(t)i(p)s(oin)m(t.)311 -936 y(3.)46 b(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i -Fq(gnomonic)31 b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s -(ordinates)f([)15 b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 -1049 y(called)30 b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 1162 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 1306 y(4.)46 b(This)29 b(routine)g(is)h(the)g(Cartesian)g -(equiv)-5 b(alen)m(t)30 b(of)g(the)h(routine)e(sla)p -Ft(_)p FD(DTP2S.)p 0 1431 3780 8 v 0 1543 a Fx(SLA)p -Fn(_)p Fx(DTPS2C)265 b Fm(Plate)37 b(cen)m(tre)h(from)f -Fg(\030)6 b(;)20 b(\021)42 b Fm(and)d Fg(\013)q(;)20 -b(\016)270 b Fx(SLA)p Fn(_)p Fx(DTPS2C)0 1894 y FB(A)m(CTION)44 -b FD(:)39 b(F)-8 b(rom)27 b(the)h(tangen)m(t)g(plane)e(co)s(ordinates)h -(of)g(a)g(star)h(of)f(kno)m(wn)f([)15 b Fl(\013;)g(\016)21 -b FD(],)28 b(determine)e(the)h([)15 b Fl(\013;)g(\016)20 -b FD(])227 2007 y(of)31 b(the)f(tangen)m(t)i(p)s(oin)m(t)e(\(double)f -(precision\))0 2194 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_DTPS2C)f(\(XI,)i(ETA,)g(RA,)g(DEC,)f(RAZ1,)h(DECZ1,)f(RAZ2,)g -(DECZ2,)g(N\))0 2534 y FB(GIVEN)f FD(:)277 2680 y Fq(XI,ET)-7 -b(A)417 b FB(D)565 b FD(tangen)m(t)32 b(plane)d(rectangular)i(co)s -(ordinates)f(\(radians\))277 2793 y Fq(RA,DEC)378 b FB(D)565 -b FD(spherical)29 b(co)s(ordinates)h(\(radians\))0 3128 -y FB(RETURNED)46 b FD(:)277 3274 y Fq(RAZ1,DECZ1)174 -b FB(D)565 b FD(spherical)29 b(co)s(ordinates)h(of)g(tangen)m(t)i(p)s -(oin)m(t,)e(solution)f(1)277 3387 y Fq(RAZ2,DECZ2)174 -b FB(D)565 b FD(spherical)29 b(co)s(ordinates)h(of)g(tangen)m(t)i(p)s -(oin)m(t,)e(solution)f(2)277 3500 y Fq(N)668 b FB(I)605 -b FD(n)m(um)m(b)s(er)29 b(of)i(solutions:)1779 3613 y(0)g(=)f(no)g -(solutions)f(returned)g(\(note)j(2\))1779 3726 y(1)f(=)f(only)g(the)g -(\014rst)g(solution)f(is)g(useful)g(\(note)i(3\))1779 -3839 y(2)g(=)f(there)h(are)f(t)m(w)m(o)i(useful)d(solutions)g(\(note)i -(3\))0 4174 y FB(NOTES)44 b FD(:)311 4359 y(1.)i(The)30 -b(RAZ1)h(and)e(RAZ2)i(v)-5 b(alues)29 b(returned)h(are)g(in)f(the)i -(range)g(0)5 b Fo(\000)g FD(2)p Fl(\031)s FD(.)311 4503 -y(2.)46 b(Cases)39 b(where)f(there)h(is)f(no)g(solution)f(can)i(only)f -(arise)g(near)g(the)h(p)s(oles.)64 b(F)-8 b(or)40 b(example,)g(it)e(is) -427 4616 y(clearly)27 b(imp)s(ossible)d(for)j(a)h(star)f(at)h(the)g(p)s -(ole)e(itself)g(to)j(ha)m(v)m(e)f(a)g(non-zero)g Fl(\030)j -FD(v)-5 b(alue,)28 b(and)e(hence)i(it)427 4728 y(is)k(meaningless)g(to) -h(ask)g(where)f(the)h(tangen)m(t)i(p)s(oin)m(t)c(w)m(ould)h(ha)m(v)m(e) -i(to)f(b)s(e)g(to)g(bring)e(ab)s(out)i(this)427 4841 -y(com)m(bination)d(of)g Fl(\030)35 b FD(and)30 b Fl(\016)s -FD(.)311 4985 y(3.)46 b(Also)33 b(near)f(the)h(p)s(oles,)f(cases)i(can) -f(arise)f(where)g(there)h(are)g(t)m(w)m(o)g(useful)e(solutions.)46 -b(The)32 b(argu-)427 5098 y(men)m(t)j(N)g(indicates)e(whether)h(the)h -(second)g(of)g(the)f(t)m(w)m(o)i(solutions)d(returned)h(is)f(useful.)52 -b(N)15 b(=)g(1)427 5211 y(indicates)41 b(only)h(one)g(useful)e -(solution,)k(the)e(usual)f(case;)49 b(under)41 b(these)h -(circumstances,)j(the)427 5324 y(second)35 b(solution)e(corresp)s(onds) -g(to)j(the)f(\\o)m(v)m(er-the-p)s(ole")i(case,)g(and)d(this)f(is)h -(re\015ected)h(in)e(the)427 5437 y(v)-5 b(alues)30 b(of)h(RAZ2)f(and)g -(DECZ2)g(whic)m(h)f(are)i(returned.)311 5580 y(4.)46 -b(The)35 b(DECZ1)g(and)f(DECZ2)h(v)-5 b(alues)34 b(returned)g(are)h(in) -f(the)h(range)g Fo(\006)p Fl(\031)s FD(,)h(but)f(in)e(the)i(ordinary)-8 -b(,)427 5693 y(non-p)s(ole-crossing,)29 b(case,)j(the)f(range)f(is)g -Fo(\006)p Fl(\031)s(=)p FD(2.)p eop -%%Page: 56 58 -56 57 bop 0 52 a FD(56)311 351 y(5.)46 b(RA,)31 b(DEC,)f(RAZ1,)h -(DECZ1,)g(RAZ2,)f(DECZ2)h(are)f(all)g(in)f(radians.)311 -507 y(6.)46 b(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i -Fq(gnomonic)31 b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s -(ordinates)f([)15 b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 -620 y(called)30 b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 733 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 888 y(7.)46 b(When)26 b(w)m(orking)g(in)e([)15 -b Fl(x;)g(y)s(;)g(z)21 b FD(])26 b(rather)g(than)g(spherical)e(co)s -(ordinates,)j(the)f(equiv)-5 b(alen)m(t)26 b(Cartesian)427 -1001 y(routine)k(sla)p Ft(_)p FD(DTPV2C)g(is)f(a)m(v)-5 -b(ailable.)p 0 1144 3780 8 v 0 1256 a Fx(SLA)p Fn(_)p -Fx(DTPV2C)184 b Fm(Plate)37 b(cen)m(tre)h(from)e Fg(\030)6 -b(;)20 b(\021)43 b Fm(and)38 b Fg(x;)20 b(y)t(;)g(z)190 -b Fx(SLA)p Fn(_)p Fx(DTPV2C)0 1607 y FB(A)m(CTION)44 -b FD(:)38 b(F)-8 b(rom)26 b(the)f(tangen)m(t)i(plane)d(co)s(ordinates)h -(of)g(a)h(star)f(of)h(kno)m(wn)e(direction)g(cosines,)i(determine)227 -1720 y(the)31 b(direction)e(cosines)h(of)g(the)h(tangen)m(t)h(p)s(oin)m -(t)d(\(double)g(precision\))0 1907 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_DTPV2C)f(\(XI,)i(ETA,)g(V,)g(V01,)f(V02,)h(N\))0 -2285 y FB(GIVEN)e FD(:)277 2431 y Fq(XI,ET)-7 b(A)417 -b FB(D)565 b FD(tangen)m(t)32 b(plane)d(co)s(ordinates)h(of)h(star)g -(\(radians\))277 2544 y Fq(V)668 b FB(D\(3\))431 b FD(direction)29 -b(cosines)h(of)h(star)0 2945 y FB(RETURNED)46 b FD(:)277 -3091 y Fq(V01)576 b FB(D\(3\))431 b FD(direction)29 b(cosines)h(of)h -(tangen)m(t)h(p)s(oin)m(t,)d(solution)g(1)277 3204 y -Fq(V02)576 b FB(D\(3\))431 b FD(direction)29 b(cosines)h(of)h(tangen)m -(t)h(p)s(oin)m(t,)d(solution)g(2)277 3317 y Fq(N)668 -b FB(I)605 b FD(n)m(um)m(b)s(er)29 b(of)i(solutions:)1779 -3430 y(0)g(=)f(no)g(solutions)f(returned)g(\(note)j(2\))1779 -3543 y(1)f(=)f(only)g(the)g(\014rst)g(solution)f(is)g(useful)g(\(note)i -(3\))1779 3656 y(2)g(=)f(there)h(are)f(t)m(w)m(o)i(useful)d(solutions)g -(\(note)i(3\))0 4056 y FB(NOTES)44 b FD(:)311 4263 y(1.)i(The)30 -b(v)m(ector)i(V)f(m)m(ust)f(b)s(e)g(of)g(unit)f(length)h(or)g(the)h -(result)e(will)f(b)s(e)h(wrong.)311 4418 y(2.)46 b(Cases)39 -b(where)f(there)h(is)f(no)g(solution)f(can)i(only)f(arise)g(near)g(the) -h(p)s(oles.)64 b(F)-8 b(or)40 b(example,)g(it)e(is)427 -4531 y(clearly)30 b(imp)s(ossible)d(for)j(a)h(star)f(at)h(the)g(p)s -(ole)e(itself)h(to)h(ha)m(v)m(e)g(a)g(non-zero)g(XI)f(v)-5 -b(alue.)311 4687 y(3.)46 b(Also)33 b(near)f(the)h(p)s(oles,)f(cases)i -(can)f(arise)f(where)g(there)h(are)g(t)m(w)m(o)g(useful)e(solutions.)46 -b(The)32 b(argu-)427 4800 y(men)m(t)j(N)g(indicates)e(whether)h(the)h -(second)g(of)g(the)f(t)m(w)m(o)i(solutions)d(returned)h(is)f(useful.)52 -b(N)15 b(=)g(1)427 4913 y(indicates)41 b(only)h(one)g(useful)e -(solution,)k(the)e(usual)f(case;)49 b(under)41 b(these)h -(circumstances,)j(the)427 5026 y(second)27 b(solution)f(can)h(b)s(e)g -(regarded)f(as)i(v)-5 b(alid)25 b(if)h(the)h(v)m(ector)i(V02)f(is)e(in) -m(terpreted)g(as)h(the)g(\\o)m(v)m(er-)427 5138 y(the-p)s(ole")k(case.) -311 5294 y(4.)46 b(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i -Fq(gnomonic)31 b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s -(ordinates)f([)15 b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 -5407 y(called)30 b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 5520 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 5675 y(5.)46 b(This)29 b(routine)g(is)h(the)g(Cartesian)g -(equiv)-5 b(alen)m(t)30 b(of)g(the)h(routine)e(sla)p -Ft(_)p FD(DTPS2C.)p eop -%%Page: 57 59 -57 58 bop 0 52 a Fw(SUN/67.70)3252 b FD(57)p 0 267 3780 -8 v 0 380 a Fx(SLA)p Fn(_)p Fx(DTT)875 b Fm(TT)38 b(min)m(us)f(UTC)877 -b Fx(SLA)p Fn(_)p Fx(DTT)0 730 y FB(A)m(CTION)44 b FD(:)c(Compute)28 -b(\001TT,)g(the)h(incremen)m(t)g(to)g(b)s(e)g(applied)d(to)k(Co)s -(ordinated)d(Univ)m(ersal)h(Time)g(UTC)227 843 y(to)j(giv)m(e)g(T)-8 -b(errestrial)29 b(Time)h(TT.)0 1031 y FB(CALL)45 b FD(:)77 -b Ft(D)47 b(=)h(sla_DTT)d(\(DJU\))0 1334 y FB(GIVEN)g -FD(:)277 1505 y Fq(DJU)551 b FB(D)565 b FD(UTC)30 b(date)h(as)g(a)f(mo) -s(di\014ed)f(JD)h(\(JD)p Fo(\000)p FD(2400000.5\))0 1792 -y FB(RETURNED)46 b FD(:)277 1964 y Fq(sla)p Ft(_)p Fq(DTT)383 -b FB(D)565 b FD(TT)p Fo(\000)p FD(UTC)29 b(in)g(seconds)0 -2251 y FB(NOTES)44 b FD(:)311 2428 y(1.)i(The)32 b(UTC)f(is)g(sp)s -(eci\014ed)f(to)i(b)s(e)f(a)i(date)f(rather)g(than)f(a)h(time)g(to)g -(indicate)f(that)i(care)f(needs)g(to)427 2540 y(b)s(e)g(tak)m(en)i(not) -f(to)h(sp)s(ecify)d(an)i(instan)m(t)g(whic)m(h)e(lies)h(within)e(a)j -(leap)g(second.)48 b(Though)32 b(in)f(most)427 2653 y(cases)39 -b(UTC)e(can)i(include)c(the)j(fractional)g(part,)i(correct)f(b)s(eha)m -(viour)d(on)i(the)g(da)m(y)h(of)f(a)g(leap)427 2766 y(second)31 -b(can)f(b)s(e)g(guaran)m(teed)i(only)d(up)g(to)i(the)g(end)f(of)g(the)h -(second)f(23)2892 2733 y Fu(h)2952 2766 y FD(59)3042 -2733 y Fu(m)3121 2766 y FD(59)3211 2733 y Fu(s)3244 2766 -y FD(.)311 2902 y(2.)46 b(Pre)30 b(1972)j(Jan)m(uary)d(1)g(a)h(\014xed) -f(v)-5 b(alue)30 b(of)g(10)h(+)f(ET)p Fo(\000)p FD(T)-8 -b(AI)30 b(is)f(returned.)311 3037 y(3.)46 b(TT)30 b(is)f(one)i(in)m -(terpretation)f(of)g(the)h(defunct)f(time)g(scale)g Fq(Ephemeris)k -(Time)p FD(,)c(ET.)311 3172 y(4.)46 b(See)31 b(also)f(the)h(routine)e -(sla)p Ft(_)p FD(DT,)h(whic)m(h)f(roughly)g(estimates)i(ET)p -Fo(\000)p FD(UT)f(for)g(historical)e(ep)s(o)s(c)m(hs.)p -0 3273 V 0 3386 a Fx(SLA)p Fn(_)p Fx(D)l(V2TP)205 b Fm(Direction)37 -b(Cosines)h(to)g(T)-10 b(angen)m(t)37 b(Plane)205 b Fx(SLA)p -Fn(_)p Fx(D)l(V2TP)0 3736 y FB(A)m(CTION)44 b FD(:)39 -b(Giv)m(en)27 b(the)g(direction)f(cosines)h(of)g(a)h(star)f(and)g(of)g -(the)h(tangen)m(t)g(p)s(oin)m(t,)f(determine)g(the)g(star's)227 -3849 y(tangen)m(t-plane)32 b(co)s(ordinates)e(\(double)f(precision\).)0 -4037 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_DV2TP)g(\(V,)h(V0,)f -(XI,)h(ETA,)g(J\))0 4344 y FB(GIVEN)e FD(:)277 4490 y -Fq(V)668 b FB(D\(3\))431 b FD(direction)29 b(cosines)h(of)h(star)277 -4603 y Fq(V0)622 b FB(D\(3\))431 b FD(direction)29 b(cosines)h(of)h -(tangen)m(t)h(p)s(oin)m(t)0 4881 y FB(RETURNED)46 b FD(:)277 -5027 y Fq(XI,ET)-7 b(A)417 b FB(D)565 b FD(tangen)m(t)32 -b(plane)d(co)s(ordinates)h(\(radians\))277 5140 y Fq(J)688 -b FB(I)605 b FD(status:)1825 5253 y(0)31 b(=)f(OK,)g(star)g(on)g -(tangen)m(t)i(plane)1825 5366 y(1)f(=)f(error,)g(star)g(to)s(o)h(far)g -(from)f(axis)1825 5479 y(2)h(=)f(error,)g(an)m(tistar)g(on)h(tangen)m -(t)h(plane)1825 5592 y(3)f(=)f(error,)g(an)m(tistar)g(to)s(o)i(far)e -(from)g(axis)p eop -%%Page: 58 60 -58 59 bop 0 52 a FD(58)0 351 y FB(NOTES)44 b FD(:)311 -559 y(1.)i(If)32 b(v)m(ector)h(V0)f(is)f(not)h(of)g(unit)e(length,)i -(or)f(if)g(v)m(ector)i(V)f(is)f(of)h(zero)g(length,)g(the)g(results)e -(will)f(b)s(e)427 672 y(wrong.)311 828 y(2.)46 b(If)35 -b(V0)i(p)s(oin)m(ts)d(at)i(a)g(p)s(ole,)h(the)e(returned)g -Fl(\030)t(;)15 b(\021)39 b FD(will)33 b(b)s(e)i(based)g(on)h(the)g -(arbitrary)e(assumption)427 941 y(that)d Fl(\013)26 b -FD(=)f(0)31 b(at)g(the)f(tangen)m(t)i(p)s(oin)m(t.)311 -1097 y(3.)46 b(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i -Fq(gnomonic)31 b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s -(ordinates)f([)15 b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 -1210 y(called)30 b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 1323 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 1479 y(4.)46 b(This)29 b(routine)g(is)h(the)g(Cartesian)g -(equiv)-5 b(alen)m(t)30 b(of)g(the)h(routine)e(sla)p -Ft(_)p FD(DS2TP)-8 b(.)p 0 1632 3780 8 v 0 1745 a Fx(SLA)p -Fn(_)p Fx(D)l(VD)l(V)785 b Fm(Scalar)37 b(Pro)s(duct)785 -b Fx(SLA)p Fn(_)p Fx(D)l(VD)l(V)0 2095 y FB(A)m(CTION)44 -b FD(:)c(Scalar)30 b(pro)s(duct)g(of)g(t)m(w)m(o)i(3-v)m(ectors)g -(\(double)e(precision\).)0 2283 y FB(CALL)45 b FD(:)77 -b Ft(D)47 b(=)h(sla_DVDV)d(\(VA,)i(VB\))0 2663 y FB(GIVEN)e -FD(:)277 2809 y Fq(V)-9 b(A)609 b FB(D\(3\))431 b FD(\014rst)30 -b(v)m(ector)277 2922 y Fq(VB)604 b FB(D\(3\))431 b FD(second)31 -b(v)m(ector)0 3325 y FB(RETURNED)46 b FD(:)277 3497 y -Fq(sla)p Ft(_)p Fq(D)n(VD)n(V)312 b FB(D)565 b FD(scalar)30 -b(pro)s(duct)g(V)-10 b(A.VB)p 0 3666 V 0 3779 a Fx(SLA)p -Fn(_)p Fx(D)l(VN)820 b Fm(Normalize)35 b(V)-10 b(ector)820 -b Fx(SLA)p Fn(_)p Fx(D)l(VN)0 4129 y FB(A)m(CTION)44 -b FD(:)c(Normalize)31 b(a)f(3-v)m(ector,)j(also)e(giving)e(the)h(mo)s -(dulus)e(\(double)h(precision\).)0 4317 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DVN)g(\(V,)h(UV,)g(VM\))0 -4697 y FB(GIVEN)e FD(:)277 4868 y Fq(V)668 b FB(D\(3\))431 -b FD(v)m(ector)0 5280 y FB(RETURNED)46 b FD(:)277 5427 -y Fq(UV)600 b FB(D\(3\))431 b FD(unit)29 b(v)m(ector)j(in)d(direction)g -(of)i(V)277 5539 y Fq(VM)586 b FB(D)565 b FD(mo)s(dulus)28 -b(of)i(V)p eop -%%Page: 59 61 -59 60 bop 0 52 a Fw(SUN/67.70)3252 b FD(59)0 351 y FB(NOTE)44 -b FD(:)d(If)30 b(the)g(mo)s(dulus)e(of)j(V)f(is)f(zero,)j(UV)f(is)e -(set)i(to)g(zero)g(as)g(w)m(ell.)p 0 458 3780 8 v 0 571 -a Fx(SLA)p Fn(_)p Fx(D)l(VXV)772 b Fm(V)-10 b(ector)38 -b(Pro)s(duct)773 b Fx(SLA)p Fn(_)p Fx(D)l(VXV)0 921 y -FB(A)m(CTION)44 b FD(:)c(V)-8 b(ector)33 b(pro)s(duct)c(of)h(t)m(w)m(o) -i(3-v)m(ectors)h(\(double)c(precision\).)0 1109 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DVXV)g(\(VA,)h(VB,)f(VC\))0 -1423 y FB(GIVEN)f FD(:)277 1569 y Fq(V)-9 b(A)609 b FB(D\(3\))431 -b FD(\014rst)30 b(v)m(ector)277 1682 y Fq(VB)604 b FB(D\(3\))431 -b FD(second)31 b(v)m(ector)0 1974 y FB(RETURNED)46 b -FD(:)277 2146 y Fq(V)n(C)605 b FB(D\(3\))431 b FD(v)m(ector)32 -b(pro)s(duct)d(V)-10 b(A)p Fo(\002)p FD(VB)p 0 2268 V -0 2381 a Fx(SLA)p Fn(_)p Fx(E2H)988 b Fg(h;)20 b(\016)44 -b Fm(to)38 b(Az,El)987 b Fx(SLA)p Fn(_)p Fx(E2H)0 2732 -y FB(A)m(CTION)44 b FD(:)c(Equatorial)30 b(to)h(horizon)f(co)s -(ordinates)g(\(single)f(precision\).)0 2919 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_DE2H)g(\(HA,)h(DEC,)f(PHI,)h(AZ,)g(EL\))0 -3234 y FB(GIVEN)e FD(:)277 3380 y Fq(HA)600 b FB(R)567 -b FD(hour)30 b(angle)g(\(radians\))277 3493 y Fq(DEC)540 -b FB(R)567 b FD(declination)29 b(\(radians\))277 3606 -y Fq(PHI)571 b FB(R)c FD(latitude)30 b(\(radians\))0 -3898 y FB(RETURNED)46 b FD(:)277 4044 y Fq(AZ)612 b FB(R)567 -b FD(azim)m(uth)30 b(\(radians\))277 4157 y Fq(EL)617 -b FB(R)567 b FD(elev)-5 b(ation)30 b(\(radians\))0 4449 -y FB(NOTES)44 b FD(:)311 4628 y(1.)i(Azim)m(uth)28 b(is)g(returned)f -(in)g(the)i(range)g(0)q Fo(\000)q FD(2)p Fl(\031)s FD(;)h(north)e(is)g -(zero,)i(and)e(east)h(is)f(+)p Fl(\031)s(=)p FD(2.)41 -b(Elev)-5 b(ation)27 b(is)427 4741 y(returned)i(in)h(the)g(range)h -Fo(\006)p Fl(\031)s FD(.)311 4878 y(2.)46 b(The)32 b(latitude)f(m)m -(ust)i(b)s(e)e(geo)s(detic.)48 b(In)31 b(critical)h(applications,)f -(corrections)i(for)f(p)s(olar)f(motion)427 4991 y(should)e(b)s(e)g -(applied.)311 5128 y(3.)46 b(In)36 b(some)h(applications)e(it)i(will)d -(b)s(e)i(imp)s(ortan)m(t)g(to)h(sp)s(ecify)f(the)h(correct)h(t)m(yp)s -(e)f(of)g(hour)e(angle)427 5241 y(and)f(declination)f(in)g(order)h(to)h -(pro)s(duce)e(the)i(required)d(t)m(yp)s(e)j(of)g(azim)m(uth)f(and)f -(elev)-5 b(ation.)53 b(In)427 5354 y(particular,)25 b(it)f(ma)m(y)h(b)s -(e)f(imp)s(ortan)m(t)g(to)h(distinguish)c(b)s(et)m(w)m(een)26 -b(elev)-5 b(ation)24 b(as)h(a\013ected)h(b)m(y)f(refrac-)427 -5467 y(tion,)g(whic)m(h)d(w)m(ould)h(require)f(the)i -Fq(observe)-5 b(d)24 b FD([)15 b Fl(h;)g(\016)20 b FD(],)26 -b(and)d(the)g(elev)-5 b(ation)24 b Fq(in)i(vacuo)p FD(,)f(whic)m(h)e(w) -m(ould)427 5580 y(require)35 b(the)h Fq(top)-5 b(o)g(c)g(entric)39 -b FD([)15 b Fl(h;)g(\016)20 b FD(].)59 b(If)35 b(the)i(e\013ects)g(of)f -(diurnal)d(ab)s(erration)j(can)g(b)s(e)g(neglected,)427 -5693 y(the)31 b Fq(app)-5 b(ar)g(ent)33 b FD([)15 b Fl(h;)g(\016)20 -b FD(])31 b(ma)m(y)g(b)s(e)f(used)f(instead)h(of)g(the)h(top)s(o)s(cen) -m(tric)f([)15 b Fl(h;)g(\016)21 b FD(].)p eop -%%Page: 60 62 -60 61 bop 0 52 a FD(60)311 351 y(4.)46 b(No)31 b(range)g(c)m(hec)m -(king)g(of)g(argumen)m(ts)f(is)g(carried)f(out.)311 484 -y(5.)46 b(In)28 b(applications)e(whic)m(h)i(in)m(v)m(olv)m(e)g(man)m(y) -h(suc)m(h)f(calculations,)g(rather)g(than)g(calling)f(the)h(presen)m(t) -427 597 y(routine)i(it)g(will)e(b)s(e)i(more)g(e\016cien)m(t)h(to)h -(use)e(inline)d(co)s(de,)k(ha)m(ving)g(previously)d(computed)i(\014xed) -427 710 y(terms)g(suc)m(h)f(as)h(sine)f(and)g(cosine)g(of)h(latitude,)f -(and)g(\(for)h(trac)m(king)g(a)g(star\))g(sine)f(and)g(cosine)g(of)427 -823 y(declination.)p 0 898 3780 8 v 0 1011 a Fx(SLA)p -Fn(_)p Fx(EAR)-11 b(TH)514 b Fm(Appro)m(x)38 b(Earth)f(P)m(os/V)-10 -b(el)514 b Fx(SLA)p Fn(_)p Fx(EAR)-11 b(TH)0 1361 y FB(A)m(CTION)44 -b FD(:)c(Appro)m(ximate)31 b(helio)s(cen)m(tric)e(p)s(osition)f(and)i -(v)m(elo)s(cit)m(y)h(of)f(the)h(Earth)f(\(single)f(precision\).)0 -1549 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_EARTH)g(\(IY,)g(ID,)h -(FD,)g(PV\))0 1845 y FB(GIVEN)e FD(:)277 1991 y Fq(IY)633 -b FB(I)605 b FD(y)m(ear)277 2104 y Fq(ID)632 b FB(I)605 -b FD(da)m(y)31 b(in)e(y)m(ear)i(\(1)g(=)f(Jan)g(1st\))277 -2217 y Fq(FD)608 b FB(R)567 b FD(fraction)30 b(of)h(da)m(y)0 -2477 y FB(RETURNED)46 b FD(:)277 2649 y Fq(PV)606 b FB(R\(6\))433 -b FD(Earth)30 b([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 b FD(_)-43 -b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 -b FD(])31 b(\(A)m(U,)g(A)m(U)g(s)2947 2615 y Fp(\000)p -Fu(1)3042 2649 y FD(\))0 2917 y FB(NOTES)44 b FD(:)311 -3091 y(1.)i(The)30 b(date)g(and)f(time)h(is)f(TDB)h(\(lo)s(osely)f -(ET\))h(in)e(a)j(Julian)c(calendar)i(whic)m(h)g(has)h(b)s(een)f -(aligned)427 3204 y(to)c(the)f(ordinary)d(Gregorian)j(calendar)f(for)h -(the)g(in)m(terv)-5 b(al)22 b(1900)k(Marc)m(h)e(1)g(to)h(2100)g(F)-8 -b(ebruary)23 b(28.)427 3317 y(The)30 b(y)m(ear)h(and)f(da)m(y)h(can)g -(b)s(e)e(obtained)h(b)m(y)g(calling)f(sla)p Ft(_)p FD(CAL)-8 -b(YD)30 b(or)h(sla)p Ft(_)p FD(CL)-8 b(YD.)311 3450 y(2.)46 -b(The)31 b(Earth)g(helio)s(cen)m(tric)f(6-v)m(ector)k(is)c(referred)g -(to)i(the)g(FK4)g(mean)f(equator)h(and)f(equino)m(x)f(of)427 -3563 y(date.)311 3696 y(3.)46 b(Maxim)m(um/RMS)30 b(errors)g -(1950-2050:)506 3828 y Fo(\017)46 b FD(13/5)32 b Fo(\002)p -FD(10)970 3795 y Fp(\000)p Fu(5)1096 3828 y FD(A)m(U)f(=)f(19200/7600) -35 b(km)30 b(in)f(p)s(osition)506 3951 y Fo(\017)46 b -FD(47/26)33 b Fo(\002)p FD(10)1016 3918 y Fp(\000)p Fu(10)1176 -3951 y FD(A)m(U)f(s)1377 3918 y Fp(\000)p Fu(1)1501 3951 -y FD(=)e(0.0070/0.0039)36 b(km)30 b(s)2373 3918 y Fp(\000)p -Fu(1)2497 3951 y FD(in)f(sp)s(eed)311 4084 y(4.)46 b(More)31 -b(accurate)h(results)d(are)i(obtainable)f(with)f(the)h(routines)f(sla)p -Ft(_)p FD(EVP)h(and)g(sla)p Ft(_)p FD(EPV.)p 0 4168 V -0 4281 a Fx(SLA)p Fn(_)p Fx(ECLEQ)559 b Fm(Ecliptic)37 -b(to)h(Equatorial)555 b Fx(SLA)p Fn(_)p Fx(ECLEQ)0 4631 -y FB(A)m(CTION)44 b FD(:)c(T)-8 b(ransformation)30 b(from)g(ecliptic)f -(longitude)g(and)h(latitude)f(to)i(J2000.0)i([)15 b Fl(\013;)g(\016)20 -b FD(].)0 4818 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_ECLEQ)g(\(DL,) -g(DB,)h(DATE,)g(DR,)f(DD\))0 5115 y FB(GIVEN)f FD(:)277 -5261 y Fq(DL,DB)449 b FB(D)565 b FD(ecliptic)29 b(longitude)g(and)g -(latitude)g(\(mean)h(of)h(date,)f(IA)m(U)1658 5374 y(1980)i(theory)-8 -b(,)32 b(radians\))277 5487 y Fq(D)n(A)-7 b(TE)481 b -FB(D)565 b FD(TDB)68 b(\(formerly)f(ET\))g(as)h(Mo)s(di\014ed)d(Julian) -h(Date)1658 5600 y(\(JD)p Fo(\000)p FD(2400000.5\))p -eop -%%Page: 61 63 -61 62 bop 0 52 a Fw(SUN/67.70)3252 b FD(61)0 351 y FB(RETURNED)46 -b FD(:)277 523 y Fq(DR,DD)435 b FB(D)565 b FD(J2000.0)33 -b(mean)d([)15 b Fl(\013;)g(\016)20 b FD(])31 b(\(radians\))p -0 660 3780 8 v 0 773 a Fx(SLA)p Fn(_)p Fx(ECMA)-11 b(T)441 -b Fm(F)-10 b(orm)38 b Fg(\013)q(;)20 b(\016)37 b Fh(!)c -Fg(\025;)20 b(\014)45 b Fm(Matrix)442 b Fx(SLA)p Fn(_)p -Fx(ECMA)-11 b(T)0 1123 y FB(A)m(CTION)44 b FD(:)c(F)-8 -b(orm)31 b(the)g(equatorial)f(to)h(ecliptic)e(rotation)i(matrix)f(\(IA) -m(U)h(1980)h(theory\).)0 1311 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_ECMAT)g(\(DATE,)g(RMAT\))0 1645 y -FB(GIVEN)f FD(:)277 1791 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 -b FD(TDB)68 b(\(formerly)f(ET\))g(as)h(Mo)s(di\014ed)d(Julian)h(Date) -1658 1904 y(\(JD)p Fo(\000)p FD(2400000.5\))0 2230 y -FB(RETURNED)46 b FD(:)277 2401 y Fq(RMA)-7 b(T)462 b -FB(D\(3,3\))350 b FD(rotation)31 b(matrix)0 2736 y FB(NOTES)44 -b FD(:)311 2919 y(1.)i(RMA)-8 b(T)31 b(is)f(matrix)f -FB(M)i FD(in)e(the)h(expression)g FB(v)2007 2934 y Ff(ecl)2126 -2919 y FD(=)g FB(M)p Fo(\001)p FB(v)2406 2933 y Ff(eq)r(u)2519 -2919 y FD(.)311 3061 y(2.)46 b(The)30 b(equator,)h(equino)m(x)f(and)g -(ecliptic)f(are)i(mean)f(of)h(date.)0 3396 y FB(REFERENCE)44 -b FD(:)d(Murra)m(y)-8 b(,)31 b(C.A.,)g Fq(V)-7 b(e)i(ctorial)33 -b(Astr)-5 b(ometry)p FD(,)33 b(section)d(4.3.)p 0 3517 -V 0 3630 a Fx(SLA)p Fn(_)p Fx(ECOR)505 b Fm(R)-13 b(V)39 -b(&)g(Time)d(Corrns)i(to)g(Sun)505 b Fx(SLA)p Fn(_)p -Fx(ECOR)0 3980 y FB(A)m(CTION)44 b FD(:)39 b(Comp)s(onen)m(t)27 -b(of)g(Earth)g(orbit)g(v)m(elo)s(cit)m(y)g(and)g(helio)s(cen)m(tric)f -(ligh)m(t)h(time)g(in)f(a)h(giv)m(en)h(direction.)0 4168 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_ECOR)g(\(RM,)h(DM,)f(IY,)h -(ID,)g(FD,)g(RV,)g(TL\))0 4502 y FB(GIVEN)e FD(:)277 -4648 y Fq(RM,DM)409 b FB(R)567 b FD(mean)31 b([)15 b -Fl(\013;)g(\016)20 b FD(])30 b(of)h(date)g(\(radians\))277 -4761 y Fq(IY)633 b FB(I)605 b FD(y)m(ear)277 4873 y Fq(ID)632 -b FB(I)605 b FD(da)m(y)31 b(in)e(y)m(ear)i(\(1)g(=)f(Jan)g(1st\))277 -4986 y Fq(FD)608 b FB(R)567 b FD(fraction)30 b(of)h(da)m(y)0 -5312 y FB(RETURNED)46 b FD(:)277 5458 y Fq(R)-9 b(V)611 -b FB(R)567 b FD(comp)s(onen)m(t)31 b(of)f(Earth)g(orbital)g(v)m(elo)s -(cit)m(y)g(\(km)h(s)3340 5425 y Fp(\000)p Fu(1)3434 5458 -y FD(\))277 5571 y Fq(TL)614 b FB(R)567 b FD(comp)s(onen)m(t)31 -b(of)f(helio)s(cen)m(tric)f(ligh)m(t)h(time)g(\(s\))p -eop -%%Page: 62 64 -62 63 bop 0 52 a FD(62)0 351 y FB(NOTES)44 b FD(:)311 -528 y(1.)i(The)30 b(date)g(and)f(time)h(is)f(TDB)h(\(lo)s(osely)f(ET\)) -h(in)e(a)j(Julian)c(calendar)i(whic)m(h)g(has)h(b)s(een)f(aligned)427 -641 y(to)35 b(the)g(ordinary)e(Gregorian)h(calendar)g(for)g(the)h(in)m -(terv)-5 b(al)33 b(1900)k(Marc)m(h)e(1)f(to)i(2100)g(F)-8 -b(ebruary)427 754 y(28.)42 b(The)30 b(y)m(ear)h(and)f(da)m(y)g(can)h(b) -s(e)f(obtained)g(b)m(y)g(calling)f(sla)p Ft(_)p FD(CAL)-8 -b(YD)30 b(or)g(sla)p Ft(_)p FD(CL)-8 b(YD.)311 890 y(2.)46 -b(Sign)29 b(con)m(v)m(en)m(tion:)506 1026 y Fo(\017)46 -b FD(The)30 b(v)m(elo)s(cit)m(y)h(comp)s(onen)m(t)f(is)f(+v)m(e)i(when) -e(the)h(Earth)g(is)g(receding)f(from)h(the)g(giv)m(en)g(p)s(oin)m(t)597 -1138 y(on)h(the)f(sky)-8 b(.)506 1263 y Fo(\017)46 b -FD(The)33 b(ligh)m(t)e(time)i(comp)s(onen)m(t)g(is)f(+v)m(e)h(when)f -(the)h(Earth)f(lies)g(b)s(et)m(w)m(een)h(the)g(Sun)e(and)h(the)597 -1376 y(giv)m(en)f(p)s(oin)m(t)e(on)h(the)h(sky)-8 b(.)311 -1511 y(3.)46 b(Accuracy:)506 1647 y Fo(\017)g FD(The)31 -b(v)m(elo)s(cit)m(y)h(comp)s(onen)m(t)g(is)e(usually)f(within)g(0.004)k -(km)e(s)2705 1614 y Fp(\000)p Fu(1)2831 1647 y FD(of)g(the)h(correct)g -(v)-5 b(alue)31 b(and)597 1760 y(is)f(nev)m(er)g(in)f(error)h(b)m(y)h -(more)f(than)g(0.007)j(km)d(s)2254 1727 y Fp(\000)p Fu(1)2348 -1760 y FD(.)506 1884 y Fo(\017)46 b FD(The)36 b(error)g(in)f(ligh)m(t)h -(time)g(correction)h(is)e(ab)s(out)h(0)2399 1851 y Fu(s)2404 -1884 y Fl(:)p FD(03)i(at)f(w)m(orst,)h(but)e(is)f(usually)f(b)s(etter) -597 1997 y(than)c(0)854 1964 y Fu(s)859 1997 y Fl(:)p -FD(01.)427 2133 y(F)-8 b(or)31 b(applications)e(requiring)f(higher)h -(accuracy)-8 b(,)32 b(see)f(the)g(sla)p Ft(_)p FD(EVP)e(and)h(sla)p -Ft(_)p FD(EPV)f(routines.)p 0 2234 3780 8 v 0 2347 a -Fx(SLA)p Fn(_)p Fx(EG50)669 b Fm(B1950)37 b Fg(\013)q(;)20 -b(\016)43 b Fm(to)38 b(Galactic)667 b Fx(SLA)p Fn(_)p -Fx(EG50)0 2697 y FB(A)m(CTION)44 b FD(:)59 b(T)-8 b(ransformation)38 -b(from)h(B1950.0)k(FK4)d(equatorial)f(co)s(ordinates)g(to)h(IA)m(U)g -(1958)h(galactic)227 2810 y(co)s(ordinates.)0 2998 y -FB(CALL)k FD(:)77 b Ft(CALL)46 b(sla_EG50)g(\(DR,)h(DD,)f(DL,)h(DB\))0 -3306 y FB(GIVEN)e FD(:)277 3477 y Fq(DR,DD)435 b FB(D)565 -b FD(B1950.0)33 b([)15 b Fl(\013;)g(\016)21 b FD(])30 -b(\(radians\))0 3766 y FB(RETURNED)46 b FD(:)277 3937 -y Fq(DL,DB)449 b FB(D)565 b FD(galactic)29 b(longitude)e(and)h -(latitude)f([)15 b Fl(l)2966 3904 y Ff(I)-7 b(I)3030 -3937 y Fl(;)15 b(b)3109 3904 y Ff(I)-7 b(I)3189 3937 -y FD(])28 b(\(radians\))0 4226 y FB(NOTE)44 b FD(:)d(The)30 -b(equatorial)g(co)s(ordinates)h(are)g(B1950.0)i(FK4.)42 -b(Use)30 b(the)h(routine)f(sla)p Ft(_)p FD(EQGAL)f(if)h(con)m(v)m(er-) -227 4339 y(sion)g(from)g(J2000.0)i(FK5)f(co)s(ordinates)f(is)f -(required.)0 4628 y FB(REFERENCE)44 b FD(:)d(Blaau)m(w)30 -b Fq(et)j(al.)p FD(,)e(1960,)h Fq(Mon.Not.R.astr.So)-5 -b(c.)p FD(,)33 b FB(121)p FD(,)e(123.)p 0 4729 V 0 4842 -a Fx(SLA)p Fn(_)p Fx(EL2UE)224 b Fm(Con)m(v)m(en)m(tional)35 -b(to)j(Univ)m(ersal)f(Elemen)m(ts)222 b Fx(SLA)p Fn(_)p -Fx(EL2UE)0 5192 y FB(A)m(CTION)44 b FD(:)c(T)-8 b(ransform)30 -b(con)m(v)m(en)m(tional)h(osculating)f(orbital)f(elemen)m(ts)i(in)m(to) -f(\\univ)m(ersal")g(form.)0 5380 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_EL2UE)g(\(DATE,)g(JFORM,)g(EPOCH,)g(ORBINC,)g -(ANODE,)1192 5493 y(PERIH,)f(AORQ,)i(E,)g(AORL,)f(DM,)1192 -5606 y(U,)h(JSTAT\))p eop -%%Page: 63 65 -63 64 bop 0 52 a Fw(SUN/67.70)3252 b FD(63)0 351 y FB(GIVEN)45 -b FD(:)277 497 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(ep)s(o)s(c)m(h)30 -b(\(TT)g(MJD\))h(of)g(osculation)f(\(Note)i(3\))277 610 -y Fq(JF)n(ORM)413 b FB(I)605 b FD(c)m(hoice)31 b(of)g(elemen)m(t)g(set) -g(\(1-3;)h(Note)f(6\))277 723 y Fq(EPOCH)409 b FB(D)565 -b FD(ep)s(o)s(c)m(h)30 b(of)h(elemen)m(ts)g(\()p Fl(t)2462 -737 y Fu(0)2531 723 y FD(or)g Fl(T)13 b FD(,)30 b(TT)g(MJD\))277 -836 y Fq(ORBINC)368 b FB(D)565 b FD(inclination)28 b(\()p -Fl(i)p FD(,)j(radians\))277 949 y Fq(ANODE)399 b FB(D)565 -b FD(longitude)29 b(of)i(the)f(ascending)g(no)s(de)g(\(\012,)g -(radians\))277 1062 y Fq(PERIH)443 b FB(D)565 b FD(longitude)29 -b(or)i(argumen)m(t)f(of)h(p)s(erihelion)c(\()p Fl($)33 -b FD(or)e Fl(!)s FD(,)1825 1175 y(radians\))277 1288 -y Fq(A)n(OR)n(Q)466 b FB(D)565 b FD(mean)30 b(distance)f(or)g(p)s -(erihelion)d(distance)k(\()p Fl(a)f FD(or)h Fl(q)s FD(,)g(A)m(U\))277 -1401 y Fq(E)674 b FB(D)565 b FD(eccen)m(tricit)m(y)32 -b(\()p Fl(e)p FD(\))277 1514 y Fq(A)n(ORL)477 b FB(D)565 -b FD(mean)31 b(anomaly)f(or)g(longitude)f(\()p Fl(M)41 -b FD(or)30 b Fl(L)p FD(,)h(radians,)1825 1626 y(JF)m(ORM=1,2)g(only\)) -277 1739 y Fq(DM)585 b FB(D)565 b FD(daily)29 b(motion)h(\()p -Fl(n)p FD(,)g(radians,)g(JF)m(ORM=1)h(only\))0 2082 y -FB(RETURNED)46 b FD(:)277 2228 y Fq(U)668 b FB(D\(13\))379 -b FD(univ)m(ersal)29 b(orbital)g(elemen)m(ts)i(\(Note)h(1\))537 -2341 y(\(1\))1006 b(com)m(bined)30 b(mass)g(\()p Fl(M)h -FD(+)20 b Fl(m)p FD(\))537 2454 y(\(2\))1006 b(total)31 -b(energy)g(of)g(the)f(orbit)g(\()p Fl(\013)p FD(\))537 -2567 y(\(3\))1006 b(reference)31 b(\(osculating\))f(ep)s(o)s(c)m(h)h -(\()p Fl(t)2869 2581 y Fu(0)2908 2567 y FD(\))499 2680 -y(\(4-6\))969 b(p)s(osition)29 b(at)i(reference)g(ep)s(o)s(c)m(h)f(\()p -FB(r)2836 2694 y Fu(0)2876 2680 y FD(\))499 2793 y(\(7-9\))969 -b(v)m(elo)s(cit)m(y)31 b(at)g(reference)g(ep)s(o)s(c)m(h)f(\()p -FB(v)2837 2807 y Fu(0)2877 2793 y FD(\))514 2906 y(\(10\))984 -b(helio)s(cen)m(tric)29 b(distance)h(at)h(reference)g(ep)s(o)s(c)m(h) -514 3019 y(\(11\))984 b FB(r)1701 3033 y Fu(0)1741 3019 -y Fl(:)p FB(v)1821 3033 y Fu(0)514 3132 y FD(\(12\))g(date)31 -b(\()p Fl(t)p FD(\))514 3244 y(\(13\))984 b(univ)m(ersal)29 -b(eccen)m(tric)i(anomaly)f(\()p Fl( )s FD(\))i(of)e(date,)i(appro)m(x) -277 3470 y Fq(JST)-7 b(A)g(T)453 b FB(I)605 b FD(status:)1866 -3583 y(0)30 b(=)h(OK)1798 3696 y Fo(\000)p FD(1)f(=)g(illegal)f(JF)m -(ORM)1798 3809 y Fo(\000)p FD(2)h(=)g(illegal)f(E)1798 -3922 y Fo(\000)p FD(3)h(=)g(illegal)f(A)m(OR)m(Q)1798 -4035 y Fo(\000)p FD(4)h(=)g(illegal)f(DM)1798 4148 y -Fo(\000)p FD(5)h(=)g(n)m(umerical)f(error)0 4491 y FB(NOTES)44 -b FD(:)311 4677 y(1.)i(The)40 b(\\univ)m(ersal")f(elemen)m(ts)h(are)g -(those)h(whic)m(h)d(de\014ne)h(the)h(orbit)f(for)h(the)g(purp)s(oses)e -(of)i(the)427 4790 y(metho)s(d)32 b(of)g(univ)m(ersal)e(v)-5 -b(ariables)31 b(\(see)i(reference\).)47 b(They)32 b(consist)f(of)i(the) -f(com)m(bined)f(mass)h(of)427 4903 y(the)h(t)m(w)m(o)h(b)s(o)s(dies,)e -(an)g(ep)s(o)s(c)m(h,)h(and)f(the)h(p)s(osition)e(and)h(v)m(elo)s(cit)m -(y)h(v)m(ectors)h(\(arbitrary)e(reference)427 5016 y(frame\))j(at)g -(that)g(ep)s(o)s(c)m(h.)53 b(The)34 b(parameter)h(set)g(used)f(here)g -(includes)e(also)j(v)-5 b(arious)33 b(quan)m(tities)427 -5128 y(that)i(can,)g(in)d(fact,)k(b)s(e)d(deriv)m(ed)f(from)i(the)f -(other)h(information.)49 b(This)32 b(approac)m(h)i(is)f(tak)m(en)i(to) -427 5241 y(a)m(v)m(oiding)d(unnecessary)f(computation)h(and)g(loss)f -(of)h(accuracy)-8 b(.)48 b(The)31 b(supplemen)m(tary)g(quan)m(ti-)427 -5354 y(ties)22 b(are)h(\(i\))f Fl(\013)p FD(,)i(whic)m(h)d(is)g(prop)s -(ortional)f(to)j(the)g(total)g(energy)f(of)h(the)f(orbit,)h(\(ii\))e -(the)i(helio)s(cen)m(tric)427 5467 y(distance)35 b(at)g(ep)s(o)s(c)m -(h,)h(\(iii\))d(the)i(out)m(w)m(ards)g(comp)s(onen)m(t)g(of)g(the)g(v)m -(elo)s(cit)m(y)g(at)h(the)f(giv)m(en)f(ep)s(o)s(c)m(h,)427 -5580 y(\(iv\))29 b(an)f(estimate)h(of)g Fl( )s FD(,)h(the)e(\\univ)m -(ersal)g(eccen)m(tric)h(anomaly")g(at)g(a)g(giv)m(en)g(date)g(and)f -(\(v\))h(that)427 5693 y(date.)p eop -%%Page: 64 66 -64 65 bop 0 52 a FD(64)311 351 y(2.)46 b(The)25 b(companion)g(routine)f -(is)h(sla)p Ft(_)p FD(UE2PV.)h(This)d(tak)m(es)k(the)f(set)g(of)g(n)m -(um)m(b)s(ers)e(that)i(the)f(presen)m(t)427 464 y(routine)31 -b(outputs)h(and)f(uses)g(them)h(to)h(deriv)m(e)e(the)h(ob)5 -b(ject's)33 b(p)s(osition)d(and)i(v)m(elo)s(cit)m(y)-8 -b(.)46 b(A)32 b(single)427 577 y(prediction)24 b(requires)h(one)h(call) -g(to)g(the)h(presen)m(t)f(routine)f(follo)m(w)m(ed)g(b)m(y)h(one)g -(call)g(to)g(sla)p Ft(_)p FD(UE2PV;)427 690 y(for)41 -b(con)m(v)m(enience,)k(the)c(t)m(w)m(o)h(calls)e(are)h(pac)m(k)-5 -b(aged)43 b(as)e(the)g(routine)f(sla)p Ft(_)p FD(PLANEL.)g(Multiple)427 -803 y(predictions)30 b(ma)m(y)i(b)s(e)f(made)h(b)m(y)g(again)f(calling) -f(the)i(presen)m(t)g(routine)f(once,)i(but)e(then)g(calling)427 -916 y(sla)p Ft(_)p FD(UE2PV)f(m)m(ultiple)e(times,)j(whic)m(h)e(is)g -(faster)i(than)f(m)m(ultiple)e(calls)i(to)h(sla)p Ft(_)p -FD(PLANEL.)311 1067 y(3.)46 b(D)m(A)-8 b(TE)40 b(is)e(the)h(ep)s(o)s(c) -m(h)g(of)g(osculation.)65 b(It)39 b(is)f(in)g(the)h(TT)f(time)g(scale)h -(\(formerly)f(Ephemeris)427 1180 y(Time,)30 b(ET\))g(and)g(is)f(a)i(Mo) -s(di\014ed)e(Julian)f(Date)k(\(JD)p Fo(\000)p FD(2400000.5\).)311 -1332 y(4.)46 b(The)40 b(supplied)e(orbital)h(elemen)m(ts)i(are)h(with)d -(resp)s(ect)i(to)g(the)g(J2000)h(ecliptic)e(and)g(equino)m(x.)427 -1445 y(The)27 b(p)s(osition)f(and)h(v)m(elo)s(cit)m(y)h(parameters)g -(returned)e(in)g(the)i(arra)m(y)g(U)f(are)h(with)f(resp)s(ect)g(to)h -(the)427 1558 y(mean)39 b(equator)f(and)g(equino)m(x)g(of)g(ep)s(o)s(c) -m(h)g(J2000,)k(and)c(are)g(for)g(the)h(p)s(erihelion)c(prior)h(to)j -(the)427 1671 y(sp)s(eci\014ed)29 b(ep)s(o)s(c)m(h.)311 -1822 y(5.)46 b(The)31 b(univ)m(ersal)e(elemen)m(ts)i(returned)f(in)g -(the)h(arra)m(y)h(U)f(are)g(in)f(canonical)h(units)e(\(solar)i(masses,) -427 1935 y(A)m(U)g(and)f(canonical)g(da)m(ys\).)311 2087 -y(6.)46 b(Three)30 b(di\013eren)m(t)g(elemen)m(t-format)i(options)d -(are)i(supp)s(orted,)e(as)h(follo)m(ws.)427 2332 y(JF)m(ORM=1,)h -(suitable)e(for)i(the)f(ma)5 b(jor)30 b(planets:)602 -2534 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(elemen)m(ts)f -Fl(t)1910 2548 y Fu(0)1980 2534 y FD(\(TT)g(MJD\))602 -2647 y(ORBINC)45 b(=)55 b(inclination)27 b Fl(i)k FD(\(radians\))602 -2760 y(ANODE)76 b(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de) -f(\012)h(\(radians\))602 2873 y(PERIH)122 b(=)55 b(longitude)29 -b(of)h(p)s(erihelion)d Fl($)34 b FD(\(radians\))602 2986 -y(A)m(OR)m(Q)143 b(=)55 b(mean)30 b(distance)g Fl(a)h -FD(\(A)m(U\))602 3099 y(E)352 b(=)55 b(eccen)m(tricit)m(y)31 -b Fl(e)g FD(\(0)26 b Fo(\024)f Fl(e)h(<)f FD(1\))602 -3212 y(A)m(ORL)154 b(=)55 b(mean)30 b(longitude)f Fl(L)i -FD(\(radians\))602 3325 y(DM)262 b(=)55 b(daily)29 b(motion)h -Fl(n)g FD(\(radians\))427 3527 y(JF)m(ORM=2,)h(suitable)e(for)i(minor)d -(planets:)602 3730 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 -b(of)h(elemen)m(ts)f Fl(t)1910 3744 y Fu(0)1980 3730 -y FD(\(TT)g(MJD\))602 3843 y(ORBINC)45 b(=)55 b(inclination)27 -b Fl(i)k FD(\(radians\))602 3956 y(ANODE)76 b(=)55 b(longitude)29 -b(of)h(the)h(ascending)f(no)s(de)f(\012)h(\(radians\))602 -4069 y(PERIH)122 b(=)55 b(argumen)m(t)31 b(of)f(p)s(erihelion)d -Fl(!)33 b FD(\(radians\))602 4182 y(A)m(OR)m(Q)143 b(=)55 -b(mean)30 b(distance)g Fl(a)h FD(\(A)m(U\))602 4295 y(E)352 -b(=)55 b(eccen)m(tricit)m(y)31 b Fl(e)g FD(\(0)26 b Fo(\024)f -Fl(e)h(<)f FD(1\))602 4408 y(A)m(ORL)154 b(=)55 b(mean)30 -b(anomaly)h Fl(M)40 b FD(\(radians\))427 4610 y(JF)m(ORM=3,)31 -b(suitable)e(for)i(comets:)602 4813 y(EPOCH)85 b(=)55 -b(ep)s(o)s(c)m(h)30 b(of)h(p)s(erihelion)c Fl(T)43 b -FD(\(TT)30 b(MJD\))602 4926 y(ORBINC)45 b(=)55 b(inclination)27 -b Fl(i)k FD(\(radians\))602 5039 y(ANODE)76 b(=)55 b(longitude)29 -b(of)h(the)h(ascending)f(no)s(de)f(\012)h(\(radians\))602 -5152 y(PERIH)122 b(=)55 b(argumen)m(t)31 b(of)f(p)s(erihelion)d -Fl(!)33 b FD(\(radians\))602 5265 y(A)m(OR)m(Q)143 b(=)55 -b(p)s(erihelion)27 b(distance)j Fl(q)j FD(\(A)m(U\))602 -5377 y(E)352 b(=)55 b(eccen)m(tricit)m(y)31 b Fl(e)g -FD(\(0)26 b Fo(\024)f Fl(e)h Fo(\024)f FD(10\))311 5580 -y(7.)46 b(Un)m(used)36 b(elemen)m(ts)h(\(DM)h(for)f(JF)m(ORM=2,)i(A)m -(ORL)e(and)f(DM)h(for)g(JF)m(ORM=3\))g(are)g(not)g(ac-)427 -5693 y(cessed.)p eop -%%Page: 65 67 -65 66 bop 0 52 a Fw(SUN/67.70)3252 b FD(65)311 351 y(8.)46 -b(The)36 b(algorithm)f(w)m(as)h(originally)e(adapted)i(from)g(the)g -(EPHSLA)f(program)h(of)g(D.)16 b(H.)g(P)-8 b(.)16 b(Jones)427 -464 y(\(priv)-5 b(ate)36 b(comm)m(unication,)h(1996\).)59 -b(The)35 b(metho)s(d)h(is)f(based)g(on)h(Stump\013)7 -b('s)35 b(Univ)m(ersal)f(V)-8 b(ari-)427 577 y(ables.)0 -870 y FB(REFERENCE)44 b FD(:)d(Ev)m(erhart,)31 b(E.)f(&)g(Pitkin,)f -(E.T.,)h(Am.)h(J.)f(Ph)m(ys.)g(51,)i(712,)g(1983.)p 0 -974 3780 8 v 0 1087 a Fx(SLA)p Fn(_)p Fx(EPB)659 b Fm(MJD)40 -b(to)e(Besselian)g(Ep)s(o)s(c)m(h)660 b Fx(SLA)p Fn(_)p -Fx(EPB)0 1437 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ersion)30 -b(of)h(Mo)s(di\014ed)e(Julian)f(Date)k(to)f(Besselian)e(Ep)s(o)s(c)m -(h.)0 1625 y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_EPB)d(\(DATE\))0 -1931 y FB(GIVEN)g FD(:)277 2103 y Fq(D)n(A)-7 b(TE)481 -b FB(D)565 b FD(Mo)s(di\014ed)29 b(Julian)f(Date)k(\(JD)p -Fo(\000)p FD(2400000.5\))0 2396 y FB(RETURNED)46 b FD(:)277 -2568 y Fq(sla)p Ft(_)p Fq(EPB)394 b FB(D)565 b FD(Besselian)30 -b(Ep)s(o)s(c)m(h)0 2861 y FB(REFERENCE)44 b FD(:)d(Liesk)m(e,)31 -b(J.H.,)f(1979,)j Fq(Astr.Astr)-5 b(ophys.)33 b FB(73)p -FD(,)e(282.)p 0 2964 V 0 3077 a Fx(SLA)p Fn(_)p Fx(EPB2D)489 -b Fm(Besselian)38 b(Ep)s(o)s(c)m(h)h(to)f(MJD)491 b Fx(SLA)p -Fn(_)p Fx(EPB2D)0 3427 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ersion)30 -b(of)h(Besselian)f(Ep)s(o)s(c)m(h)f(to)i(Mo)s(di\014ed)e(Julian)f -(Date.)0 3615 y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_EPB2D)d -(\(EPB\))0 3922 y FB(GIVEN)g FD(:)277 4093 y Fq(EPB)548 -b FB(D)565 b FD(Besselian)30 b(Ep)s(o)s(c)m(h)0 4387 -y FB(RETURNED)46 b FD(:)277 4558 y Fq(sla)p Ft(_)p Fq(EPB2D)279 -b FB(D)565 b FD(Mo)s(di\014ed)29 b(Julian)f(Date)k(\(JD)p -Fo(\000)p FD(2400000.5\))0 4851 y FB(REFERENCE)44 b FD(:)d(Liesk)m(e,) -31 b(J.H.,)f(1979.)43 b Fq(Astr.Astr)-5 b(ophys.)33 b -FB(73)p FD(,)e(282.)p 0 4955 V 0 5068 a Fx(SLA)p Fn(_)p -Fx(EPCO)554 b Fm(Con)m(v)m(ert)36 b(Ep)s(o)s(c)m(h)j(to)f(B)h(or)f(J) -555 b Fx(SLA)p Fn(_)p Fx(EPCO)0 5418 y FB(A)m(CTION)44 -b FD(:)c(Con)m(v)m(ert)32 b(an)e(ep)s(o)s(c)m(h)g(to)h(Besselian)f(or)g -(Julian)e(to)j(matc)m(h)h(another)e(one.)0 5606 y FB(CALL)45 -b FD(:)77 b Ft(D)47 b(=)h(sla_EPCO)d(\(K0,)i(K,)g(E\))p -eop -%%Page: 66 68 -66 67 bop 0 52 a FD(66)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(K0)620 b FB(C)569 b FD(form)30 b(of)h(result:)39 -b(`B'=Besselian,)31 b(`J'=Julian)277 610 y Fq(K)666 b -FB(C)569 b FD(form)30 b(of)h(giv)m(en)f(ep)s(o)s(c)m(h:)40 -b(`B')32 b(or)e(`J')277 723 y Fq(E)674 b FB(D)565 b FD(ep)s(o)s(c)m(h)0 -1085 y FB(RETURNED)46 b FD(:)277 1257 y Fq(sla)p Ft(_)p -Fq(EPCO)323 b FB(D)565 b FD(the)31 b(giv)m(en)f(ep)s(o)s(c)m(h)g(con)m -(v)m(erted)i(as)f(necessary)0 1627 y FB(NOTES)44 b FD(:)311 -1818 y(1.)i(The)27 b(result)f(is)h(alw)m(a)m(ys)h(either)e(equal)h(to)h -(or)g(v)m(ery)f(close)h(to)g(the)f(giv)m(en)h(ep)s(o)s(c)m(h)f(E.)g -(The)g(routine)f(is)427 1931 y(required)j(only)g(in)g(applications)f -(where)i(punctilious)c(treatmen)m(t)32 b(of)e(heterogeneous)i(mixtures) -427 2044 y(of)f(star)f(p)s(ositions)f(is)g(necessary)-8 -b(.)311 2192 y(2.)46 b(K0)31 b(and)f(K)g(are)g(not)h(v)-5 -b(alidated.)40 b(They)30 b(are)g(in)m(terpreted)g(as)h(follo)m(ws:)506 -2340 y Fo(\017)46 b FD(If)30 b(K0)h(and)e(K)h(are)h(the)g(same,)g(the)f -(result)g(is)f(E.)506 2470 y Fo(\017)46 b FD(If)30 b(K0)h(is)e(`B')i -(and)f(K)g(isn't,)g(the)g(con)m(v)m(ersion)h(is)e(J)h(to)i(B.)506 -2601 y Fo(\017)46 b FD(In)30 b(all)f(other)i(cases,)g(the)g(con)m(v)m -(ersion)g(is)e(B)i(to)g(J.)p 0 2737 3780 8 v 0 2850 a -Fx(SLA)p Fn(_)p Fx(EPJ)763 b Fm(MJD)40 b(to)e(Julian)g(Ep)s(o)s(c)m(h) -763 b Fx(SLA)p Fn(_)p Fx(EPJ)0 3200 y FB(A)m(CTION)44 -b FD(:)c(Con)m(v)m(ert)32 b(Mo)s(di\014ed)c(Julian)g(Date)k(to)g -(Julian)c(Ep)s(o)s(c)m(h.)0 3388 y FB(CALL)45 b FD(:)77 -b Ft(D)47 b(=)h(sla_EPJ)d(\(DATE\))0 3738 y FB(GIVEN)g -FD(:)277 3910 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(Mo)s(di\014ed)29 -b(Julian)f(Date)k(\(JD)p Fo(\000)p FD(2400000.5\))0 4281 -y FB(RETURNED)46 b FD(:)277 4452 y Fq(sla)p Ft(_)p Fq(EPJ)410 -b FB(D)565 b FD(Julian)28 b(Ep)s(o)s(c)m(h)0 4823 y FB(REFERENCE)44 -b FD(:)d(Liesk)m(e,)31 b(J.H.,)f(1979.)j Fq(Astr.Astr)-5 -b(ophys.)p FD(,)33 b FB(73)p FD(,)e(282.)p 0 4959 V 0 -5072 a Fx(SLA)p Fn(_)p Fx(EPJ2D)593 b Fm(Julian)38 b(Ep)s(o)s(c)m(h)g -(to)h(MJD)594 b Fx(SLA)p Fn(_)p Fx(EPJ2D)0 5422 y FB(A)m(CTION)44 -b FD(:)c(Con)m(v)m(ert)32 b(Julian)c(Ep)s(o)s(c)m(h)h(to)i(Mo)s -(di\014ed)e(Julian)f(Date.)0 5610 y FB(CALL)45 b FD(:)77 -b Ft(D)47 b(=)h(sla_EPJ2D)d(\(EPJ\))p eop -%%Page: 67 69 -67 68 bop 0 52 a Fw(SUN/67.70)3252 b FD(67)0 351 y FB(GIVEN)45 -b FD(:)277 523 y Fq(EPJ)564 b FB(D)h FD(Julian)28 b(Ep)s(o)s(c)m(h)0 -944 y FB(RETURNED)46 b FD(:)277 1115 y Fq(sla)p Ft(_)p -Fq(EPJ2D)295 b FB(D)565 b FD(Mo)s(di\014ed)29 b(Julian)f(Date)k(\(JD)p -Fo(\000)p FD(2400000.5\))0 1536 y FB(REFERENCE)44 b FD(:)d(Liesk)m(e,) -31 b(J.H.,)f(1979.)j Fq(Astr.Astr)-5 b(ophys.)p FD(,)33 -b FB(73)p FD(,)e(282.)p 0 1692 3780 8 v 0 1805 a Fx(SLA)p -Fn(_)p Fx(EPV)205 b Fm(Earth)37 b(P)m(osition)f(&)j(V)-10 -b(elo)s(cit)m(y)37 b(\(high)h(accuracy\))204 b Fx(SLA)p -Fn(_)p Fx(EPV)0 2156 y FB(A)m(CTION)44 b FD(:)71 b(Earth)45 -b(p)s(osition)f(and)h(v)m(elo)s(cit)m(y)-8 b(,)50 b(helio)s(cen)m(tric) -45 b(and)g(barycen)m(tric,)k(with)44 b(resp)s(ect)i(to)g(the)227 -2268 y(Barycen)m(tric)31 b(Celestial)f(Reference)h(System.)0 -2456 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_EPV)g(\(DATE,)g(PH,)h -(VH,)g(PB,)g(VB\))0 2841 y FB(GIVEN)e FD(:)277 3013 y -Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(TDB)31 b(Mo)s(di\014ed)e(Julian)f -(Date)k(\(Note)g(1\))0 3434 y FB(RETURNED)46 b FD(:)277 -3580 y Fq(PH)606 b FB(D\(3\))431 b FD(helio)s(cen)m(tric)29 -b([)15 b Fl(x;)g(y)s(;)g(z)21 b FD(],)30 b(A)m(U)277 -3692 y Fq(VH)600 b FB(D\(3\))431 b FD(helio)s(cen)m(tric)29 -b([)j(_)-42 b Fl(x)q(;)31 b FD(_)-41 b Fl(y)s(;)31 b -FD(_)-41 b Fl(z)20 b FD(],)30 b(A)m(U)i(d)2722 3659 y -Fp(\000)p Fu(1)277 3805 y Fq(PB)610 b FB(D\(3\))431 b -FD(barycen)m(tric)30 b([)15 b Fl(x;)g(y)s(;)g(z)21 b -FD(],)31 b(A)m(U)277 3918 y Fq(VB)604 b FB(D\(3\))431 -b FD(barycen)m(tric)30 b([)i(_)-42 b Fl(x)q(;)32 b FD(_)-42 -b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 b FD(],)31 b(A)m(U)g(d)2712 -3885 y Fp(\000)p Fu(1)0 4331 y FB(NOTES)44 b FD(:)311 -4542 y(1.)i(The)39 b(date)g(is)f(TDB)h(as)g(MJD)h(\(=JD)p -Fo(\000)p FD(2400000.5\).)70 b(TT)38 b(can)h(b)s(e)f(used)g(instead)g -(of)i(TDB)f(in)427 4655 y(most)31 b(applications.)311 -4813 y(2.)46 b(The)29 b(v)m(ectors)i(are)e(with)f(resp)s(ect)i(to)g -(the)f(Barycen)m(tric)h(Celestial)e(Reference)i(System)f(\(BCRS\).)427 -4926 y(P)m(ositions)h(are)h(in)e(A)m(U;)i(v)m(elo)s(cities)f(are)h(in)e -(A)m(U)i(p)s(er)e(TDB)i(da)m(y)-8 b(.)311 5083 y(3.)46 -b(The)22 b(routine)g(is)f(a)i Fq(simpli\014e)-5 b(d)27 -b(solution)k FD(from)22 b(the)g(planetary)g(theory)h(VSOP2000)h(\(X.)16 -b(Moisson,)427 5196 y(P)-8 b(.)16 b(Bretagnon,)37 b(2001,)g(Celes.)52 -b(Mec)m(hanics)34 b(&)g(Dyn.)53 b(Astron.,)35 b FB(80)p -FD(,)h(3/4,)h(205-213\))h(and)33 b(is)h(an)427 5309 y(adaptation)23 -b(of)f(original)f(F)-8 b(ortran)23 b(co)s(de)f(supplied)d(b)m(y)k(P)-8 -b(.)15 b(Bretagnon)24 b(\(priv)-5 b(ate)22 b(comm)m(unication,)427 -5422 y(2000\).)311 5580 y(4.)46 b(Comparisons)27 b(o)m(v)m(er)j(the)f -(time)f(span)g(1900-2100)33 b(with)27 b(this)g(simpli\014ed)e(solution) -i(and)h(the)h(JPL)427 5693 y(DE405)j(ephemeris)d(giv)m(e)i(the)g(follo) -m(wing)e(results:)p eop -%%Page: 68 70 -68 69 bop 0 52 a FD(68)1543 351 y(RMS)118 b(max)602 464 -y(Helio)s(cen)m(tric:)753 577 y(p)s(osition)28 b(error)251 -b(3.7)204 b(11.2)i(km)753 690 y(v)m(elo)s(cit)m(y)31 -b(error)261 b(1.4)234 b(5.0)221 b(mm/s)602 803 y(Barycen)m(tric:)753 -916 y(p)s(osition)28 b(error)251 b(4.6)204 b(13.4)i(km)753 -1029 y(v)m(elo)s(cit)m(y)31 b(error)261 b(1.4)234 b(4.9)221 -b(mm/s)427 1190 y(The)30 b(results)f(deteriorate)i(outside)f(this)f -(time)h(span.)311 1331 y(5.)46 b(The)27 b(routine)f(sla)p -Ft(_)p FD(EVP)g(is)h(faster)g(but)g(less)f(accurate.)41 -b(The)27 b(presen)m(t)g(routine)f(targets)j(the)e(case)427 -1444 y(where)34 b(high)e(accuracy)j(is)e(more)h(imp)s(ortan)m(t)g(than) -f(CPU)h(time,)h(y)m(et)g(the)f(extra)g(complication)427 -1557 y(of)d(reading)e(a)i(pre-computed)f(ephemeris)f(is)g(not)i -(justi\014ed.)p 0 1674 3780 8 v 0 1787 a Fx(SLA)p Fn(_)p -Fx(EQECL)569 b Fm(J2000)37 b Fg(\013)q(;)20 b(\016)43 -b Fm(to)c(Ecliptic)567 b Fx(SLA)p Fn(_)p Fx(EQECL)0 2137 -y FB(A)m(CTION)44 b FD(:)c(T)-8 b(ransformation)28 b(from)g(J2000.0)j -(equatorial)d(co)s(ordinates)h(to)h(ecliptic)d(longitude)h(and)g(lati-) -227 2250 y(tude.)0 2438 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_EQECL)g(\(DR,)g(DD,)h(DATE,)g(DL,)f(DB\))0 2767 -y FB(GIVEN)f FD(:)277 2913 y Fq(DR,DD)435 b FB(D)565 -b FD(J2000.0)33 b(mean)d([)15 b Fl(\013;)g(\016)20 b -FD(])31 b(\(radians\))277 3026 y Fq(D)n(A)-7 b(TE)481 -b FB(D)565 b FD(TDB)68 b(\(formerly)f(ET\))g(as)h(Mo)s(di\014ed)d -(Julian)h(Date)1658 3139 y(\(JD)p Fo(\000)p FD(2400000.5\))0 -3456 y FB(RETURNED)46 b FD(:)277 3602 y Fq(DL,DB)449 -b FB(D)565 b FD(ecliptic)29 b(longitude)g(and)g(latitude)g(\(mean)h(of) -h(date,)f(IA)m(U)1658 3715 y(1980)i(theory)-8 b(,)32 -b(radians\))p 0 3848 V 0 3961 a Fx(SLA)p Fn(_)p Fx(EQEQX)410 -b Fm(Equation)36 b(of)j(the)f(Equino)m(xes)410 b Fx(SLA)p -Fn(_)p Fx(EQEQX)0 4311 y FB(A)m(CTION)44 b FD(:)c(Equation)30 -b(of)h(the)f(equino)m(xes)g(\(IA)m(U)i(1994\).)0 4499 -y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_EQEQX)d(\(DATE\))0 -4828 y FB(GIVEN)g FD(:)277 4974 y Fq(D)n(A)-7 b(TE)481 -b FB(D)565 b FD(TDB)68 b(\(formerly)f(ET\))g(as)h(Mo)s(di\014ed)d -(Julian)h(Date)1658 5087 y(\(JD)p Fo(\000)p FD(2400000.5\))0 -5404 y FB(RETURNED)46 b FD(:)277 5575 y Fq(sla)p Ft(_)p -Fq(EQEQX)250 b FB(D)565 b FD(The)30 b(equation)g(of)h(the)f(equino)m -(xes)g(\(radians\))p eop -%%Page: 69 71 -69 70 bop 0 52 a Fw(SUN/67.70)3252 b FD(69)0 351 y FB(NOTES)44 -b FD(:)311 533 y(1.)i(The)36 b(equation)f(of)i(the)f(equino)m(xes)f(is) -g(de\014ned)g(here)h(as)g(GAST)f Fo(\000)h FD(GMST:)g(it)f(is)g(added)g -(to)i(a)427 646 y Fq(me)-5 b(an)39 b FD(sidereal)29 b(time)h(to)h(giv)m -(e)g(the)f Fq(app)-5 b(ar)g(ent)42 b FD(sidereal)29 b(time.)311 -787 y(2.)46 b(The)25 b(c)m(hange)i(from)e(the)g(classic)g(\\textb)s(o)s -(ok")i(expression)d(\001)p Fl( )18 b(cos)d(\017)26 b -FD(o)s(ccurred)e(with)h(IA)m(U)h(Reso-)427 900 y(lution)g(C7,)i -(Recommendation)g(3)g(\(1994\).)42 b(The)27 b(new)g(form)m(ulation)f -(tak)m(es)j(in)m(to)e(accoun)m(t)i(cross-)427 1013 y(terms)37 -b(b)s(et)m(w)m(een)h(the)f(v)-5 b(arious)36 b(precession)h(and)f(n)m -(utation)h(quan)m(tities,)h(amoun)m(ting)f(to)h(ab)s(out)427 -1125 y(3)c(milliarcsec.)48 b(The)33 b(transition)f(from)h(the)h(old)e -(to)j(the)e(new)g(mo)s(del)g(o\016cially)f(to)s(ok)i(place)g(on)427 -1238 y(1997)e(F)-8 b(ebruary)31 b(27.)0 1561 y FB(REFERENCE)44 -b FD(:)d(Capitaine,)29 b(N.)i(&)f(Gon)m(tier,)h(A.-M.)g(\(1993\),)j -Fq(Astr)-5 b(on.)42 b(Astr)-5 b(ophys.)p FD(,)33 b FB(275)p -FD(,)f(645-650.)p 0 1682 3780 8 v 0 1795 a Fx(SLA)p Fn(_)p -Fx(EQGAL)530 b Fm(J2000)38 b Fg(\013)q(;)20 b(\016)43 -b Fm(to)38 b(Galactic)530 b Fx(SLA)p Fn(_)p Fx(EQGAL)0 -2145 y FB(A)m(CTION)44 b FD(:)62 b(T)-8 b(ransformation)40 -b(from)h(J2000.0)i(FK5)f(equatorial)e(co)s(ordinates)h(to)h(IA)m(U)g -(1958)g(galactic)227 2258 y(co)s(ordinates.)0 2446 y -FB(CALL)j FD(:)77 b Ft(CALL)46 b(sla_EQGAL)g(\(DR,)g(DD,)h(DL,)g(DB\))0 -2773 y FB(GIVEN)e FD(:)277 2945 y Fq(DR,DD)435 b FB(D)565 -b FD(J2000.0)33 b([)15 b Fl(\013;)g(\016)20 b FD(])31 -b(\(radians\))0 3268 y FB(RETURNED)46 b FD(:)277 3439 -y Fq(DL,DB)449 b FB(D)565 b FD(galactic)29 b(longitude)e(and)h -(latitude)f([)15 b Fl(l)2966 3406 y Ff(I)-7 b(I)3030 -3439 y Fl(;)15 b(b)3109 3406 y Ff(I)-7 b(I)3189 3439 -y FD(])28 b(\(radians\))0 3762 y FB(NOTE)44 b FD(:)d(The)29 -b(equatorial)h(co)s(ordinates)g(are)h(J2000.0)h(FK5.)41 -b(Use)31 b(the)f(routine)f(sla)p Ft(_)p FD(EG50)i(if)e(con)m(v)m -(ersion)227 3875 y(from)h(B1950.0)j(FK4)e(co)s(ordinates)f(is)g -(required.)0 4198 y FB(REFERENCE)44 b FD(:)d(Blaau)m(w)30 -b Fq(et)j(al.)p FD(,)e(1960,)h Fq(Mon.Not.R.astr.So)-5 -b(c.)p FD(,)33 b FB(121)p FD(,)e(123.)p 0 4314 V 0 4427 -a Fx(SLA)p Fn(_)p Fx(ETRMS)516 b Fm(E-terms)37 b(of)h(Ab)s(erration)515 -b Fx(SLA)p Fn(_)p Fx(ETRMS)0 4777 y FB(A)m(CTION)44 b -FD(:)39 b(Compute)26 b(the)h(E-terms)h(v)m(ector)g({)f(the)h(part)e(of) -i(the)f(ann)m(ual)f(ab)s(erration)g(whic)m(h)g(arises)g(from)227 -4890 y(the)31 b(eccen)m(tricit)m(y)g(of)g(the)g(Earth's)f(orbit.)0 -5078 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_ETRMS)g(\(EP,)g(EV\))0 -5405 y FB(GIVEN)f FD(:)277 5576 y Fq(EP)612 b FB(D)565 -b FD(Besselian)30 b(ep)s(o)s(c)m(h)p eop -%%Page: 70 72 -70 71 bop 0 52 a FD(70)0 351 y FB(RETURNED)46 b FD(:)277 -523 y Fq(EV)606 b FB(D\(3\))431 b FD(E-terms)31 b(as)f([\001)p -Fl(x;)15 b FD(\001)p Fl(y)s(;)g FD(\001)p Fl(z)20 b FD(])0 -845 y FB(NOTE)44 b FD(:)g(Note)33 b(the)f(use)g(of)g(the)g(J2000)i(ab)s -(erration)d(constan)m(t)i(\(20)2410 808 y Fk(0)m(0)2414 -845 y Fl(:)p FD(49552\).)49 b(This)30 b(is)h(a)h(re\015ection)g(of)g -(the)227 958 y(fact)g(that)g(the)f(E-terms)g(em)m(b)s(o)s(died)e(in)h -(existing)g(star)h(catalogues)h(w)m(ere)g(computed)e(from)h(a)g(v)-5 -b(ariet)m(y)227 1071 y(of)30 b(ab)s(erration)f(constan)m(ts.)42 -b(Rather)30 b(than)f(adopting)g(one)h(of)g(the)g(old)f(constan)m(ts)i -(the)f(latest)g(v)-5 b(alue)29 b(is)227 1184 y(used)h(here.)0 -1506 y FB(REFERENCES)44 b FD(:)311 1688 y(1.)i(Smith,)29 -b(C.A.)i Fq(et)h(al.)p FD(,)g(1989.)42 b Fq(Astr.J.)30 -b FB(97)p FD(,)h(265.)311 1828 y(2.)46 b(Y)-8 b(allop,)30 -b(B.D.)i Fq(et)h(al.)p FD(,)e(1989.)42 b Fq(Astr.J.)30 -b FB(97)p FD(,)h(274.)p 0 1944 3780 8 v 0 2057 a Fx(SLA)p -Fn(_)p Fx(EULER)204 b Fm(Rotation)36 b(Matrix)h(from)g(Euler)h(Angles) -203 b Fx(SLA)p Fn(_)p Fx(EULER)0 2407 y FB(A)m(CTION)44 -b FD(:)k(F)-8 b(orm)35 b(a)f(rotation)h(matrix)e(from)h(the)g(Euler)f -(angles)h({)h(three)f(successiv)m(e)g(rotations)h(ab)s(out)227 -2520 y(sp)s(eci\014ed)29 b(Cartesian)h(axes)h(\(single)e(precision\).)0 -2708 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_EULER)g(\(ORDER,)f(PHI,) -i(THETA,)f(PSI,)h(RMAT\))0 3035 y FB(GIVEN)e FD(:)277 -3181 y Fq(ORDER)403 b FB(C*\(*\))383 b FD(sp)s(eci\014es)29 -b(ab)s(out)h(whic)m(h)f(axes)i(the)g(rotations)g(o)s(ccur)277 -3294 y Fq(PHI)571 b FB(R)c FD(1st)31 b(rotation)g(\(radians\))277 -3406 y Fq(THET)-7 b(A)415 b FB(R)567 b FD(2nd)30 b(rotation)h -(\(radians\))277 3519 y Fq(PSI)588 b FB(R)567 b FD(3rd)30 -b(rotation)h(\(radians\))0 3833 y FB(RETURNED)46 b FD(:)277 -4005 y Fq(RMA)-7 b(T)462 b FB(R\(3,3\))352 b FD(rotation)31 -b(matrix)0 4327 y FB(NOTES)44 b FD(:)311 4509 y(1.)i(A)30 -b(rotation)h(is)e(p)s(ositiv)m(e)f(when)h(the)h(reference)h(frame)f -(rotates)h(an)m(ticlo)s(c)m(kwise)e(as)i(seen)f(lo)s(oking)427 -4622 y(to)m(w)m(ards)h(the)g(origin)e(from)h(the)g(p)s(ositiv)m(e)g -(region)g(of)g(the)h(sp)s(eci\014ed)d(axis.)311 4762 -y(2.)46 b(The)25 b(c)m(haracters)i(of)e(ORDER)g(de\014ne)g(whic)m(h)f -(axes)i(the)f(three)h(successiv)m(e)f(rotations)h(are)f(ab)s(out.)427 -4875 y(A)40 b(t)m(ypical)e(v)-5 b(alue)39 b(is)f(`ZXZ',)h(indicating)e -(that)j(RMA)-8 b(T)40 b(is)e(to)i(b)s(ecome)f(the)h(direction)e(cosine) -427 4988 y(matrix)29 b(corresp)s(onding)f(to)j(rotations)f(of)g(the)g -(reference)g(frame)g(through)f(PHI)g(radians)g(ab)s(out)427 -5101 y(the)21 b(old)e Fq(z)p FD(-axis,)k(follo)m(w)m(ed)d(b)m(y)g(THET) --8 b(A)20 b(radians)f(ab)s(out)h(the)h(resulting)d Fq(x)p -FD(-axis,)k(then)e(PSI)g(radians)427 5214 y(ab)s(out)30 -b(the)h(resulting)d Fq(z)p FD(-axis.)41 b(In)30 b(detail:)506 -5354 y Fo(\017)46 b FD(The)30 b(axis)g(names)h(can)g(b)s(e)f(an)m(y)h -(of)g(the)f(follo)m(wing,)g(in)f(an)m(y)i(order)f(or)h(com)m(bination:) -40 b(X,)31 b(Y,)597 5467 y(Z,)f(upp)s(ercase)f(or)g(lo)m(w)m(ercase,)j -(1,)e(2,)h(3.)41 b(Normal)29 b(axis)g(lab)s(elling/n)m(um)m(b)s(ering)c -(con)m(v)m(en)m(tions)597 5580 y(apply;)43 b(the)d Fq(xyz)g -FD(\()p Fo(\021)g FD(123\))h(triad)e(is)g(righ)m(t-handed.)66 -b(Th)m(us,)41 b(the)f(`ZXZ')f(example)g(giv)m(en)597 -5693 y(ab)s(o)m(v)m(e)32 b(could)d(b)s(e)h(written)f(`zxz')j(or)e -(`313')j(\(or)d(ev)m(en)h(`ZxZ')f(or)h(`3xZ'\).)p eop -%%Page: 71 73 -71 72 bop 0 52 a Fw(SUN/67.70)3252 b FD(71)506 351 y -Fo(\017)46 b FD(ORDER)30 b(is)g(terminated)g(b)m(y)g(length)g(or)g(b)m -(y)g(the)h(\014rst)f(unrecognized)f(c)m(haracter.)506 -480 y Fo(\017)46 b FD(F)-8 b(ew)m(er)23 b(than)e(three)g(rotations)h -(are)f(acceptable,)k(in)20 b(whic)m(h)g(case)i(the)g(later)f(angle)g -(argumen)m(ts)597 593 y(are)31 b(ignored.)311 736 y(3.)46 -b(Zero)31 b(rotations)f(pro)s(duces)f(the)i(iden)m(tit)m(y)f(RMA)-8 -b(T.)p 0 862 3780 8 v 0 975 a Fx(SLA)p Fn(_)p Fx(EVP)623 -b Fm(Earth)37 b(P)m(osition)f(&)j(V)-10 b(elo)s(cit)m(y)622 -b Fx(SLA)p Fn(_)p Fx(EVP)0 1325 y FB(A)m(CTION)44 b FD(:)c(Barycen)m -(tric)32 b(and)d(helio)s(cen)m(tric)g(v)m(elo)s(cit)m(y)i(and)f(p)s -(osition)f(of)h(the)h(Earth.)0 1513 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_EVP)g(\(DATE,)g(DEQX,)h(DVB,)f(DPB,)h(DVH,)g(DPH\))0 -1853 y FB(GIVEN)e FD(:)277 2000 y Fq(D)n(A)-7 b(TE)481 -b FB(D)565 b FD(TDB)52 b(\(formerly)e(ET\))h(as)h(a)g(Mo)s(di\014ed)e -(Julian)f(Date)1658 2112 y(\(JD)p Fo(\000)p FD(2400000.5\))277 -2225 y Fq(DEQX)467 b FB(D)565 b FD(Julian)36 b(Ep)s(o)s(c)m(h)h(\()p -Fq(e.g.)h FD(2000D0\))j(of)d(mean)g(equator)h(and)1658 -2338 y(equino)m(x)j(of)h(the)g(v)m(ectors)i(returned.)77 -b(If)42 b(DEQX)h Fl(<)i FD(0,)1658 2451 y(all)c(v)m(ectors)h(are)g -(referred)f(to)h(the)g(mean)g(equator)g(and)1658 2564 -y(equino)m(x)30 b(\(FK5\))i(of)e(date)h(D)m(A)-8 b(TE.)0 -2902 y FB(RETURNED)46 b FD(:)277 3048 y Fq(D)n(VB)537 -b FB(D\(3\))431 b FD(barycen)m(tric)30 b([)i(_)-42 b -Fl(x)q(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 -b FD(],)31 b(A)m(U)g(s)2697 3015 y Fp(\000)p Fu(1)277 -3161 y Fq(DPB)541 b FB(D\(3\))431 b FD(barycen)m(tric)30 -b([)15 b Fl(x;)g(y)s(;)g(z)21 b FD(],)31 b(A)m(U)277 -3273 y Fq(D)n(VH)533 b FB(D\(3\))431 b FD(helio)s(cen)m(tric)29 -b([)j(_)-42 b Fl(x)q(;)31 b FD(_)-41 b Fl(y)s(;)31 b -FD(_)-41 b Fl(z)20 b FD(],)30 b(A)m(U)i(s)2707 3240 y -Fp(\000)p Fu(1)277 3386 y Fq(DPH)537 b FB(D\(3\))431 -b FD(helio)s(cen)m(tric)29 b([)15 b Fl(x;)g(y)s(;)g(z)21 -b FD(],)30 b(A)m(U)0 3724 y FB(NOTES)44 b FD(:)311 3909 -y(1.)i(This)24 b(routine)g(is)g(accurate)i(enough)f(for)g(man)m(y)g -(purp)s(oses)f(but)g(faster)i(and)e(more)h(compact)i(than)427 -4022 y(the)36 b(sla)p Ft(_)p FD(EPV)e(routine.)53 b(The)35 -b(maxim)m(um)f(deviations)g(from)h(the)g(JPL)f(DE96)i(ephemeris)e(are) -427 4135 y(as)d(follo)m(ws:)506 4279 y Fo(\017)46 b FD(v)m(elo)s(cit)m -(y)31 b(\(barycen)m(tric)g(or)f(helio)s(cen)m(tric\):)40 -b(420)32 b(mm)d(s)2495 4246 y Fp(\000)p Fu(1)506 4407 -y Fo(\017)46 b FD(p)s(osition)29 b(\(barycen)m(tric\):)41 -b(6900)32 b(km)506 4536 y Fo(\017)46 b FD(p)s(osition)29 -b(\(helio)s(cen)m(tric\):)40 b(1600)32 b(km)311 4679 -y(2.)46 b(The)41 b(routine)g(is)f(adapted)i(from)f(the)g(BAR)-10 -b(VEL)42 b(and)f(BAR)m(COR)g(subroutines)e(of)j(Stump\013)427 -4792 y(\(1980\).)i(Most)31 b(of)g(the)g(c)m(hanges)g(are)g(merely)f -(cosmetic)i(and)e(do)g(not)h(a\013ect)h(the)f(results)e(at)i(all.)427 -4905 y(Ho)m(w)m(ev)m(er,)d(some)c(adjustmen)m(ts)g(ha)m(v)m(e)h(b)s -(een)e(made)h(so)g(as)g(to)g(giv)m(e)h(results)d(that)j(refer)e(to)i -(the)f(IA)m(U)427 5018 y(1976)k(`FK5')f(equino)m(x)f(and)f(precession,) -i(although)e(the)h(di\013erences)g(these)g(c)m(hanges)h(mak)m(e)h -(rela-)427 5131 y(tiv)m(e)e(to)g(the)g(results)e(from)h(Stump\013)7 -b('s)24 b(original)g(`FK4')i(v)m(ersion)f(are)h(smaller)e(than)h(the)h -(inheren)m(t)427 5244 y(accuracy)34 b(of)e(the)g(algorithm.)46 -b(One)32 b(minor)e(shortcoming)i(in)f(the)h(original)f(routines)g(that) -i(has)427 5357 y FB(not)27 b FD(b)s(een)e(corrected)j(is)d(that)i -(sligh)m(tly)e(b)s(etter)i(n)m(umerical)e(accuracy)i(could)f(b)s(e)g -(ac)m(hiev)m(ed)h(if)e(the)427 5470 y(v)-5 b(arious)32 -b(p)s(olynomial)e(ev)-5 b(aluations)32 b(w)m(ere)h(to)g(b)s(e)f(so)h -(arranged)g(that)g(the)g(smallest)e(terms)i(w)m(ere)427 -5583 y(computed)d(\014rst.)p eop -%%Page: 72 74 -72 73 bop 0 52 a FD(72)0 351 y FB(REFERENCE)44 b FD(:)d(Stump\013,)29 -b(P)-8 b(.,)31 b(1980.,)i Fq(Astr)-5 b(on.Astr)g(ophys.Suppl.Ser.)34 -b FB(41)p FD(,)e(1-8.)p 0 490 3780 8 v 0 603 a Fx(SLA)p -Fn(_)p Fx(FITXY)209 b Fm(Fit)38 b(Linear)g(Mo)s(del)g(to)h(Tw)m(o)e([) -20 b Fg(x;)g(y)j Fm(])38 b(Sets)212 b Fx(SLA)p Fn(_)p -Fx(FITXY)0 953 y FB(A)m(CTION)44 b FD(:)c(Fit)31 b(a)f(linear)f(mo)s -(del)g(to)j(relate)e(t)m(w)m(o)i(sets)f(of)f([)15 b Fl(x;)g(y)k -FD(])31 b(co)s(ordinates.)0 1141 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_FITXY)g(\(ITYPE,)f(NP,)i(XYE,)g(XYM,)g(COEFFS,)e -(J\))0 1500 y FB(GIVEN)g FD(:)277 1646 y Fq(ITYPE)444 -b FB(I)605 b FD(t)m(yp)s(e)31 b(of)f(mo)s(del:)40 b(4)31 -b(or)f(6)h(\(note)g(1\))277 1759 y Fq(NP)606 b FB(I)f -FD(n)m(um)m(b)s(er)29 b(of)i(samples)e(\(note)j(2\))277 -1872 y Fq(XYE)538 b FB(D\(2,NP\))249 b FD(exp)s(ected)31 -b([)15 b Fl(x;)g(y)k FD(])30 b(for)g(eac)m(h)i(sample)277 -1985 y Fq(XYM)518 b FB(D\(2,NP\))249 b FD(measured)30 -b([)15 b Fl(x;)g(y)k FD(])30 b(for)g(eac)m(h)i(sample)0 -2354 y FB(RETURNED)46 b FD(:)277 2500 y Fq(COEFFS)370 -b FB(D\(6\))431 b FD(co)s(e\016cien)m(ts)31 b(of)g(mo)s(del)e(\(note)i -(3\))277 2613 y Fq(J)688 b FB(I)605 b FD(status:)1825 -2726 y(0)31 b(=)f(OK)1752 2839 y Fo(\000)p FD(1)h(=)f(illegal)e(ITYPE) -1752 2952 y Fo(\000)p FD(2)j(=)f(insu\016cien)m(t)e(data)1752 -3065 y Fo(\000)p FD(3)j(=)f(singular)e(solution)0 3434 -y FB(NOTES)44 b FD(:)311 3628 y(1.)i(ITYPE,)32 b(whic)m(h)f(m)m(ust)i -(b)s(e)f(either)g(4)g(or)h(6,)g(selects)g(the)g(t)m(yp)s(e)g(of)f(mo)s -(del)f(\014tted.)48 b(Both)33 b(allo)m(w)m(ed)427 3741 -y(ITYPE)j(v)-5 b(alues)35 b(pro)s(duce)g(a)h(mo)s(del)f(COEFFS)g(whic)m -(h)f(consists)i(of)g(six)f(co)s(e\016cien)m(ts,)j(namely)427 -3854 y(the)k(zero)g(p)s(oin)m(ts)e(and,)j(for)e(eac)m(h)h(of)g(XE)f -(and)g(YE,)g(the)g(co)s(e\016cien)m(t)h(of)g(XM)f(and)g(YM.)h(F)-8 -b(or)427 3967 y(ITYPE=6,)39 b(all)d(six)g(co)s(e\016cien)m(ts)i(are)g -(indep)s(enden)m(t,)f(mo)s(delling)d(squash)i(and)h(shear)g(as)g(w)m -(ell)427 4080 y(as)d(origin,)f(scale,)i(and)e(orien)m(tation.)50 -b(Ho)m(w)m(ev)m(er,)37 b(ITYPE=4)c(selects)h(the)f Fq(solid)k(b)-5 -b(o)g(dy)37 b(r)-5 b(otation)427 4193 y FD(option;)41 -b(the)d(mo)s(del)e(COEFFS)h(still)e(consists)i(of)h(the)f(same)h(six)f -(co)s(e\016cien)m(ts,)j(but)d(no)m(w)g(t)m(w)m(o)427 -4306 y(of)32 b(them)f(are)g(used)f(t)m(wice)i(\(appropriately)e -(signed\).)42 b(Origin,)29 b(scale)i(and)g(orien)m(tation)g(are)h -(still)427 4419 y(mo)s(delled,)d(but)h(not)g(squash)g(or)g(shear)g({)h -(the)f(units)f(of)i(X)f(and)g(Y)h(ha)m(v)m(e)g(to)g(b)s(e)f(the)h -(same.)311 4568 y(2.)46 b(F)-8 b(or)31 b(NC=4,)g(NP)f(m)m(ust)h(b)s(e)e -(at)i(least)g(2.)41 b(F)-8 b(or)31 b(NC=6,)g(NP)f(m)m(ust)g(b)s(e)g(at) -h(least)g(3.)311 4717 y(3.)46 b(The)33 b(mo)s(del)e(is)h(returned)g(in) -f(the)i(arra)m(y)g(COEFFS.)g(Naming)f(the)h(six)f(elemen)m(ts)h(of)g -(COEFFS)427 4830 y Fl(a;)15 b(b;)g(c;)g(d;)g(e)43 b FD(&)d -Fl(f)10 b FD(,)42 b(the)e(mo)s(del)f(transforms)g Fq(me)-5 -b(asur)g(e)g(d)52 b FD(co)s(ordinates)40 b([)p Fl(x)2968 -4844 y Ff(m)3035 4830 y Fl(;)15 b(y)3120 4844 y Ff(m)3201 -4830 y FD(])41 b(in)m(to)f Fq(exp)-5 b(e)g(cte)g(d)427 -4943 y FD(co)s(ordinates)30 b([)p Fl(x)987 4957 y Ff(e)1024 -4943 y Fl(;)15 b(y)1109 4957 y Ff(e)1161 4943 y FD(])31 -b(as)g(follo)m(ws:)597 5092 y Fl(x)649 5106 y Ff(e)711 -5092 y FD(=)25 b Fl(a)c FD(+)e Fl(bx)1057 5106 y Ff(m)1144 -5092 y FD(+)h Fl(cy)1319 5106 y Ff(m)597 5205 y Fl(y)642 -5219 y Ff(e)704 5205 y FD(=)25 b Fl(d)20 b FD(+)g Fl(ex)1052 -5219 y Ff(m)1139 5205 y FD(+)g Fl(f)10 b(y)1330 5219 -y Ff(m)427 5354 y FD(F)-8 b(or)33 b(the)g Fq(solid)i(b)-5 -b(o)g(dy)36 b(r)-5 b(otation)42 b FD(option)32 b(\(ITYPE=4\),)h(the)g -(magnitudes)e(of)i Fl(b)f FD(and)g Fl(f)10 b FD(,)32 -b(and)g(of)g Fl(c)427 5467 y FD(and)k Fl(e)p FD(,)i(are)e(equal.)57 -b(The)35 b(signs)g(of)h(these)h(co)s(e\016cien)m(ts)f(dep)s(end)f(on)h -(whether)f(there)h(is)f(a)h(sign)427 5580 y(rev)m(ersal)41 -b(b)s(et)m(w)m(een)g([)p Fl(x)1210 5594 y Ff(e)1247 5580 -y Fl(;)15 b(y)1332 5594 y Ff(e)1369 5580 y FD(])41 b(and)f([)p -Fl(x)1699 5594 y Ff(m)1766 5580 y Fl(;)15 b(y)1851 5594 -y Ff(m)1917 5580 y FD(];)47 b(\014ts)40 b(are)h(p)s(erformed)e(with)h -(and)g(without)f(a)i(sign)427 5693 y(rev)m(ersal)31 b(and)e(the)i(b)s -(est)f(one)h(c)m(hosen.)p eop -%%Page: 73 75 -73 74 bop 0 52 a Fw(SUN/67.70)3252 b FD(73)311 351 y(4.)46 -b(Error)27 b(status)h(v)-5 b(alues)27 b(J=)p Fo(\000)p -FD(1)h(and)f Fo(\000)p FD(2)h(lea)m(v)m(e)h(COEFFS)e(unc)m(hanged;)i -(if)d(J=)p Fo(\000)p FD(3)i(COEFFS)f(ma)m(y)427 464 y(ha)m(v)m(e)32 -b(b)s(een)e(c)m(hanged.)311 602 y(5.)46 b(See)31 b(also)f(sla)p -Ft(_)p FD(PXY,)g(sla)p Ft(_)p FD(INVF,)h(sla)p Ft(_)p -FD(XY2XY,)g(sla)p Ft(_)p FD(DCMPF.)p 0 709 3780 8 v 0 -821 a Fx(SLA)p Fn(_)p Fx(FK425)862 b Fm(FK4)39 b(to)f(FK5)862 -b Fx(SLA)p Fn(_)p Fx(FK425)0 1172 y FB(A)m(CTION)44 b -FD(:)c(Con)m(v)m(ert)31 b(B1950.0)h(FK4)f(star)e(data)i(to)f(J2000.0)i -(FK5.)41 b(This)28 b(routine)h(con)m(v)m(erts)i(stars)f(from)227 -1285 y(the)37 b(old,)g(Bessel-New)m(com)m(b,)j(FK4)d(system)f(to)h(the) -g(new,)g(IA)m(U)g(1976,)j(FK5,)f(F)-8 b(ric)m(k)m(e)37 -b(system.)59 b(The)227 1398 y(precepts)34 b(of)h(Smith)d -Fq(et)37 b(al.)d FD(\(see)h(reference)g(1\))g(are)g(follo)m(w)m(ed,)g -(using)e(the)h(implemen)m(tation)f(b)m(y)h(Y)-8 b(al-)227 -1511 y(lop)22 b Fq(et)j(al.)e FD(\(reference)g(2\))g(of)g(a)f(matrix)g -(metho)s(d)g(due)f(to)j(Standish.)36 b(Kinoshita's)20 -b(dev)m(elopmen)m(t)j(of)g(An-)227 1623 y(do)m(y)m(er's)28 -b(p)s(ost-New)m(com)m(b)g(precession)d(is)h(used.)39 -b(The)26 b(n)m(umerical)f(constan)m(ts)j(from)e(Seidelmann)e -Fq(et)29 b(al.)227 1736 y FD(\(reference)i(3\))h(are)e(used)g -(canonically)-8 b(.)0 1924 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_FK425)g(\(R1950,D1950,DR1950,DD1)o(950,)o(P19)o(50,V)o(1950)o(,) -1192 2037 y(R2000,D2000,DR2000,DD2)o(000,)o(P20)o(00,V)o(2000)o(\))0 -2352 y FB(GIVEN)f FD(:)277 2498 y Fq(R1950)486 b FB(D)565 -b FD(B1950.0)33 b Fl(\013)e FD(\(radians\))277 2611 y -Fq(D1950)483 b FB(D)565 b FD(B1950.0)33 b Fl(\016)i FD(\(radians\))277 -2724 y Fq(DR1950)417 b FB(D)565 b FD(B1950.0)39 b(prop)s(er)c(motion)h -(in)f Fl(\013)i FD(\(radians)f(p)s(er)f(tropical)1658 -2837 y(y)m(ear\))277 2950 y Fq(DD1950)414 b FB(D)565 -b FD(B1950.0)41 b(prop)s(er)c(motion)i(in)e Fl(\016)42 -b FD(\(radians)37 b(p)s(er)h(tropical)1658 3063 y(y)m(ear\))277 -3176 y Fq(P1950)490 b FB(D)565 b FD(B1950.0)33 b(parallax)d(\(arcsec\)) -277 3289 y Fq(V1950)484 b FB(D)565 b FD(B1950.0)48 b(radial)c(v)m(elo)s -(cit)m(y)i(\(km)f(s)2884 3256 y Fp(\000)p Fu(1)2978 3289 -y FD(,)50 b(+v)m(e)45 b(=)g(mo)m(ving)1658 3402 y(a)m(w)m(a)m(y\))0 -3695 y FB(RETURNED)h FD(:)277 3841 y Fq(R2000)486 b FB(D)565 -b FD(J2000.0)33 b Fl(\013)e FD(\(radians\))277 3954 y -Fq(D2000)483 b FB(D)565 b FD(J2000.0)33 b Fl(\016)h FD(\(radians\))277 -4067 y Fq(DR2000)417 b FB(D)565 b FD(J2000.0)50 b(prop)s(er)c(motion)h -(in)f Fl(\013)i FD(\(radians)e(p)s(er)g(Julian)1658 4180 -y(y)m(ear\))277 4293 y Fq(DD2000)414 b FB(D)565 b FD(J2000.0)52 -b(prop)s(er)c(motion)h(in)f Fl(\016)54 b FD(\(radians)48 -b(p)s(er)g(Julian)1658 4406 y(y)m(ear\))277 4518 y Fq(P2000)490 -b FB(D)565 b FD(J2000.0)33 b(parallax)c(\(arcsec\))277 -4631 y Fq(V2000)484 b FB(D)565 b FD(J2000.0)50 b(radial)c(v)m(elo)s -(cit)m(y)i(\(km)g(s)2876 4598 y Fp(\000)p Fu(1)2970 4631 -y FD(,)53 b(+v)m(e)48 b(=)f(mo)m(ving)1658 4744 y(a)m(w)m(a)m(y\))0 -5038 y FB(NOTES)d FD(:)311 5217 y(1.)i(The)37 b Fl(\013)h -FD(prop)s(er)e(motions)h(are)57 b(_)-45 b Fl(\013)38 -b FD(rather)f(than)57 b(_)-44 b Fl(\013)15 b FD(cos)h -Fl(\016)s FD(,)40 b(and)d(are)h(p)s(er)e(y)m(ear)i(rather)f(than)g(p)s -(er)427 5330 y(cen)m(tury)-8 b(.)311 5467 y(2.)46 b(Con)m(v)m(ersion)31 -b(from)f(Besselian)g(ep)s(o)s(c)m(h)h(1950.0)i(to)f(Julian)c(ep)s(o)s -(c)m(h)j(2000.0)i(only)d(is)g(pro)m(vided)f(for.)427 -5580 y(Con)m(v)m(ersions)42 b(in)m(v)m(olving)e(other)i(ep)s(o)s(c)m -(hs)g(will)d(require)h(use)i(of)g(the)g(appropriate)f(precession,)427 -5693 y(prop)s(er)29 b(motion,)i(and)e(E-terms)i(routines)e(b)s(efore)h -(and/or)g(after)h(FK425)h(is)d(called.)p eop -%%Page: 74 76 -74 75 bop 0 52 a FD(74)311 351 y(3.)46 b(In)41 b(the)h(FK4)g(catalogue) -h(the)f(prop)s(er)e(motions)h(of)h(stars)f(within)e(10)2905 -318 y Fp(\016)2987 351 y FD(of)j(the)f(p)s(oles)g(do)g(not)427 -464 y(include)29 b(the)j Fq(di\013er)-5 b(ential)34 b(E-terms)39 -b FD(e\013ect)33 b(and)d(should,)g(strictly)g(sp)s(eaking,)g(b)s(e)h -(handled)e(in)h(a)427 577 y(di\013eren)m(t)37 b(manner)f(from)g(stars)h -(outside)f(these)h(regions.)60 b(Ho)m(w)m(ev)m(er,)40 -b(giv)m(en)d(the)g(general)g(lac)m(k)427 690 y(of)i(homogeneit)m(y)g -(of)f(the)h(star)f(data)h(a)m(v)-5 b(ailable)38 b(for)g(routine)f -(astrometry)-8 b(,)42 b(the)d(di\016culties)c(of)427 -803 y(handling)30 b(p)s(ositions)g(that)j(ma)m(y)g(ha)m(v)m(e)h(b)s -(een)e(determined)f(from)h(astrometric)h(\014elds)d(spanning)427 -916 y(the)25 b(p)s(olar)e(and)h(non-p)s(olar)f(regions,)i(the)f(lik)m -(eliho)s(o)s(d)d(that)k(the)g(di\013eren)m(tial)e(E-terms)h(e\013ect)i -(w)m(as)427 1029 y(not)31 b(tak)m(en)h(in)m(to)f(accoun)m(t)h(when)d -(allo)m(wing)h(for)g(prop)s(er)f(motion)i(in)e(past)i(astrometry)-8 -b(,)32 b(and)e(the)427 1142 y(undesirabilit)m(y)c(of)j(a)h(discon)m -(tin)m(uit)m(y)d(in)h(the)i(algorithm,)f(the)g(decision)f(has)h(b)s -(een)f(made)i(in)e(this)427 1255 y(routine)c(to)h(include)d(the)j -(e\013ect)h(of)f(di\013eren)m(tial)e(E-terms)h(on)h(the)f(prop)s(er)f -(motions)h(for)h(all)e(stars,)427 1367 y(whether)h(p)s(olar)f(or)h -(not.)39 b(A)m(t)25 b(ep)s(o)s(c)m(h)f(J2000,)j(and)d(measuring)f(on)h -(the)h(sky)f(rather)g(than)g(in)f(terms)427 1480 y(of)34 -b(\001)p Fl(\013)p FD(,)h(the)e(errors)g(resulting)f(from)h(this)f -(simpli\014cation)e(are)k(less)f(than)g(1)h(milliarcsecond)d(in)427 -1593 y(p)s(osition)e(and)h(1)g(milliarcsecond)e(p)s(er)h(cen)m(tury)i -(in)e(prop)s(er)g(motion.)311 1749 y(4.)46 b(See)31 b(also)f(sla)p -Ft(_)p FD(FK45Z,)h(sla)p Ft(_)p FD(FK524,)g(sla)p Ft(_)p -FD(FK54Z.)0 2156 y FB(REFERENCES)44 b FD(:)311 2362 y(1.)i(Smith,)29 -b(C.A.)i Fq(et)h(al.)p FD(,)g(1989.)g Fq(Astr.J.)e FB(97)p -FD(,)h(265.)311 2517 y(2.)46 b(Y)-8 b(allop,)30 b(B.D.)i -Fq(et)h(al.)p FD(,)e(1989.)h Fq(Astr.J.)e FB(97)p FD(,)h(274.)311 -2672 y(3.)46 b(Seidelmann,)27 b(P)-8 b(.K.)28 b(\(ed\),)i(1992.)41 -b Fq(Explanatory)34 b(Supplement)e(to)f(the)g(Astr)-5 -b(onomic)g(al)33 b(A)n(lmanac,)427 2785 y FD(ISBN)d(0-935702-68-7.)p -0 2919 3780 8 v 0 3032 a Fx(SLA)p Fn(_)p Fx(FK45Z)305 -b Fm(FK4)39 b(to)f(FK5,)h(no)f(P)-10 b(.M.)39 b(or)f(P)m(arallax)302 -b Fx(SLA)p Fn(_)p Fx(FK45Z)0 3382 y FB(A)m(CTION)44 b -FD(:)j(Con)m(v)m(ert)35 b(B1950.0)h(FK4)e(star)g(data)h(to)f(J2000.0)i -(FK5)e(assuming)f(zero)h(prop)s(er)e(motion)i(in)227 -3495 y(the)i(FK5)f(frame.)55 b(This)33 b(routine)h(con)m(v)m(erts)j -(stars)e(from)g(the)g(old,)h(Bessel-New)m(com)m(b,)i(FK4)d(system)227 -3608 y(to)e(the)f(new,)f(IA)m(U)h(1976,)i(FK5,)f(F)-8 -b(ric)m(k)m(e)33 b(system,)f(in)f(suc)m(h)g(a)h(w)m(a)m(y)h(that)f(the) -g(FK5)g(prop)s(er)e(motion)h(is)227 3721 y(zero.)54 b(Because)36 -b(suc)m(h)e(a)h(star)g(has,)h(in)d(general,)j(a)f(non-zero)g(prop)s(er) -e(motion)h(in)f(the)i(FK4)g(system,)227 3834 y(the)e(routine)f -(requires)g(the)h(ep)s(o)s(c)m(h)f(at)i(whic)m(h)d(the)i(p)s(osition)e -(in)h(the)h(FK4)g(system)g(w)m(as)h(determined.)227 3946 -y(The)c(metho)s(d)g(is)f(from)h(app)s(endix)e(2)j(of)f(reference)h(1,)g -(but)f(using)f(the)h(constan)m(ts)i(of)e(reference)h(4.)0 -4134 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_FK45Z)g(\(R1950,)f -(D1950,)i(BEPOCH,)e(R2000,)h(D2000\))0 4511 y FB(GIVEN)f -FD(:)277 4657 y Fq(R1950)486 b FB(D)565 b FD(B1950.0)33 -b(FK4)e Fl(\013)g FD(at)g(ep)s(o)s(c)m(h)f(BEPOCH)g(\(radians\))277 -4770 y Fq(D1950)483 b FB(D)565 b FD(B1950.0)33 b(FK4)e -Fl(\016)j FD(at)d(ep)s(o)s(c)m(h)g(BEPOCH)f(\(radians\))277 -4883 y Fq(BEPOCH)345 b FB(D)565 b FD(Besselian)30 b(ep)s(o)s(c)m(h)g -(\()p Fq(e.g.)g FD(1979.3D0\))0 5282 y FB(RETURNED)46 -b FD(:)277 5428 y Fq(R2000)486 b FB(D)565 b FD(J2000.0)33 -b(FK5)e Fl(\013)f FD(\(radians\))277 5541 y Fq(D2000)483 -b FB(D)565 b FD(J2000.0)33 b(FK5)e Fl(\016)j FD(\(radians\))p -eop -%%Page: 75 77 -75 76 bop 0 52 a Fw(SUN/67.70)3252 b FD(75)0 351 y FB(NOTES)44 -b FD(:)311 563 y(1.)i(The)31 b(ep)s(o)s(c)m(h)f(BEPOCH)h(is)f(strictly) -f(sp)s(eaking)h(Besselian,)h(but)f(if)g(a)h(Julian)d(ep)s(o)s(c)m(h)j -(is)f(supplied)427 676 y(the)h(result)e(will)f(b)s(e)i(a\013ected)h -(only)f(to)h(a)g(negligible)d(exten)m(t.)311 834 y(2.)46 -b(Con)m(v)m(ersion)31 b(from)f(Besselian)g(ep)s(o)s(c)m(h)h(1950.0)i -(to)f(Julian)c(ep)s(o)s(c)m(h)j(2000.0)i(only)d(is)g(pro)m(vided)f -(for.)427 947 y(Con)m(v)m(ersions)42 b(in)m(v)m(olving)e(other)i(ep)s -(o)s(c)m(hs)g(will)d(require)h(use)i(of)g(the)g(appropriate)f -(precession,)427 1060 y(prop)s(er)29 b(motion,)i(and)e(E-terms)i -(routines)e(b)s(efore)h(and/or)g(after)h(FK45Z)g(is)e(called.)311 -1218 y(3.)46 b(In)41 b(the)h(FK4)g(catalogue)h(the)f(prop)s(er)e -(motions)h(of)h(stars)f(within)e(10)2905 1185 y Fp(\016)2987 -1218 y FD(of)j(the)f(p)s(oles)g(do)g(not)427 1331 y(include)29 -b(the)j Fq(di\013er)-5 b(ential)34 b(E-terms)39 b FD(e\013ect)33 -b(and)d(should,)g(strictly)g(sp)s(eaking,)g(b)s(e)h(handled)e(in)h(a) -427 1444 y(di\013eren)m(t)37 b(manner)f(from)g(stars)h(outside)f(these) -h(regions.)60 b(Ho)m(w)m(ev)m(er,)40 b(giv)m(en)d(the)g(general)g(lac)m -(k)427 1557 y(of)i(homogeneit)m(y)g(of)f(the)h(star)f(data)h(a)m(v)-5 -b(ailable)38 b(for)g(routine)f(astrometry)-8 b(,)42 b(the)d -(di\016culties)c(of)427 1670 y(handling)30 b(p)s(ositions)g(that)j(ma)m -(y)g(ha)m(v)m(e)h(b)s(een)e(determined)f(from)h(astrometric)h(\014elds) -d(spanning)427 1783 y(the)25 b(p)s(olar)e(and)h(non-p)s(olar)f -(regions,)i(the)f(lik)m(eliho)s(o)s(d)d(that)k(the)g(di\013eren)m(tial) -e(E-terms)h(e\013ect)i(w)m(as)427 1896 y(not)31 b(tak)m(en)h(in)m(to)f -(accoun)m(t)h(when)d(allo)m(wing)h(for)g(prop)s(er)f(motion)i(in)e -(past)i(astrometry)-8 b(,)32 b(and)e(the)427 2008 y(undesirabilit)m(y)c -(of)j(a)h(discon)m(tin)m(uit)m(y)d(in)h(the)i(algorithm,)f(the)g -(decision)f(has)h(b)s(een)f(made)i(in)e(this)427 2121 -y(routine)c(to)h(include)d(the)j(e\013ect)h(of)f(di\013eren)m(tial)e -(E-terms)h(on)h(the)f(prop)s(er)f(motions)h(for)h(all)e(stars,)427 -2234 y(whether)k(p)s(olar)f(or)i(not.)40 b(A)m(t)29 b(ep)s(o)s(c)m(h)e -(2000,)j(and)d(measuring)f(on)i(the)f(sky)h(rather)f(than)g(in)g(terms) -427 2347 y(of)34 b(\001)p Fl(\013)p FD(,)h(the)e(errors)g(resulting)f -(from)h(this)f(simpli\014cation)e(are)k(less)f(than)g(1)h -(milliarcsecond)d(in)427 2460 y(p)s(osition)e(and)h(1)g(milliarcsecond) -e(p)s(er)h(cen)m(tury)i(in)e(prop)s(er)g(motion.)311 -2618 y(4.)46 b(See)31 b(also)f(sla)p Ft(_)p FD(FK425,)h(sla)p -Ft(_)p FD(FK524,)h(sla)p Ft(_)p FD(FK54Z.)0 3041 y FB(REFERENCES)44 -b FD(:)311 3252 y(1.)i(Aoki,)31 b(S.,)f Fq(et)j(al.)p -FD(,)e(1983.)h Fq(Astr.Astr)-5 b(ophys.)p FD(,)33 b FB(128)p -FD(,)e(263.)311 3410 y(2.)46 b(Smith,)29 b(C.A.)i Fq(et)h(al.)p -FD(,)g(1989.)g Fq(Astr.J.)e FB(97)p FD(,)h(265.)311 3569 -y(3.)46 b(Y)-8 b(allop,)30 b(B.D.)i Fq(et)h(al.)p FD(,)e(1989.)h -Fq(Astr.J.)e FB(97)p FD(,)h(274.)311 3727 y(4.)46 b(Seidelmann,)27 -b(P)-8 b(.K.)28 b(\(ed\),)i(1992.)41 b Fq(Explanatory)34 -b(Supplement)e(to)f(the)g(Astr)-5 b(onomic)g(al)33 b(A)n(lmanac,)427 -3840 y FD(ISBN)d(0-935702-68-7.)p 0 3979 3780 8 v 0 4092 -a Fx(SLA)p Fn(_)p Fx(FK524)862 b Fm(FK5)39 b(to)f(FK4)862 -b Fx(SLA)p Fn(_)p Fx(FK524)0 4442 y FB(A)m(CTION)44 b -FD(:)c(Con)m(v)m(ert)31 b(J2000.0)h(FK5)e(star)g(data)g(to)h(B1950.0)h -(FK4.)41 b(This)28 b(routine)h(con)m(v)m(erts)i(stars)f(from)227 -4555 y(the)35 b(new,)h(IA)m(U)f(1976,)j(FK5,)e(F)-8 b(ric)m(k)m(e)36 -b(system,)h(to)e(the)g(old,)g(Bessel-New)m(com)m(b,)j(FK4)d(system.)54 -b(The)227 4668 y(precepts)22 b(of)h(Smith)d Fq(et)25 -b(al.)d FD(\(reference)h(1\))g(are)f(follo)m(w)m(ed,)i(using)d(the)h -(implemen)m(tation)f(b)m(y)h(Y)-8 b(allop)21 b Fq(et)k(al.)227 -4781 y FD(\(reference)33 b(2\))g(of)f(a)h(matrix)e(metho)s(d)h(due)f -(to)i(Standish.)44 b(Kinoshita's)30 b(dev)m(elopmen)m(t)j(of)f(Ando)m -(y)m(er's)227 4894 y(p)s(ost-New)m(com)m(b)f(precession)e(is)f(used.)40 -b(The)29 b(n)m(umerical)f(constan)m(ts)j(from)e(Seidelmann)e -Fq(et)32 b(al.)e FD(\(refer-)227 5007 y(ence)h(3\))g(are)g(used)f -(canonically)-8 b(.)0 5194 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_FK524)g(\(R2000,)f(D2000,)i(DR2000,)e(DD2000,)h(P2000,)g(V2000,) -1192 5307 y(R1950,)f(D1950,)i(DR1950,)e(DD1950,)h(P1950,)g(V1950\))0 -5693 y FB(GIVEN)f FD(:)p eop -%%Page: 76 78 -76 77 bop 0 52 a FD(76)277 339 y Fq(R2000)486 b FB(D)565 -b FD(J2000.0)33 b Fl(\013)e FD(\(radians\))277 452 y -Fq(D2000)483 b FB(D)565 b FD(J2000.0)33 b Fl(\016)h FD(\(radians\))277 -565 y Fq(DR2000)417 b FB(D)565 b FD(J2000.0)50 b(prop)s(er)c(motion)h -(in)f Fl(\013)i FD(\(radians)e(p)s(er)g(Julian)1658 678 -y(y)m(ear\))277 791 y Fq(DD2000)414 b FB(D)565 b FD(J2000.0)52 -b(prop)s(er)c(motion)h(in)f Fl(\016)54 b FD(\(radians)48 -b(p)s(er)g(Julian)1658 904 y(y)m(ear\))277 1016 y Fq(P2000)490 -b FB(D)565 b FD(J2000.0)33 b(parallax)c(\(arcsec\))277 -1129 y Fq(V2000)484 b FB(D)565 b FD(J2000)24 b(radial)c(v)m(elo)s(cit)m -(y)i(\(km)g(s)2702 1096 y Fp(\000)p Fu(1)2796 1129 y -FD(,)i(+v)m(e)f(=)e(mo)m(ving)h(a)m(w)m(a)m(y\))0 1607 -y FB(RETURNED)46 b FD(:)277 1753 y Fq(R1950)486 b FB(D)565 -b FD(B1950.0)33 b Fl(\013)e FD(\(radians\))277 1866 y -Fq(D1950)483 b FB(D)565 b FD(B1950.0)33 b Fl(\016)i FD(\(radians\))277 -1979 y Fq(DR1950)417 b FB(D)565 b FD(B1950.0)39 b(prop)s(er)c(motion)h -(in)f Fl(\013)i FD(\(radians)f(p)s(er)f(tropical)1658 -2092 y(y)m(ear\))277 2205 y Fq(DD1950)414 b FB(D)565 -b FD(B1950.0)41 b(prop)s(er)c(motion)i(in)e Fl(\016)42 -b FD(\(radians)37 b(p)s(er)h(tropical)1658 2318 y(y)m(ear\))277 -2431 y Fq(P1950)490 b FB(D)565 b FD(B1950.0)33 b(parallax)d(\(arcsec\)) -277 2544 y Fq(V1950)484 b FB(D)565 b FD(radial)29 b(v)m(elo)s(cit)m(y)i -(\(km)f(s)2477 2511 y Fp(\000)p Fu(1)2571 2544 y FD(,)h(+v)m(e)g(=)f -(mo)m(ving)g(a)m(w)m(a)m(y\))0 2909 y FB(NOTES)44 b FD(:)311 -3101 y(1.)i(The)37 b Fl(\013)h FD(prop)s(er)e(motions)h(are)57 -b(_)-45 b Fl(\013)38 b FD(rather)f(than)57 b(_)-44 b -Fl(\013)15 b FD(cos)h Fl(\016)s FD(,)40 b(and)d(are)h(p)s(er)e(y)m(ear) -i(rather)f(than)g(p)s(er)427 3214 y(cen)m(tury)-8 b(.)311 -3363 y(2.)46 b(Note)f(that)e(con)m(v)m(ersion)h(from)e(Julian)f(ep)s(o) -s(c)m(h)i(2000.0)j(to)d(Besselian)g(ep)s(o)s(c)m(h)g(1950.0)i(only)d -(is)427 3475 y(pro)m(vided)31 b(for.)46 b(Con)m(v)m(ersions)31 -b(in)m(v)m(olving)g(other)h(ep)s(o)s(c)m(hs)g(will)d(require)i(use)h -(of)g(the)g(appropriate)427 3588 y(precession,)c(prop)s(er)e(motion,)i -(and)f(E-terms)g(routines)f(b)s(efore)h(and/or)h(after)g(FK524)h(is)d -(called.)311 3737 y(3.)46 b(In)41 b(the)h(FK4)g(catalogue)h(the)f(prop) -s(er)e(motions)h(of)h(stars)f(within)e(10)2905 3704 y -Fp(\016)2987 3737 y FD(of)j(the)f(p)s(oles)g(do)g(not)427 -3850 y(include)29 b(the)j Fq(di\013er)-5 b(ential)34 -b(E-terms)39 b FD(e\013ect)33 b(and)d(should,)g(strictly)g(sp)s -(eaking,)g(b)s(e)h(handled)e(in)h(a)427 3963 y(di\013eren)m(t)37 -b(manner)f(from)g(stars)h(outside)f(these)h(regions.)60 -b(Ho)m(w)m(ev)m(er,)40 b(giv)m(en)d(the)g(general)g(lac)m(k)427 -4076 y(of)i(homogeneit)m(y)g(of)f(the)h(star)f(data)h(a)m(v)-5 -b(ailable)38 b(for)g(routine)f(astrometry)-8 b(,)42 b(the)d -(di\016culties)c(of)427 4188 y(handling)30 b(p)s(ositions)g(that)j(ma)m -(y)g(ha)m(v)m(e)h(b)s(een)e(determined)f(from)h(astrometric)h(\014elds) -d(spanning)427 4301 y(the)25 b(p)s(olar)e(and)h(non-p)s(olar)f -(regions,)i(the)f(lik)m(eliho)s(o)s(d)d(that)k(the)g(di\013eren)m(tial) -e(E-terms)h(e\013ect)i(w)m(as)427 4414 y(not)31 b(tak)m(en)h(in)m(to)f -(accoun)m(t)h(when)d(allo)m(wing)h(for)g(prop)s(er)f(motion)i(in)e -(past)i(astrometry)-8 b(,)32 b(and)e(the)427 4527 y(undesirabilit)m(y)c -(of)j(a)h(discon)m(tin)m(uit)m(y)d(in)h(the)i(algorithm,)f(the)g -(decision)f(has)h(b)s(een)f(made)i(in)e(this)427 4640 -y(routine)c(to)h(include)d(the)j(e\013ect)h(of)f(di\013eren)m(tial)e -(E-terms)h(on)h(the)f(prop)s(er)f(motions)h(for)h(all)e(stars,)427 -4753 y(whether)k(p)s(olar)f(or)i(not.)40 b(A)m(t)29 b(ep)s(o)s(c)m(h)e -(2000,)j(and)d(measuring)f(on)i(the)f(sky)h(rather)f(than)g(in)g(terms) -427 4866 y(of)34 b(\001)p Fl(\013)p FD(,)h(the)e(errors)g(resulting)f -(from)h(this)f(simpli\014cation)e(are)k(less)f(than)g(1)h -(milliarcsecond)d(in)427 4979 y(p)s(osition)e(and)h(1)g(milliarcsecond) -e(p)s(er)h(cen)m(tury)i(in)e(prop)s(er)g(motion.)311 -5127 y(4.)46 b(See)31 b(also)f(sla)p Ft(_)p FD(FK425,)h(sla)p -Ft(_)p FD(FK45Z,)g(sla)p Ft(_)p FD(FK54Z.)0 5501 y FB(REFERENCES)44 -b FD(:)311 5693 y(1.)i(Smith,)29 b(C.A.)i Fq(et)h(al.)p -FD(,)g(1989.)g Fq(Astr.J.)e FB(97)p FD(,)h(265.)p eop -%%Page: 77 79 -77 78 bop 0 52 a Fw(SUN/67.70)3252 b FD(77)311 351 y(2.)46 -b(Y)-8 b(allop,)30 b(B.D.)i Fq(et)h(al.)p FD(,)e(1989.)h -Fq(Astr.J.)e FB(97)p FD(,)h(274.)311 481 y(3.)46 b(Seidelmann,)27 -b(P)-8 b(.K.)28 b(\(ed\),)i(1992.)41 b Fq(Explanatory)34 -b(Supplement)e(to)f(the)g(Astr)-5 b(onomic)g(al)33 b(A)n(lmanac,)427 -594 y FD(ISBN)d(0-935702-68-7.)p 0 660 3780 8 v 0 773 -a Fx(SLA)p Fn(_)p Fx(FK52H)681 b Fm(FK5)39 b(to)f(Hipparcos)680 -b Fx(SLA)p Fn(_)p Fx(FK52H)0 1123 y FB(A)m(CTION)44 b -FD(:)68 b(T)-8 b(ransform)43 b(an)i(FK5)f(\(J2000\))j(p)s(osition)42 -b(and)h(prop)s(er)g(motion)h(in)m(to)g(the)h(frame)f(of)g(the)227 -1236 y(Hipparcos)30 b(catalogue.)0 1424 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_FK52H)g(\(R5,)g(D5,)h(DR5,)g(DD5,)f(RH,)h -(DH,)g(DRH,)g(DDH\))0 1708 y FB(GIVEN)e FD(:)277 1854 -y Fq(R5)624 b FB(D)565 b FD(J2000.0)33 b(FK5)e Fl(\013)f -FD(\(radians\))277 1967 y Fq(D5)621 b FB(D)565 b FD(J2000.0)33 -b(FK5)e Fl(\016)j FD(\(radians\))277 2080 y Fq(DR5)555 -b FB(D)565 b FD(J2000.0)36 b(FK5)f(prop)s(er)e(motion)g(in)g -Fl(\013)i FD(\(radians)e(p)s(er)g(Ju-)1658 2193 y(lian)c(y)m(ear\))277 -2305 y Fq(DD5)552 b FB(D)565 b FD(J2000.0)24 b(FK5)e(prop)s(er)d -(motion)j(in)e Fl(\016)25 b FD(\(radians)20 b(p)s(er)g(Julian)1658 -2418 y(y)m(ear\))0 2657 y FB(RETURNED)46 b FD(:)277 2803 -y Fq(RH)602 b FB(D)565 b FD(Hipparcos)30 b Fl(\013)g -FD(\(radians\))277 2916 y Fq(DH)599 b FB(D)565 b FD(Hipparcos)30 -b Fl(\016)k FD(\(radians\))277 3029 y Fq(DRH)533 b FB(D)565 -b FD(Hipparcos)33 b(prop)s(er)f(motion)h(in)f Fl(\013)i -FD(\(radians)e(p)s(er)g(Julian)1658 3142 y(y)m(ear\))277 -3255 y Fq(DDH)530 b FB(D)565 b FD(Hipparcos)35 b(prop)s(er)f(motion)h -(in)f Fl(\016)40 b FD(\(radians)34 b(p)s(er)g(Julian)1658 -3368 y(y)m(ear\))0 3607 y FB(NOTES)44 b FD(:)311 3778 -y(1.)i(The)37 b Fl(\013)h FD(prop)s(er)e(motions)h(are)57 -b(_)-45 b Fl(\013)38 b FD(rather)f(than)57 b(_)-44 b -Fl(\013)15 b FD(cos)h Fl(\016)s FD(,)40 b(and)d(are)h(p)s(er)e(y)m(ear) -i(rather)f(than)g(p)s(er)427 3891 y(cen)m(tury)-8 b(.)311 -4021 y(2.)46 b(The)41 b(FK5)g(to)g(Hipparcos)f(transformation)g -(consists)g(of)h(a)g(pure)f(rotation)h(and)f(spin;)k(zonal)427 -4134 y(errors)30 b(in)f(the)i(FK5)g(catalogue)h(are)e(not)h(tak)m(en)g -(in)m(to)g(accoun)m(t.)311 4264 y(3.)46 b(The)c(adopted)h(ep)s(o)s(c)m -(h)g(J2000.0)h(FK5)g(to)f(Hipparcos)f(orien)m(tation)g(and)g(spin)f(v) --5 b(alues)42 b(are)h(as)427 4376 y(follo)m(ws)30 b(\(see)h -(reference\):)p 821 4497 1115 4 v 819 4610 4 113 v 971 -4610 V 971 4610 V 1023 4577 a Fq(orientation)p 1509 4610 -V 199 w(spin)p 1934 4610 V 821 4614 1115 4 v 819 4727 -4 113 v 871 4693 a Fl(x)p 971 4727 V 184 w Fo(\000)p -FD(19)p Fl(:)p FD(9)p 1509 4727 V 254 w Fo(\000)p FD(0)p -Fl(:)p FD(30)p 1934 4727 V 819 4840 V 875 4806 a Fl(y)p -971 4840 V 232 w Fo(\000)p FD(9)p Fl(:)p FD(1)p 1509 -4840 V 254 w(+0)p Fl(:)p FD(60)p 1934 4840 V 819 4952 -V 877 4919 a Fl(z)p 971 4952 V 188 w FD(+22)p Fl(:)p -FD(9)p 1509 4952 V 254 w(+0)p Fl(:)p FD(70)p 1934 4952 -V 821 4956 1115 4 v 819 5069 4 113 v 971 5069 V 1151 -5035 a Fq(mas)p 1509 5069 V 299 w(mas/y)p 1934 5069 V -821 5072 1115 4 v 427 5269 a FD(These)40 b(orien)m(tation)h(and)e(spin) -f(comp)s(onen)m(ts)j(are)g(in)m(terpreted)e(as)i Fq(axial)h(ve)-5 -b(ctors.)71 b FD(An)40 b(axial)427 5382 y(v)m(ector)35 -b(p)s(oin)m(ts)d(at)i(the)g(p)s(ole)e(of)i(the)f(rotation)h(and)f(its)f -(length)h(is)f(the)i(amoun)m(t)g(of)f(rotation)h(in)427 -5495 y(radians.)311 5625 y(4.)46 b(See)31 b(also)f(sla)p -Ft(_)p FD(FK5HZ,)g(sla)p Ft(_)p FD(H2FK5,)h(sla)p Ft(_)p -FD(HFK5Z.)p eop -%%Page: 78 80 -78 79 bop 0 52 a FD(78)0 351 y FB(REFERENCE)44 b FD(:)d(F)-8 -b(eissel,)30 b(M.)h(&)f(Mignard,)g(F.,)h(1998.,)h Fq(Astr)-5 -b(on.Astr)g(ophys.)34 b FB(331)p FD(,)d(L33-L36.)p 0 -516 3780 8 v 0 629 a Fx(SLA)p Fn(_)p Fx(FK54Z)305 b Fm(FK5)39 -b(to)f(FK4,)h(no)f(P)-10 b(.M.)39 b(or)f(P)m(arallax)302 -b Fx(SLA)p Fn(_)p Fx(FK54Z)0 979 y FB(A)m(CTION)44 b -FD(:)i(Con)m(v)m(ert)34 b(a)g(J2000.0)h(FK5)f(star)f(p)s(osition)f(to)i -(B1950.0)i(FK4)d(assuming)f(FK5)i(zero)g(prop)s(er)227 -1092 y(motion)e(and)f(parallax.)43 b(This)30 b(routine)g(con)m(v)m -(erts)k(star)d(p)s(ositions)f(from)h(the)h(new,)g(IA)m(U)g(1976,)i -(FK5,)227 1205 y(F)-8 b(ric)m(k)m(e)32 b(system)e(to)i(the)e(old,)g -(Bessel-New)m(com)m(b,)i(FK4)f(system.)0 1393 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_FK54Z)g(\(R2000,)f(D2000,)i(BEPOCH,)e -(R1950,)h(D1950,)h(DR1950,)e(DD1950\))0 1791 y FB(GIVEN)g -FD(:)277 1937 y Fq(R2000)486 b FB(D)565 b FD(J2000.0)33 -b(FK5)e Fl(\013)f FD(\(radians\))277 2050 y Fq(D2000)483 -b FB(D)565 b FD(J2000.0)33 b(FK5)e Fl(\016)j FD(\(radians\))277 -2163 y Fq(BEPOCH)345 b FB(D)565 b FD(Besselian)30 b(ep)s(o)s(c)m(h)g -(\()p Fq(e.g.)g FD(1950D0\))0 2597 y FB(RETURNED)46 b -FD(:)277 2743 y Fq(R1950)486 b FB(D)565 b FD(B1950.0)33 -b(FK4)e Fl(\013)g FD(at)g(ep)s(o)s(c)m(h)f(BEPOCH)g(\(radians\))277 -2856 y Fq(D1950)483 b FB(D)565 b FD(B1950.0)33 b(FK4)e -Fl(\016)j FD(at)d(ep)s(o)s(c)m(h)g(BEPOCH)f(\(radians\))277 -2969 y Fq(DR1950)417 b FB(D)565 b FD(B1950.0)26 b(FK4)e(prop)s(er)d -(motion)i(in)f Fl(\013)i FD(\(radians)e(p)s(er)g(trop-)1658 -3081 y(ical)30 b(y)m(ear\))277 3194 y Fq(DD1950)414 b -FB(D)565 b FD(B1950.0)28 b(FK4)d(prop)s(er)f(motion)h(in)e -Fl(\016)29 b FD(\(radians)24 b(p)s(er)g(trop-)1658 3307 -y(ical)30 b(y)m(ear\))0 3741 y FB(NOTES)44 b FD(:)311 -3961 y(1.)i(The)37 b Fl(\013)h FD(prop)s(er)e(motions)h(are)57 -b(_)-45 b Fl(\013)38 b FD(rather)f(than)57 b(_)-44 b -Fl(\013)15 b FD(cos)h Fl(\016)s FD(,)40 b(and)d(are)h(p)s(er)e(y)m(ear) -i(rather)f(than)g(p)s(er)427 4074 y(cen)m(tury)-8 b(.)311 -4236 y(2.)46 b(Con)m(v)m(ersion)31 b(from)f(Julian)f(ep)s(o)s(c)m(h)h -(2000.0)j(to)f(Besselian)e(ep)s(o)s(c)m(h)h(1950.0)i(only)d(is)g(pro)m -(vided)f(for.)427 4349 y(Con)m(v)m(ersions)44 b(in)m(v)m(olving)f -(other)i(ep)s(o)s(c)m(hs)f(will)d(require)j(use)g(of)g(the)h -(appropriate)e(precession)427 4462 y(routines)30 b(b)s(efore)f(and)h -(after)h(this)e(routine)h(is)f(called.)311 4624 y(3.)46 -b(Unlik)m(e)24 b(in)f(the)h(sla)p Ft(_)p FD(FK524)h(routine,)g(the)f -(FK5)h(prop)s(er)e(motions,)i(the)g(parallax)e(and)h(the)g(radial)427 -4737 y(v)m(elo)s(cit)m(y)31 b(are)g(presumed)e(zero.)311 -4899 y(4.)46 b(It)25 b(w)m(as)g(the)f(in)m(ten)m(tion)g(that)h(FK5)g -(should)d(b)s(e)i(a)h(close)f(appro)m(ximation)g(to)h(an)f(inertial)e -(frame,)k(so)427 5012 y(that)i(distan)m(t)e(ob)5 b(jects)28 -b(ha)m(v)m(e)f(zero)h(prop)s(er)d(motion;)j(suc)m(h)f(ob)5 -b(jects)27 b(ha)m(v)m(e)h(\(in)e(general\))h(non-zero)427 -5125 y(prop)s(er)i(motion)h(in)f(FK4,)i(and)f(this)f(routine)h(returns) -f(those)i Fq(\014ctitious)i(pr)-5 b(op)g(er)35 b(motions)p -FD(.)311 5287 y(5.)46 b(The)25 b(p)s(osition)e(returned)h(b)m(y)g(this) -g(routine)g(is)g(in)g(the)h(B1950)i(reference)e(frame)g(but)f(at)i -(Besselian)427 5400 y(ep)s(o)s(c)m(h)36 b(BEPOCH.)h(F)-8 -b(or)37 b(comparison)f(with)f(catalogues)j(the)f(BEPOCH)f(argumen)m(t)h -(will)c(fre-)427 5513 y(quen)m(tly)d(b)s(e)g(1950D0.)311 -5675 y(6.)46 b(See)31 b(also)f(sla)p Ft(_)p FD(FK425,)h(sla)p -Ft(_)p FD(FK45Z,)g(sla)p Ft(_)p FD(FK524.)p eop -%%Page: 79 81 -79 80 bop 0 52 a Fw(SUN/67.70)3252 b FD(79)p 0 267 3780 -8 v 0 380 a Fx(SLA)p Fn(_)p Fx(FK5HZ)428 b Fm(FK5)39 -b(to)f(Hipparcos,)f(no)h(P)-10 b(.M.)428 b Fx(SLA)p Fn(_)p -Fx(FK5HZ)0 730 y FB(A)m(CTION)44 b FD(:)38 b(T)-8 b(ransform)24 -b(an)g(FK5)h(\(J2000\))i(star)e(p)s(osition)e(in)m(to)i(the)g(frame)g -(of)g(the)g(Hipparcos)f(catalogue,)227 843 y(assuming)29 -b(zero)i(Hipparcos)f(prop)s(er)f(motion.)0 1031 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_FK5HZ)g(\(R5,)g(D5,)h(EPOCH,)f(RH,)h(DH\)) -0 1337 y FB(GIVEN)e FD(:)277 1483 y Fq(R5)624 b FB(D)565 -b FD(J2000.0)33 b(FK5)e Fl(\013)f FD(\(radians\))277 -1596 y Fq(D5)621 b FB(D)565 b FD(J2000.0)33 b(FK5)e Fl(\016)j -FD(\(radians\))277 1709 y Fq(EPOCH)409 b FB(D)565 b FD(Julian)28 -b(ep)s(o)s(c)m(h)i(\(TDB\))0 1987 y FB(RETURNED)46 b -FD(:)277 2133 y Fq(RH)602 b FB(D)565 b FD(Hipparcos)30 -b Fl(\013)g FD(\(radians\))277 2246 y Fq(DH)599 b FB(D)565 -b FD(Hipparcos)30 b Fl(\016)k FD(\(radians\))0 2523 y -FB(NOTES)44 b FD(:)311 2700 y(1.)i(The)37 b Fl(\013)h -FD(prop)s(er)e(motions)h(are)57 b(_)-45 b Fl(\013)38 -b FD(rather)f(than)57 b(_)-44 b Fl(\013)15 b FD(cos)h -Fl(\016)s FD(,)40 b(and)d(are)h(p)s(er)e(y)m(ear)i(rather)f(than)g(p)s -(er)427 2813 y(cen)m(tury)-8 b(.)311 2948 y(2.)46 b(The)41 -b(FK5)g(to)g(Hipparcos)f(transformation)g(consists)g(of)h(a)g(pure)f -(rotation)h(and)f(spin;)k(zonal)427 3061 y(errors)30 -b(in)f(the)i(FK5)g(catalogue)h(are)e(not)h(tak)m(en)g(in)m(to)g(accoun) -m(t.)311 3196 y(3.)46 b(The)c(adopted)h(ep)s(o)s(c)m(h)g(J2000.0)h(FK5) -g(to)f(Hipparcos)f(orien)m(tation)g(and)g(spin)f(v)-5 -b(alues)42 b(are)h(as)427 3309 y(follo)m(ws)30 b(\(see)h(reference\):)p -821 3433 1115 4 v 819 3546 4 113 v 971 3546 V 971 3546 -V 1023 3512 a Fq(orientation)p 1509 3546 V 199 w(spin)p -1934 3546 V 821 3549 1115 4 v 819 3662 4 113 v 871 3628 -a Fl(x)p 971 3662 V 184 w Fo(\000)p FD(19)p Fl(:)p FD(9)p -1509 3662 V 254 w Fo(\000)p FD(0)p Fl(:)p FD(30)p 1934 -3662 V 819 3775 V 875 3741 a Fl(y)p 971 3775 V 232 w -Fo(\000)p FD(9)p Fl(:)p FD(1)p 1509 3775 V 254 w(+0)p -Fl(:)p FD(60)p 1934 3775 V 819 3888 V 877 3854 a Fl(z)p -971 3888 V 188 w FD(+22)p Fl(:)p FD(9)p 1509 3888 V 254 -w(+0)p Fl(:)p FD(70)p 1934 3888 V 821 3891 1115 4 v 819 -4004 4 113 v 971 4004 V 1151 3970 a Fq(mas)p 1509 4004 -V 299 w(mas/y)p 1934 4004 V 821 4008 1115 4 v 427 4208 -a FD(These)40 b(orien)m(tation)h(and)e(spin)f(comp)s(onen)m(ts)j(are)g -(in)m(terpreted)e(as)i Fq(axial)h(ve)-5 b(ctors.)71 b -FD(An)40 b(axial)427 4320 y(v)m(ector)35 b(p)s(oin)m(ts)d(at)i(the)g(p) -s(ole)e(of)i(the)f(rotation)h(and)f(its)f(length)h(is)f(the)i(amoun)m -(t)g(of)f(rotation)h(in)427 4433 y(radians.)311 4569 -y(4.)46 b(See)31 b(also)f(sla)p Ft(_)p FD(FK52H,)h(sla)p -Ft(_)p FD(H2FK5,)g(sla)p Ft(_)p FD(HFK5Z.)0 4855 y FB(REFERENCE)44 -b FD(:)d(F)-8 b(eissel,)30 b(M.)h(&)f(Mignard,)g(F.,)h(1998.,)h -Fq(Astr)-5 b(on.Astr)g(ophys.)34 b FB(331)p FD(,)d(L33-L36.)p -0 4955 3780 8 v 0 5068 a Fx(SLA)p Fn(_)p Fx(FLOTIN)459 -b Fm(Deco)s(de)39 b(a)g(Real)f(Num)m(b)s(er)459 b Fx(SLA)p -Fn(_)p Fx(FLOTIN)0 5418 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 -b(free-format)f(input)d(in)m(to)j(single)e(precision)f(\015oating)j(p)s -(oin)m(t.)0 5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_FLOTIN)f(\(STRING,)h(NSTRT,)g(RESLT,)g(JFLAG\))p -eop -%%Page: 80 82 -80 81 bop 0 52 a FD(80)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(STRING)381 b FB(C)569 b FD(string)29 b(con)m(taining)h(n)m(um) -m(b)s(er)f(to)j(b)s(e)d(deco)s(ded)277 610 y Fq(NSTR)-7 -b(T)428 b FB(I)605 b FD(p)s(oin)m(ter)30 b(to)h(where)f(deco)s(ding)f -(is)g(to)i(commence)277 723 y Fq(RESL)-7 b(T)442 b FB(R)567 -b FD(curren)m(t)30 b(v)-5 b(alue)30 b(of)h(result)0 1041 -y FB(RETURNED)46 b FD(:)277 1187 y Fq(NSTR)-7 b(T)428 -b FB(I)605 b FD(adv)-5 b(anced)31 b(to)g(next)f(n)m(um)m(b)s(er)277 -1300 y Fq(RESL)-7 b(T)442 b FB(R)567 b FD(result)277 -1413 y Fq(JFLA)n(G)436 b FB(I)605 b FD(status:)65 b Fo(\000)p -FD(1)43 b(=)f Fo(\000)p FD(OK,)f(0)i(=)f(+OK,)g(1)h(=)f(n)m(ull)e -(result,)1658 1526 y(2)31 b(=)f(error)0 1843 y FB(NOTES)44 -b FD(:)311 2026 y(1.)i(The)36 b(reason)h(sla)p Ft(_)p -FD(FLOTIN)f(has)g(separate)i(`OK')e(status)h(v)-5 b(alues)36 -b(for)g(+)h(and)f Fo(\000)g FD(is)g(to)h(enable)427 2139 -y(min)m(us)28 b(zero)j(to)g(b)s(e)e(detected.)42 b(This)28 -b(is)g(of)i(crucial)f(imp)s(ortance)g(when)g(deco)s(ding)g(mixed-radix) -427 2251 y(n)m(um)m(b)s(ers.)68 b(F)-8 b(or)40 b(example,)j(an)c(angle) -h(expressed)f(as)i(degrees,)i(arcmin)m(utes)c(and)g(arcseconds)427 -2364 y(ma)m(y)31 b(ha)m(v)m(e)h(a)f(leading)e(min)m(us)f(sign)i(but)f -(a)i(zero)g(degrees)g(\014eld.)311 2505 y(2.)46 b(A)32 -b(T)-8 b(AB)32 b(is)f(in)m(terpreted)g(as)h(a)g(space,)h(and)e(lo)m(w)m -(ercase)i(c)m(haracters)g(are)f(in)m(terpreted)f(as)h(upp)s(er-)427 -2618 y(case.)42 b Fq(n.b.)30 b FD(The)g(test)h(for)f(T)-8 -b(AB)31 b(is)f(ASCI)s(I-sp)s(eci\014c.)311 2759 y(3.)46 -b(The)38 b(basic)f(format)h(is)f(the)h(sequence)h(of)f(\014elds)e -Fo(\006)p Fl(n:nx)24 b Fo(\006)h Fl(n)p FD(,)40 b(where)d -Fo(\006)h FD(is)f(a)h(sign)f(c)m(haracter)427 2872 y(`+')f(or)g(`)p -Fo(\000)p FD(',)i Fl(n)e FD(means)f(a)i(string)e(of)h(decimal)f -(digits,)h(`.')58 b(is)35 b(a)h(decimal)f(p)s(oin)m(t,)i(and)e -Fl(x)p FD(,)j(whic)m(h)427 2985 y(indicates)30 b(an)h(exp)s(onen)m(t,)h -(means)f(`D')h(or)f(`E'.)h(V)-8 b(arious)31 b(com)m(binations)f(of)h -(these)h(\014elds)e(can)h(b)s(e)427 3098 y(omitted,)g(and)f(em)m(b)s -(edded)f(blanks)g(are)i(p)s(ermissible)26 b(in)j(certain)h(places.)311 -3239 y(4.)46 b(Spaces:)506 3380 y Fo(\017)g FD(Leading)30 -b(spaces)h(are)g(ignored.)506 3507 y Fo(\017)46 b FD(Em)m(b)s(edded)38 -b(spaces)i(are)g(allo)m(w)m(ed)f(only)f(after)i(+,)i -Fo(\000)p FD(,)g(D)d(or)h(E,)f(and)g(after)h(the)f(decimal)597 -3620 y(p)s(oin)m(t)30 b(if)f(the)i(\014rst)e(sequence)i(of)f(digits)f -(is)h(absen)m(t.)506 3747 y Fo(\017)46 b FD(T)-8 b(railing)38 -b(spaces)i(are)h(ignored;)j(the)c(\014rst)f(signi\014es)f(end)h(of)h -(deco)s(ding)f(and)g(subsequen)m(t)597 3860 y(ones)31 -b(are)g(skipp)s(ed.)311 4001 y(5.)46 b(Delimiters:)506 -4142 y Fo(\017)g FD(An)m(y)32 b(c)m(haracter)h(other)f(than)f(+,)p -Fo(\000)p FD(,0-9,.,D,E)j(or)e(space)g(ma)m(y)g(b)s(e)f(used)g(to)h -(signal)e(the)i(end)597 4255 y(of)f(the)f(n)m(um)m(b)s(er)f(and)h -(terminate)h(deco)s(ding.)506 4381 y Fo(\017)46 b FD(Comma)28 -b(is)f(recognized)h(b)m(y)f(sla)p Ft(_)p FD(FLOTIN)g(as)h(a)g(sp)s -(ecial)e(case;)k(it)d(is)g(skipp)s(ed,)f(lea)m(ving)h(the)597 -4494 y(p)s(oin)m(ter)j(on)g(the)g(next)h(c)m(haracter.)42 -b(See)31 b(13,)g(b)s(elo)m(w.)506 4621 y Fo(\017)46 b -FD(Deco)s(ding)31 b(will)c(in)i(all)h(cases)h(terminate)f(if)g(end)f -(of)i(string)e(is)h(reac)m(hed.)311 4762 y(6.)46 b(Both)31 -b(signs)f(are)g(optional.)40 b(The)30 b(default)g(is)f(+.)311 -4903 y(7.)46 b(The)30 b(man)m(tissa)g Fl(n:n)g FD(defaults)g(to)h(unit) -m(y)-8 b(.)311 5044 y(8.)46 b(The)30 b(exp)s(onen)m(t)h -Fl(x)5 b Fo(\006)g Fl(n)29 b FD(defaults)h(to)h(`E0'.)311 -5185 y(9.)46 b(The)30 b(strings)f(of)i(decimal)e(digits)g(ma)m(y)i(b)s -(e)f(of)g(an)m(y)h(length.)266 5326 y(10.)46 b(The)30 -b(decimal)f(p)s(oin)m(t)h(is)f(optional)h(for)g(whole)g(n)m(um)m(b)s -(ers.)266 5467 y(11.)46 b(A)28 b Fq(nul)5 b(l)30 b(r)-5 -b(esult)37 b FD(o)s(ccurs)28 b(when)e(the)i(string)f(of)h(c)m -(haracters)h(b)s(eing)d(deco)s(ded)h(do)s(es)h(not)g(b)s(egin)e(with) -427 5580 y(+,)p Fo(\000)p FD(,0-9,.,D)44 b(or)d(E,)g(or)g(consists)g -(en)m(tirely)f(of)h(spaces.)74 b(When)41 b(this)f(condition)g(is)g -(detected,)427 5693 y(JFLA)m(G)31 b(is)f(set)h(to)g(1)g(and)e(RESL)-8 -b(T)30 b(is)f(left)h(un)m(touc)m(hed.)p eop -%%Page: 81 83 -81 82 bop 0 52 a Fw(SUN/67.70)3252 b FD(81)266 351 y(12.)46 -b(NSTR)-8 b(T)30 b(=)g(1)h(for)f(the)g(\014rst)g(c)m(haracter)i(in)d -(the)i(string.)266 504 y(13.)46 b(On)20 b(return)g(from)g(sla)p -Ft(_)p FD(FLOTIN,)f(NSTR)-8 b(T)20 b(is)g(set)h(ready)g(for)f(the)h -(next)f(deco)s(de)h({)g(follo)m(wing)e(trail-)427 617 -y(ing)31 b(blanks)g(and)g(an)m(y)h(comma.)47 b(If)31 -b(a)i(delimiter)c(other)j(than)g(comma)h(is)e(b)s(eing)f(used,)i(NSTR) --8 b(T)427 729 y(m)m(ust)35 b(b)s(e)f(incremen)m(ted)g(b)s(efore)h(the) -g(next)g(call)f(to)h(sla)p Ft(_)p FD(FLOTIN,)f(otherwise)g(all)g -(subsequen)m(t)427 842 y(calls)c(will)e(return)h(a)i(n)m(ull)d(result.) -266 995 y(14.)46 b(Errors)30 b(\(JFLA)m(G=2\))i(o)s(ccur)e(when:)506 -1147 y Fo(\017)46 b FD(a)31 b(+,)f Fo(\000)p FD(,)h(D)f(or)h(E)f(is)f -(left)h(unsatis\014ed;)f(or)506 1280 y Fo(\017)46 b FD(the)30 -b(decimal)e(p)s(oin)m(t)h(is)f(presen)m(t)i(without)f(at)h(least)g(one) -f(decimal)g(digit)f(b)s(efore)h(or)h(after)g(it;)597 -1393 y(or)506 1525 y Fo(\017)46 b FD(an)31 b(exp)s(onen)m(t)f(more)g -(than)h(100)g(has)f(b)s(een)g(presen)m(ted.)266 1678 -y(15.)46 b(When)31 b(an)f(error)h(has)f(b)s(een)g(detected,)j(NSTR)-8 -b(T)30 b(is)g(left)g(p)s(oin)m(ting)f(to)j(the)f(c)m(haracter)h(follo)m -(wing)427 1790 y(the)41 b(last)g(one)g(used)g(b)s(efore)f(the)h(error)g -(came)h(to)f(ligh)m(t.)72 b(This)39 b(ma)m(y)j(b)s(e)e(after)i(the)f(p) -s(oin)m(t)f(at)427 1903 y(whic)m(h)g(a)h(more)f(sophisticated)g -(program)h(could)e(ha)m(v)m(e)j(detected)g(the)f(error.)71 -b(F)-8 b(or)42 b(example,)427 2016 y(sla)p Ft(_)p FD(FLOTIN)26 -b(do)s(es)i(not)f(detect)i(that)f(`1E999')i(is)c(unacceptable)i(\(on)f -(a)h(computer)g(where)f(this)427 2129 y(is)j(so\))h(un)m(til)d(the)j -(en)m(tire)f(n)m(um)m(b)s(er)f(has)h(b)s(een)g(deco)s(ded.)266 -2282 y(16.)46 b(Certain)28 b(highly)f(unlik)m(ely)g(com)m(binations)h -(of)h(man)m(tissa)g(and)f(exp)s(onen)m(t)h(can)h(cause)f(arithmetic)427 -2394 y(faults)j(during)e(the)i(deco)s(de,)i(in)d(some)i(cases)g -(despite)e(the)i(fact)g(that)g(they)g(together)h(could)d(b)s(e)427 -2507 y(construed)f(as)h(a)g(v)-5 b(alid)28 b(n)m(um)m(b)s(er.)266 -2660 y(17.)46 b(Deco)s(ding)31 b(is)e(left)h(to)h(righ)m(t,)f(one)h -(pass.)266 2812 y(18.)46 b(See)31 b(also)f(sla)p Ft(_)p -FD(DFL)-8 b(TIN)31 b(and)e(sla)p Ft(_)p FD(INTIN.)p 0 -2948 3780 8 v 0 3061 a Fx(SLA)p Fn(_)p Fx(GALEQ)530 b -Fm(Galactic)37 b(to)h(J2000)f Fg(\013)q(;)20 b(\016)537 -b Fx(SLA)p Fn(_)p Fx(GALEQ)0 3411 y FB(A)m(CTION)44 b -FD(:)62 b(T)-8 b(ransformation)40 b(from)h(IA)m(U)g(1958)i(galactic)f -(co)s(ordinates)f(to)h(J2000.0)h(FK5)f(equatorial)227 -3524 y(co)s(ordinates.)0 3712 y FB(CALL)j FD(:)77 b Ft(CALL)46 -b(sla_GALEQ)g(\(DL,)g(DB,)h(DR,)g(DD\))0 4080 y FB(GIVEN)e -FD(:)277 4252 y Fq(DL,DB)449 b FB(D)565 b FD(galactic)31 -b(longitude)e(and)h(latitude)g([)15 b Fl(l)2975 4219 -y Ff(I)-7 b(I)3039 4252 y Fl(;)15 b(b)3118 4219 y Ff(I)-7 -b(I)3197 4252 y FD(])0 4645 y FB(RETURNED)46 b FD(:)277 -4817 y Fq(DR,DD)435 b FB(D)565 b FD(J2000.0)33 b([)15 -b Fl(\013;)g(\016)20 b FD(])0 5210 y FB(NOTES)44 b FD(:)311 -5410 y(1.)i(All)29 b(argumen)m(ts)i(are)g(in)e(radians.)311 -5562 y(2.)46 b(The)29 b(equatorial)f(co)s(ordinates)h(are)g(J2000.0)i -(FK5.)40 b(Use)29 b(the)g(routine)f(sla)p Ft(_)p FD(GE50)h(if)f(con)m -(v)m(ersion)427 5675 y(to)j(B1950.0)j(FK4)c(co)s(ordinates)g(is)g -(required.)p eop -%%Page: 82 84 -82 83 bop 0 52 a FD(82)p 0 267 3780 8 v 0 380 a Fx(SLA)p -Fn(_)p Fx(GALSUP)365 b Fm(Galactic)36 b(to)j(Sup)s(ergalactic)364 -b Fx(SLA)p Fn(_)p Fx(GALSUP)0 730 y FB(A)m(CTION)44 b -FD(:)39 b(T)-8 b(ransformation)26 b(from)h(IA)m(U)h(1958)h(galactic)f -(co)s(ordinates)f(to)h(de)f(V)-8 b(aucouleurs)27 b(sup)s(ergalac-)227 -843 y(tic)k(co)s(ordinates.)0 1031 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_GALSUP)f(\(DL,)i(DB,)g(DSL,)g(DSB\))0 -1410 y FB(GIVEN)e FD(:)277 1582 y Fq(DL,DB)449 b FB(D)565 -b FD(galactic)29 b(longitude)e(and)h(latitude)f([)15 -b Fl(l)2966 1549 y Ff(I)-7 b(I)3030 1582 y Fl(;)15 b(b)3109 -1549 y Ff(I)-7 b(I)3189 1582 y FD(])28 b(\(radians\))0 -1993 y FB(RETURNED)46 b FD(:)277 2165 y Fq(DSL,DSB)347 -b FB(D)565 b FD(sup)s(ergalactic)30 b(longitude)f(and)h(latitude)f -(\(radians\))0 2576 y FB(REFERENCES)44 b FD(:)311 2783 -y(1.)i(de)41 b(V)-8 b(aucouleurs,)42 b(de)f(V)-8 b(aucouleurs,)43 -b(&)d(Corwin,)h Fq(Se)-5 b(c)g(ond)43 b(R)-5 b(efer)g(enc)g(e)43 -b(Catalo)-5 b(gue)44 b(of)e(Bright)427 2896 y(Galaxies)p -FD(,)32 b(U.T)-8 b(exas,)32 b(p8.)311 3052 y(2.)46 b(Systems)31 -b(&)h(Applied)d(Sciences)i(Corp.,)g(do)s(cumen)m(tation)h(for)f(the)h -(mac)m(hine-readable)f(v)m(ersion)427 3165 y(of)g(the)f(ab)s(o)m(v)m(e) -i(catalogue,)g(Con)m(tract)g(NAS)e(5-26490.)227 3372 -y(\(These)k(t)m(w)m(o)h(references)g(giv)m(e)f(di\013eren)m(t)f(v)-5 -b(alues)33 b(for)h(the)g(galactic)h(longitude)d(of)i(the)g(sup)s -(ergalactic)227 3485 y(origin.)39 b(Both)31 b(are)g(wrong;)f(the)h -(correct)h(v)-5 b(alue)29 b(is)h Fl(l)2012 3452 y Ff(I)-7 -b(I)2101 3485 y FD(=)25 b(137)p Fl(:)p FD(37.\))p 0 3642 -V 0 3755 a Fx(SLA)p Fn(_)p Fx(GE50)669 b Fm(Galactic)36 -b(to)j(B1950)e Fg(\013)q(;)20 b(\016)673 b Fx(SLA)p Fn(_)p -Fx(GE50)0 4106 y FB(A)m(CTION)44 b FD(:)59 b(T)-8 b(ransformation)38 -b(from)h(IA)m(U)h(1958)i(galactic)e(co)s(ordinates)f(to)i(B1950.0)h -(FK4)e(equatorial)227 4219 y(co)s(ordinates.)0 4406 y -FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_GE50)g(\(DL,)h(DB,)f(DR,)h -(DD\))0 4786 y FB(GIVEN)e FD(:)277 4957 y Fq(DL,DB)449 -b FB(D)565 b FD(galactic)31 b(longitude)e(and)h(latitude)g([)15 -b Fl(l)2975 4924 y Ff(I)-7 b(I)3039 4957 y Fl(;)15 b(b)3118 -4924 y Ff(I)-7 b(I)3197 4957 y FD(])0 5368 y FB(RETURNED)46 -b FD(:)277 5540 y Fq(DR,DD)435 b FB(D)565 b FD(B1950.0)33 -b([)15 b Fl(\013;)g(\016)21 b FD(])p eop -%%Page: 83 85 -83 84 bop 0 52 a Fw(SUN/67.70)3252 b FD(83)0 351 y FB(NOTES)44 -b FD(:)311 536 y(1.)i(All)29 b(argumen)m(ts)i(are)g(in)e(radians.)311 -679 y(2.)46 b(The)29 b(equatorial)g(co)s(ordinates)g(are)g(B1950.0)j -(FK4.)41 b(Use)30 b(the)f(routine)f(sla)p Ft(_)p FD(GALEQ)h(if)f(con)m -(v)m(er-)427 792 y(sion)i(to)h(J2000.0)h(FK5)f(co)s(ordinates)f(is)g -(required.)0 1131 y FB(REFERENCE)44 b FD(:)d(Blaau)m(w)30 -b Fq(et)j(al.)p FD(,)e(1960,)h Fq(Mon.Not.R.astr.So)-5 -b(c.)p FD(,)33 b FB(121)p FD(,)e(123.)p 0 1254 3780 8 -v 0 1367 a Fx(SLA)p Fn(_)p Fx(GEOC)587 b Fm(Geo)s(detic)38 -b(to)g(Geo)s(cen)m(tric)586 b Fx(SLA)p Fn(_)p Fx(GEOC)0 -1718 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ert)32 b(geo)s(detic)f(p)s -(osition)d(to)j(geo)s(cen)m(tric.)0 1905 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_GEOC)g(\(P,)h(H,)g(R,)g(Z\))0 -2242 y FB(GIVEN)e FD(:)277 2388 y Fq(P)674 b FB(D)565 -b FD(latitude)30 b(\(geo)s(detic,)h(radians\))277 2501 -y Fq(H)668 b FB(D)565 b FD(heigh)m(t)31 b(ab)s(o)m(v)m(e)i(reference)f -(spheroid)d(\(geo)s(detic,)k(metres\))0 2946 y FB(RETURNED)46 -b FD(:)277 3092 y Fq(R)670 b FB(D)565 b FD(distance)30 -b(from)g(Earth)g(axis)g(\(A)m(U\))277 3205 y Fq(Z)680 -b FB(D)565 b FD(distance)30 b(from)g(plane)g(of)g(Earth)g(equator)h -(\(A)m(U\))0 3536 y FB(NOTES)44 b FD(:)311 3720 y(1.)i(Geo)s(cen)m -(tric)32 b(latitude)d(can)i(b)s(e)e(obtained)h(b)m(y)g(ev)-5 -b(aluating)30 b Ft(ATAN2\(Z,R\))p FD(.)311 3863 y(2.)46 -b(IA)m(U)31 b(1976)h(constan)m(ts)g(are)f(used.)0 4203 -y FB(REFERENCE)44 b FD(:)d(Green,)31 b(R.M.,)g(1985.)h -Fq(Spheric)-5 b(al)35 b(Astr)-5 b(onomy)p FD(,)32 b(Cam)m(bridge)e(U.P) --8 b(.,)31 b(p98.)p 0 4326 V 0 4439 a Fx(SLA)p Fn(_)p -Fx(GMST)815 b Fm(UT)39 b(to)f(GMST)817 b Fx(SLA)p Fn(_)p -Fx(GMST)0 4789 y FB(A)m(CTION)44 b FD(:)c(Con)m(v)m(ersion)30 -b(from)g(univ)m(ersal)f(time)h(UT1)h(to)g(Green)m(wic)m(h)f(mean)g -(sidereal)f(time.)0 4977 y FB(CALL)45 b FD(:)77 b Ft(D)47 -b(=)h(sla_GMST)d(\(UT1\))0 5310 y FB(GIVEN)g FD(:)277 -5456 y Fq(UT1)557 b FB(D)565 b FD(univ)m(ersal)21 b(time)i(\(strictly)g -(UT1\))g(expressed)g(as)g(mo)s(di\014ed)1658 5569 y(Julian)28 -b(Date)k(\(JD)p Fo(\000)p FD(2400000.5\))p eop -%%Page: 84 86 -84 85 bop 0 52 a FD(84)0 351 y FB(RETURNED)46 b FD(:)277 -523 y Fq(sla)p Ft(_)p Fq(GMST)314 b FB(D)565 b FD(Green)m(wic)m(h)30 -b(mean)h(sidereal)e(time)h(\(radians\))0 818 y FB(NOTES)44 -b FD(:)311 996 y(1.)i(The)31 b(IA)m(U)i(1982)g(expression)e(\(see)h -(page)h(S15)f(of)g(the)g(1984)h Fq(Astr)-5 b(onomic)g(al)37 -b(A)n(lmanac)p FD(\))32 b(is)f(used,)427 1108 y(but)41 -b(rearranged)g(to)h(reduce)f(rounding)e(errors.)73 b(This)39 -b(expression)h(is)g(alw)m(a)m(ys)i(describ)s(ed)d(as)427 -1221 y(giving)d(the)h(GMST)g(at)g(0)1337 1188 y Fu(h)1381 -1221 y FD(UT;)g(in)e(fact,)40 b(it)c(giv)m(es)i(the)f(di\013erence)f(b) -s(et)m(w)m(een)h(the)g(GMST)g(and)427 1334 y(the)g(UT,)g(whic)m(h)e -(happ)s(ens)g(to)i(equal)f(the)h(GMST)g(\(mo)s(dulo)e(24)i(hours\))f -(at)h(0)3195 1301 y Fu(h)3239 1334 y FD(UT)g(eac)m(h)g(da)m(y)-8 -b(.)427 1447 y(In)33 b(sla)p Ft(_)p FD(GMST,)g(the)g(en)m(tire)h(UT)f -(is)f(used)h(directly)f(as)i(the)g(argumen)m(t)f(for)h(the)f(canonical) -g(for-)427 1560 y(m)m(ula,)42 b(and)d(the)h(fractional)f(part)h(of)g -(the)g(UT)f(is)g(added)g(separately;)45 b(note)40 b(that)h(the)e -(factor)427 1673 y(1)p Fl(:)p FD(0027379)15 b Fo(\001)g(\001)g(\001)36 -b FD(do)s(es)30 b(not)g(app)s(ear.)311 1810 y(2.)46 b(See)40 -b(also)f(the)h(routine)e(sla)p Ft(_)p FD(GMST)-8 b(A,)39 -b(whic)m(h)f(deliv)m(ers)g(b)s(etter)i(n)m(umerical)e(precision)f(b)m -(y)i(ac-)427 1922 y(cepting)30 b(the)h(UT)f(date)h(and)f(time)g(as)h -(separate)g(argumen)m(ts.)p 0 2026 3780 8 v 0 2139 a -Fx(SLA)p Fn(_)p Fx(GMST)-11 b(A)283 b Fm(UT)39 b(to)f(GMST)g(\(extra)f -(precision\))285 b Fx(SLA)p Fn(_)p Fx(GMST)-11 b(A)0 -2490 y FB(A)m(CTION)44 b FD(:)37 b(Con)m(v)m(ersion)24 -b(from)g(univ)m(ersal)e(time)i(UT1)g(to)h(Green)m(wic)m(h)f(mean)h -(sidereal)d(time,)k(with)d(round-)227 2602 y(ing)30 b(errors)g -(minimized.)0 2790 y FB(CALL)45 b FD(:)77 b Ft(D)47 b(=)h(sla_GMSTA)d -(\(DATE,)h(UT1\))0 3101 y FB(GIVEN)f FD(:)277 3247 y -Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(UT1)30 b(date)h(as)f(Mo)s -(di\014ed)e(Julian)g(Date)j(\(in)m(teger)g(part)f(of)1658 -3360 y(JD)p Fo(\000)p FD(2400000.5\))277 3473 y Fq(UT1)557 -b FB(D)565 b FD(UT1)31 b(time)f(\(fraction)g(of)h(a)g(da)m(y\))0 -3760 y FB(RETURNED)46 b FD(:)277 3931 y Fq(sla)p Ft(_)p -Fq(GMST)314 b FB(D)565 b FD(Green)m(wic)m(h)30 b(mean)h(sidereal)e -(time)h(\(radians\))0 4226 y FB(NOTES)44 b FD(:)311 4404 -y(1.)i(The)38 b(algorithm)g(is)f(deriv)m(ed)h(from)g(the)h(IA)m(U)g -(1982)h(expression)e(\(see)h(page)g(S15)g(of)g(the)g(1984)427 -4517 y(Astronomical)30 b(Almanac\).)311 4653 y(2.)46 -b(There)34 b(is)f(no)h(restriction)f(on)h(ho)m(w)g(the)g(UT)g(is)f(app) -s(ortioned)g(b)s(et)m(w)m(een)h(the)h(D)m(A)-8 b(TE)35 -b(and)e(UT1)427 4766 y(argumen)m(ts.)53 b(Either)33 b(of)h(the)g(t)m(w) -m(o)i(argumen)m(ts)e(could,)g(for)g(example,)h(b)s(e)f(zero)h(and)e -(the)i(en)m(tire)427 4879 y(date)16 b(+)f(time)32 b(supplied)d(in)i -(the)h(other.)47 b(Ho)m(w)m(ev)m(er,)35 b(the)d(routine)f(is)h -(designed)f(to)i(deliv)m(er)e(maxi-)427 4992 y(m)m(um)e(accuracy)h -(when)e(the)i(D)m(A)-8 b(TE)30 b(argumen)m(t)g(is)e(a)h(whole)g(n)m(um) -m(b)s(er)f(and)g(the)i(UT1)f(argumen)m(t)427 5105 y(lies)g(in)g(the)i -(range)g([)15 b(0)p Fl(;)31 b FD(1)15 b(],)32 b(or)e -Fq(vic)-5 b(e)32 b(versa)p FD(.)311 5241 y(3.)46 b(See)32 -b(also)f(the)g(routine)g(sla)p Ft(_)p FD(GMST,)f(whic)m(h)g(accepts)j -(the)e(UT1)h(as)f(a)h(single)e(argumen)m(t.)43 b(Com-)427 -5354 y(pared)26 b(with)f(sla)p Ft(_)p FD(GMST,)h(the)h(extra)g(n)m -(umerical)e(precision)g(deliv)m(ered)g(b)m(y)h(the)h(presen)m(t)f -(routine)427 5467 y(is)35 b(unlik)m(ely)e(to)j(b)s(e)f(imp)s(ortan)m(t) -g(in)f(an)i(absolute)f(sense,)i(but)e(ma)m(y)h(b)s(e)f(useful)f(when)g -(critically)427 5580 y(comparing)27 b(algorithms)f(and)g(in)g -(applications)f(where)i(t)m(w)m(o)i(sidereal)c(times)i(close)g -(together)i(are)427 5693 y(di\013erenced.)p eop -%%Page: 85 87 -85 86 bop 0 52 a Fw(SUN/67.70)3252 b FD(85)p 0 267 3780 -8 v 0 380 a Fx(SLA)p Fn(_)p Fx(GRESID)577 b Fm(Gaussian)38 -b(Residual)578 b Fx(SLA)p Fn(_)p Fx(GRESID)0 730 y FB(A)m(CTION)44 -b FD(:)c(Generate)32 b(pseudo-random)d(normal)h(deviate)g(or)h -Fq(Gaussian)j(r)-5 b(esidual)p FD(.)0 918 y FB(CALL)45 -b FD(:)77 b Ft(R)47 b(=)h(sla_GRESID)d(\(S\))0 1335 y -FB(GIVEN)g FD(:)277 1507 y Fq(S)685 b FB(R)567 b FD(standard)30 -b(deviation)0 1988 y FB(NOTES)44 b FD(:)311 2223 y(1.)i(The)28 -b(results)f(of)h(man)m(y)g(calls)f(to)i(this)e(routine)g(will)e(b)s(e)j -(normally)e(distributed)f(with)i(mean)h(zero)427 2336 -y(and)i(standard)g(deviation)f(S.)311 2506 y(2.)46 b(The)30 -b(Bo)m(x-Muller)g(algorithm)g(is)f(used.)311 2675 y(3.)46 -b(The)30 b(implemen)m(tation)f(is)h(mac)m(hine-dep)s(enden)m(t.)0 -3156 y FB(REFERENCE)44 b FD(:)d(Ahrens)29 b(&)h(Dieter,)h(1972.)i -Fq(Comm.A.C.M.)d FB(15)p FD(,)h(873.)p 0 3337 V 0 3450 -a Fx(SLA)p Fn(_)p Fx(H2E)988 b Fm(Az,El)38 b(to)g Fg(h;)20 -b(\016)993 b Fx(SLA)p Fn(_)p Fx(H2E)0 3800 y FB(A)m(CTION)44 -b FD(:)c(Horizon)31 b(to)g(equatorial)f(co)s(ordinates)g(\(single)f -(precision\).)0 3988 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_H2E)g(\(AZ,)h(EL,)g(PHI,)f(HA,)h(DEC\))0 4409 y -FB(GIVEN)e FD(:)277 4555 y Fq(AZ)612 b FB(R)567 b FD(azim)m(uth)30 -b(\(radians\))277 4668 y Fq(EL)617 b FB(R)567 b FD(elev)-5 -b(ation)30 b(\(radians\))277 4780 y Fq(PHI)571 b FB(R)c -FD(latitude)30 b(\(radians\))0 5253 y FB(RETURNED)46 -b FD(:)277 5399 y Fq(HA)600 b FB(R)567 b FD(hour)30 b(angle)g -(\(radians\))277 5512 y Fq(DEC)540 b FB(R)567 b FD(declination)29 -b(\(radians\))p eop -%%Page: 86 88 -86 87 bop 0 52 a FD(86)0 351 y FB(NOTES)44 b FD(:)311 -579 y(1.)i(The)30 b(sign)g(con)m(v)m(en)m(tion)h(for)f(azim)m(uth)g(is) -g(north)f(zero,)j(east)f(+)p Fl(\031)s(=)p FD(2.)311 -746 y(2.)46 b(HA)31 b(is)e(returned)h(in)f(the)h(range)h -Fo(\006)p Fl(\031)s FD(.)40 b(Declination)30 b(is)f(returned)h(in)f -(the)h(range)h Fo(\006)p Fl(\031)s FD(.)311 912 y(3.)46 -b(The)33 b(latitude)g(is)f(\(in)h(principle\))d(geo)s(detic.)51 -b(In)33 b(critical)f(applications,)h(corrections)g(for)h(p)s(olar)427 -1025 y(motion)c(should)f(b)s(e)g(applied)g(\(see)i(sla)p -Ft(_)p FD(POLMO\).)311 1191 y(4.)46 b(In)34 b(some)g(applications)e(it) -i(will)d(b)s(e)j(imp)s(ortan)m(t)f(to)i(sp)s(ecify)e(the)h(correct)h(t) -m(yp)s(e)f(of)h(elev)-5 b(ation)34 b(in)427 1304 y(order)42 -b(to)h(pro)s(duce)f(the)g(required)f(t)m(yp)s(e)h(of)h([)15 -b Fl(h;)g(\016)20 b FD(].)77 b(In)42 b(particular,)i(it)e(ma)m(y)h(b)s -(e)e(imp)s(ortan)m(t)427 1417 y(to)f(distinguish)35 b(b)s(et)m(w)m(een) -k(the)g(elev)-5 b(ation)39 b(as)g(a\013ected)h(b)m(y)f(refraction,)i -(whic)m(h)c(will)f(yield)h(the)427 1530 y Fq(observe)-5 -b(d)32 b FD([)15 b Fl(h;)g(\016)20 b FD(],)31 b(and)e(the)i(elev)-5 -b(ation)30 b Fq(in)j(vacuo)p FD(,)e(whic)m(h)e(will)f(yield)g(the)j -Fq(top)-5 b(o)g(c)g(entric)33 b FD([)15 b Fl(h;)g(\016)20 -b FD(].)41 b(If)427 1643 y(the)28 b(e\013ects)h(of)f(diurnal)d(ab)s -(erration)i(can)h(b)s(e)f(neglected,)i(the)f(top)s(o)s(cen)m(tric)g([) -15 b Fl(h;)g(\016)20 b FD(])28 b(ma)m(y)g(b)s(e)f(used)427 -1756 y(as)k(an)f(appro)m(ximation)f(to)j(the)e Fq(app)-5 -b(ar)g(ent)33 b FD([)15 b Fl(h;)g(\016)21 b FD(].)311 -1922 y(5.)46 b(No)31 b(range)g(c)m(hec)m(king)g(of)g(argumen)m(ts)f(is) -g(carried)f(out.)311 2088 y(6.)46 b(In)28 b(applications)e(whic)m(h)i -(in)m(v)m(olv)m(e)g(man)m(y)h(suc)m(h)f(calculations,)g(rather)g(than)g -(calling)f(the)h(presen)m(t)427 2201 y(routine)i(it)g(will)e(b)s(e)i -(more)g(e\016cien)m(t)h(to)h(use)e(inline)d(co)s(de,)k(ha)m(ving)g -(previously)d(computed)i(\014xed)427 2314 y(terms)h(suc)m(h)f(as)g -(sine)g(and)f(cosine)h(of)h(latitude.)p 0 2469 3780 8 -v 0 2582 a Fx(SLA)p Fn(_)p Fx(H2FK5)681 b Fm(Hipparcos)37 -b(to)h(FK5)682 b Fx(SLA)p Fn(_)p Fx(H2FK5)0 2933 y FB(A)m(CTION)44 -b FD(:)63 b(T)-8 b(ransform)41 b(a)i(Hipparcos)e(star)h(p)s(osition)e -(and)h(prop)s(er)f(motion)i(in)m(to)g(the)g(FK5)g(\(J2000\))227 -3046 y(frame.)0 3233 y FB(CALL)j FD(:)77 b Ft(CALL)46 -b(sla_H2FK5)g(\(RH,)g(DH,)h(DRH,)g(DDH,)f(R5,)h(D5,)g(DR5,)g(DD5\))0 -3643 y FB(GIVEN)e FD(:)277 3789 y Fq(RH)602 b FB(D)565 -b FD(Hipparcos)30 b Fl(\013)g FD(\(radians\))277 3902 -y Fq(DH)599 b FB(D)565 b FD(Hipparcos)30 b Fl(\016)k -FD(\(radians\))277 4015 y Fq(DRH)533 b FB(D)565 b FD(Hipparcos)33 -b(prop)s(er)f(motion)h(in)f Fl(\013)i FD(\(radians)e(p)s(er)g(Julian) -1658 4128 y(y)m(ear\))277 4241 y Fq(DDH)530 b FB(D)565 -b FD(Hipparcos)35 b(prop)s(er)f(motion)h(in)f Fl(\016)40 -b FD(\(radians)34 b(p)s(er)g(Julian)1658 4354 y(y)m(ear\))0 -4809 y FB(RETURNED)46 b FD(:)277 4955 y Fq(R5)624 b FB(D)565 -b FD(J2000.0)33 b(FK5)e Fl(\013)f FD(\(radians\))277 -5068 y Fq(D5)621 b FB(D)565 b FD(J2000.0)33 b(FK5)e Fl(\016)j -FD(\(radians\))277 5180 y Fq(DR5)555 b FB(D)565 b FD(J2000.0)36 -b(FK5)f(prop)s(er)e(motion)g(in)g Fl(\013)i FD(\(radians)e(p)s(er)g -(Ju-)1658 5293 y(lian)c(y)m(ear\))277 5406 y Fq(DD5)552 -b FB(D)565 b FD(FK5)22 b(J2000.0)i(prop)s(er)19 b(motion)j(in)e -Fl(\016)25 b FD(\(radians)20 b(p)s(er)g(Julian)1658 5519 -y(y)m(ear\))p eop -%%Page: 87 89 -87 88 bop 0 52 a Fw(SUN/67.70)3252 b FD(87)0 351 y FB(NOTES)44 -b FD(:)311 544 y(1.)i(The)37 b Fl(\013)h FD(prop)s(er)e(motions)h(are) -57 b(_)-45 b Fl(\013)38 b FD(rather)f(than)57 b(_)-44 -b Fl(\013)15 b FD(cos)h Fl(\016)s FD(,)40 b(and)d(are)h(p)s(er)e(y)m -(ear)i(rather)f(than)g(p)s(er)427 657 y(cen)m(tury)-8 -b(.)311 806 y(2.)46 b(The)41 b(FK5)g(to)g(Hipparcos)f(transformation)g -(consists)g(of)h(a)g(pure)f(rotation)h(and)f(spin;)k(zonal)427 -919 y(errors)30 b(in)f(the)i(FK5)g(catalogue)h(are)e(not)h(tak)m(en)g -(in)m(to)g(accoun)m(t.)311 1068 y(3.)46 b(The)c(adopted)h(ep)s(o)s(c)m -(h)g(J2000.0)h(FK5)g(to)f(Hipparcos)f(orien)m(tation)g(and)g(spin)f(v) --5 b(alues)42 b(are)h(as)427 1181 y(follo)m(ws)30 b(\(see)h -(reference\):)p 821 1312 1115 4 v 819 1425 4 113 v 971 -1425 V 971 1425 V 1023 1391 a Fq(orientation)p 1509 1425 -V 199 w(spin)p 1934 1425 V 821 1428 1115 4 v 819 1541 -4 113 v 871 1507 a Fl(x)p 971 1541 V 184 w Fo(\000)p -FD(19)p Fl(:)p FD(9)p 1509 1541 V 254 w Fo(\000)p FD(0)p -Fl(:)p FD(30)p 1934 1541 V 819 1654 V 875 1620 a Fl(y)p -971 1654 V 232 w Fo(\000)p FD(9)p Fl(:)p FD(1)p 1509 -1654 V 254 w(+0)p Fl(:)p FD(60)p 1934 1654 V 819 1767 -V 877 1733 a Fl(z)p 971 1767 V 188 w FD(+22)p Fl(:)p -FD(9)p 1509 1767 V 254 w(+0)p Fl(:)p FD(70)p 1934 1767 -V 821 1770 1115 4 v 819 1883 4 113 v 971 1883 V 1151 -1849 a Fq(mas)p 1509 1883 V 299 w(mas/y)p 1934 1883 V -821 1886 1115 4 v 427 2093 a FD(These)40 b(orien)m(tation)h(and)e(spin) -f(comp)s(onen)m(ts)j(are)g(in)m(terpreted)e(as)i Fq(axial)h(ve)-5 -b(ctors.)71 b FD(An)40 b(axial)427 2206 y(v)m(ector)35 -b(p)s(oin)m(ts)d(at)i(the)g(p)s(ole)e(of)i(the)f(rotation)h(and)f(its)f -(length)h(is)f(the)i(amoun)m(t)g(of)f(rotation)h(in)427 -2319 y(radians.)311 2468 y(4.)46 b(See)31 b(also)f(sla)p -Ft(_)p FD(FK52H,)h(sla)p Ft(_)p FD(FK5HZ,)f(sla)p Ft(_)p -FD(HFK5Z.)0 2844 y FB(REFERENCE)44 b FD(:)d(F)-8 b(eissel,)30 -b(M.)h(&)f(Mignard,)g(F.,)h(1998.,)h Fq(Astr)-5 b(on.Astr)g(ophys.)34 -b FB(331)p FD(,)d(L33-L36.)p 0 2982 3780 8 v 0 3095 a -Fx(SLA)p Fn(_)p Fx(HFK5Z)428 b Fm(Hipparcos)37 b(to)h(FK5,)h(no)f(P)-10 -b(.M.)428 b Fx(SLA)p Fn(_)p Fx(HFK5Z)0 3445 y FB(A)m(CTION)44 -b FD(:)53 b(T)-8 b(ransform)36 b(a)h(Hipparcos)f(star)h(p)s(osition)e -(in)m(to)i(the)g(FK5)g(\(J2000\))i(frame)d(assuming)g(zero)227 -3558 y(Hipparcos)30 b(prop)s(er)f(motion.)0 3746 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_HFK5Z)g(\(RH,)g(DH,)h(EPOCH,)f(R5,)h(D5,)g -(DR5,)g(DD5\))0 4104 y FB(GIVEN)e FD(:)277 4250 y Fq(RH)602 -b FB(D)565 b FD(Hipparcos)30 b Fl(\013)g FD(\(radians\))277 -4363 y Fq(DH)599 b FB(D)565 b FD(Hipparcos)30 b Fl(\016)k -FD(\(radians\))277 4476 y Fq(EPOCH)409 b FB(D)565 b FD(Julian)28 -b(ep)s(o)s(c)m(h)i(\(TDB\))0 4843 y FB(RETURNED)46 b -FD(:)277 4989 y Fq(R5)624 b FB(D)565 b FD(J2000.0)33 -b(FK5)e Fl(\013)f FD(\(radians\))277 5102 y Fq(D5)621 -b FB(D)565 b FD(J2000.0)33 b(FK5)e Fl(\016)j FD(\(radians\))277 -5215 y Fq(DR5)555 b FB(D)565 b FD(J2000.0)36 b(FK5)f(prop)s(er)e -(motion)g(in)g Fl(\013)i FD(\(radians)e(p)s(er)g(Ju-)1658 -5328 y(lian)c(y)m(ear\))277 5441 y Fq(DD5)552 b FB(D)565 -b FD(FK5)22 b(J2000.0)i(prop)s(er)19 b(motion)j(in)e -Fl(\016)25 b FD(\(radians)20 b(p)s(er)g(Julian)1658 5554 -y(y)m(ear\))p eop -%%Page: 88 90 -88 89 bop 0 52 a FD(88)0 351 y FB(NOTES)44 b FD(:)311 -546 y(1.)i(The)37 b Fl(\013)h FD(prop)s(er)e(motions)h(are)57 -b(_)-45 b Fl(\013)38 b FD(rather)f(than)57 b(_)-44 b -Fl(\013)15 b FD(cos)h Fl(\016)s FD(,)40 b(and)d(are)h(p)s(er)e(y)m(ear) -i(rather)f(than)g(p)s(er)427 659 y(cen)m(tury)-8 b(.)311 -808 y(2.)46 b(The)41 b(FK5)g(to)g(Hipparcos)f(transformation)g -(consists)g(of)h(a)g(pure)f(rotation)h(and)f(spin;)k(zonal)427 -921 y(errors)30 b(in)f(the)i(FK5)g(catalogue)h(are)e(not)h(tak)m(en)g -(in)m(to)g(accoun)m(t.)311 1071 y(3.)46 b(The)c(adopted)h(ep)s(o)s(c)m -(h)g(J2000.0)h(FK5)g(to)f(Hipparcos)f(orien)m(tation)g(and)g(spin)f(v) --5 b(alues)42 b(are)h(as)427 1184 y(follo)m(ws)30 b(\(see)h -(reference\):)p 821 1314 1115 4 v 819 1427 4 113 v 971 -1427 V 971 1427 V 1023 1393 a Fq(orientation)p 1509 1427 -V 199 w(spin)p 1934 1427 V 821 1431 1115 4 v 819 1544 -4 113 v 871 1510 a Fl(x)p 971 1544 V 184 w Fo(\000)p -FD(19)p Fl(:)p FD(9)p 1509 1544 V 254 w Fo(\000)p FD(0)p -Fl(:)p FD(30)p 1934 1544 V 819 1657 V 875 1623 a Fl(y)p -971 1657 V 232 w Fo(\000)p FD(9)p Fl(:)p FD(1)p 1509 -1657 V 254 w(+0)p Fl(:)p FD(60)p 1934 1657 V 819 1769 -V 877 1736 a Fl(z)p 971 1769 V 188 w FD(+22)p Fl(:)p -FD(9)p 1509 1769 V 254 w(+0)p Fl(:)p FD(70)p 1934 1769 -V 821 1773 1115 4 v 819 1886 4 113 v 971 1886 V 1151 -1852 a Fq(mas)p 1509 1886 V 299 w(mas/y)p 1934 1886 V -821 1889 1115 4 v 427 2096 a FD(These)40 b(orien)m(tation)h(and)e(spin) -f(comp)s(onen)m(ts)j(are)g(in)m(terpreted)e(as)i Fq(axial)h(ve)-5 -b(ctors.)71 b FD(An)40 b(axial)427 2209 y(v)m(ector)35 -b(p)s(oin)m(ts)d(at)i(the)g(p)s(ole)e(of)i(the)f(rotation)h(and)f(its)f -(length)h(is)f(the)i(amoun)m(t)g(of)f(rotation)h(in)427 -2322 y(radians.)311 2471 y(4.)46 b(It)37 b(w)m(as)g(the)g(in)m(ten)m -(tion)f(that)h(Hipparcos)f(should)f(b)s(e)h(a)h(close)g(appro)m -(ximation)e(to)j(an)e(inertial)427 2584 y(frame,)j(so)e(that)g(distan)m -(t)f(ob)5 b(jects)37 b(ha)m(v)m(e)h(zero)g(prop)s(er)d(motion;)40 -b(suc)m(h)c(ob)5 b(jects)37 b(ha)m(v)m(e)h(\(in)e(gen-)427 -2697 y(eral\))30 b(non-zero)g(prop)s(er)f(motion)g(in)g(FK5,)h(and)f -(this)g(routine)g(returns)f(those)i Fq(\014ctitious)j(pr)-5 -b(op)g(er)427 2810 y(motions.)311 2960 y FD(5.)46 b(The)39 -b(p)s(osition)f(returned)h(b)m(y)g(this)g(routine)f(is)h(in)f(the)i -(FK5)g(J2000)h(reference)f(frame)g(but)f(at)427 3073 -y(Julian)28 b(ep)s(o)s(c)m(h)i(EPOCH.)311 3222 y(6.)46 -b(See)31 b(also)f(sla)p Ft(_)p FD(FK52H,)h(sla)p Ft(_)p -FD(FK5HZ,)f(sla)p Ft(_)p FD(H2FK5.)0 3601 y FB(REFERENCE)44 -b FD(:)d(F)-8 b(eissel,)30 b(M.)h(&)f(Mignard,)g(F.,)h(1998.,)h -Fq(Astr)-5 b(on.Astr)g(ophys.)34 b FB(331)p FD(,)d(L33-L36.)p -0 3741 3780 8 v 0 3854 a Fx(SLA)p Fn(_)p Fx(IMXV)478 -b Fm(Apply)38 b(3D)h(Rev)m(erse)f(Rotation)478 b Fx(SLA)p -Fn(_)p Fx(IMXV)0 4204 y FB(A)m(CTION)44 b FD(:)c(Multiply)28 -b(a)j(3-v)m(ector)i(b)m(y)d(the)h(in)m(v)m(erse)f(of)g(a)h(rotation)g -(matrix)f(\(single)f(precision\).)0 4392 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_IMXV)g(\(RM,)h(VA,)f(VB\))0 -4752 y FB(GIVEN)f FD(:)277 4898 y Fq(RM)588 b FB(R\(3,3\))352 -b FD(rotation)31 b(matrix)277 5011 y Fq(V)-9 b(A)609 -b FB(R\(3\))433 b FD(v)m(ector)32 b(to)f(b)s(e)f(rotated)0 -5381 y FB(RETURNED)46 b FD(:)277 5553 y Fq(VB)604 b FB(R\(3\))433 -b FD(result)29 b(v)m(ector)p eop -%%Page: 89 91 -89 90 bop 0 52 a Fw(SUN/67.70)3252 b FD(89)0 351 y FB(NOTES)44 -b FD(:)311 544 y(1.)i(This)29 b(routine)g(p)s(erforms)g(the)i(op)s -(eration:)597 692 y FB(b)g FD(=)f FB(M)886 659 y Ff(T)941 -692 y Fo(\001)p FB(a)427 841 y FD(where)g FB(a)f FD(and)g -FB(b)h FD(are)g(the)g(3-v)m(ectors)i(V)-10 b(A)30 b(and)f(VB)i(resp)s -(ectiv)m(ely)-8 b(,)30 b(and)f FB(M)h FD(is)f(the)h(3)19 -b Fo(\002)g FD(3)30 b(matrix)427 954 y(RM.)311 1102 y(2.)46 -b(The)34 b(main)g(function)f(of)i(this)e(routine)h(is)f(apply)g(an)i -(in)m(v)m(erse)f(rotation;)j(under)c(these)i(circum-)427 -1215 y(stances,)d FB(M)e FD(is)g Fq(ortho)-5 b(gonal)p -FD(,)34 b(with)29 b(its)g(in)m(v)m(erse)i(the)f(same)h(as)g(its)e -(transp)s(ose.)311 1364 y(3.)46 b(T)-8 b(o)25 b(comply)f(with)g(the)h -(ANSI)f(F)-8 b(ortran)26 b(77)f(standard,)g(V)-10 b(A)25 -b(and)f(VB)i(m)m(ust)e FB(not)h FD(b)s(e)f(the)h(same)g(ar-)427 -1477 y(ra)m(y)-8 b(.)40 b(The)25 b(routine)f(is,)i(in)e(fact,)k(co)s -(ded)d(so)g(as)h(to)g(w)m(ork)f(prop)s(erly)f(on)h(the)g(V)-10 -b(AX)26 b(and)f(man)m(y)g(other)427 1590 y(systems)31 -b(ev)m(en)g(if)e(this)g(rule)g(is)h(violated,)g(something)g(that)h(is)e -FB(not)p FD(,)i(ho)m(w)m(ev)m(er,)h(recommended.)p 0 -1727 3780 8 v 0 1840 a Fx(SLA)p Fn(_)p Fx(INTIN)474 b -Fm(Deco)s(de)39 b(an)g(In)m(teger)f(Num)m(b)s(er)473 -b Fx(SLA)p Fn(_)p Fx(INTIN)0 2191 y FB(A)m(CTION)44 b -FD(:)c(Con)m(v)m(ert)32 b(free-format)f(input)d(in)m(to)j(an)f(in)m -(teger.)0 2378 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_INTIN)g -(\(STRING,)f(NSTRT,)h(IRESLT,)g(JFLAG\))0 2735 y FB(GIVEN)f -FD(:)277 2881 y Fq(STRING)381 b FB(C)569 b FD(string)29 -b(con)m(taining)h(n)m(um)m(b)s(er)f(to)j(b)s(e)d(deco)s(ded)277 -2994 y Fq(NSTR)-7 b(T)428 b FB(I)605 b FD(p)s(oin)m(ter)30 -b(to)h(where)f(deco)s(ding)f(is)g(to)i(commence)277 3107 -y Fq(IRESL)-7 b(T)407 b FB(I)605 b FD(curren)m(t)30 b(v)-5 -b(alue)30 b(of)h(result)0 3473 y FB(RETURNED)46 b FD(:)277 -3619 y Fq(NSTR)-7 b(T)428 b FB(I)605 b FD(adv)-5 b(anced)31 -b(to)g(next)f(n)m(um)m(b)s(er)277 3732 y Fq(IRESL)-7 -b(T)407 b FB(I)605 b FD(result)277 3845 y Fq(JFLA)n(G)436 -b FB(I)605 b FD(status:)65 b Fo(\000)p FD(1)43 b(=)f -Fo(\000)p FD(OK,)f(0)i(=)f(+OK,)g(1)h(=)f(n)m(ull)e(result,)1658 -3958 y(2)31 b(=)f(error)0 4324 y FB(NOTES)44 b FD(:)311 -4516 y(1.)i(The)d(reason)g(sla)p Ft(_)p FD(INTIN)e(has)i(separate)g -(`OK')g(status)g(v)-5 b(alues)42 b(for)h(+)f(and)g Fo(\000)h -FD(is)e(to)j(enable)427 4629 y(min)m(us)28 b(zero)j(to)g(b)s(e)e -(detected.)42 b(This)28 b(is)g(of)i(crucial)f(imp)s(ortance)g(when)g -(deco)s(ding)g(mixed-radix)427 4742 y(n)m(um)m(b)s(ers.)68 -b(F)-8 b(or)40 b(example,)j(an)c(angle)h(expressed)f(as)i(degrees,)i -(arcmin)m(utes)c(and)g(arcseconds)427 4855 y(ma)m(y)31 -b(ha)m(v)m(e)h(a)f(leading)e(min)m(us)f(sign)i(but)f(a)i(zero)g -(degrees)g(\014eld.)311 5004 y(2.)46 b(A)31 b(T)-8 b(AB)31 -b(is)e(in)m(terpreted)h(as)g(a)h(space.)41 b Fq(n.b.)30 -b FD(The)g(test)i(for)e(T)-8 b(AB)31 b(is)e(ASCI)s(I-sp)s(eci\014c.)311 -5152 y(3.)46 b(The)29 b(basic)f(format)h(is)f(the)h(sequence)h(of)f -(\014elds)e Fo(\006)p Fl(n)p FD(,)i(where)f Fo(\006)h -FD(is)e(a)j(sign)e(c)m(haracter)i(`+')f(or)g(`)p Fo(\000)p -FD(',)427 5265 y(and)h Fl(n)g FD(means)g(a)h(string)e(of)i(decimal)e -(digits.)311 5414 y(4.)46 b(Spaces:)506 5562 y Fo(\017)g -FD(Leading)30 b(spaces)h(are)g(ignored.)506 5693 y Fo(\017)46 -b FD(Spaces)31 b(b)s(et)m(w)m(een)g(the)f(sign)g(and)f(the)i(n)m(um)m -(b)s(er)e(are)i(allo)m(w)m(ed.)p eop -%%Page: 90 92 -90 91 bop 0 52 a FD(90)506 351 y Fo(\017)46 b FD(T)-8 -b(railing)38 b(spaces)i(are)h(ignored;)j(the)c(\014rst)f(signi\014es)f -(end)h(of)h(deco)s(ding)f(and)g(subsequen)m(t)597 464 -y(ones)31 b(are)g(skipp)s(ed.)311 628 y(5.)46 b(Delimiters:)506 -793 y Fo(\017)g FD(An)m(y)30 b(c)m(haracter)h(other)f(than)f(+,)p -Fo(\000)p FD(,0-9)i(or)e(space)h(ma)m(y)h(b)s(e)e(used)f(to)j(signal)d -(the)i(end)f(of)g(the)597 906 y(n)m(um)m(b)s(er)g(and)h(terminate)g -(deco)s(ding.)506 1044 y Fo(\017)46 b FD(Comma)34 b(is)g(recognized)g -(b)m(y)g(sla)p Ft(_)p FD(INTIN)f(as)i(a)f(sp)s(ecial)f(case;)38 -b(it)33 b(is)h(skipp)s(ed,)e(lea)m(ving)i(the)597 1157 -y(p)s(oin)m(ter)c(on)g(the)g(next)h(c)m(haracter.)42 -b(See)31 b(9,)g(b)s(elo)m(w.)506 1296 y Fo(\017)46 b -FD(Deco)s(ding)31 b(will)c(in)i(all)h(cases)h(terminate)f(if)g(end)f -(of)i(string)e(is)h(reac)m(hed.)311 1460 y(6.)46 b(The)30 -b(sign)g(is)f(optional.)40 b(The)30 b(default)f(is)h(+.)311 -1624 y(7.)46 b(A)28 b Fq(nul)5 b(l)30 b(r)-5 b(esult)37 -b FD(o)s(ccurs)28 b(when)e(the)i(string)f(of)h(c)m(haracters)h(b)s -(eing)d(deco)s(ded)h(do)s(es)h(not)g(b)s(egin)e(with)427 -1737 y(+,)p Fo(\000)34 b FD(or)f(0-9,)k(or)c(consists)h(en)m(tirely)f -(of)h(spaces.)51 b(When)34 b(this)e(condition)h(is)f(detected,)37 -b(JFLA)m(G)427 1850 y(is)30 b(set)h(to)g(1)f(and)g(IRESL)-8 -b(T)30 b(is)f(left)h(un)m(touc)m(hed.)311 2014 y(8.)46 -b(NSTR)-8 b(T)30 b(=)g(1)h(for)f(the)g(\014rst)g(c)m(haracter)i(in)d -(the)i(string.)311 2178 y(9.)46 b(On)26 b(return)g(from)g(sla)p -Ft(_)p FD(INTIN,)g(NSTR)-8 b(T)26 b(is)g(set)h(ready)g(for)f(the)h -(next)g(deco)s(de)g({)g(follo)m(wing)e(trail-)427 2291 -y(ing)31 b(blanks)g(and)g(an)m(y)h(comma.)47 b(If)31 -b(a)i(delimiter)c(other)j(than)g(comma)h(is)e(b)s(eing)f(used,)i(NSTR) --8 b(T)427 2404 y(m)m(ust)25 b(b)s(e)f(incremen)m(ted)g(b)s(efore)g -(the)h(next)g(call)f(to)i(sla)p Ft(_)p FD(INTIN,)e(otherwise)g(all)f -(subsequen)m(t)h(calls)427 2517 y(will)k(return)h(a)i(n)m(ull)d -(result.)266 2681 y(10.)46 b(Errors)30 b(\(JFLA)m(G=2\))i(o)s(ccur)e -(when:)506 2845 y Fo(\017)46 b FD(there)31 b(is)e(a)i(+)f(or)g -Fo(\000)g FD(but)g(no)g(n)m(um)m(b)s(er;)g(or)506 2984 -y Fo(\017)46 b FD(the)31 b(n)m(um)m(b)s(er)e(is)g(greater)j(than)e(2) -1742 2951 y Fu(31)1837 2984 y Fo(\000)20 b FD(1.)266 -3148 y(11.)46 b(When)31 b(an)f(error)h(has)f(b)s(een)g(detected,)j -(NSTR)-8 b(T)30 b(is)g(left)g(p)s(oin)m(ting)f(to)j(the)f(c)m(haracter) -h(follo)m(wing)427 3261 y(the)f(last)f(one)h(used)e(b)s(efore)h(the)h -(error)f(came)h(to)g(ligh)m(t.)266 3425 y(12.)46 b(See)31 -b(also)f(sla)p Ft(_)p FD(FLOTIN)f(and)h(sla)p Ft(_)p -FD(DFL)-8 b(TIN.)p 0 3585 3780 8 v 0 3698 a Fx(SLA)p -Fn(_)p Fx(INVF)713 b Fm(In)m(v)m(ert)38 b(Linear)g(Mo)s(del)715 -b Fx(SLA)p Fn(_)p Fx(INVF)0 4049 y FB(A)m(CTION)44 b -FD(:)c(In)m(v)m(ert)31 b(a)g(linear)e(mo)s(del)g(of)i(the)f(t)m(yp)s(e) -h(pro)s(duced)e(b)m(y)h(the)g(sla)p Ft(_)p FD(FITXY)g(routine.)0 -4236 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_INVF)g(\(FWDS,BKWDS,J\)) -0 4640 y FB(GIVEN)f FD(:)277 4812 y Fq(FWDS)466 b FB(D\(6\))431 -b FD(mo)s(del)29 b(co)s(e\016cien)m(ts)0 5264 y FB(RETURNED)46 -b FD(:)277 5410 y Fq(BKWDS)391 b FB(D\(6\))431 b FD(in)m(v)m(erse)30 -b(mo)s(del)277 5523 y Fq(J)688 b FB(I)605 b FD(status:)41 -b(0)31 b(=)f(OK,)g Fo(\000)p FD(1)g(=)g(no)h(in)m(v)m(erse)p -eop -%%Page: 91 93 -91 92 bop 0 52 a Fw(SUN/67.70)3252 b FD(91)0 351 y FB(NOTES)44 -b FD(:)311 533 y(1.)i(The)30 b(mo)s(dels)e(relate)j(t)m(w)m(o)g(sets)g -(of)f([)15 b Fl(x;)g(y)k FD(])30 b(co)s(ordinates)f(as)i(follo)m(ws.)39 -b(Naming)30 b(the)g(six)f(elemen)m(ts)427 646 y(of)c(FWDS)g -Fl(a;)15 b(b;)g(c;)g(d;)g(e)27 b FD(&)d Fl(f)10 b FD(,)25 -b(where)f(t)m(w)m(o)i(sets)f(of)f(co)s(ordinates)g([)p -Fl(x)2670 660 y Fu(1)2710 646 y Fl(;)15 b(y)2795 660 -y Fu(1)2834 646 y FD(])25 b(and)f([)p Fl(x)3132 660 y -Fu(2)3172 646 y Fl(;)15 b(y)3257 660 y Fu(2)3311 646 -y FD(])25 b(are)g(related)427 758 y(th)m(us:)597 898 -y Fl(x)649 912 y Fu(2)714 898 y FD(=)g Fl(a)20 b FD(+)g -Fl(bx)1060 912 y Fu(1)1120 898 y FD(+)g Fl(cy)1295 912 -y Fu(1)597 1011 y Fl(y)642 1025 y Fu(2)707 1011 y FD(=)k -Fl(d)d FD(+)f Fl(ex)1055 1025 y Fu(1)1115 1011 y FD(+)g -Fl(f)10 b(y)1306 1025 y Fu(1)427 1151 y FD(The)45 b(presen)m(t)g -(routine)f(generates)i(a)f(new)g(set)g(of)g(co)s(e\016cien)m(ts)h -Fl(p;)15 b(q)s(;)g(r)m(;)g(s;)g(t)46 b FD(&)f Fl(u)f -FD(\(the)i(arra)m(y)427 1264 y(BKWDS\))31 b(suc)m(h)f(that:)597 -1404 y Fl(x)649 1418 y Fu(1)714 1404 y FD(=)25 b Fl(p)20 -b FD(+)g Fl(q)s(x)1063 1418 y Fu(2)1122 1404 y FD(+)g -Fl(r)s(y)1302 1418 y Fu(2)597 1517 y Fl(y)642 1531 y -Fu(1)707 1517 y FD(=)k Fl(s)c FD(+)g Fl(tx)1041 1531 -y Fu(2)1101 1517 y FD(+)g Fl(uy)1289 1531 y Fu(2)311 -1657 y FD(2.)46 b(Tw)m(o)21 b(successiv)m(e)h(calls)e(to)i(this)e -(routine)g(will)e(deliv)m(er)i(a)i(set)f(of)g(co)s(e\016cien)m(ts)h -(equal)f(to)g(the)h(starting)427 1769 y(v)-5 b(alues.)311 -1909 y(3.)46 b(T)-8 b(o)25 b(comply)f(with)f(the)i(ANSI)f(F)-8 -b(ortran)25 b(77)g(standard,)g(FWDS)g(and)f(BKWDS)h(m)m(ust)f -FB(not)g FD(b)s(e)g(the)427 2022 y(same)31 b(arra)m(y)-8 -b(.)41 b(The)30 b(routine)f(is,)g(in)g(fact,)j(co)s(ded)d(so)i(as)f(to) -h(w)m(ork)f(prop)s(erly)e(with)h(man)m(y)h(F)-8 b(ortran)427 -2135 y(compilers)26 b(ev)m(en)h(if)f(this)g(rule)f(is)h(violated,)i -(something)e(that)i(is)e FB(not)p FD(,)h(ho)m(w)m(ev)m(er,)j -(recommended.)311 2275 y(4.)46 b(See)31 b(also)f(sla)p -Ft(_)p FD(FITXY,)g(sla)p Ft(_)p FD(PXY,)g(sla)p Ft(_)p -FD(XY2XY,)h(sla)p Ft(_)p FD(DCMPF.)p 0 2389 3780 8 v -0 2502 a Fx(SLA)p Fn(_)p Fx(KBJ)797 b Fm(Select)39 b(Ep)s(o)s(c)m(h)f -(Pre\014x)798 b Fx(SLA)p Fn(_)p Fx(KBJ)0 2852 y FB(A)m(CTION)44 -b FD(:)c(Select)31 b(ep)s(o)s(c)m(h)f(pre\014x)g(`B')h(or)f(`J'.)0 -3040 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_KBJ)g(\(JB,)h(E,)g(K,)g -(J\))0 3364 y FB(GIVEN)e FD(:)277 3510 y Fq(JB)624 b -FB(I)605 b FD(sla)p Ft(_)p FD(DBJIN)30 b(pre\014x)g(status:)41 -b(0=none,)30 b(1=`B',)i(2=`J')277 3623 y Fq(E)674 b FB(D)565 -b FD(ep)s(o)s(c)m(h)30 b({)h(Besselian)f(or)g(Julian)0 -3933 y FB(RETURNED)46 b FD(:)277 4079 y Fq(K)666 b FB(C)569 -b FD(`B')31 b(or)g(`J')277 4192 y Fq(J)688 b FB(I)605 -b FD(status:)41 b(0=OK)0 4502 y FB(NOTE)j FD(:)51 b(The)35 -b(routine)f(is)h(mainly)e(in)m(tended)h(for)i(use)f(in)f(conjunction)g -(with)g(the)i(sla)p Ft(_)p FD(DBJIN)f(routine.)227 4615 -y(If)f(the)g(v)-5 b(alue)34 b(of)g(JB)g(indicates)f(that)h(an)g -(explicit)f(B)h(or)g(J)g(pre\014x)e(w)m(as)j(detected)g(b)m(y)f(sla)p -Ft(_)p FD(DBJIN,)g(a)227 4728 y(`B')h(or)e(`J')h(is)e(returned)g(to)i -(matc)m(h.)51 b(If)33 b(JB)h(indicates)e(that)i(no)f(explicit)f(B)i(or) -f(J)g(w)m(as)h(supplied,)d(the)227 4841 y(c)m(hoice)g(is)f(made)g(on)h -(the)f(basis)f(of)i(the)f(ep)s(o)s(c)m(h)h(itself;)e(B)i(is)e(assumed)h -(for)g(E)g Fl(<)25 b FD(1984,)32 b(otherwise)e(J.)p 0 -4955 V 0 5068 a Fx(SLA)p Fn(_)p Fx(M2A)-15 b(V)353 b -Fm(Rotation)36 b(Matrix)h(to)h(Axial)f(V)-10 b(ector)354 -b Fx(SLA)p Fn(_)p Fx(M2A)-15 b(V)0 5418 y FB(A)m(CTION)44 -b FD(:)36 b(F)-8 b(rom)21 b(a)h(rotation)f(matrix,)h(determine)f(the)g -(corresp)s(onding)e(axial)h(v)m(ector)j(\(single)d(precision\).)0 -5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_M2AV)g(\(RMAT,)g -(AXVEC\))p eop -%%Page: 92 94 -92 93 bop 0 52 a FD(92)0 351 y FB(GIVEN)45 b FD(:)277 -523 y Fq(RMA)-7 b(T)462 b FB(R\(3,3\))352 b FD(rotation)31 -b(matrix)0 993 y FB(RETURNED)46 b FD(:)277 1164 y Fq(AXVEC)405 -b FB(R\(3\))433 b FD(axial)30 b(v)m(ector)i(\(radians\))0 -1634 y FB(NOTES)44 b FD(:)311 1865 y(1.)i(A)38 b(rotation)f(matrix)g -(describ)s(es)e(a)j(rotation)g(ab)s(out)f(some)g(arbitrary)f(axis,)j -(called)d(the)i(Euler)427 1977 y(axis.)53 b(The)34 b -Fq(axial)k(ve)-5 b(ctor)35 b FD(returned)e(b)m(y)i(this)e(routine)h -(has)g(the)h(same)g(direction)e(as)i(the)g(Euler)427 -2090 y(axis,)30 b(and)g(its)g(magnitude)f(is)h(the)g(amoun)m(t)h(of)g -(rotation)f(in)g(radians.)311 2258 y(2.)46 b(The)35 b(magnitude)g(and)g -(direction)f(of)i(the)g(axial)f(v)m(ector)i(can)f(b)s(e)f(separated)h -(b)m(y)f(means)h(of)f(the)427 2371 y(routine)30 b(sla)p -Ft(_)p FD(VN.)311 2539 y(3.)46 b(The)28 b(reference)g(frame)g(rotates)h -(clo)s(c)m(kwise)e(as)i(seen)f(lo)s(oking)e(along)i(the)g(axial)f(v)m -(ector)j(from)d(the)427 2652 y(origin.)311 2819 y(4.)46 -b(If)30 b(RMA)-8 b(T)31 b(is)e(n)m(ull,)g(so)i(is)e(the)i(result.)p -0 2995 3780 8 v 0 3108 a Fx(SLA)p Fn(_)p Fx(MAP)775 b -Fm(Mean)39 b(to)f(Apparen)m(t)775 b Fx(SLA)p Fn(_)p Fx(MAP)0 -3458 y FB(A)m(CTION)44 b FD(:)66 b(T)-8 b(ransform)43 -b(star)g([)15 b Fl(\013;)g(\016)21 b FD(])43 b(from)g(mean)g(place)h -(to)g(geo)s(cen)m(tric)g(apparen)m(t.)80 b(The)43 b(reference)227 -3571 y(frames)30 b(and)g(time)g(scales)h(used)e(are)i(p)s(ost)f(IA)m(U) -h(1976.)0 3759 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_MAP)g(\(RM,)h -(DM,)g(PR,)g(PD,)g(PX,)f(RV,)h(EQ,)g(DATE,)g(RA,)g(DA\))0 -4173 y FB(GIVEN)e FD(:)277 4319 y Fq(RM,DM)409 b FB(D)565 -b FD(mean)31 b([)15 b Fl(\013;)g(\016)20 b FD(])30 b(\(radians\))277 -4432 y Fq(PR,PD)449 b FB(D)565 b FD(prop)s(er)29 b(motions:)40 -b([)15 b Fl(\013;)g(\016)21 b FD(])30 b(c)m(hanges)i(p)s(er)d(Julian)f -(y)m(ear)277 4545 y Fq(PX)606 b FB(D)565 b FD(parallax)29 -b(\(arcsec\))277 4658 y Fq(R)-9 b(V)611 b FB(D)565 b -FD(radial)29 b(v)m(elo)s(cit)m(y)i(\(km)f(s)2477 4625 -y Fp(\000)p Fu(1)2571 4658 y FD(,)h(+v)m(e)g(if)e(receding\))277 -4771 y Fq(EQ)604 b FB(D)565 b FD(ep)s(o)s(c)m(h)30 b(and)g(equino)m(x)g -(of)g(star)h(data)g(\(Julian\))277 4884 y Fq(D)n(A)-7 -b(TE)481 b FB(D)565 b FD(TDB)31 b(for)f(apparen)m(t)h(place)f(\(JD)p -Fo(\000)p FD(2400000.5\))0 5345 y FB(RETURNED)46 b FD(:)277 -5517 y Fq(RA,D)n(A)439 b FB(D)565 b FD(apparen)m(t)31 -b([)15 b Fl(\013;)g(\016)20 b FD(])31 b(\(radians\))p -eop -%%Page: 93 95 -93 94 bop 0 52 a Fw(SUN/67.70)3252 b FD(93)0 351 y FB(NOTES)44 -b FD(:)311 554 y(1.)i(EQ)41 b(is)f(the)i(Julian)d(ep)s(o)s(c)m(h)i(sp)s -(ecifying)e(b)s(oth)i(the)g(reference)h(frame)f(and)g(the)h(ep)s(o)s(c) -m(h)f(of)g(the)427 667 y(p)s(osition)26 b({)j(usually)c(2000.)42 -b(F)-8 b(or)29 b(p)s(ositions)d(where)h(the)i(ep)s(o)s(c)m(h)e(and)h -(equino)m(x)f(are)i(di\013eren)m(t,)f(use)427 780 y(the)j(routine)e -(sla)p Ft(_)p FD(PM)h(to)h(apply)e(prop)s(er)g(motion)h(corrections)h -(b)s(efore)f(using)f(this)g(routine.)311 934 y(2.)46 -b(The)35 b(distinction)e(b)s(et)m(w)m(een)k(the)e(required)f(TDB)i(and) -f(TT)g(is)f(alw)m(a)m(ys)i(negligible.)54 b(Moreo)m(v)m(er,)427 -1047 y(for)30 b(all)g(but)f(the)i(most)g(critical)e(applications)f(UTC) -i(is)g(adequate.)311 1201 y(3.)46 b(The)37 b Fl(\013)h -FD(prop)s(er)e(motions)h(are)57 b(_)-45 b Fl(\013)38 -b FD(rather)f(than)57 b(_)-44 b Fl(\013)15 b FD(cos)h -Fl(\016)s FD(,)40 b(and)d(are)h(p)s(er)e(y)m(ear)i(rather)f(than)g(p)s -(er)427 1314 y(cen)m(tury)-8 b(.)311 1467 y(4.)46 b(This)28 -b(routine)h(ma)m(y)h(b)s(e)f(w)m(asteful)g(for)h(some)g(applications)d -(b)s(ecause)j(it)f(recomputes)h(the)g(Earth)427 1580 -y(p)s(osition/v)m(elo)s(cit)m(y)38 b(and)h(the)g(precession-n)m -(utation)f(matrix)g(eac)m(h)i(time,)h(and)d(b)s(ecause)h(it)g(al-)427 -1693 y(lo)m(ws)45 b(for)g(parallax)f(and)h(prop)s(er)e(motion.)85 -b(Where)45 b(m)m(ultiple)e(transformations)i(are)g(to)h(b)s(e)427 -1806 y(carried)25 b(out)g(for)g(one)h(ep)s(o)s(c)m(h,)g(a)g(faster)g -(metho)s(d)f(is)f(to)i(call)f(the)g(sla)p Ft(_)p FD(MAPP)-8 -b(A)26 b(routine)e(once)i(and)427 1919 y(then)j(either)g(the)h(sla)p -Ft(_)p FD(MAPQK)f(routine)f(\(whic)m(h)h(includes)e(parallax)h(and)h -(prop)s(er)f(motion\))h(or)427 2032 y(sla)p Ft(_)p FD(MAPQKZ)g(\(whic)m -(h)h(assumes)g(zero)h(parallax)e(and)h(FK5)h(prop)s(er)e(motion\).)311 -2186 y(5.)46 b(The)j(accuracy)-8 b(,)55 b(starting)49 -b(from)f(ICRS)g(star)h(data,)55 b(is)48 b(limited)f(to)i(ab)s(out)g(1)g -(mas)g(b)m(y)g(the)427 2299 y(precession-n)m(utation)33 -b(mo)s(del)g(used,)h(SF2001.)52 b(A)34 b(di\013eren)m(t)f(precession-n) -m(utation)h(mo)s(del)e(can)427 2412 y(b)s(e)38 b(in)m(tro)s(duced)f(b)m -(y)h(using)f(sla)p Ft(_)p FD(MAPP)-8 b(A)39 b(and)e(sla)p -Ft(_)p FD(MAPQK)h(\(see)h(the)g(previous)e(note\))i(and)427 -2525 y(replacing)29 b(the)i(precession-n)m(utation)f(matrix)f(in)m(to)i -(the)f(parameter)h(arra)m(y)g(directly)-8 b(.)311 2678 -y(6.)46 b(The)25 b(accuracy)h(is)d(further)h(limited)f(b)m(y)h(the)h -(routine)f(sla)p Ft(_)p FD(EVP)-8 b(,)25 b(called)f(b)m(y)h(sla)p -Ft(_)p FD(MAPP)-8 b(A,)25 b(whic)m(h)427 2791 y(computes)32 -b(the)g(Earth)f(p)s(osition)e(and)i(v)m(elo)s(cit)m(y)h(using)e(the)i -(metho)s(ds)f(of)g(Stump\013.)43 b(The)31 b(maxi-)427 -2904 y(m)m(um)f(error)g(is)f(ab)s(out)i(0.3)g(milliarcsecond.)0 -3305 y FB(REFERENCES)44 b FD(:)311 3508 y(1.)i(1984)32 -b Fq(Astr)-5 b(onomic)g(al)36 b(A)n(lmanac)p FD(,)31 -b(pp)e(B39-B41.)311 3662 y(2.)46 b(Lederle)30 b(&)g(Sc)m(h)m(w)m(an,)h -(1984.)h Fq(Astr.Astr)-5 b(ophys.)33 b FB(134)p FD(,)e(1-6.)p -0 3810 3780 8 v 0 3923 a Fx(SLA)p Fn(_)p Fx(MAPP)-11 -b(A)283 b Fm(Mean)39 b(to)f(Apparen)m(t)f(P)m(arameters)283 -b Fx(SLA)p Fn(_)p Fx(MAPP)-11 b(A)0 4273 y FB(A)m(CTION)44 -b FD(:)73 b(Compute)46 b(star-indep)s(enden)m(t)f(parameters)i(in)f -(preparation)g(for)g(con)m(v)m(ersions)h(b)s(et)m(w)m(een)227 -4386 y(mean)e(place)f(and)g(geo)s(cen)m(tric)h(apparen)m(t)g(place.)82 -b(The)44 b(parameters)g(pro)s(duced)f(b)m(y)h(this)f(routine)227 -4499 y(are)32 b(required)e(in)g(the)i(parallax,)f(ligh)m(t)f -(de\015ection,)i(ab)s(erration,)f(and)g(precession-n)m(utation)g(parts) -g(of)227 4612 y(the)j(mean/apparen)m(t)g(transformations.)49 -b(The)33 b(reference)h(frames)f(and)g(time)g(scales)g(used)g(are)h(p)s -(ost)227 4725 y(IA)m(U)d(1976.)0 4912 y FB(CALL)45 b -FD(:)77 b Ft(CALL)46 b(sla_MAPPA)g(\(EQ,)g(DATE,)h(AMPRMS\))0 -5285 y FB(GIVEN)e FD(:)277 5431 y Fq(EQ)604 b FB(D)565 -b FD(ep)s(o)s(c)m(h)30 b(of)h(mean)f(equino)m(x)g(to)h(b)s(e)f(used)g -(\(Julian\))277 5544 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 -b FD(TDB)31 b(\(JD)p Fo(\000)p FD(2400000.5\))p eop -%%Page: 94 96 -94 95 bop 0 52 a FD(94)0 351 y FB(RETURNED)46 b FD(:)277 -497 y Fq(AMPRMS)325 b FB(D\(21\))379 b FD(star-indep)s(enden)m(t)29 -b(mean-to-apparen)m(t)j(parameters:)537 610 y(\(1\))1006 -b(time)30 b(in)m(terv)-5 b(al)30 b(for)g(prop)s(er)f(motion)h(\(Julian) -e(y)m(ears\))499 723 y(\(2-4\))969 b(barycen)m(tric)30 -b(p)s(osition)f(of)h(the)h(Earth)f(\(A)m(U\))499 836 -y(\(5-7\))969 b(helio)s(cen)m(tric)29 b(direction)g(of)i(the)f(Earth)g -(\(unit)g(v)m(ector\))537 949 y(\(8\))1006 b(\(gra)m(vitational)52 -b(radius)e(of)i(Sun\))p Fo(\002)p FD(2)p Fl(=)p FD(\(Sun-Earth)e(dis-) -1658 1062 y(tance\))477 1175 y(\(9-11\))946 b FB(v)p -FD(:)41 b(barycen)m(tric)30 b(Earth)g(v)m(elo)s(cit)m(y)h(in)e(units)g -(of)i(c)514 1321 y(\(12\))1658 1215 y Fi(q)p 1741 1215 -302 4 v 106 x FD(1)21 b Fo(\000)f(j)p FB(v)p Fo(j)2003 -1280 y Fu(2)454 1440 y FD(\(13-21\))924 b(precession-n)m(utation)30 -b(3)21 b Fo(\002)e FD(3)31 b(matrix)0 1870 y FB(NOTES)44 -b FD(:)311 2088 y(1.)i(F)-8 b(or)36 b(D)m(A)-8 b(TE,)37 -b(the)e(distinction)e(b)s(et)m(w)m(een)j(the)f(required)f(TDB)h(and)g -(TT)f(is)h(alw)m(a)m(ys)h(negligible.)427 2201 y(Moreo)m(v)m(er,)d(for) -d(all)f(but)h(the)h(most)f(critical)g(applications)e(UTC)i(is)f -(adequate.)311 2362 y(2.)46 b(The)25 b(v)m(ectors)j(AMPRMS\(2-4\))f -(and)e(AMPRMS\(5-7\))j(are)e(\(in)f(essence\))h(referred)f(to)i(the)e -(mean)427 2475 y(equino)m(x)30 b(and)g(equator)h(of)f(ep)s(o)s(c)m(h)h -(EQ.)f(F)-8 b(or)31 b(EQ=2000D0,)h(they)f(are)g(referred)e(to)i(the)g -(ICRS.)311 2636 y(3.)46 b(The)37 b(parameters)g(pro)s(duced)e(b)m(y)i -(this)f(routine)g(are)i(used)e(b)m(y)h(sla)p Ft(_)p FD(MAPQK,)f(sla)p -Ft(_)p FD(MAPQKZ)427 2749 y(and)30 b(sla)p Ft(_)p FD(AMPQK.)311 -2910 y(4.)46 b(The)j(accuracy)-8 b(,)55 b(starting)49 -b(from)f(ICRS)g(star)h(data,)55 b(is)48 b(limited)f(to)i(ab)s(out)g(1)g -(mas)g(b)m(y)g(the)427 3023 y(precession-n)m(utation)33 -b(mo)s(del)g(used,)h(SF2001.)52 b(A)34 b(di\013eren)m(t)f(precession-n) -m(utation)h(mo)s(del)e(can)427 3136 y(b)s(e)g(in)m(tro)s(duced)f(b)m(y) -h(\014rst)g(calling)f(the)i(presen)m(t)f(routine)g(and)g(then)g -(replacing)f(the)i(precession-)427 3249 y(n)m(utation)d(matrix)g(in)f -(AMPRMS\(13-21\))k(directly)-8 b(.)311 3410 y(5.)46 b(A)d(further)f -(limit)f(to)j(the)f(accuracy)h(of)g(routines)d(using)h(the)h(parameter) -h(arra)m(y)f(AMPRMS)427 3523 y(is)c(imp)s(osed)f(b)m(y)h(the)h(routine) -f(sla)p Ft(_)p FD(EVP)-8 b(,)39 b(used)g(here)h(to)g(compute)g(the)g -(Earth)f(p)s(osition)f(and)427 3636 y(v)m(elo)s(cit)m(y)31 -b(b)m(y)f(the)h(metho)s(ds)e(of)i(Stump\013.)39 b(The)30 -b(maxim)m(um)f(error)h(in)f(the)h(resulting)e(ab)s(erration)427 -3749 y(corrections)j(is)e(ab)s(out)h(0.3)i(milliarcsecond.)0 -4187 y FB(REFERENCES)44 b FD(:)311 4405 y(1.)i(1984)32 -b Fq(Astr)-5 b(onomic)g(al)36 b(A)n(lmanac)p FD(,)31 -b(pp)e(B39-B41.)311 4566 y(2.)46 b(Lederle)30 b(&)g(Sc)m(h)m(w)m(an,)h -(1984.)h Fq(Astr.Astr)-5 b(ophys.)33 b FB(134)p FD(,)e(1-6.)p -0 4729 3780 8 v 0 4842 a Fx(SLA)p Fn(_)p Fx(MAPQK)400 -b Fm(Quic)m(k)38 b(Mean)h(to)f(Apparen)m(t)400 b Fx(SLA)p -Fn(_)p Fx(MAPQK)0 5192 y FB(A)m(CTION)44 b FD(:)51 b(Quic)m(k)35 -b(mean)h(to)h(apparen)m(t)f(place:)51 b(transform)35 -b(a)h(star)g([)15 b Fl(\013;)g(\016)21 b FD(])36 b(from)f(mean)h(place) -f(to)i(geo-)227 5305 y(cen)m(tric)32 b(apparen)m(t)g(place,)g(giv)m(en) -f(the)h(star-indep)s(enden)m(t)e(parameters.)44 b(The)31 -b(reference)h(frames)f(and)227 5418 y(time)f(scales)h(used)e(are)i(p)s -(ost)f(IA)m(U)h(1976.)0 5606 y FB(CALL)45 b FD(:)77 b -Ft(CALL)46 b(sla_MAPQK)g(\(RM,)g(DM,)h(PR,)g(PD,)g(PX,)g(RV,)g(AMPRMS,) -f(RA,)h(DA\))p eop -%%Page: 95 97 -95 96 bop 0 52 a Fw(SUN/67.70)3252 b FD(95)0 351 y FB(GIVEN)45 -b FD(:)277 497 y Fq(RM,DM)409 b FB(D)565 b FD(mean)31 -b([)15 b Fl(\013;)g(\016)20 b FD(])30 b(\(radians\))277 -610 y Fq(PR,PD)449 b FB(D)565 b FD(prop)s(er)29 b(motions:)40 -b([)15 b Fl(\013;)g(\016)21 b FD(])30 b(c)m(hanges)i(p)s(er)d(Julian)f -(y)m(ear)277 723 y Fq(PX)606 b FB(D)565 b FD(parallax)29 -b(\(arcsec\))277 836 y Fq(R)-9 b(V)611 b FB(D)565 b FD(radial)29 -b(v)m(elo)s(cit)m(y)i(\(km)f(s)2477 803 y Fp(\000)p Fu(1)2571 -836 y FD(,)h(+v)m(e)g(if)e(receding\))277 949 y Fq(AMPRMS)325 -b FB(D\(21\))379 b FD(star-indep)s(enden)m(t)29 b(mean-to-apparen)m(t)j -(parameters:)537 1062 y(\(1\))1006 b(time)30 b(in)m(terv)-5 -b(al)30 b(for)g(prop)s(er)f(motion)h(\(Julian)e(y)m(ears\))499 -1175 y(\(2-4\))969 b(barycen)m(tric)30 b(p)s(osition)f(of)h(the)h -(Earth)f(\(A)m(U\))499 1288 y(\(5-7\))969 b(helio)s(cen)m(tric)29 -b(direction)g(of)i(the)f(Earth)g(\(unit)g(v)m(ector\))537 -1401 y(\(8\))1006 b(\(gra)m(vitational)52 b(radius)e(of)i(Sun\))p -Fo(\002)p FD(2)p Fl(=)p FD(\(Sun-Earth)e(dis-)1658 1514 -y(tance\))477 1626 y(\(9-11\))946 b FB(v)p FD(:)41 b(barycen)m(tric)30 -b(Earth)g(v)m(elo)s(cit)m(y)h(in)e(units)g(of)i(c)514 -1773 y(\(12\))1658 1667 y Fi(q)p 1741 1667 302 4 v 106 -x FD(1)21 b Fo(\000)f(j)p FB(v)p Fo(j)2003 1731 y Fu(2)454 -1892 y FD(\(13-21\))924 b(precession-n)m(utation)30 b(3)21 -b Fo(\002)e FD(3)31 b(matrix)0 2367 y FB(RETURNED)46 -b FD(:)277 2539 y Fq(RA,D)n(A)439 b FB(D)565 b FD(apparen)m(t)31 -b([)15 b Fl(\013;)g(\016)20 b FD(])31 b(\(radians\))0 -3022 y FB(NOTES)44 b FD(:)311 3258 y(1.)i(Use)32 b(of)f(this)g(routine) -f(is)g(appropriate)h(when)f(e\016ciency)h(is)g(imp)s(ortan)m(t)f(and)h -(where)g(man)m(y)g(star)427 3371 y(p)s(ositions,)26 b(all)f(referred)h -(to)h(the)g(same)f(equator)i(and)d(equino)m(x,)i(are)g(to)g(b)s(e)f -(transformed)g(for)g(one)427 3484 y(ep)s(o)s(c)m(h.)40 -b(The)27 b(star-indep)s(enden)m(t)f(parameters)j(can)f(b)s(e)f -(obtained)g(b)m(y)h(calling)e(the)i(sla)p Ft(_)p FD(MAPP)-8 -b(A)427 3597 y(routine.)311 3767 y(2.)46 b(If)35 b(the)h(parallax)e -(and)h(prop)s(er)f(motions)h(are)h(zero)g(the)f(sla)p -Ft(_)p FD(MAPQKZ)f(routine)h(can)g(b)s(e)g(used)427 3880 -y(instead.)311 4051 y(3.)46 b(The)25 b(v)m(ectors)j(AMPRMS\(2-4\))f -(and)e(AMPRMS\(5-7\))j(are)e(\(in)f(essence\))h(referred)f(to)i(the)e -(mean)427 4163 y(equino)m(x)30 b(and)g(equator)h(of)f(ep)s(o)s(c)m(h)h -(EQ.)f(F)-8 b(or)31 b(EQ=2000D0,)h(they)f(are)g(referred)e(to)i(the)g -(ICRS.)311 4334 y(4.)46 b(Strictly)32 b(sp)s(eaking,)g(the)h(routine)e -(is)h(not)h(v)-5 b(alid)31 b(for)h(solar-system)h(sources,)h(though)e -(the)h(error)427 4447 y(will)e(usually)h(b)s(e)h(extremely)g(small.)49 -b(Ho)m(w)m(ev)m(er,)37 b(to)d(prev)m(en)m(t)g(gross)g(errors)f(in)g -(the)g(case)i(where)427 4560 y(the)41 b(p)s(osition)d(of)i(the)g(Sun)f -(is)g(sp)s(eci\014ed,)i(the)f(gra)m(vitational)h(de\015ection)e(term)h -(is)g(restrained)427 4673 y(within)27 b(ab)s(out)i(920)1098 -4636 y Fk(0)m(0)1169 4673 y FD(of)g(the)g(cen)m(tre)h(of)g(the)f(Sun's) -f(disc.)39 b(The)29 b(term)g(has)g(a)h(maxim)m(um)e(v)-5 -b(alue)28 b(of)427 4785 y(ab)s(out)23 b(1)720 4749 y -Fk(0)m(0)724 4785 y Fl(:)p FD(85)i(at)f(this)e(radius,)i(and)e -(decreases)i(to)h(zero)f(as)f(the)h(cen)m(tre)g(of)g(the)f(disc)g(is)f -(approac)m(hed.)0 5269 y FB(REFERENCES)44 b FD(:)311 -5505 y(1.)i(1984)32 b Fq(Astr)-5 b(onomic)g(al)36 b(A)n(lmanac)p -FD(,)31 b(pp)e(B39-B41.)311 5675 y(2.)46 b(Lederle)30 -b(&)g(Sc)m(h)m(w)m(an,)h(1984.)h Fq(Astr.Astr)-5 b(ophys.)33 -b FB(134)p FD(,)e(1-6.)p eop -%%Page: 96 98 -96 97 bop 0 52 a FD(96)p 0 267 3780 8 v 0 380 a Fx(SLA)p -Fn(_)p Fx(MAPQKZ)170 b Fm(Quic)m(k)39 b(Mean-Appt,)e(no)i(PM)g -Fj(etc.)184 b Fx(SLA)p Fn(_)p Fx(MAPQKZ)0 730 y FB(A)m(CTION)44 -b FD(:)39 b(Quic)m(k)26 b(mean)g(to)i(apparen)m(t)f(place:)39 -b(transform)26 b(a)h(star)g([)15 b Fl(\013;)g(\016)20 -b FD(])27 b(from)f(mean)h(place)g(to)g(geo)s(cen-)227 -843 y(tric)37 b(apparen)m(t)h(place,)h(giv)m(en)f(the)f(star-indep)s -(enden)m(t)f(parameters,)k(and)c(assuming)g(zero)j(parallax)227 -956 y(and)30 b(FK5)h(prop)s(er)e(motion.)40 b(The)30 -b(reference)h(frames)f(and)g(time)g(scales)g(used)g(are)h(p)s(ost)f(IA) -m(U)h(1976.)0 1144 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_MAPQKZ)f(\(RM,)i(DM,)g(AMPRMS,)f(RA,)h(DA\))0 1546 -y FB(GIVEN)e FD(:)277 1692 y Fq(RM,DM)409 b FB(D)565 -b FD(mean)31 b([)15 b Fl(\013;)g(\016)20 b FD(])30 b(\(radians\))277 -1805 y Fq(AMPRMS)325 b FB(D\(21\))379 b FD(star-indep)s(enden)m(t)29 -b(mean-to-apparen)m(t)j(parameters:)537 1918 y(\(1\))1006 -b(time)30 b(in)m(terv)-5 b(al)30 b(for)g(prop)s(er)f(motion)h(\(Julian) -e(y)m(ears\))499 2031 y(\(2-4\))969 b(barycen)m(tric)30 -b(p)s(osition)f(of)h(the)h(Earth)f(\(A)m(U\))499 2143 -y(\(5-7\))969 b(helio)s(cen)m(tric)29 b(direction)g(of)i(the)f(Earth)g -(\(unit)g(v)m(ector\))537 2256 y(\(8\))1006 b(\(gra)m(vitational)52 -b(radius)e(of)i(Sun\))p Fo(\002)p FD(2)p Fl(=)p FD(\(Sun-Earth)e(dis-) -1658 2369 y(tance\))477 2482 y(\(9-11\))946 b FB(v)p -FD(:)41 b(barycen)m(tric)30 b(Earth)g(v)m(elo)s(cit)m(y)h(in)e(units)g -(of)i(c)514 2629 y(\(12\))1658 2523 y Fi(q)p 1741 2523 -302 4 v 106 x FD(1)21 b Fo(\000)f(j)p FB(v)p Fo(j)2003 -2587 y Fu(2)454 2748 y FD(\(13-21\))924 b(precession-n)m(utation)30 -b(3)21 b Fo(\002)e FD(3)31 b(matrix)0 3189 y FB(RETURNED)46 -b FD(:)277 3360 y Fq(RA,D)n(A)439 b FB(D)565 b FD(apparen)m(t)31 -b([)15 b Fl(\013;)g(\016)20 b FD(])31 b(\(radians\))0 -3810 y FB(NOTES)44 b FD(:)311 4032 y(1.)i(Use)32 b(of)f(this)g(routine) -f(is)g(appropriate)h(when)f(e\016ciency)h(is)g(imp)s(ortan)m(t)f(and)h -(where)g(man)m(y)g(star)427 4145 y(p)s(ositions,)c(all)g(with)f -(parallax)h(and)g(prop)s(er)f(motion)i(either)f(zero)i(or)f(already)f -(allo)m(w)m(ed)h(for,)g(and)427 4258 y(all)34 b(referred)h(to)h(the)f -(same)h(equator)g(and)e(equino)m(x,)i(are)g(to)g(b)s(e)f(transformed)f -(for)h(one)g(ep)s(o)s(c)m(h.)427 4371 y(The)23 b(star-indep)s(enden)m -(t)g(parameters)h(can)g(b)s(e)f(obtained)g(b)m(y)g(calling)g(the)g(sla) -p Ft(_)p FD(MAPP)-8 b(A)24 b(routine.)311 4534 y(2.)46 -b(The)31 b(corresp)s(onding)d(routine)i(for)h(the)f(case)i(of)f -(non-zero)g(parallax)f(and)g(FK5)h(prop)s(er)f(motion)427 -4647 y(is)g(sla)p Ft(_)p FD(MAPQK.)311 4811 y(3.)46 b(The)25 -b(v)m(ectors)j(AMPRMS\(2-4\))f(and)e(AMPRMS\(5-7\))j(are)e(\(in)f -(essence\))h(referred)f(to)i(the)e(mean)427 4924 y(equino)m(x)30 -b(and)g(equator)h(of)f(ep)s(o)s(c)m(h)h(EQ.)f(F)-8 b(or)31 -b(EQ=2000D0,)h(they)f(are)g(referred)e(to)i(the)g(ICRS.)311 -5087 y(4.)46 b(Strictly)32 b(sp)s(eaking,)g(the)h(routine)e(is)h(not)h -(v)-5 b(alid)31 b(for)h(solar-system)h(sources,)h(though)e(the)h(error) -427 5200 y(will)e(usually)h(b)s(e)h(extremely)g(small.)49 -b(Ho)m(w)m(ev)m(er,)37 b(to)d(prev)m(en)m(t)g(gross)g(errors)f(in)g -(the)g(case)i(where)427 5313 y(the)41 b(p)s(osition)d(of)i(the)g(Sun)f -(is)g(sp)s(eci\014ed,)i(the)f(gra)m(vitational)h(de\015ection)e(term)h -(is)g(restrained)427 5426 y(within)27 b(ab)s(out)i(920)1098 -5389 y Fk(0)m(0)1169 5426 y FD(of)g(the)g(cen)m(tre)h(of)g(the)f(Sun's) -f(disc.)39 b(The)29 b(term)g(has)g(a)h(maxim)m(um)e(v)-5 -b(alue)28 b(of)427 5539 y(ab)s(out)23 b(1)720 5502 y -Fk(0)m(0)724 5539 y Fl(:)p FD(85)i(at)f(this)e(radius,)i(and)e -(decreases)i(to)h(zero)f(as)f(the)h(cen)m(tre)g(of)g(the)f(disc)g(is)f -(approac)m(hed.)p eop -%%Page: 97 99 -97 98 bop 0 52 a Fw(SUN/67.70)3252 b FD(97)0 351 y FB(REFERENCES)44 -b FD(:)311 534 y(1.)i(1984)32 b Fq(Astr)-5 b(onomic)g(al)36 -b(A)n(lmanac)p FD(,)31 b(pp)e(B39-B41.)311 674 y(2.)46 -b(Lederle)30 b(&)g(Sc)m(h)m(w)m(an,)h(1984.)h Fq(Astr.Astr)-5 -b(ophys.)33 b FB(134)p FD(,)e(1-6.)p 0 791 3780 8 v 0 -904 a Fx(SLA)p Fn(_)p Fx(MOON)558 b Fm(Appro)m(x)38 b(Mo)s(on)g(P)m -(os/V)-10 b(el)558 b Fx(SLA)p Fn(_)p Fx(MOON)0 1254 y -FB(A)m(CTION)44 b FD(:)c(Appro)m(ximate)31 b(geo)s(cen)m(tric)g(p)s -(osition)e(and)g(v)m(elo)s(cit)m(y)i(of)g(the)f(Mo)s(on)h(\(single)e -(precision\).)0 1442 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_MOON)g(\(IY,)h(ID,)f(FD,)h(PV\))0 1770 y FB(GIVEN)e -FD(:)277 1916 y Fq(IY)633 b FB(I)605 b FD(y)m(ear)277 -2029 y Fq(ID)632 b FB(I)605 b FD(da)m(y)31 b(in)e(y)m(ear)i(\(1)g(=)f -(Jan)g(1st\))277 2142 y Fq(FD)608 b FB(R)567 b FD(fraction)30 -b(of)h(da)m(y)0 2458 y FB(RETURNED)46 b FD(:)277 2604 -y Fq(PV)606 b FB(R\(6\))433 b FD(Mo)s(on)41 b([)15 b -Fl(x;)g(y)s(;)g(z)t(;)33 b FD(_)-43 b Fl(x)r(;)32 b FD(_)-42 -b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 b FD(],)44 b(mean)d(equator)h(and)f -(equino)m(x)1658 2717 y(of)31 b(date)g(\(A)m(U,)g(A)m(U)h(s)2389 -2684 y Fp(\000)p Fu(1)2483 2717 y FD(\))0 3033 y FB(NOTES)44 -b FD(:)311 3216 y(1.)i(The)30 b(date)g(and)f(time)h(is)f(TDB)h(\(lo)s -(osely)f(ET\))h(in)e(a)j(Julian)c(calendar)i(whic)m(h)g(has)h(b)s(een)f -(aligned)427 3329 y(to)35 b(the)g(ordinary)e(Gregorian)h(calendar)g -(for)g(the)h(in)m(terv)-5 b(al)33 b(1900)k(Marc)m(h)e(1)f(to)i(2100)g -(F)-8 b(ebruary)427 3442 y(28.)42 b(The)30 b(y)m(ear)h(and)f(da)m(y)g -(can)h(b)s(e)f(obtained)g(b)m(y)g(calling)f(sla)p Ft(_)p -FD(CAL)-8 b(YD)30 b(or)g(sla)p Ft(_)p FD(CL)-8 b(YD.)311 -3582 y(2.)46 b(The)37 b(p)s(osition)e(is)h(accurate)i(to)g(b)s(etter)f -(than)g(0.5)h(arcmin)m(ute)f(in)e(direction)h(and)g(1000)j(km)e(in)427 -3695 y(distance.)h(The)21 b(v)m(elo)s(cit)m(y)h(is)e(accurate)j(to)g(b) -s(etter)e(than)g(0)2363 3658 y Fk(0)m(0)2367 3695 y Fl(:)p -FD(5)i(p)s(er)d(hour)h(in)f(direction)g(and)h(4)h(metres)427 -3808 y(p)s(er)f(second)h(in)f(distance.)38 b(\(RMS)22 -b(\014gures)f(with)g(resp)s(ect)h(to)h(JPL)e(DE200)j(for)e(the)g(in)m -(terv)-5 b(al)21 b(1960-)427 3921 y(2025)k(are)e(14)861 -3884 y Fk(0)m(0)925 3921 y FD(and)f(0)1134 3884 y Fk(0)l(0)1138 -3921 y Fl(:)p FD(2)i(p)s(er)d(hour)h(in)g(longitude,)h(9)2145 -3884 y Fk(0)l(0)2208 3921 y FD(and)f(0)2417 3884 y Fk(0)m(0)2421 -3921 y Fl(:)p FD(2)i(p)s(er)e(hour)g(in)f(latitude,)j(350)g(km)e(and) -427 4034 y(2)34 b(metres)g(p)s(er)f(second)h(in)e(distance.\))50 -b(Note)35 b(that)g(the)e(distance)h(accuracy)h(is)d(comparativ)m(ely) -427 4147 y(p)s(o)s(or)25 b(b)s(ecause)i(this)e(routine)g(is)g -(principally)d(in)m(tended)j(for)h(computing)f(top)s(o)s(cen)m(tric)i -(direction.)311 4288 y(3.)46 b(This)28 b(routine)h(is)g(only)g(a)h -(partial)f(implemen)m(tation)f(of)i(the)g(original)e(Meeus)i(algorithm) -f(\(refer-)427 4401 y(ence)f(b)s(elo)m(w\),)f(whic)m(h)f(o\013ers)h(4)g -(times)f(the)h(accuracy)h(in)e(direction)f(and)h(20)i(times)e(the)h -(accuracy)427 4514 y(in)i(distance)h(when)g(fully)e(implemen)m(ted)h -(\(as)i(it)f(is)f(in)g(sla)p Ft(_)p FD(DMOON\).)0 4838 -y FB(REFERENCE)44 b FD(:)d(Meeus,)31 b Fq(l'Astr)-5 b(onomie)p -FD(,)32 b(June)e(1984,)i(p348.)p 0 4955 V 0 5068 a Fx(SLA)p -Fn(_)p Fx(MXM)600 b Fm(Multiply)37 b(3)27 b Fh(\002)f -Fm(3)39 b(Matrices)601 b Fx(SLA)p Fn(_)p Fx(MXM)0 5418 -y FB(A)m(CTION)44 b FD(:)c(Pro)s(duct)30 b(of)h(t)m(w)m(o)g(3)21 -b Fo(\002)f FD(3)31 b(matrices)f(\(single)f(precision\).)0 -5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_MXM)g(\(A,)h(B,)g(C\))p -eop -%%Page: 98 100 -98 99 bop 0 52 a FD(98)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(A)668 b FB(R\(3,3\))352 b FD(matrix)30 b FB(A)277 -610 y Fq(B)672 b FB(R\(3,3\))352 b FD(matrix)30 b FB(B)0 -898 y(RETURNED)46 b FD(:)277 1070 y Fq(C)671 b FB(R\(3,3\))352 -b FD(matrix)30 b(result:)40 b FB(A)p Fo(\002)p FB(B)0 -1366 y(NOTE)k FD(:)c(T)-8 b(o)30 b(comply)e(with)g(the)h(ANSI)g(F)-8 -b(ortran)29 b(77)h(standard,)f(A,)h(B)f(and)f(C)h(m)m(ust)g(b)s(e)f -(di\013eren)m(t)h(arra)m(ys.)227 1479 y(The)h(routine)f(is,)g(in)g -(fact,)i(co)s(ded)f(so)g(as)g(to)h(w)m(ork)f(prop)s(erly)e(with)h(man)m -(y)h(F)-8 b(ortran)30 b(compilers)f(ev)m(en)h(if)227 -1592 y(this)g(rule)f(is)g(violated,)h(something)g(that)h(is)e -FB(not)p FD(,)i(ho)m(w)m(ev)m(er,)h(recommended.)p 0 -1696 3780 8 v 0 1809 a Fx(SLA)p Fn(_)p Fx(MXV)744 b Fm(Apply)38 -b(3D)h(Rotation)743 b Fx(SLA)p Fn(_)p Fx(MXV)0 2159 y -FB(A)m(CTION)44 b FD(:)c(Multiply)28 b(a)j(3-v)m(ector)i(b)m(y)d(a)h -(rotation)f(matrix)g(\(single)g(precision\).)0 2347 y -FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_MXV)g(\(RM,)h(VA,)g(VB\))0 -2659 y FB(GIVEN)e FD(:)277 2805 y Fq(RM)588 b FB(R\(3,3\))352 -b FD(rotation)31 b(matrix)277 2918 y Fq(V)-9 b(A)609 -b FB(R\(3\))433 b FD(v)m(ector)32 b(to)f(b)s(e)f(rotated)0 -3206 y FB(RETURNED)46 b FD(:)277 3377 y Fq(VB)604 b FB(R\(3\))433 -b FD(result)29 b(v)m(ector)0 3674 y FB(NOTES)44 b FD(:)311 -3852 y(1.)i(This)29 b(routine)g(p)s(erforms)g(the)i(op)s(eration:)597 -3989 y FB(b)g FD(=)f FB(M)p Fo(\001)p FB(a)427 4125 y -FD(where)g FB(a)f FD(and)g FB(b)h FD(are)g(the)g(3-v)m(ectors)i(V)-10 -b(A)30 b(and)f(VB)i(resp)s(ectiv)m(ely)-8 b(,)30 b(and)f -FB(M)h FD(is)f(the)h(3)19 b Fo(\002)g FD(3)30 b(matrix)427 -4238 y(RM.)311 4375 y(2.)46 b(The)30 b(main)f(function)g(of)i(this)e -(routine)g(is)h(apply)f(a)h(rotation;)h(under)e(these)i(circumstances,) -f FB(M)427 4488 y FD(is)g(a)g Fq(pr)-5 b(op)g(er)36 b(r)-5 -b(e)g(al)34 b(ortho)-5 b(gonal)43 b FD(matrix.)311 4624 -y(3.)j(T)-8 b(o)35 b(comply)e(with)f(the)i(ANSI)g(F)-8 -b(ortran)34 b(77)h(standard,)f(V)-10 b(A)34 b(and)f(VB)h(m)m(ust)g -FB(not)g FD(b)s(e)f(the)h(same)427 4737 y(arra)m(y)-8 -b(.)83 b(The)43 b(routine)g(is,)k(in)42 b(fact,)49 b(co)s(ded)43 -b(so)i(as)f(to)g(w)m(ork)g(prop)s(erly)e(with)h(man)m(y)h(F)-8 -b(ortran)427 4850 y(compilers)26 b(ev)m(en)h(if)f(this)g(rule)f(is)h -(violated,)i(something)e(that)i(is)e FB(not)p FD(,)h(ho)m(w)m(ev)m(er,) -j(recommended.)p 0 4955 V 0 5068 a Fx(SLA)p Fn(_)p Fx(NUT)843 -b Fm(Nutation)37 b(Matrix)843 b Fx(SLA)p Fn(_)p Fx(NUT)0 -5418 y FB(A)m(CTION)44 b FD(:)c(F)-8 b(orm)31 b(the)g(matrix)f(of)g(n)m -(utation)g(\(SF2001)j(theory\))e(for)f(a)h(giv)m(en)f(date.)0 -5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_NUT)g(\(DATE,)g(RMATN\)) -p eop -%%Page: 99 101 -99 100 bop 0 52 a Fw(SUN/67.70)3252 b FD(99)0 351 y FB(GIVEN)45 -b FD(:)277 497 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(TDB)68 -b(\(formerly)f(ET\))g(as)h(Mo)s(di\014ed)d(Julian)h(Date)1658 -610 y(\(JD)p Fo(\000)p FD(2400000.5\))0 928 y FB(RETURNED)46 -b FD(:)277 1100 y Fq(RMA)-7 b(TN)394 b FB(D\(3,3\))350 -b FD(n)m(utation)30 b(matrix)0 1426 y FB(NOTES)44 b FD(:)311 -1609 y(1.)i(The)30 b(matrix)g(is)f(in)g(the)i(sense:)597 -1750 y FB(v)652 1764 y Ff(tr)r(ue)815 1750 y FD(=)25 -b FB(M)20 b Fo(\002)g FB(v)1176 1764 y Ff(mean)427 1891 -y FD(where)31 b FB(v)746 1905 y Ff(tr)r(ue)914 1891 y -FD(is)g(the)g(star)h(v)m(ector)h(relativ)m(e)e(to)h(the)g(true)f -(equator)h(and)e(equino)m(x)h(of)h(date,)g FB(M)f FD(is)427 -2004 y(the)d(3)14 b Fo(\002)g FD(3)28 b(matrix)f Ft(rmatn)e -FD(and)i FB(v)1585 2018 y Ff(mean)1792 2004 y FD(is)g(the)g(star)h(v)m -(ector)h(relativ)m(e)e(to)h(the)g(mean)f(equator)h(and)427 -2117 y(equino)m(x)i(of)h(date.)311 2258 y(2.)46 b(The)35 -b(matrix)f(represen)m(ts)h(forced)g(n)m(utation)g(\(but)f(not)h(free)g -(core)h(n)m(utation\))f(plus)e(corrections)427 2371 y(to)e(the)g(IA)m -(U)g(1976)h(precession)e(mo)s(del.)311 2512 y(3.)46 b(Earth)h(attitude) -f(predictions)f(made)i(b)m(y)f(com)m(bining)f(the)i(presen)m(t)f(n)m -(utation)h(matrix)f(with)427 2624 y(IA)m(U)d(1976)g(precession)e(are)h -(accurate)i(to)e(1)g(mas)g(\(with)f(resp)s(ect)h(to)g(the)g(ICRS\))f -(for)h(a)g(few)427 2737 y(decades)31 b(around)e(2000.)311 -2878 y(4.)46 b(The)35 b(distinction)e(b)s(et)m(w)m(een)k(the)e -(required)f(TDB)i(and)f(TT)g(is)f(alw)m(a)m(ys)i(negligible.)54 -b(Moreo)m(v)m(er,)427 2991 y(for)30 b(all)g(but)f(the)i(most)g -(critical)e(applications)f(UTC)i(is)g(adequate.)0 3318 -y FB(REFERENCES)44 b FD(:)311 3500 y(1.)i(Kaplan,)30 -b(G.H.,)h(1981.)i Fq(USNO)e(cir)-5 b(cular)34 b(No.)e(163)p -FD(,)g(pA3-6.)311 3641 y(2.)46 b(Shirai,)28 b(T.)j(&)f(F)-8 -b(ukushima,)29 b(T.,)h(2001,)j(Astron.J.,)d FB(121)p -FD(,)i(3270-3283.)p 0 3759 3780 8 v 0 3872 a Fx(SLA)p -Fn(_)p Fx(NUTC)603 b Fm(Nutation)37 b(Comp)s(onen)m(ts)601 -b Fx(SLA)p Fn(_)p Fx(NUTC)0 4222 y FB(A)m(CTION)44 b -FD(:)38 b(Nutation)24 b(\(SF2001)j(theory\):)38 b(longitude)23 -b(&)i(obliquit)m(y)d(comp)s(onen)m(ts,)k(and)e(mean)h(obliquit)m(y)-8 -b(.)0 4410 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_NUTC)g(\(DATE,)g -(DPSI,)g(DEPS,)h(EPS0\))0 4739 y FB(GIVEN)e FD(:)277 -4885 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(TDB)68 b(\(formerly)f(ET\)) -g(as)h(Mo)s(di\014ed)d(Julian)h(Date)1658 4998 y(\(JD)p -Fo(\000)p FD(2400000.5\))0 5316 y FB(RETURNED)46 b FD(:)277 -5462 y Fq(DPSI,DEPS)247 b FB(D)565 b FD(n)m(utation)30 -b(in)f(longitude)g(and)h(obliquit)m(y)e(\(radians\))277 -5575 y Fq(EPS0)515 b FB(D)565 b FD(mean)31 b(obliquit)m(y)d -(\(radians\))p eop -%%Page: 100 102 -100 101 bop 0 52 a FD(100)0 351 y FB(NOTES)44 b FD(:)311 -532 y(1.)i(The)31 b(routine)e(predicts)h(forced)h(n)m(utation)g(\(but)f -(not)h(free)g(core)h(n)m(utation\))f(plus)e(corrections)i(to)427 -645 y(the)g(IA)m(U)g(1976)h(precession)d(mo)s(del.)311 -784 y(2.)46 b(Earth)j(attitude)g(predictions)f(made)h(b)m(y)g(com)m -(bining)e(the)j(presen)m(t)f(n)m(utation)g(mo)s(del)f(with)427 -897 y(IA)m(U)43 b(1976)g(precession)e(are)h(accurate)i(to)e(1)g(mas)g -(\(with)f(resp)s(ect)h(to)g(the)g(ICRS\))f(for)h(a)g(few)427 -1010 y(decades)31 b(around)e(2000.)311 1150 y(3.)46 b(The)40 -b(slaNutc80)i(routine)d(is)h(the)h(equiv)-5 b(alen)m(t)40 -b(of)g(the)h(presen)m(t)g(routine)e(but)h(using)f(the)i(IA)m(U)427 -1263 y(1980)33 b(n)m(utation)e(theory)-8 b(.)44 b(The)31 -b(older)f(theory)i(is)e(less)h(accurate,)i(leading)d(to)i(errors)e(as)i -(large)f(as)427 1375 y(350)39 b(mas)f(o)m(v)m(er)i(the)e(in)m(terv)-5 -b(al)37 b(1900-2100,)44 b(mainly)36 b(b)s(ecause)i(of)g(the)g(error)f -(in)g(the)h(IA)m(U)h(1976)427 1488 y(precession.)0 1803 -y FB(REFERENCES)44 b FD(:)311 1984 y(1.)i(Shirai,)28 -b(T.)j(&)f(F)-8 b(ukushima,)29 b(T.,)h(Astron.J.)h(121,)h(3270-3283)i -(\(2001\).)311 2124 y(2.)46 b(F)-8 b(ukushima,)29 b(T.,)i -(Astron.Astroph)m(ys.)f(244,)i(L11)f(\(1991\).)311 2263 -y(3.)46 b(Simon,)j(J.)e(L.,)j(Bretagnon,)i(P)-8 b(.,)51 -b(Chapron)m(t,)f(J.,)g(Chapron)m(t-T)-8 b(ouze,)52 b(M.,)f(F)-8 -b(rancou,)51 b(G.)c(&)427 2376 y(Lask)-5 b(ar,)31 b(J.,)f -(Astron.Astroph)m(ys.)h(282,)h(663)g(\(1994\).)p 0 2493 -3780 8 v 0 2606 a Fx(SLA)p Fn(_)p Fx(NUTC80)189 b Fm(Nutation)37 -b(Comp)s(onen)m(ts,)e(IA)m(U)k(1980)188 b Fx(SLA)p Fn(_)p -Fx(NUTC80)0 2957 y FB(A)m(CTION)44 b FD(:)d(Nutation)31 -b(\(IA)m(U)h(1980)h(theory\):)42 b(longitude)29 b(&)i(obliquit)m(y)d -(comp)s(onen)m(ts,)k(and)e(mean)h(obliq-)227 3070 y(uit)m(y)-8 -b(.)0 3257 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_NUTC80)f(\(DATE,)h -(DPSI,)h(DEPS,)f(EPS0\))0 3580 y FB(GIVEN)f FD(:)277 -3726 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(TDB)68 b(\(formerly)f(ET\)) -g(as)h(Mo)s(di\014ed)d(Julian)h(Date)1658 3839 y(\(JD)p -Fo(\000)p FD(2400000.5\))0 4146 y FB(RETURNED)46 b FD(:)277 -4292 y Fq(DPSI,DEPS)247 b FB(D)565 b FD(n)m(utation)30 -b(in)f(longitude)g(and)h(obliquit)m(y)e(\(radians\))277 -4405 y Fq(EPS0)515 b FB(D)565 b FD(mean)31 b(obliquit)m(y)d -(\(radians\))0 4711 y FB(NOTES)44 b FD(:)311 4892 y(1.)i(The)27 -b(IA)m(U)g(1980)i(theory)e(used)f(in)f(the)i(presen)m(t)g(function)e -(has)i(errors)f(as)h(large)g(as)g(350)h(mas)f(o)m(v)m(er)427 -5005 y(the)33 b(in)m(terv)-5 b(al)31 b(1900-2100,)37 -b(mainly)30 b(b)s(ecause)i(of)g(the)h(error)f(in)e(the)j(IA)m(U)g(1976) -g(precession.)46 b(F)-8 b(or)427 5118 y(more)34 b(accurate)i(results,)e -(either)f(the)h(corrections)g(published)d(in)h(IERS)h -Fq(Bul)5 b(letin)36 b(B)43 b FD(m)m(ust)34 b(b)s(e)427 -5231 y(applied,)e(or)g(the)h(sla)p Ft(_)p FD(NUTC)e(function)h(can)h(b) -s(e)f(used.)46 b(The)33 b(latter)f(is)g(based)g(up)s(on)f(the)i(more) -427 5344 y(recen)m(t)f(SF2001)g(n)m(utation)e(theory)g(and)g(is)g(of)g -(b)s(etter)h(than)f(1)15 b(mas)31 b(accuracy)-8 b(.)311 -5483 y(2.)46 b(The)35 b(distinction)e(b)s(et)m(w)m(een)k(the)e -(required)f(TDB)i(and)f(TT)g(is)f(alw)m(a)m(ys)i(negligible.)54 -b(Moreo)m(v)m(er,)427 5596 y(for)30 b(all)g(but)f(the)i(most)g -(critical)e(applications)f(UTC)i(is)g(adequate.)p eop -%%Page: 101 103 -101 102 bop 0 52 a Fw(SUN/67.70)3206 b FD(101)0 351 y -FB(REFERENCES)44 b FD(:)311 556 y(1.)i(Final)21 b(rep)s(ort)f(of)i(the) -g(IA)m(U)g(W)-8 b(orking)21 b(Group)g(on)h(Nutation,)h(c)m(hairman)e(P) --8 b(.K.Seidelmann,)21 b(1980.)311 710 y(2.)46 b(Kaplan,)30 -b(G.H.,)h(1981.)i Fq(USNO)e(cir)-5 b(cular)34 b(no.)f(163)p -FD(,)f(pA3-6.)p 0 860 3780 8 v 0 973 a Fx(SLA)p Fn(_)p -Fx(O)l(AP)709 b Fm(Observ)m(ed)39 b(to)f(Apparen)m(t)709 -b Fx(SLA)p Fn(_)p Fx(O)l(AP)0 1323 y FB(A)m(CTION)44 -b FD(:)c(Observ)m(ed)30 b(to)h(apparen)m(t)g(place.)0 -1511 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_OAP)g(\(TYPE,)g(OB1,)h -(OB2,)g(DATE,)f(DUT,)h(ELONGM,)e(PHIM,)1096 1624 y(HM,)i(XP,)g(YP,)g -(TDK,)f(PMB,)h(RH,)g(WL,)g(TLR,)f(RAP,)h(DAP\))0 1999 -y FB(GIVEN)e FD(:)277 2145 y Fq(TYPE)479 b FB(C*\(*\))383 -b FD(t)m(yp)s(e)31 b(of)f(co)s(ordinates)g({)h(`R',)g(`H')g(or)f(`A')h -(\(see)h(b)s(elo)m(w\))277 2258 y Fq(OB1)556 b FB(D)565 -b FD(observ)m(ed)53 b(Az,)60 b(HA)53 b(or)g(RA)g(\(radians;)64 -b(Az)53 b(is)g(N=0,)1658 2371 y(E=90)1881 2338 y Fp(\016)1921 -2371 y FD(\))277 2484 y Fq(OB2)556 b FB(D)565 b FD(observ)m(ed)31 -b(zenith)e(distance)h(or)h Fl(\016)j FD(\(radians\))277 -2597 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(UTC)140 b(date/time)i(\(Mo) -s(di\014ed)e(Julian)e(Date,)1658 2710 y(JD)p Fo(\000)p -FD(2400000.5\))277 2823 y Fq(DUT)534 b FB(D)565 b FD(\001UT:)30 -b(UT1)p Fo(\000)p FD(UTC)g(\(UTC)g(seconds\))277 2936 -y Fq(ELONGM)327 b FB(D)565 b FD(observ)m(er's)31 b(mean)f(longitude)f -(\(radians,)h(east)h(+v)m(e\))277 3048 y Fq(PHIM)489 -b FB(D)565 b FD(observ)m(er's)31 b(mean)f(geo)s(detic)h(latitude)f -(\(radians\))277 3161 y Fq(HM)586 b FB(D)565 b FD(observ)m(er's)31 -b(heigh)m(t)f(ab)s(o)m(v)m(e)i(sea)f(lev)m(el)f(\(metres\))277 -3274 y Fq(XP,YP)448 b FB(D)565 b FD(p)s(olar)29 b(motion)h([)15 -b Fl(x;)g(y)k FD(])31 b(co)s(ordinates)f(\(radians\))277 -3387 y Fq(TDK)532 b FB(D)565 b FD(lo)s(cal)30 b(am)m(bien)m(t)g(temp)s -(erature)g(\(K;)h(std=273.15D0\))277 3500 y Fq(PMB)528 -b FB(D)565 b FD(lo)s(cal)30 b(atmospheric)g(pressure)f(\(m)m(b;)h -(std=1013.25D0\))277 3613 y Fq(RH)602 b FB(D)565 b FD(lo)s(cal)30 -b(relativ)m(e)g(h)m(umidit)m(y)f(\(in)g(the)i(range)f(0D0)17 -b({)e(1D0\))277 3726 y Fq(WL)588 b FB(D)565 b FD(e\013ectiv)m(e)32 -b(w)m(a)m(v)m(elength)g(\()p Fl(\026)p FD(m,)e Fq(e.g.)g -FD(0.55D0\))277 3839 y Fq(TLR)548 b FB(D)565 b FD(trop)s(ospheric)84 -b(lapse)h(rate)h(\(K)f(p)s(er)f(metre,)100 b Fq(e.g.)1658 -3952 y FD(0.0065D0\))0 4348 y FB(RETURNED)46 b FD(:)277 -4519 y Fq(RAP,D)n(AP)315 b FB(D)565 b FD(geo)s(cen)m(tric)32 -b(apparen)m(t)e([)15 b Fl(\013;)g(\016)21 b FD(])0 4924 -y FB(NOTES)44 b FD(:)311 5128 y(1.)i(Only)39 b(the)h(\014rst)g(c)m -(haracter)i(of)e(the)g(TYPE)g(argumen)m(t)h(is)e(signi\014can)m(t.)69 -b(`R')41 b(or)f(`r')h(indicates)427 5241 y(that)g(OBS1)e(and)g(OBS2)h -(are)g(the)g(observ)m(ed)f(righ)m(t)h(ascension)f(and)g(declination;)k -(`H')d(or)g(`h')427 5354 y(indicates)31 b(that)i(they)f(are)h(hour)e -(angle)h(\(w)m(est)i(+v)m(e\))f(and)e(declination;)h(an)m(ything)f -(else)h(\(`A')h(or)427 5467 y(`a')39 b(is)d(recommended\))i(indicates)e -(that)i(OBS1)g(and)e(OBS2)i(are)g(azim)m(uth)f(\(north)g(zero,)j(east) -427 5580 y(90)517 5547 y Fp(\016)558 5580 y FD(\))34 -b(and)f(zenith)g(distance.)50 b(\(Zenith)33 b(distance)g(is)g(used)g -(rather)g(than)h(elev)-5 b(ation)33 b(in)g(order)g(to)427 -5693 y(re\015ect)e(the)g(fact)g(that)g(no)f(allo)m(w)m(ance)h(is)f -(made)g(for)g(depression)f(of)i(the)f(horizon.\))p eop -%%Page: 102 104 -102 103 bop 0 52 a FD(102)311 351 y(2.)46 b(The)30 b(accuracy)i(of)f -(the)g(result)e(is)h(limited)e(b)m(y)j(the)g(corrections)g(for)f -(refraction.)41 b(Pro)m(viding)29 b(the)427 464 y(meteorological)j -(parameters)f(are)g(kno)m(wn)f(accurately)h(and)f(there)h(are)g(no)f -(gross)h(lo)s(cal)f(e\013ects,)427 577 y(the)f(predicted)e(azim)m(uth)h -(and)g(elev)-5 b(ation)28 b(should)e(b)s(e)i(within)e(ab)s(out)i(0)2869 -540 y Fk(0)l(0)2873 577 y Fl(:)p FD(1)h(for)f Fl(\020)k(<)25 -b FD(70)3367 544 y Fp(\016)3407 577 y FD(.)40 b(Ev)m(en)29 -b(at)427 690 y(a)i(top)s(o)s(cen)m(tric)f(zenith)g(distance)g(of)g(90) -1800 657 y Fp(\016)1840 690 y FD(,)h(the)f(accuracy)i(in)c(elev)-5 -b(ation)31 b(should)d(b)s(e)h(b)s(etter)i(than)427 803 -y(1)21 b(arcmin)m(ute;)j(useful)19 b(results)g(are)i(a)m(v)-5 -b(ailable)20 b(for)g(a)h(further)f(3)2512 770 y Fp(\016)2551 -803 y FD(,)j(b)s(ey)m(ond)d(whic)m(h)f(the)i(sla)p Ft(_)p -FD(REFR)m(O)427 916 y(routine)26 b(returns)f(a)i(\014xed)f(v)-5 -b(alue)27 b(of)f(the)h(refraction.)39 b(The)27 b(complemen)m(tary)f -(routines)g(sla)p Ft(_)p FD(A)m(OP)427 1029 y(\(or)39 -b(sla)p Ft(_)p FD(A)m(OPQK\))f(and)g(sla)p Ft(_)p FD(O)m(AP)g(\(or)h -(sla)p Ft(_)p FD(O)m(APQK\))f(are)h(self-consisten)m(t)g(to)g(b)s -(etter)g(than)427 1142 y(1)31 b(microarcsecond)f(all)g(o)m(v)m(er)h -(the)g(celestial)f(sphere.)311 1276 y(3.)46 b(It)c(is)e(advisable)h(to) -h(tak)m(e)h(great)g(care)f(with)e(units,)j(as)f(ev)m(en)g(unlik)m(ely)d -(v)-5 b(alues)41 b(of)h(the)f(input)427 1389 y(parameters)31 -b(are)g(accepted)g(and)f(pro)s(cessed)g(in)f(accordance)j(with)d(the)i -(mo)s(dels)e(used.)311 1523 y(4.)46 b Fq(Observe)-5 b(d)49 -b FD([)15 b Fl(Az)t(;)g(E)5 b(l)42 b FD(])d(means)g(the)g(p)s(osition)d -(that)k(w)m(ould)d(b)s(e)i(seen)f(b)m(y)h(a)g(p)s(erfect)g(theo)s -(dolite)427 1636 y(lo)s(cated)46 b(at)g(the)g(observ)m(er.)86 -b(This)44 b(is)h(related)g(to)h(the)g(observ)m(ed)g([)15 -b Fl(h;)g(\016)20 b FD(])45 b(via)h(the)f(standard)427 -1748 y(rotation,)30 b(using)c(the)j(geo)s(detic)g(latitude)e -(\(corrected)j(for)e(p)s(olar)f(motion\),)i(while)e(the)h(observ)m(ed) -427 1861 y(HA)39 b(and)e(RA)h(are)h(related)f(simply)d(through)j(the)g -(lo)s(cal)f(apparen)m(t)i(ST.)e Fq(Observe)-5 b(d)48 -b FD([)15 b Fl(\013;)g(\016)20 b FD(])38 b(or)427 1974 -y([)15 b Fl(h;)g(\016)20 b FD(])32 b(th)m(us)f(means)g(the)g(p)s -(osition)e(that)j(w)m(ould)e(b)s(e)h(seen)g(b)m(y)g(a)g(p)s(erfect)g -(equatorial)g(lo)s(cated)h(at)427 2087 y(the)25 b(observ)m(er)g(and)f -(with)g(its)g(p)s(olar)g(axis)g(aligned)f(to)j(the)f(Earth's)g(axis)f -(of)h(rotation)g(\()p Fq(n.b.)g FD(not)g(to)427 2200 -y(the)32 b(refracted)g(p)s(ole\).)44 b(By)32 b(remo)m(ving)f(from)g -(the)h(observ)m(ed)g(place)f(the)h(e\013ects)h(of)f(atmospheric)427 -2313 y(refraction)e(and)g(diurnal)e(ab)s(erration,)h(the)i(geo)s(cen)m -(tric)g(apparen)m(t)g([)15 b Fl(\013;)g(\016)20 b FD(])31 -b(is)e(obtained.)311 2447 y(5.)46 b(F)-8 b(requen)m(tly)g(,)32 -b Fq(me)-5 b(an)38 b FD(rather)30 b(than)g Fq(app)-5 -b(ar)g(ent)49 b FD([)15 b Fl(\013;)g(\016)20 b FD(])31 -b(will)c(b)s(e)j(required,)f(in)g(whic)m(h)g(case)j(further)427 -2560 y(transformations)37 b(will)d(b)s(e)j(necessary)-8 -b(.)62 b(The)37 b(sla)p Ft(_)p FD(AMP)f Fq(etc.)h FD(routines)f(will)f -(con)m(v)m(ert)k(the)e(ap-)427 2673 y(paren)m(t)k([)15 -b Fl(\013;)g(\016)20 b FD(])41 b(pro)s(duced)d(b)m(y)j(the)f(presen)m -(t)h(routine)e(in)m(to)h(an)h(FK5)f(J2000)i(mean)f(place,)i(b)m(y)427 -2786 y(allo)m(wing)30 b(for)h(the)h(Sun's)e(gra)m(vitational)i(lens)e -(e\013ect,)j(ann)m(ual)e(ab)s(erration,)g(n)m(utation)g(and)g(pre-)427 -2899 y(cession.)40 b(Should)25 b(FK4)i(B1950)j(co)s(ordinates)d(b)s(e)f -(required,)h(the)g(routines)f(sla)p Ft(_)p FD(FK524)i -Fq(etc.)f FD(will)427 3012 y(also)k(ha)m(v)m(e)g(to)g(b)s(e)f(applied.) -311 3146 y(6.)46 b(T)-8 b(o)31 b(con)m(v)m(ert)h(to)f(apparen)m(t)f([) -15 b Fl(\013;)g(\016)21 b FD(])30 b(the)h(co)s(ordinates)f(read)g(from) -g(a)g(real)g(telescop)s(e,)h(corrections)427 3259 y(w)m(ould)43 -b(ha)m(v)m(e)i(to)g(b)s(e)f(applied)e(for)h(enco)s(der)h(zero)h(p)s -(oin)m(ts,)i(gear)e(and)e(enco)s(der)h(errors,)j(tub)s(e)427 -3371 y(\015exure,)e(the)d(p)s(osition)e(of)j(the)f(rotator)h(axis)f -(and)g(the)g(p)s(oin)m(ting)e(axis)i(relativ)m(e)g(to)h(it,)i(non-)427 -3484 y(p)s(erp)s(endicularit)m(y)22 b(b)s(et)m(w)m(een)k(the)g(moun)m -(ting)f(axes,)i(and)e(\014nally)f(for)h(the)h(tilt)f(of)g(the)h(azim)m -(uth)f(or)427 3597 y(p)s(olar)32 b(axis)g(of)h(the)h(moun)m(ting)e -(\(with)g(appropriate)g(corrections)h(for)g(moun)m(t)f(\015exures\).)48 -b(Some)427 3710 y(telescop)s(es)22 b(w)m(ould,)g(of)f(course,)i -(exhibit)d(other)h(prop)s(erties)e(whic)m(h)h(w)m(ould)g(need)h(to)h(b) -s(e)e(accoun)m(ted)427 3823 y(for)30 b(at)i(the)e(appropriate)f(p)s -(oin)m(t)h(in)f(the)h(sequence.)311 3957 y(7.)46 b(This)36 -b(routine)g(tak)m(es)i(time)f(to)h(execute,)i(due)d(mainly)e(to)j(the)f -(rigorous)f(in)m(tegration)h(used)g(to)427 4070 y(ev)-5 -b(aluate)33 b(the)f(refraction.)44 b(F)-8 b(or)33 b(pro)s(cessing)d(m)m -(ultiple)f(stars)j(for)g(one)g(lo)s(cation)f(and)g(time,)h(call)427 -4183 y(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)41 b(once)h(follo)m(w)m(ed)f(b)m -(y)g(one)g(call)g(p)s(er)f(star)h(to)h(sla)p Ft(_)p FD(O)m(APQK.)e -(Where)h(a)h(range)f(of)427 4296 y(times)31 b(within)d(a)j(limited)e(p) -s(erio)s(d)f(of)j(a)h(few)e(hours)g(is)g(in)m(v)m(olv)m(ed,)h(and)f -(the)h(highest)f(precision)f(is)427 4409 y(not)g(required,)e(call)g -(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)28 b(once,)i(follo)m(w)m(ed)e(b)m(y)g -(a)g(call)g(to)h(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)g(T)28 -b(eac)m(h)h(time)f(the)427 4522 y(time)i(c)m(hanges,)i(follo)m(w)m(ed)e -(b)m(y)g(one)h(call)f(p)s(er)f(star)h(to)i(sla)p Ft(_)p -FD(O)m(APQK.)311 4656 y(8.)46 b(The)26 b(D)m(A)-8 b(TE)27 -b(argumen)m(t)g(is)e(UTC)h(expressed)g(as)g(an)g(MJD.)h(This)e(is,)h -(strictly)f(sp)s(eaking,)i(wrong,)427 4769 y(b)s(ecause)33 -b(of)g(leap)g(seconds.)48 b(Ho)m(w)m(ev)m(er,)35 b(as)e(long)g(as)g -(the)g(\001UT)f(and)h(the)g(UTC)f(are)h(consisten)m(t)427 -4882 y(there)j(are)h(no)f(di\016culties,)f(except)i(during)d(a)i(leap)g -(second.)57 b(In)36 b(this)f(case,)j(the)f(start)f(of)g(the)427 -4994 y(61st)i(second)f(of)g(the)g(\014nal)f(min)m(ute)g(should)f(b)s -(egin)g(a)j(new)e(MJD)h(da)m(y)h(and)e(the)h(old)f(pre-leap)427 -5107 y(\001UT)i(should)e(con)m(tin)m(ue)i(to)h(b)s(e)e(used.)63 -b(As)38 b(the)g(61st)h(second)f(completes,)j(the)d(MJD)g(should)427 -5220 y(rev)m(ert)31 b(to)h(the)e(start)h(of)g(the)f(da)m(y)h(as,)g(sim) -m(ultaneously)-8 b(,)29 b(the)h(\001UT)g(c)m(hanges)h(b)m(y)g(one)f -(second)h(to)427 5333 y(its)f(p)s(ost-leap)g(new)g(v)-5 -b(alue.)311 5467 y(9.)46 b(The)27 b(\001UT)h(\(UT1)p -Fo(\000)p FD(UTC\))g(is)e(tabulated)i(in)e(IERS)h(circulars)f(and)h -(elsewhere.)39 b(It)28 b(increases)g(b)m(y)427 5580 y(exactly)k(one)f -(second)f(at)i(the)f(end)f(of)h(eac)m(h)g(UTC)f(leap)h(second,)g(in)m -(tro)s(duced)e(in)g(order)h(to)i(k)m(eep)427 5693 y(\001UT)e(within)e -Fo(\006)p FD(0)1066 5660 y Fu(s)1071 5693 y Fl(:)p FD(9.)p -eop -%%Page: 103 105 -103 104 bop 0 52 a Fw(SUN/67.70)3206 b FD(103)266 351 -y(10.)46 b(IMPOR)-8 b(T)g(ANT)39 b({)g(T)-8 b(AKE)38 -b(CARE)g(WITH)h(THE)f(LONGITUDE)h(SIGN)f(CONVENTION.)427 -464 y(The)33 b(longitude)f(required)g(b)m(y)h(the)g(presen)m(t)h -(routine)e(is)h FB(east-p)s(ositiv)m(e)p FD(,)h(in)e(accordance)j(with) -427 577 y(geographical)f(con)m(v)m(en)m(tion)g(\(and)f(righ)m -(t-handed\).)49 b(In)32 b(particular,)h(note)h(that)g(the)f(longitudes) -427 690 y(returned)d(b)m(y)i(the)f(sla)p Ft(_)p FD(OBS)f(routine)h(are) -h(w)m(est-p)s(ositiv)m(e)f(\(as)h(in)e(the)i Fq(Astr)-5 -b(onomic)g(al)36 b(A)n(lmanac)427 803 y FD(b)s(efore)30 -b(1984\))j(and)c(m)m(ust)i(b)s(e)e(rev)m(ersed)i(in)e(sign)g(b)s(efore) -h(use)h(in)e(the)h(presen)m(t)h(routine.)266 1078 y(11.)46 -b(The)37 b(p)s(olar)f(co)s(ordinates)h(XP)-8 b(,YP)38 -b(can)f(b)s(e)g(obtained)f(from)h(IERS)f(circulars)f(and)i(equiv)-5 -b(alen)m(t)427 1191 y(publications.)36 b(The)24 b(maxim)m(um)f -(amplitude)g(is)g(ab)s(out)h(0)2373 1154 y Fk(0)m(0)2377 -1191 y Fl(:)p FD(3.)40 b(If)24 b(XP)-8 b(,YP)25 b(v)-5 -b(alues)24 b(are)h(una)m(v)-5 b(ailable,)427 1304 y(use)31 -b(XP=YP=0D0.)43 b(See)32 b(page)g(B60)g(of)f(the)g(1988)i -Fq(Astr)-5 b(onomic)g(al)36 b(A)n(lmanac)h FD(for)30 -b(a)i(de\014nition)427 1417 y(of)f(the)f(t)m(w)m(o)i(angles.)266 -1692 y(12.)46 b(The)35 b(heigh)m(t)g(ab)s(o)m(v)m(e)h(sea)f(lev)m(el)g -(of)g(the)g(observing)f(station,)i(HM,)g(can)f(b)s(e)g(obtained)f(from) -g(the)427 1804 y Fq(Astr)-5 b(onomic)g(al)39 b(A)n(lmanac)h -FD(\(Section)35 b(J)f(in)f(the)i(1988)h(edition\),)f(or)f(via)g(the)h -(routine)e(sla)p Ft(_)p FD(OBS.)427 1917 y(If)i(P)-8 -b(,)35 b(the)g(pressure)e(in)h(m)m(b,)h(is)f(a)m(v)-5 -b(ailable,)36 b(an)e(adequate)i(estimate)g(of)f(HM)g(can)g(b)s(e)f -(obtained)427 2030 y(from)c(the)h(follo)m(wing)e(expression:)597 -2305 y Ft(HM=-29.3D0*TSL*LOG\(P/1013)o(.25D)o(0\))427 -2580 y FD(where)22 b(TSL)f(is)h(the)g(appro)m(ximate)h(sea-lev)m(el)g -(air)e(temp)s(erature)h(in)f(K)h(\(see)i Fq(Astr)-5 b(ophysic)g(al)28 -b(Quan-)427 2693 y(tities)p FD(,)k(C.W.Allen,)g(3rd)f(edition,)f -Fo(x)p FD(52\).)46 b(Similarly)-8 b(,)29 b(if)h(the)i(pressure)e(P)h -(is)g(not)h(kno)m(wn,)f(it)g(can)427 2806 y(b)s(e)f(estimated)h(from)f -(the)g(heigh)m(t)g(of)h(the)f(observing)g(station,)h(HM)f(as)h(follo)m -(ws:)597 3081 y Ft(P=1013.25D0*EXP\(-HM/\(29.3)o(D0*T)o(SL\)\))427 -3356 y FD(Note,)g(ho)m(w)m(ev)m(er,)g(that)f(the)f(refraction)g(is)g -(nearly)f(prop)s(ortional)f(to)j(the)f(pressure)f(and)h(that)h(an)427 -3469 y(accurate)i(P)e(v)-5 b(alue)30 b(is)g(imp)s(ortan)m(t)f(for)h -(precise)g(w)m(ork.)266 3744 y(13.)46 b(The)31 b(azim)m(uths)g -Fq(etc.)g FD(used)g(b)m(y)g(the)h(presen)m(t)f(routine)g(are)h(with)e -(resp)s(ect)h(to)h(the)g(celestial)f(p)s(ole.)427 3857 -y(Corrections)f(from)g(the)h(terrestrial)e(p)s(ole)g(can)i(b)s(e)f -(computed)g(using)f(sla)p Ft(_)p FD(POLMO.)p 0 4247 3780 -8 v 0 4360 a Fx(SLA)p Fn(_)p Fx(O)l(APQK)334 b Fm(Quic)m(k)39 -b(Observ)m(ed)f(to)g(Apparen)m(t)334 b Fx(SLA)p Fn(_)p -Fx(O)l(APQK)0 4710 y FB(A)m(CTION)44 b FD(:)c(Quic)m(k)30 -b(observ)m(ed)h(to)g(apparen)m(t)f(place.)0 4898 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_OAPQK)g(\(TYPE,)g(OB1,)g(OB2,)h(AOPRMS,)f -(RAP,)g(DAP\))0 5634 y FB(GIVEN)f FD(:)p eop -%%Page: 104 106 -104 105 bop 0 52 a FD(104)277 339 y Fq(TYPE)479 b FB(C*\(*\))383 -b FD(t)m(yp)s(e)31 b(of)f(co)s(ordinates)g({)h(`R',)g(`H')g(or)f(`A')h -(\(see)h(b)s(elo)m(w\))277 452 y Fq(OB1)556 b FB(D)565 -b FD(observ)m(ed)53 b(Az,)60 b(HA)53 b(or)g(RA)g(\(radians;)64 -b(Az)53 b(is)g(N=0,)1658 565 y(E=90)1881 532 y Fp(\016)1921 -565 y FD(\))277 678 y Fq(OB2)556 b FB(D)565 b FD(observ)m(ed)31 -b(zenith)e(distance)h(or)h Fl(\016)j FD(\(radians\))277 -791 y Fq(A)n(OPRMS)339 b FB(D\(14\))379 b FD(star-indep)s(enden)m(t)85 -b(apparen)m(t-to-observ)m(ed)j(parame-)1658 904 y(ters:)537 -1016 y(\(1\))1006 b(geo)s(detic)31 b(latitude)f(\(radians\))502 -1129 y(\(2,3\))971 b(sine)29 b(and)h(cosine)g(of)h(geo)s(detic)g -(latitude)537 1242 y(\(4\))1006 b(magnitude)30 b(of)g(diurnal)e(ab)s -(erration)h(v)m(ector)537 1355 y(\(5\))1006 b(heigh)m(t)30 -b(\(HM\))537 1468 y(\(6\))1006 b(am)m(bien)m(t)31 b(temp)s(erature)f -(\(TDK\))537 1581 y(\(7\))1006 b(pressure)29 b(\(PMB\))537 -1694 y(\(8\))1006 b(relativ)m(e)31 b(h)m(umidit)m(y)d(\(RH\))537 -1807 y(\(9\))1006 b(w)m(a)m(v)m(elength)32 b(\(WL\))514 -1920 y(\(10\))984 b(lapse)30 b(rate)h(\(TLR\))456 2033 -y(\(11,12\))927 b(refraction)30 b(constan)m(ts)i(A)e(and)g(B)h -(\(radians\))514 2146 y(\(13\))984 b(longitude)41 b(+)h(eqn)h(of)f -(equino)m(xes)g(+)h(\\sidereal)e(\001UT")1658 2258 y(\(radians\))514 -2371 y(\(14\))984 b(lo)s(cal)30 b(apparen)m(t)g(sidereal)f(time)h -(\(radians\))0 2726 y FB(RETURNED)46 b FD(:)277 2897 -y Fq(RAP,D)n(AP)315 b FB(D)565 b FD(geo)s(cen)m(tric)32 -b(apparen)m(t)e([)15 b Fl(\013;)g(\016)21 b FD(])0 3260 -y FB(NOTES)44 b FD(:)311 3448 y(1.)i(Only)39 b(the)h(\014rst)g(c)m -(haracter)i(of)e(the)g(TYPE)g(argumen)m(t)h(is)e(signi\014can)m(t.)69 -b(`R')41 b(or)f(`r')h(indicates)427 3561 y(that)g(OBS1)e(and)g(OBS2)h -(are)g(the)g(observ)m(ed)f(righ)m(t)h(ascension)f(and)g(declination;)k -(`H')d(or)g(`h')427 3674 y(indicates)31 b(that)i(they)f(are)h(hour)e -(angle)h(\(w)m(est)i(+v)m(e\))f(and)e(declination;)h(an)m(ything)f -(else)h(\(`A')h(or)427 3786 y(`a')k(is)d(recommended\))i(indicates)f -(that)h(OBS1)f(and)g(OBS2)h(are)g(Azim)m(uth)f(\(north)g(zero,)j(east) -427 3899 y(90)517 3866 y Fp(\016)558 3899 y FD(\))c(and)f(zenith)g -(distance.)50 b(\(Zenith)33 b(distance)g(is)g(used)g(rather)g(than)h -(elev)-5 b(ation)33 b(in)g(order)g(to)427 4012 y(re\015ect)e(the)g -(fact)g(that)g(no)f(allo)m(w)m(ance)h(is)f(made)g(for)g(depression)f -(of)i(the)f(horizon.\))311 4159 y(2.)46 b(The)30 b(accuracy)i(of)f(the) -g(result)e(is)h(limited)e(b)m(y)j(the)g(corrections)g(for)f -(refraction.)41 b(Pro)m(viding)29 b(the)427 4271 y(meteorological)j -(parameters)f(are)g(kno)m(wn)f(accurately)h(and)f(there)h(are)g(no)f -(gross)h(lo)s(cal)f(e\013ects,)427 4384 y(the)f(predicted)e(azim)m(uth) -h(and)g(elev)-5 b(ation)28 b(should)e(b)s(e)i(within)e(ab)s(out)i(0) -2869 4347 y Fk(0)l(0)2873 4384 y Fl(:)p FD(1)h(for)f -Fl(\020)k(<)25 b FD(70)3367 4351 y Fp(\016)3407 4384 -y FD(.)40 b(Ev)m(en)29 b(at)427 4497 y(a)i(top)s(o)s(cen)m(tric)f -(zenith)g(distance)g(of)g(90)1800 4464 y Fp(\016)1840 -4497 y FD(,)h(the)f(accuracy)i(in)c(elev)-5 b(ation)31 -b(should)d(b)s(e)h(b)s(etter)i(than)427 4610 y(1)21 b(arcmin)m(ute;)j -(useful)19 b(results)g(are)i(a)m(v)-5 b(ailable)20 b(for)g(a)h(further) -f(3)2512 4577 y Fp(\016)2551 4610 y FD(,)j(b)s(ey)m(ond)d(whic)m(h)f -(the)i(sla)p Ft(_)p FD(REFR)m(O)427 4723 y(routine)26 -b(returns)f(a)i(\014xed)f(v)-5 b(alue)27 b(of)f(the)h(refraction.)39 -b(The)27 b(complemen)m(tary)f(routines)g(sla)p Ft(_)p -FD(A)m(OP)427 4836 y(\(or)39 b(sla)p Ft(_)p FD(A)m(OPQK\))f(and)g(sla)p -Ft(_)p FD(O)m(AP)g(\(or)h(sla)p Ft(_)p FD(O)m(APQK\))f(are)h -(self-consisten)m(t)g(to)g(b)s(etter)g(than)427 4949 -y(1)31 b(microarcsecond)f(all)g(o)m(v)m(er)h(the)g(celestial)f(sphere.) -311 5095 y(3.)46 b(It)c(is)e(advisable)h(to)h(tak)m(e)h(great)g(care)f -(with)e(units,)j(as)f(ev)m(en)g(unlik)m(ely)d(v)-5 b(alues)41 -b(of)h(the)f(input)427 5208 y(parameters)31 b(are)g(accepted)g(and)f -(pro)s(cessed)g(in)f(accordance)j(with)d(the)i(mo)s(dels)e(used.)311 -5354 y(4.)46 b Fq(Observe)-5 b(d)49 b FD([)15 b Fl(Az)t(;)g(E)5 -b(l)42 b FD(])d(means)g(the)g(p)s(osition)d(that)k(w)m(ould)d(b)s(e)i -(seen)f(b)m(y)h(a)g(p)s(erfect)g(theo)s(dolite)427 5467 -y(lo)s(cated)46 b(at)g(the)g(observ)m(er.)86 b(This)44 -b(is)h(related)g(to)h(the)g(observ)m(ed)g([)15 b Fl(h;)g(\016)20 -b FD(])45 b(via)h(the)f(standard)427 5580 y(rotation,)30 -b(using)c(the)j(geo)s(detic)g(latitude)e(\(corrected)j(for)e(p)s(olar)f -(motion\),)i(while)e(the)h(observ)m(ed)427 5693 y(HA)39 -b(and)e(RA)h(are)h(related)f(simply)d(through)j(the)g(lo)s(cal)f -(apparen)m(t)i(ST.)e Fq(Observe)-5 b(d)48 b FD([)15 b -Fl(\013;)g(\016)20 b FD(])38 b(or)p eop -%%Page: 105 107 -105 106 bop 0 52 a Fw(SUN/67.70)3206 b FD(105)427 351 -y([)15 b Fl(h;)g(\016)20 b FD(])32 b(th)m(us)f(means)g(the)g(p)s -(osition)e(that)j(w)m(ould)e(b)s(e)h(seen)g(b)m(y)g(a)g(p)s(erfect)g -(equatorial)g(lo)s(cated)h(at)427 464 y(the)25 b(observ)m(er)g(and)f -(with)g(its)g(p)s(olar)g(axis)g(aligned)f(to)j(the)f(Earth's)g(axis)f -(of)h(rotation)g(\()p Fq(n.b.)g FD(not)g(to)427 577 y(the)32 -b(refracted)g(p)s(ole\).)44 b(By)32 b(remo)m(ving)f(from)g(the)h -(observ)m(ed)g(place)f(the)h(e\013ects)h(of)f(atmospheric)427 -690 y(refraction)e(and)g(diurnal)e(ab)s(erration,)h(the)i(geo)s(cen)m -(tric)g(apparen)m(t)g([)15 b Fl(\013;)g(\016)20 b FD(])31 -b(is)e(obtained.)311 833 y(5.)46 b(F)-8 b(requen)m(tly)g(,)32 -b Fq(me)-5 b(an)38 b FD(rather)30 b(than)g Fq(app)-5 -b(ar)g(ent)49 b FD([)15 b Fl(\013;)g(\016)20 b FD(])31 -b(will)c(b)s(e)j(required,)f(in)g(whic)m(h)g(case)j(further)427 -946 y(transformations)37 b(will)d(b)s(e)j(necessary)-8 -b(.)62 b(The)37 b(sla)p Ft(_)p FD(AMP)f Fq(etc.)h FD(routines)f(will)f -(con)m(v)m(ert)k(the)e(ap-)427 1059 y(paren)m(t)k([)15 -b Fl(\013;)g(\016)20 b FD(])41 b(pro)s(duced)d(b)m(y)j(the)f(presen)m -(t)h(routine)e(in)m(to)h(an)h(FK5)f(J2000)i(mean)f(place,)i(b)m(y)427 -1171 y(allo)m(wing)30 b(for)h(the)h(Sun's)e(gra)m(vitational)i(lens)e -(e\013ect,)j(ann)m(ual)e(ab)s(erration,)g(n)m(utation)g(and)g(pre-)427 -1284 y(cession.)40 b(Should)25 b(FK4)i(B1950)j(co)s(ordinates)d(b)s(e)f -(required,)h(the)g(routines)f(sla)p Ft(_)p FD(FK524)i -Fq(etc.)f FD(will)427 1397 y(also)k(ha)m(v)m(e)g(to)g(b)s(e)f(applied.) -311 1540 y(6.)46 b(T)-8 b(o)31 b(con)m(v)m(ert)h(to)f(apparen)m(t)f([) -15 b Fl(\013;)g(\016)21 b FD(])30 b(the)h(co)s(ordinates)f(read)g(from) -g(a)g(real)g(telescop)s(e,)h(corrections)427 1653 y(w)m(ould)43 -b(ha)m(v)m(e)i(to)g(b)s(e)f(applied)e(for)h(enco)s(der)h(zero)h(p)s -(oin)m(ts,)i(gear)e(and)e(enco)s(der)h(errors,)j(tub)s(e)427 -1766 y(\015exure,)e(the)d(p)s(osition)e(of)j(the)f(rotator)h(axis)f -(and)g(the)g(p)s(oin)m(ting)e(axis)i(relativ)m(e)g(to)h(it,)i(non-)427 -1879 y(p)s(erp)s(endicularit)m(y)22 b(b)s(et)m(w)m(een)k(the)g(moun)m -(ting)f(axes,)i(and)e(\014nally)f(for)h(the)h(tilt)f(of)g(the)h(azim)m -(uth)f(or)427 1992 y(p)s(olar)32 b(axis)g(of)h(the)h(moun)m(ting)e -(\(with)g(appropriate)g(corrections)h(for)g(moun)m(t)f(\015exures\).)48 -b(Some)427 2105 y(telescop)s(es)22 b(w)m(ould,)g(of)f(course,)i -(exhibit)d(other)h(prop)s(erties)e(whic)m(h)h(w)m(ould)g(need)h(to)h(b) -s(e)e(accoun)m(ted)427 2218 y(for)30 b(at)i(the)e(appropriate)f(p)s -(oin)m(t)h(in)f(the)h(sequence.)311 2360 y(7.)46 b(The)40 -b(star-indep)s(enden)m(t)f(apparen)m(t-to-observ)m(ed-place)k -(parameters)e(in)e(A)m(OPRMS)i(ma)m(y)g(b)s(e)427 2473 -y(computed)31 b(b)m(y)f(means)g(of)h(the)g(sla)p Ft(_)p -FD(A)m(OPP)-8 b(A)30 b(routine.)40 b(If)30 b(nothing)g(has)g(c)m -(hanged)h(signi\014can)m(tly)427 2586 y(except)45 b(the)g(time,)i(the)d -(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)g(T)45 b(routine)e(ma)m(y)h(b)s(e)g -(used)f(to)i(p)s(erform)e(the)h(requisite)427 2699 y(partial)29 -b(recomputation)i(of)f(A)m(OPRMS.)311 2842 y(8.)46 b(The)31 -b(azim)m(uths)g Fq(etc.)g FD(used)g(b)m(y)g(the)h(presen)m(t)f(routine) -g(are)h(with)e(resp)s(ect)h(to)h(the)g(celestial)f(p)s(ole.)427 -2955 y(Corrections)f(from)g(the)h(terrestrial)e(p)s(ole)g(can)i(b)s(e)f -(computed)g(using)f(sla)p Ft(_)p FD(POLMO.)p 0 3077 3780 -8 v 0 3190 a Fx(SLA)p Fn(_)p Fx(OBS)677 b Fm(Observ)-7 -b(atory)37 b(P)m(arameters)675 b Fx(SLA)p Fn(_)p Fx(OBS)0 -3541 y FB(A)m(CTION)44 b FD(:)39 b(Lo)s(ok)27 b(up)f(an)h(en)m(try)h -(in)e(a)h(standard)g(list)e(of)j(groundbased)e(observing)g(stations)h -(parameters.)0 3728 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_OBS)g(\(N,)h(C,)g(NAME,)g(W,)g(P,)g(H\))0 4065 -y FB(GIVEN)e FD(:)277 4236 y Fq(N)668 b FB(I)605 b FD(n)m(um)m(b)s(er) -29 b(sp)s(ecifying)f(observing)i(station)0 4575 y FB(GIVEN)k(or)h -(RETURNED)46 b FD(:)277 4746 y Fq(C)671 b FB(C*\(*\))383 -b FD(iden)m(ti\014er)29 b(sp)s(ecifying)f(observing)h(station)0 -5085 y FB(RETURNED)46 b FD(:)277 5231 y Fq(NAME)456 b -FB(C*\(*\))383 b FD(name)31 b(of)f(sp)s(eci\014ed)f(observing)g -(station)277 5344 y Fq(W)645 b FB(D)565 b FD(longitude)29 -b(\(radians,)h(w)m(est)h(+v)m(e\))277 5457 y Fq(P)674 -b FB(D)565 b FD(geo)s(detic)31 b(latitude)f(\(radians,)f(north)h(+v)m -(e\))277 5570 y Fq(H)668 b FB(D)565 b FD(heigh)m(t)30 -b(ab)s(o)m(v)m(e)i(sea)f(lev)m(el)f(\(metres\))p eop -%%Page: 106 108 -106 107 bop 0 52 a FD(106)0 351 y FB(NOTES)44 b FD(:)311 -542 y(1.)i(Station)26 b(iden)m(ti\014ers)f(C)h(ma)m(y)h(b)s(e)e(up)h -(to)h(10)g(c)m(haracters)h(long,)f(and)e(station)i(names)f(NAME)h(ma)m -(y)427 655 y(b)s(e)j(up)f(to)i(40)h(c)m(haracters)f(long.)311 -802 y(2.)46 b(C)23 b(and)f(N)h(are)h Fq(alternative)31 -b FD(w)m(a)m(ys)24 b(of)f(sp)s(ecifying)e(the)i(observing)f(station.)38 -b(The)23 b(C)g(option,)h(whic)m(h)427 915 y(is)k(the)h(most)g -(generally)e(useful,)h(ma)m(y)h(b)s(e)f(selected)h(b)m(y)g(sp)s -(ecifying)d(an)i(N)h(v)-5 b(alue)28 b(of)h(zero)g(or)g(less.)427 -1028 y(If)34 b(N)f(is)g(1)h(or)g(more,)h(the)f(parameters)g(of)g(the)g -(Nth)g(station)g(in)e(the)i(curren)m(tly)f(supp)s(orted)f(list)427 -1141 y(are)c(in)m(terrogated,)h(and)e(the)g(station)h(iden)m(ti\014er)d -(C)i(is)f(returned)h(as)g(w)m(ell)f(as)i(NAME,)g(W,)g(P)f(and)427 -1254 y(H.)311 1401 y(3.)46 b(If)32 b(the)h(station)f(parameters)h(are)f -(not)h(a)m(v)-5 b(ailable,)32 b(either)g(b)s(ecause)g(the)h(station)f -(iden)m(ti\014er)f(C)g(is)427 1514 y(not)d(recognized,)h(or)f(b)s -(ecause)f(an)h(N)f(v)-5 b(alue)28 b(greater)g(than)g(the)g(n)m(um)m(b)s -(er)e(of)i(stations)f(supp)s(orted)427 1627 y(is)j(giv)m(en,)g(a)h -(name)f(of)h(`?')41 b(is)29 b(returned)g(and)h(W,)h(P)f(and)g(H)h(are)f -(left)h(in)e(their)g(curren)m(t)h(states.)311 1775 y(4.)46 -b(Programs)32 b(can)h(obtain)f(a)g(list)f(of)h(all)f(curren)m(tly)h -(supp)s(orted)e(stations)i(b)m(y)g(calling)f(the)h(routine)427 -1888 y(rep)s(eatedly)-8 b(,)37 b(with)c(N=1,2,3...)57 -b(When)35 b(NAME=`?')55 b(is)34 b(seen,)j(the)e(list)f(of)h(stations)g -(has)g(b)s(een)427 2000 y(exhausted.)41 b(The)30 b(stations)g(at)h(the) -g(time)f(of)g(writing)f(are)i(listed)e(b)s(elo)m(w.)311 -2148 y(5.)46 b(Station)22 b(n)m(um)m(b)s(ers,)h(iden)m(ti\014ers,)f -(names)g(and)f(other)i(details)e(are)h(sub)5 b(ject)22 -b(to)h(c)m(hange)g(and)e(should)427 2261 y(not)31 b(b)s(e)f(hardwired)d -(in)m(to)k(application)d(programs.)311 2408 y(6.)46 b(All)29 -b(station)h(iden)m(ti\014ers)e(C)h(are)h(upp)s(ercase)f(only;)h(lo)m(w) -m(er)g(case)h(c)m(haracters)g(m)m(ust)f(b)s(e)f(con)m(v)m(erted)427 -2521 y(to)j(upp)s(ercase)e(b)m(y)h(the)g(calling)f(program.)42 -b(The)30 b(station)i(names)e(returned)g(ma)m(y)i(con)m(tain)f(b)s(oth) -427 2634 y(upp)s(er-)44 b(and)h(lo)m(w)m(ercase.)87 b(All)44 -b(c)m(haracters)i(up)f(to)h(the)f(\014rst)g(space)h(are)g(c)m(hec)m(k)m -(ed;)55 b(th)m(us)45 b(an)427 2747 y(abbreviated)20 b(ID)h(will)d -(return)h(the)i(parameters)g(for)f(the)h(\014rst)e(station)i(in)e(the)i -(list)e(whic)m(h)g(matc)m(hes)427 2860 y(the)i(abbreviation)e -(supplied,)h(and)g(no)g(station)h(in)e(the)i(list)e(will)f(ev)m(er)j -(con)m(tain)g(em)m(b)s(edded)f(spaces.)427 2973 y(C)30 -b(m)m(ust)g(not)h(ha)m(v)m(e)h(leading)d(spaces.)311 -3121 y(7.)46 b(IMPOR)-8 b(T)g(ANT)28 b({)f(BEW)-10 b(ARE)28 -b(OF)f(THE)g(LONGITUDE)h(SIGN)f(CONVENTION.)f(The)h(lon-)427 -3233 y(gitude)34 b(returned)g(b)m(y)h(sla)p Ft(_)p FD(OBS)e(is)h -FB(w)m(est-p)s(ositiv)m(e)p FD(,)h(follo)m(wing)f(the)g(pre-1984)j -Fq(Astr)-5 b(onomic)g(al)427 3346 y(A)n(lmanac)p FD(.)41 -b(Ho)m(w)m(ev)m(er,)31 b(this)c(sign)h(con)m(v)m(en)m(tion)h(is)f -(left-handed)f(and)h(is)f(the)h(opp)s(osite)g(of)h(the)f(one)427 -3459 y(no)m(w)37 b(used;)i(elsewhere)d(in)g(SLALIB)g(the)g(preferable)g -(east-p)s(ositiv)m(e)h(con)m(v)m(en)m(tion)h(is)d(used.)59 -b(In)427 3572 y(particular,)36 b(note)g(that)g(for)f(use)g(in)f(sla)p -Ft(_)p FD(A)m(OP)-8 b(,)36 b(sla)p Ft(_)p FD(A)m(OPP)-8 -b(A)35 b(and)g(sla)p Ft(_)p FD(O)m(AP)g(the)g(sign)g(of)g(the)427 -3685 y(longitude)29 b(m)m(ust)i(b)s(e)e(rev)m(ersed.)311 -3833 y(8.)46 b(Users)40 b(are)g(urged)f(to)h(inform)e(the)i(author)f -(of)h(an)m(y)g(impro)m(v)m(emen)m(ts)g(they)f(w)m(ould)g(lik)m(e)g(to)h -(see)427 3946 y(made.)h(F)-8 b(or)31 b(example:)506 4093 -y Fo(\017)46 b FD(t)m(yp)s(ographical)30 b(corrections)506 -4223 y Fo(\017)46 b FD(more)31 b(accurate)h(parameters)506 -4353 y Fo(\017)46 b FD(b)s(etter)31 b(station)f(iden)m(ti\014ers)f(or)h -(names)506 4484 y Fo(\017)46 b FD(additional)29 b(stations)227 -4674 y(Stations)h(supp)s(orted)f(b)m(y)h(sla)p Ft(_)p -FD(OBS)f(at)i(the)g(time)f(of)h(writing:)227 4903 y Fq(ID)742 -b(NAME)227 5128 y FD(AA)-8 b(T)652 b(Anglo-Australian)29 -b(3.9m)i(T)-8 b(elescop)s(e)227 5241 y(ANU2.3)527 b(Siding)28 -b(Spring)g(2.3m)227 5354 y(APO3.5)530 b(Apac)m(he)31 -b(P)m(oin)m(t)g(3.5m)227 5467 y(ARECIBO)415 b(Arecib)s(o)30 -b(1000)i(fo)s(ot)227 5580 y(A)-8 b(TCA)586 b(Australia)29 -b(T)-8 b(elescop)s(e)31 b(Compact)g(Arra)m(y)227 5693 -y(BLOEMF)450 b(Blo)s(emfon)m(tein)30 b(1.52m)p eop -%%Page: 107 109 -107 108 bop 0 52 a Fw(SUN/67.70)3206 b FD(107)227 351 -y(BOSQALEGRE)202 b(Bosque)31 b(Alegre)g(1.54m)227 464 -y(CAMB1MILE)285 b(Cam)m(bridge)30 b(1)g(mile)227 577 -y(CAMB5KM)366 b(Cam)m(bridge)30 b(5)g(km)227 690 y(CA)-8 -b(T)g(ALINA61)278 b(Catalina)30 b(61)h(inc)m(h)227 803 -y(CFHT)587 b(Canada-F)-8 b(rance-Ha)m(w)m(aii)33 b(3.6m)e(T)-8 -b(elescop)s(e)227 916 y(CSO)658 b(Caltec)m(h)31 b(Sub-mm)e(Observ)-5 -b(atory)d(,)31 b(Mauna)f(Kea)227 1029 y(D)m(A)m(O72)554 -b(D)m(A)m(O)32 b(Victoria)e(BC)g(1.85m)227 1142 y(DUNLAP74)364 -b(Da)m(vid)31 b(Dunlap)e(74)i(inc)m(h)227 1255 y(DUPONT)442 -b(Du)30 b(P)m(on)m(t)i(2.5m)f(T)-8 b(elescop)s(e,)31 -b(Las)f(Campanas)227 1367 y(EFFELSBER)m(G)235 b(E\013elsb)s(erg)29 -b(100m)227 1480 y(ESO3.6)547 b(ESO)30 b(3.6m)227 1593 -y(ESONTT)462 b(ESO)30 b(3.5m)h(NTT)227 1706 y(ESOSCHM)394 -b(ESO)30 b(1m)g(Sc)m(hmidt,)f(La)i(Silla)227 1819 y(F)m(CRA)m(O)521 -b(Fiv)m(e)31 b(College)f(Radio)g(Astronom)m(y)h(Obs)227 -1932 y(FLA)m(GSTF61)328 b(USNO)30 b(61)h(inc)m(h)f(astrograph,)h -(Flagsta\013)227 2045 y(GBV)-10 b(A140)450 b(Green)m(bank)31 -b(140)g(fo)s(ot)227 2158 y(GBV)-10 b(A300)450 b(Green)m(bank)31 -b(300)g(fo)s(ot)227 2271 y(GEMININ)428 b(Gemini)29 b(North)h(8m)227 -2384 y(GEMINIS)445 b(Gemini)29 b(South)h(8m)227 2497 -y(HAR)-10 b(V)g(ARD)391 b(Harv)-5 b(ard)30 b(College)g(Observ)-5 -b(atory)31 b(1.55m)227 2609 y(HPR)m(O)m(V1.52)356 b(Haute)31 -b(Pro)m(v)m(ence)h(1.52m)227 2722 y(HPR)m(O)m(V1.93)356 -b(Haute)31 b(Pro)m(v)m(ence)h(1.93m)227 2835 y(IR)-8 -b(TF)629 b(NASA)31 b(IR)f(T)-8 b(elescop)s(e)30 b(F)-8 -b(acilit)m(y)g(,)31 b(Mauna)g(Kea)227 2948 y(JCMT)584 -b(JCMT)30 b(15m)227 3061 y(JODRELL1)371 b(Jo)s(drell)28 -b(Bank)j(250)h(fo)s(ot)227 3174 y(KECK1)531 b(Kec)m(k)32 -b(10m)e(T)-8 b(elescop)s(e)31 b(1)227 3287 y(KECK2)531 -b(Kec)m(k)32 b(10m)e(T)-8 b(elescop)s(e)31 b(2)227 3400 -y(KISO)620 b(Kiso)30 b(1.05m)h(Sc)m(hmidt,)f(Japan)227 -3513 y(K)m(OSMA3M)377 b(Cologne)31 b(Submillimeter)26 -b(Observ)-5 b(atory)30 b(3m)227 3626 y(K)m(OTT)-8 b(AMIA)331 -b(Kottamia)31 b(74)h(inc)m(h)227 3739 y(KPNO158)439 b(Kitt)30 -b(P)m(eak)i(158)f(inc)m(h)227 3851 y(KPNO36FT)359 b(Kitt)30 -b(P)m(eak)i(36)f(fo)s(ot)227 3964 y(KPNO84)484 b(Kitt)30 -b(P)m(eak)i(84)f(inc)m(h)227 4077 y(KPNO90)484 b(Kitt)30 -b(P)m(eak)i(90)f(inc)m(h)227 4190 y(LICK120)484 b(Lic)m(k)30 -b(120)i(inc)m(h)227 4303 y(LO)m(WELL72)362 b(P)m(erkins)29 -b(72)j(inc)m(h,)d(Lo)m(w)m(ell)227 4416 y(LPO1)611 b(Jacobus)30 -b(Kapteyn)h(1m)f(T)-8 b(elescop)s(e)227 4529 y(LPO2.5)541 -b(Isaac)32 b(Newton)e(2.5m)i(T)-8 b(elescop)s(e)227 4642 -y(LPO4.2)541 b(William)28 b(Hersc)m(hel)j(4.2m)g(T)-8 -b(elescop)s(e)227 4755 y(MA)m(GELLAN1)270 b(Magellan)31 -b(1,)g(6.5m,)g(Las)g(Campanas)227 4868 y(MA)m(GELLAN2)270 -b(Magellan)31 b(2,)g(6.5m,)g(Las)g(Campanas)227 4981 -y(MA)m(UNAK88)333 b(Mauna)31 b(Kea)g(88)g(inc)m(h)227 -5093 y(MCDONLD2.1)248 b(McDonald)31 b(2.1m)227 5206 y(MCDONLD2.7)248 -b(McDonald)31 b(2.7m)227 5319 y(MMT)614 b(MMT,)31 b(Mt)g(Hopkins)227 -5432 y(MOPRA)495 b(A)-8 b(TNF)31 b(Mopra)g(Observ)-5 -b(atory)227 5545 y(MTEKAR)429 b(Mt)31 b(Ek)-5 b(ar)30 -b(1.82m)227 5658 y(MTHOP1.5)381 b(Mt)31 b(Hopkins)e(1.5m)p -eop -%%Page: 108 110 -108 109 bop 0 52 a FD(108)227 351 y(MTLEMMON60)183 b(Mt)31 -b(Lemmon)f(60)h(inc)m(h)227 464 y(NOBEY)-8 b(AMA)302 -b(Nob)s(ey)m(ama)32 b(45m)227 577 y(OKA)-8 b(Y)g(AMA)365 -b(Ok)-5 b(a)m(y)m(ama)32 b(1.88m)227 690 y(P)-8 b(ALOMAR200)243 -b(P)m(alomar)31 b(200)h(inc)m(h)227 803 y(P)-8 b(ALOMAR48)288 -b(P)m(alomar)31 b(48-inc)m(h)g(Sc)m(hmidt)227 916 y(P)-8 -b(ALOMAR60)288 b(P)m(alomar)31 b(60)g(inc)m(h)227 1029 -y(P)-8 b(ARKES)473 b(P)m(ark)m(es)32 b(64m)227 1142 y(QUEBEC1.6)338 -b(Queb)s(ec)30 b(1.6m)227 1255 y(SAA)m(O74)501 b(Sutherland)28 -b(74)j(inc)m(h)227 1367 y(SANPM83)424 b(San)30 b(P)m(edro)h(Martir)f -(83)h(inc)m(h)227 1480 y(ST.ANDREWS)226 b(St)30 b(Andrews)f(Univ)m -(ersit)m(y)h(Observ)-5 b(atory)227 1593 y(STEW)-10 b(ARD90)290 -b(Stew)m(ard)30 b(90)i(inc)m(h)227 1706 y(STR)m(OMLO74)293 -b(Moun)m(t)31 b(Stromlo)f(74)h(inc)m(h)227 1819 y(SUBAR)m(U)463 -b(Subaru)29 b(8m)227 1932 y(SUGAR)m(GR)m(O)m(VE)191 b(Sugar)30 -b(Gro)m(v)m(e)i(150)g(fo)s(ot)227 2045 y(T)-8 b(A)m(UTNBG)386 -b(T)-8 b(auten)m(burg)30 b(2m)227 2158 y(T)-8 b(A)m(UTSCHM)321 -b(T)-8 b(auten)m(b)s(erg)31 b(1.34m)g(Sc)m(hmidt)227 -2271 y(TIDBINBLA)324 b(Tidbin)m(billa)25 b(64m)227 2384 -y(TOLOLO1.5M)255 b(Cerro)30 b(T)-8 b(ololo)31 b(1.5m)227 -2497 y(TOLOLO4M)325 b(Cerro)30 b(T)-8 b(ololo)31 b(4m)227 -2609 y(UKIR)-8 b(T)549 b(UK)30 b(Infra)g(Red)g(T)-8 b(elescop)s(e)227 -2722 y(UKST)590 b(UK)30 b(1.2m)i(Sc)m(hmidt,)d(Siding)f(Spring)227 -2835 y(USSR6)564 b(USSR)30 b(6m)227 2948 y(USSR600)474 -b(USSR)30 b(600)h(fo)s(ot)227 3061 y(VLA)653 b(V)-8 b(ery)31 -b(Large)g(Arra)m(y)227 3174 y(VL)-8 b(T1)618 b(ESO)30 -b(VL)-8 b(T)30 b(8m,)h(UT1)227 3287 y(VL)-8 b(T2)618 -b(ESO)30 b(VL)-8 b(T)30 b(8m,)h(UT2)227 3400 y(VL)-8 -b(T3)618 b(ESO)30 b(VL)-8 b(T)30 b(8m,)h(UT3)227 3513 -y(VL)-8 b(T4)618 b(ESO)30 b(VL)-8 b(T)30 b(8m,)h(UT4)p -0 3662 3780 8 v 0 3775 a Fx(SLA)p Fn(_)p Fx(P)-11 b(A)768 -b Fg(h;)20 b(\016)43 b Fm(to)38 b(P)m(arallactic)d(Angle)769 -b Fx(SLA)p Fn(_)p Fx(P)-11 b(A)0 4125 y FB(A)m(CTION)44 -b FD(:)c(Hour)31 b(angle)f(and)g(declination)e(to)j(parallactic)f -(angle)g(\(double)g(precision\).)0 4313 y FB(CALL)45 -b FD(:)77 b Ft(D)47 b(=)h(sla_PA)e(\(HA,)g(DEC,)h(PHI\))0 -4662 y FB(GIVEN)e FD(:)277 4808 y Fq(HA)600 b FB(D)565 -b FD(hour)30 b(angle)g(in)f(radians)g(\(geo)s(cen)m(tric)j(apparen)m -(t\))277 4921 y Fq(DEC)540 b FB(D)565 b FD(declination)29 -b(in)g(radians)g(\(geo)s(cen)m(tric)j(apparen)m(t\))277 -5034 y Fq(PHI)571 b FB(D)565 b FD(latitude)30 b(in)f(radians)g(\(geo)s -(detic\))0 5388 y FB(RETURNED)46 b FD(:)277 5560 y Fq(sla)p -Ft(_)p Fq(P)-7 b(A)459 b FB(D)565 b FD(parallactic)30 -b(angle)g(\(radians,)g(in)f(the)h(range)h Fo(\006)p Fl(\031)s -FD(\))p eop -%%Page: 109 111 -109 110 bop 0 52 a Fw(SUN/67.70)3206 b FD(109)0 351 y -FB(NOTES)44 b FD(:)311 533 y(1.)i(The)34 b(parallactic)g(angle)h(at)g -(a)g(p)s(oin)m(t)f(in)f(the)i(sky)f(is)g(the)g(p)s(osition)f(angle)i -(of)f(the)h(v)m(ertical,)h Fq(i.e.)427 646 y FD(the)29 -b(angle)f(b)s(et)m(w)m(een)g(the)h(direction)d(to)j(the)f(p)s(ole)g -(and)f(to)i(the)f(zenith.)39 b(In)28 b(precise)f(applications)427 -759 y(care)k(m)m(ust)f(b)s(e)f(tak)m(en)i(only)e(to)h(use)g(geo)s(cen)m -(tric)h(apparen)m(t)f([)15 b Fl(h;)g(\016)20 b FD(])30 -b(and)f(to)i(consider)d(separately)427 872 y(the)j(e\013ects)h(of)e -(atmospheric)g(refraction)g(and)g(telescop)s(e)h(moun)m(t)f(errors.)311 -1012 y(2.)46 b(A)m(t)32 b(the)e(p)s(ole)g(a)g(zero)i(result)d(is)g -(returned.)p 0 1128 3780 8 v 0 1240 a Fx(SLA)p Fn(_)p -Fx(P)-11 b(A)c(V)281 b Fm(P)m(osition-Angle)35 b(Bet)m(w)m(een)i(Tw)m -(o)h(Directions)281 b Fx(SLA)p Fn(_)p Fx(P)-11 b(A)c(V)0 -1591 y FB(A)m(CTION)44 b FD(:)66 b(Returns)43 b(the)h(b)s(earing)e(\(p) -s(osition)f(angle\))j(of)g(one)f(celestial)g(direction)f(with)g(resp)s -(ect)i(to)227 1704 y(another)31 b(\(single)e(precision\).)0 -1891 y FB(CALL)45 b FD(:)77 b Ft(R)47 b(=)h(sla_PAV)d(\(V1,)i(V2\))0 -2218 y FB(GIVEN)e FD(:)277 2364 y Fq(V1)622 b FB(R\(3\))433 -b FD(v)m(ector)32 b(to)f(one)g(p)s(oin)m(t)277 2477 y -Fq(V2)622 b FB(R\(3\))433 b FD(v)m(ector)32 b(to)f(the)g(other)f(p)s -(oin)m(t)0 2790 y FB(RETURNED)46 b FD(:)277 2962 y Fq(sla)p -Ft(_)p Fq(P)-7 b(A)e(V)400 b FB(R)567 b FD(p)s(osition-angle)29 -b(of)i(2nd)e(p)s(oin)m(t)h(with)f(resp)s(ect)h(to)h(1st)0 -3283 y FB(NOTES)44 b FD(:)311 3465 y(1.)i(The)30 b(co)s(ordinate)g -(frames)h(corresp)s(ond)e(to)i([)15 b Fl(\013;)g(\016)20 -b FD(],)31 b([)p Fl(\025;)15 b(\036)p FD(])31 b Fq(etc.)p -FD(.)311 3606 y(2.)46 b(The)30 b(result)e(is)h(the)h(b)s(earing)f(\(p)s -(osition)f(angle\),)j(in)d(radians,)h(of)h(p)s(oin)m(t)f(V2)h(as)g -(seen)g(from)f(p)s(oin)m(t)427 3718 y(V1.)48 b(It)33 -b(is)f(in)f(the)i(range)g Fo(\006)p Fl(\031)s FD(.)47 -b(The)33 b(sense)f(is)g(suc)m(h)g(that)h(if)f(V2)h(is)f(a)h(small)e -(distance)h(due)g(east)427 3831 y(of)f(V1)g(the)f(result)g(is)f(ab)s -(out)h(+)p Fl(\031)s(=)p FD(2.)41 b(Zero)31 b(is)e(returned)g(if)h(the) -g(t)m(w)m(o)i(p)s(oin)m(ts)d(are)i(coinciden)m(t.)311 -3972 y(3.)46 b(There)30 b(is)g(no)g(requiremen)m(t)f(for)i(either)e(v)m -(ector)j(to)f(b)s(e)f(of)h(unit)e(length.)311 4112 y(4.)46 -b(The)37 b(routine)g(sla)p Ft(_)p FD(BEAR)g(p)s(erforms)f(an)h(equiv)-5 -b(alen)m(t)37 b(function)f(except)j(that)f(the)g(p)s(oin)m(ts)e(are)427 -4225 y(sp)s(eci\014ed)29 b(in)g(the)i(form)e(of)i(spherical)e(co)s -(ordinates.)p 0 4340 V 0 4453 a Fx(SLA)p Fn(_)p Fx(PCD)656 -b Fm(Apply)39 b(Radial)e(Distortion)655 b Fx(SLA)p Fn(_)p -Fx(PCD)0 4804 y FB(A)m(CTION)44 b FD(:)c(Apply)29 b(pincushion/barrel)e -(distortion)h(to)k(a)e(tangen)m(t-plane)i([)15 b Fl(x;)g(y)j -FD(].)0 4991 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PCD)g -(\(DISCO,X,Y\))0 5318 y FB(GIVEN)f FD(:)277 5464 y Fq(DISCO)446 -b FB(D)565 b FD(pincushion/barrel)26 b(distortion)j(co)s(e\016cien)m(t) -277 5577 y Fq(X,Y)572 b FB(D)565 b FD(tangen)m(t-plane)31 -b([)15 b Fl(x;)g(y)k FD(])p eop -%%Page: 110 112 -110 111 bop 0 52 a FD(110)0 351 y FB(RETURNED)46 b FD(:)277 -523 y Fq(X,Y)572 b FB(D)565 b FD(distorted)30 b([)15 -b Fl(x;)g(y)k FD(])0 791 y FB(NOTES)44 b FD(:)311 965 -y(1.)i(The)32 b(distortion)e(is)h(of)h(the)g(form)g Fl(\032)c -FD(=)f Fl(r)s FD(\(1)22 b(+)f Fl(cr)2099 932 y Fu(2)2138 -965 y FD(\),)33 b(where)e Fl(r)k FD(is)c(the)h(radial)e(distance)i -(from)f(the)427 1078 y(tangen)m(t)g(p)s(oin)m(t,)d Fl(c)h -FD(is)f(the)h(DISCO)f(argumen)m(t,)i(and)f Fl(\032)g -FD(is)f(the)h(radial)e(distance)i(in)e(the)i(presence)427 -1191 y(of)i(the)f(distortion.)311 1323 y(2.)46 b(F)-8 -b(or)31 b Fq(pincushion)39 b FD(distortion,)29 b(C)h(is)f(+v)m(e;)i -(for)g Fq(b)-5 b(arr)g(el)41 b FD(distortion,)29 b(C)h(is)g -Fo(\000)p FD(v)m(e.)311 1456 y(3.)46 b(F)-8 b(or)37 b(X,Y)g(in)e(units) -f(of)j(one)f(pro)5 b(jection)36 b(radius)e(\(in)h(the)i(case)g(of)f(a)h -(photographic)e(plate,)j(the)427 1569 y(fo)s(cal)30 b(length\),)h(the)f -(follo)m(wing)f(DISCO)h(v)-5 b(alues)29 b(apply:)p 912 -1691 1243 4 v 910 1804 4 113 v 962 1770 a(Geometry)p -1684 1804 V 423 w(DISCO)p 2153 1804 V 912 1808 1243 4 -v 912 1824 V 910 1937 4 113 v 962 1903 a(astrograph)p -1684 1937 V 475 w(0.0)p 2153 1937 V 912 1940 1243 4 v -910 2053 4 113 v 962 2020 a(Sc)m(hmidt)p 1684 2053 V -470 w Fo(\000)p FD(0.3333)p 2153 2053 V 912 2057 1243 -4 v 910 2170 4 113 v 962 2136 a(AA)-8 b(T)31 b(PF)f(doublet)p -1684 2170 V 99 w(+147.069)p 2153 2170 V 912 2173 1243 -4 v 910 2286 4 113 v 962 2252 a(AA)-8 b(T)31 b(PF)f(triplet)p -1684 2286 V 149 w(+178.585)p 2153 2286 V 912 2289 1243 -4 v 910 2402 4 113 v 962 2368 a(AA)-8 b(T)31 b(f/8)p -1684 2402 V 476 w(+21.20)p 2153 2402 V 912 2405 1243 -4 v 910 2518 4 113 v 962 2484 a(JKT)e(f/8)p 1684 2518 -V 511 w(+14.6)p 2153 2518 V 912 2522 1243 4 v 311 2691 -a(4.)46 b(There)30 b(is)g(a)g(companion)g(routine,)g(sla)p -Ft(_)p FD(UNPCD,)g(whic)m(h)f(p)s(erforms)g(the)h(in)m(v)m(erse)g(op)s -(eration.)p 0 2783 3780 8 v 0 2896 a Fx(SLA)p Fn(_)p -Fx(PD)l(A2H)436 b Fm(H.A.)38 b(for)g(a)g(Giv)m(en)g(Azim)m(uth)435 -b Fx(SLA)p Fn(_)p Fx(PD)l(A2H)0 3247 y FB(A)m(CTION)44 -b FD(:)c(Hour)31 b(Angle)f(corresp)s(onding)e(to)j(a)g(giv)m(en)f(azim) -m(uth)g(\(double)g(precision\).)0 3434 y FB(CALL)45 b -FD(:)77 b Ft(CALL)46 b(sla_PDA2H)g(\(P,)h(D,)g(A,)g(H1,)g(J1,)g(H2,)g -(J2\))0 3730 y FB(GIVEN)e FD(:)277 3876 y Fq(P)674 b -FB(D)565 b FD(latitude)277 3989 y Fq(D)667 b FB(D)565 -b FD(declination)277 4102 y Fq(A)668 b FB(D)565 b FD(azim)m(uth)0 -4361 y FB(RETURNED)46 b FD(:)277 4508 y Fq(H1)622 b FB(D)565 -b FD(hour)30 b(angle:)40 b(\014rst)30 b(solution)f(if)g(an)m(y)277 -4620 y Fq(J1)642 b FB(I)605 b FD(\015ag:)41 b(0)31 b(=)f(solution)f(1)i -(is)e(v)-5 b(alid)277 4733 y Fq(H2)622 b FB(D)565 b FD(hour)30 -b(angle:)40 b(second)31 b(solution)e(if)g(an)m(y)277 -4846 y Fq(J2)642 b FB(I)605 b FD(\015ag:)41 b(0)31 b(=)f(solution)f(2)i -(is)e(v)-5 b(alid)p 0 4955 V 0 5068 a Fx(SLA)p Fn(_)p -Fx(PDQ2H)543 b Fm(H.A.)38 b(for)f(a)i(Giv)m(en)f(P)-10 -b(.A.)543 b Fx(SLA)p Fn(_)p Fx(PDQ2H)0 5418 y FB(A)m(CTION)44 -b FD(:)c(Hour)31 b(Angle)f(corresp)s(onding)e(to)j(a)g(giv)m(en)f -(parallactic)g(angle)g(\(double)g(precision\).)0 5606 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PDQ2H)g(\(P,)h(D,)g(Q,)g(H1,) -g(J1,)g(H2,)g(J2\))p eop -%%Page: 111 113 -111 112 bop 0 52 a Fw(SUN/67.70)3206 b FD(111)0 351 y -FB(GIVEN)45 b FD(:)277 497 y Fq(P)674 b FB(D)565 b FD(latitude)277 -610 y Fq(D)667 b FB(D)565 b FD(declination)277 723 y -Fq(Q)666 b FB(D)565 b FD(azim)m(uth)0 1088 y FB(RETURNED)46 -b FD(:)277 1234 y Fq(H1)622 b FB(D)565 b FD(hour)30 b(angle:)40 -b(\014rst)30 b(solution)f(if)g(an)m(y)277 1347 y Fq(J1)642 -b FB(I)605 b FD(\015ag:)41 b(0)31 b(=)f(solution)f(1)i(is)e(v)-5 -b(alid)277 1460 y Fq(H2)622 b FB(D)565 b FD(hour)30 b(angle:)40 -b(second)31 b(solution)e(if)g(an)m(y)277 1573 y Fq(J2)642 -b FB(I)605 b FD(\015ag:)41 b(0)31 b(=)f(solution)f(2)i(is)e(v)-5 -b(alid)p 0 1726 3780 8 v 0 1839 a Fx(SLA)p Fn(_)p Fx(PERMUT)502 -b Fm(Next)38 b(P)m(erm)m(utation)499 b Fx(SLA)p Fn(_)p -Fx(PERMUT)0 2189 y FB(A)m(CTION)44 b FD(:)c(Generate)32 -b(the)f(next)f(p)s(erm)m(utation)g(of)g(a)h(sp)s(eci\014ed)e(n)m(um)m -(b)s(er)g(of)h(items.)0 2377 y FB(CALL)45 b FD(:)77 b -Ft(CALL)46 b(sla_PERMUT)f(\(N,)i(ISTATE,)f(IORDER,)g(J\))0 -2734 y FB(GIVEN)f FD(:)277 2880 y Fq(N)668 b FB(I)605 -b FD(n)m(um)m(b)s(er)29 b(of)i(items:)40 b(there)31 b(will)c(b)s(e)j -(N!)h(p)s(erm)m(utations)277 2993 y Fq(IST)-7 b(A)g(TE)404 -b FB(I\(N\))441 b FD(state,)32 b(IST)-8 b(A)g(TE\(1\)=)26 -b Fo(\000)p FD(1)k(to)h(initialize)0 3357 y FB(RETURNED)46 -b FD(:)277 3504 y Fq(IST)-7 b(A)g(TE)404 b FB(I\(N\))441 -b FD(state,)32 b(up)s(dated)d(ready)h(for)h(next)f(time)277 -3616 y Fq(IORDER)368 b FB(I\(N\))441 b FD(next)31 b(p)s(erm)m(utation)e -(of)i(n)m(um)m(b)s(ers)e(1,2,.)16 b(.)g(.)f(,N)277 3729 -y Fq(J)688 b FB(I)605 b FD(status:)1825 3842 y Fo(\000)p -FD(1)30 b(=)g(illegal)f(N)h(\(zero)i(or)e(less)g(is)f(illegal\))1898 -3955 y(0)h(=)g(OK)1825 4068 y(+1)g(=)g(no)h(more)f(p)s(erm)m(utations)f -(a)m(v)-5 b(ailable)0 4433 y FB(NOTES)44 b FD(:)311 4625 -y(1.)i(This)26 b(routine)h(returns,)g(in)g(the)h(IORDER)f(arra)m(y)-8 -b(,)29 b(the)f(in)m(tegers)g(1)g(to)h(N)f(inclusiv)m(e,)e(in)g(an)i -(order)427 4738 y(that)f(dep)s(ends)d(on)i(the)h(curren)m(t)f(con)m -(ten)m(ts)i(of)e(the)g(IST)-8 b(A)g(TE)26 b(arra)m(y)-8 -b(.)40 b(Before)27 b(calling)e(the)h(routine)427 4851 -y(for)37 b(the)g(\014rst)f(time,)i(the)f(caller)g(m)m(ust)f(set)i(the)f -(\014rst)f(elemen)m(t)h(of)g(the)g(IST)-8 b(A)g(TE)36 -b(arra)m(y)i(to)f Fo(\000)p FD(1)427 4964 y(\(an)m(y)31 -b(negativ)m(e)h(n)m(um)m(b)s(er)d(will)f(do\))i(to)h(cause)g(the)g(IST) --8 b(A)g(TE)30 b(arra)m(y)h(to)g(b)s(e)f(fully)e(initialized.)311 -5112 y(2.)46 b(The)30 b(\014rst)g(p)s(erm)m(utation)f(to)i(b)s(e)f -(generated)h(is:)597 5261 y(IORDER\(1\)=N,)h(IORDER\(2\)=N-1,)g(...,)f -(IORDER\(N\)=1)427 5409 y(This)i(is)h(also)g(the)h(p)s(erm)m(utation)f -(returned)g(for)g(the)h(\\\014nished")e(\(J=1\))i(case.)55 -b(The)34 b(\014nal)f(p)s(er-)427 5522 y(m)m(utation)e(to)g(b)s(e)f -(generated)h(is:)597 5670 y(IORDER\(1\)=1,)h(IORDER\(2\)=2,)f(...,)h -(IORDER\(N\)=N)p eop -%%Page: 112 114 -112 113 bop 0 52 a FD(112)311 351 y(3.)46 b(If)20 b(the)h -(\\\014nished")e(\(J=1\))h(status)h(is)f(ignored,)h(the)g(routine)e -(con)m(tin)m(ues)i(to)g(deliv)m(er)e(p)s(erm)m(utations,)427 -464 y(the)31 b(pattern)f(rep)s(eating)g(ev)m(ery)h(N!)46 -b(calls.)p 0 627 3780 8 v 0 740 a Fx(SLA)p Fn(_)p Fx(PER)-11 -b(TEL)322 b Fm(P)m(erturb)s(ed)37 b(Orbital)g(Elemen)m(ts)321 -b Fx(SLA)p Fn(_)p Fx(PER)-11 b(TEL)0 1090 y FB(A)m(CTION)44 -b FD(:)61 b(Up)s(date)41 b(the)g(osculating)f(elemen)m(ts)h(of)g(an)g -(asteroid)g(or)g(comet)h(b)m(y)e(applying)f(planetary)227 -1203 y(p)s(erturbations.)0 1391 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_PERTEL)f(\(JFORM,)h(DATE0,)g(DATE1,)1239 -1504 y(EPOCH0,)g(ORBI0,)g(ANODE0,)g(PERIH0,)g(AORQ0,)g(E0,)h(AM0,)1239 -1617 y(EPOCH1,)f(ORBI1,)g(ANODE1,)g(PERIH1,)g(AORQ1,)g(E1,)h(AM1,)1239 -1730 y(JSTAT\))0 2120 y FB(GIVEN)34 b(\(format)g(and)g(dates\))45 -b FD(:)277 2289 y Fq(JF)n(ORM)413 b FB(I)605 b FD(c)m(hoice)31 -b(of)g(elemen)m(t)g(set)g(\(2)g(or)f(3;)h(Note)h(1\))277 -2402 y Fq(D)n(A)-7 b(TE0)435 b FB(D)565 b FD(date)31 -b(of)g(osculation)f(\(TT)f(MJD\))j(for)e(the)g(giv)m(en)1825 -2514 y(elemen)m(ts)277 2627 y Fq(D)n(A)-7 b(TE1)435 b -FB(D)565 b FD(date)31 b(of)g(osculation)f(\(TT)f(MJD\))j(for)e(the)g -(up)s(dated)1825 2740 y(elemen)m(ts)0 3176 y FB(GIVEN)k(\(the)g(unp)s -(erturb)s(ed)h(elemen)m(ts\))44 b FD(:)277 3344 y Fq(EPOCH0)363 -b FB(D)565 b FD(ep)s(o)s(c)m(h)28 b(of)h(the)f(giv)m(en)g(elemen)m(t)h -(set)g(\()p Fl(t)2949 3358 y Fu(0)3017 3344 y FD(or)f -Fl(T)13 b FD(,)29 b(TT)e(MJD;)1825 3457 y(Note)32 b(2\))277 -3570 y Fq(ORBI0)455 b FB(D)565 b FD(inclination)28 b(\()p -Fl(i)p FD(,)j(radians\))277 3683 y Fq(ANODE0)353 b FB(D)565 -b FD(longitude)29 b(of)i(the)f(ascending)g(no)s(de)g(\(\012,)g -(radians\))277 3796 y Fq(PERIH0)397 b FB(D)565 b FD(argumen)m(t)31 -b(of)g(p)s(erihelion)26 b(\()p Fl(!)s FD(,)31 b(radians\))277 -3909 y Fq(A)n(OR)n(Q0)420 b FB(D)565 b FD(mean)30 b(distance)f(or)g(p)s -(erihelion)d(distance)k(\()p Fl(a)f FD(or)h Fl(q)s FD(,)g(A)m(U\))277 -4022 y Fq(E0)628 b FB(D)565 b FD(eccen)m(tricit)m(y)32 -b(\()p Fl(e)p FD(\))277 4135 y Fq(AM0)540 b FB(D)565 -b FD(mean)31 b(anomaly)f(\()p Fl(M)10 b FD(,)31 b(radians,)e(JF)m -(ORM=2)i(only\))0 4570 y FB(RETURNED)k(\(the)f(up)s(dated)h(elemen)m -(ts\))44 b FD(:)277 4739 y Fq(EPOCH1)363 b FB(D)565 b -FD(ep)s(o)s(c)m(h)30 b(of)h(the)f(up)s(dated)f(elemen)m(t)i(set)g(\()p -Fl(t)3080 4753 y Fu(0)3150 4739 y FD(or)f Fl(T)13 b FD(,)1825 -4852 y(TT)29 b(MJD;)i(Note)h(2\))277 4965 y Fq(ORBI1)455 -b FB(D)565 b FD(inclination)28 b(\()p Fl(i)p FD(,)j(radians\))277 -5078 y Fq(ANODE1)353 b FB(D)565 b FD(longitude)29 b(of)i(the)f -(ascending)g(no)s(de)g(\(\012,)g(radians\))277 5190 y -Fq(PERIH1)397 b FB(D)565 b FD(argumen)m(t)31 b(of)g(p)s(erihelion)26 -b(\()p Fl(!)s FD(,)31 b(radians\))277 5303 y Fq(A)n(OR)n(Q1)420 -b FB(D)565 b FD(mean)30 b(distance)f(or)g(p)s(erihelion)d(distance)k -(\()p Fl(a)f FD(or)h Fl(q)s FD(,)g(A)m(U\))277 5416 y -Fq(E1)628 b FB(D)565 b FD(eccen)m(tricit)m(y)32 b(\()p -Fl(e)p FD(\))277 5529 y Fq(AM1)540 b FB(D)565 b FD(mean)31 -b(anomaly)f(\()p Fl(M)10 b FD(,)31 b(radians,)e(JF)m(ORM=2)i(only\))p -eop -%%Page: 113 115 -113 114 bop 0 52 a Fw(SUN/67.70)3206 b FD(113)0 351 y -FB(RETURNED)35 b(\(status)f(\015ag\))46 b FD(:)277 520 -y Fq(JST)-7 b(A)g(T)453 b FB(I)605 b FD(status:)1704 -633 y(+102)31 b(=)f(w)m(arning,)f(distan)m(t)i(ep)s(o)s(c)m(h)1704 -746 y(+101)g(=)f(w)m(arning,)f(large)i(timespan)e(\()p -Fl(>)d FD(100)31 b(y)m(ears\))1495 859 y(+1)f(to)h(+10)g(=)f(coinciden) -m(t)g(with)f(ma)5 b(jor)30 b(planet)g(\(Note)i(6\))1866 -972 y(0)e(=)h(OK)1798 1085 y Fo(\000)p FD(1)f(=)g(illegal)f(JF)m(ORM) -1798 1197 y Fo(\000)p FD(2)h(=)g(illegal)f(E0)1798 1310 -y Fo(\000)p FD(3)h(=)g(illegal)f(A)m(OR)m(Q0)1798 1423 -y Fo(\000)p FD(4)h(=)g(in)m(ternal)f(error)1798 1536 -y Fo(\000)p FD(5)h(=)g(n)m(umerical)f(error)0 1886 y -FB(NOTES)44 b FD(:)311 2073 y(1.)i(Tw)m(o)31 b(di\013eren)m(t)f(elemen) -m(t-format)h(options)f(are)h(supp)s(orted,)d(as)j(follo)m(ws.)427 -2315 y(JF)m(ORM=2,)g(suitable)e(for)i(minor)d(planets:)602 -2506 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(elemen)m(ts)f -Fl(t)1910 2520 y Fu(0)1980 2506 y FD(\(TT)g(MJD\))602 -2619 y(ORBINC)45 b(=)55 b(inclination)27 b Fl(i)k FD(\(radians\))602 -2732 y(ANODE)76 b(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de) -f(\012)h(\(radians\))602 2845 y(PERIH)122 b(=)55 b(argumen)m(t)31 -b(of)f(p)s(erihelion)d Fl(!)33 b FD(\(radians\))602 2957 -y(A)m(OR)m(Q)143 b(=)55 b(mean)30 b(distance)g Fl(a)h -FD(\(A)m(U\))602 3070 y(E)352 b(=)55 b(eccen)m(tricit)m(y)31 -b Fl(e)g FD(\(0)26 b Fo(\024)f Fl(e)h(<)f FD(1\))602 -3183 y(A)m(ORL)154 b(=)55 b(mean)30 b(anomaly)h Fl(M)40 -b FD(\(radians\))427 3374 y(JF)m(ORM=3,)31 b(suitable)e(for)i(comets:) -602 3565 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(p)s(erihelion)c -Fl(T)43 b FD(\(TT)30 b(MJD\))602 3678 y(ORBINC)45 b(=)55 -b(inclination)27 b Fl(i)k FD(\(radians\))602 3791 y(ANODE)76 -b(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de)f(\012)h -(\(radians\))602 3904 y(PERIH)122 b(=)55 b(argumen)m(t)31 -b(of)f(p)s(erihelion)d Fl(!)33 b FD(\(radians\))602 4017 -y(A)m(OR)m(Q)143 b(=)55 b(p)s(erihelion)27 b(distance)j -Fl(q)j FD(\(A)m(U\))602 4130 y(E)352 b(=)55 b(eccen)m(tricit)m(y)31 -b Fl(e)g FD(\(0)26 b Fo(\024)f Fl(e)h Fo(\024)f FD(10\))311 -4321 y(2.)46 b(D)m(A)-8 b(TE0,)27 b(D)m(A)-8 b(TE1,)26 -b(EPOCH0)d(and)g(EPOCH1)g(are)h(all)f(instan)m(ts)g(of)g(time)g(in)g -(the)g(TT)g(time)g(scale)427 4433 y(\(formerly)e(Ephemeris)f(Time,)j -(ET\),)f(expressed)f(as)h(Mo)s(di\014ed)e(Julian)g(Dates)j(\(JD)p -Fo(\000)p FD(2400000.5\).)506 4579 y Fo(\017)46 b FD(D)m(A)-8 -b(TE0)33 b(is)d(the)h(instan)m(t)g(at)h(whic)m(h)e(the)i(giv)m(en)f(\() -p Fq(i.e.)g FD(unp)s(erturb)s(ed\))d(osculating)i(elemen)m(ts)597 -4692 y(are)h(correct.)506 4821 y Fo(\017)46 b FD(D)m(A)-8 -b(TE1)43 b(is)e(the)h(sp)s(eci\014ed)e(instan)m(t)h(at)h(whic)m(h)f -(the)h(up)s(dated)e(osculating)h(elemen)m(ts)h(are)597 -4934 y(correct.)506 5063 y Fo(\017)k FD(EPOCH0)33 b(and)g(EPOCH1)g -(will)d(b)s(e)j(the)g(same)h(as)f(D)m(A)-8 b(TE0)35 b(and)e(D)m(A)-8 -b(TE1)34 b(\(resp)s(ectiv)m(ely\))597 5176 y(for)k(the)g(JF)m(ORM=2)g -(case,)j(normally)36 b(used)h(for)g(minor)f(planets.)62 -b(F)-8 b(or)39 b(the)f(JF)m(ORM=3)597 5289 y(case,)27 -b(the)d(t)m(w)m(o)i(ep)s(o)s(c)m(hs)e(will)d(refer)j(to)h(p)s -(erihelion)c(passage)k(and)f(so)g(will)e(not,)k(in)c(general,)k(b)s(e) -597 5402 y(the)k(same)f(as)g(D)m(A)-8 b(TE0)31 b(and/or)e(D)m(A)-8 -b(TE1)30 b(though)f(they)g(ma)m(y)h(b)s(e)e(similar)f(to)j(one)f -(another.)311 5547 y(3.)46 b(The)30 b(elemen)m(ts)h(are)g(with)e(resp)s -(ect)h(to)h(the)g(J2000)h(ecliptic)d(and)g(mean)i(equino)m(x.)311 -5693 y(4.)46 b(Un)m(used)30 b(elemen)m(ts)h(\(AM0)g(and)f(AM1)h(for)g -(JF)m(ORM=3\))g(are)g(not)f(accessed.)p eop -%%Page: 114 116 -114 115 bop 0 52 a FD(114)311 351 y(5.)46 b(See)31 b(the)f(sla)p -Ft(_)p FD(PER)-8 b(TUE)30 b(routine)f(for)h(details)g(of)g(the)h -(algorithm)e(used.)311 484 y(6.)46 b(This)31 b(routine)h(is)g(not)i(in) -m(tended)d(to)j(b)s(e)f(used)f(for)g(ma)5 b(jor)33 b(planets,)h(whic)m -(h)d(is)h(wh)m(y)h(JF)m(ORM=1)427 597 y(is)k(not)h(a)m(v)-5 -b(ailable)38 b(and)f(wh)m(y)g(there)h(is)f(no)h(opp)s(ortunit)m(y)e(to) -j(sp)s(ecify)d(either)i(the)g(longitude)e(of)427 710 -y(p)s(erihelion)g(or)i(the)h(daily)f(motion.)65 b(Ho)m(w)m(ev)m(er,)44 -b(if)37 b(JF)m(ORM=2)j(elemen)m(ts)f(are)g(someho)m(w)g(ob-)427 -823 y(tained)27 b(for)f(a)h(ma)5 b(jor)27 b(planet)g(and)f(supplied)e -(to)j(the)g(routine,)g(sensible)e(results)h(will,)f(in)g(fact,)k(b)s(e) -427 935 y(pro)s(duced.)43 b(This)30 b(happ)s(ens)g(b)s(ecause)h(the)h -(sla)p Ft(_)p FD(PER)-8 b(TUE)30 b(routine)h(that)h(is)f(called)g(to)h -(p)s(erform)427 1048 y(the)e(calculations)e(c)m(hec)m(ks)i(the)g -(separation)f(b)s(et)m(w)m(een)g(the)h(b)s(o)s(dy)d(and)i(eac)m(h)h(of) -f(the)h(planets)e(and)427 1161 y(in)m(terprets)40 b(a)h(suspiciously)d -(small)h(v)-5 b(alue)40 b(\(0.001)j(A)m(U\))f(as)f(an)f(attempt)i(to)f -(apply)f(it)g(to)h(the)427 1274 y(planet)33 b(concerned.)50 -b(If)33 b(this)f(condition)g(is)g(detected,)k(the)d(con)m(tribution)f -(from)h(that)h(planet)e(is)427 1387 y(ignored,)h(and)f(the)h(status)g -(is)f(set)h(to)h(the)f(planet)f(n)m(um)m(b)s(er)g(\(1{10)i(=)f(Mercury) --8 b(,)34 b(V)-8 b(en)m(us,)34 b(EMB,)427 1500 y(Mars,)d(Jupiter,)e -(Saturn,)g(Uran)m(us,)i(Neptune,)f(Earth,)g(Mo)s(on\))h(as)g(a)g(w)m -(arning.)0 1767 y FB(REFERENCE)44 b FD(:)55 b(Sterne,)40 -b(Theo)s(dore)d(E.,)j Fq(A)n(n)e(Intr)-5 b(o)g(duction)42 -b(to)e(Celestial)g(Me)-5 b(chanics,)40 b FD(In)m(terscience)227 -1880 y(Publishers,)27 b(1960.)43 b(Section)30 b(6.7,)i(p199.)p -0 1972 3780 8 v 0 2084 a Fx(SLA)p Fn(_)p Fx(PER)-11 b(TUE)246 -b Fm(P)m(erturb)s(ed)38 b(Univ)m(ersal)e(Elemen)m(ts)244 -b Fx(SLA)p Fn(_)p Fx(PER)-11 b(TUE)0 2435 y FB(A)m(CTION)44 -b FD(:)68 b(Up)s(date)44 b(the)h(univ)m(ersal)d(elemen)m(ts)j(of)g(an)f -(asteroid)g(or)g(comet)i(b)m(y)e(applying)e(planetary)227 -2548 y(p)s(erturbations.)0 2735 y FB(CALL)j FD(:)77 b -Ft(CALL)46 b(sla_PERTUE)f(\(DATE,)h(U,)i(JSTAT\))0 3031 -y FB(GIVEN)d FD(:)277 3202 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 -b FD(\014nal)29 b(ep)s(o)s(c)m(h)h(\(TT)g(MJD\))h(for)g(the)f(up)s -(dated)f(elemen)m(ts)0 3469 y FB(GIVEN)34 b(and)h(RETURNED)46 -b FD(:)277 3615 y Fq(U)668 b FB(D\(13\))379 b FD(univ)m(ersal)29 -b(elemen)m(ts)h(\(up)s(dated)g(in)f(place\))537 3728 -y(\(1\))1006 b(com)m(bined)30 b(mass)g(\()p Fl(M)h FD(+)20 -b Fl(m)p FD(\))537 3841 y(\(2\))1006 b(total)31 b(energy)g(of)g(the)f -(orbit)g(\()p Fl(\013)p FD(\))537 3954 y(\(3\))1006 b(reference)31 -b(\(osculating\))f(ep)s(o)s(c)m(h)h(\()p Fl(t)2869 3968 -y Fu(0)2908 3954 y FD(\))499 4067 y(\(4-6\))969 b(p)s(osition)29 -b(at)i(reference)g(ep)s(o)s(c)m(h)f(\()p FB(r)2836 4081 -y Fu(0)2876 4067 y FD(\))499 4180 y(\(7-9\))969 b(v)m(elo)s(cit)m(y)31 -b(at)g(reference)g(ep)s(o)s(c)m(h)f(\()p FB(v)2837 4194 -y Fu(0)2877 4180 y FD(\))514 4293 y(\(10\))984 b(helio)s(cen)m(tric)29 -b(distance)h(at)h(reference)g(ep)s(o)s(c)m(h)514 4405 -y(\(11\))984 b FB(r)1701 4419 y Fu(0)1741 4405 y Fl(:)p -FB(v)1821 4419 y Fe(0)514 4518 y FD(\(12\))g(date)31 -b(\()p Fl(t)p FD(\))514 4631 y(\(13\))984 b(univ)m(ersal)29 -b(eccen)m(tric)i(anomaly)f(\()p Fl( )s FD(\))i(of)e(date,)i(appro)m(x)0 -4890 y FB(RETURNED)46 b FD(:)277 5036 y Fq(JST)-7 b(A)g(T)453 -b FB(I)605 b FD(status:)1704 5149 y(+102)31 b(=)f(w)m(arning,)f(distan) -m(t)i(ep)s(o)s(c)m(h)1704 5262 y(+101)g(=)f(w)m(arning,)f(large)i -(timespan)e(\()p Fl(>)d FD(100)31 b(y)m(ears\))1495 5374 -y(+1)f(to)h(+10)g(=)f(coinciden)m(t)g(with)f(ma)5 b(jor)30 -b(planet)g(\(Note)i(5\))1866 5487 y(0)e(=)h(OK)1798 5600 -y Fo(\000)p FD(1)f(=)g(n)m(umerical)f(error)p eop -%%Page: 115 117 -115 116 bop 0 52 a Fw(SUN/67.70)3206 b FD(115)0 351 y -FB(NOTES)44 b FD(:)311 535 y(1.)i(The)40 b(\\univ)m(ersal")f(elemen)m -(ts)h(are)g(those)h(whic)m(h)d(de\014ne)h(the)h(orbit)f(for)h(the)g -(purp)s(oses)e(of)i(the)427 648 y(metho)s(d)26 b(of)g(univ)m(ersal)f(v) --5 b(ariables)25 b(\(see)i(reference)f(2\).)41 b(They)25 -b(consist)h(of)g(the)h(com)m(bined)e(mass)h(of)427 761 -y(the)33 b(t)m(w)m(o)h(b)s(o)s(dies,)e(an)g(ep)s(o)s(c)m(h,)h(and)f -(the)h(p)s(osition)e(and)h(v)m(elo)s(cit)m(y)h(v)m(ectors)h -(\(arbitrary)e(reference)427 874 y(frame\))j(at)g(that)g(ep)s(o)s(c)m -(h.)53 b(The)34 b(parameter)h(set)g(used)f(here)g(includes)e(also)j(v) --5 b(arious)33 b(quan)m(tities)427 987 y(that)i(can,)g(in)d(fact,)k(b)s -(e)d(deriv)m(ed)f(from)i(the)f(other)h(information.)49 -b(This)32 b(approac)m(h)i(is)f(tak)m(en)i(to)427 1100 -y(a)m(v)m(oiding)d(unnecessary)f(computation)h(and)g(loss)f(of)h -(accuracy)-8 b(.)48 b(The)31 b(supplemen)m(tary)g(quan)m(ti-)427 -1213 y(ties)22 b(are)h(\(i\))f Fl(\013)p FD(,)i(whic)m(h)d(is)g(prop)s -(ortional)f(to)j(the)g(total)g(energy)f(of)h(the)f(orbit,)h(\(ii\))e -(the)i(helio)s(cen)m(tric)427 1326 y(distance)35 b(at)g(ep)s(o)s(c)m -(h,)h(\(iii\))d(the)i(out)m(w)m(ards)g(comp)s(onen)m(t)g(of)g(the)g(v)m -(elo)s(cit)m(y)g(at)h(the)f(giv)m(en)f(ep)s(o)s(c)m(h,)427 -1439 y(\(iv\))29 b(an)f(estimate)h(of)g Fl( )s FD(,)h(the)e(\\univ)m -(ersal)g(eccen)m(tric)h(anomaly")g(at)g(a)g(giv)m(en)g(date)g(and)f -(\(v\))h(that)427 1552 y(date.)311 1726 y(2.)46 b(The)30 -b(univ)m(ersal)f(elemen)m(ts)h(are)h(with)e(resp)s(ect)i(to)g(the)f -(J2000)i(equator)f(and)f(equino)m(x.)311 1900 y(3.)46 -b(The)30 b(ep)s(o)s(c)m(hs)g(D)m(A)-8 b(TE,)32 b(U\(3\))f(and)f -(U\(12\))i(are)f(all)e(Mo)s(di\014ed)g(Julian)f(Dates)k(\(JD)p -Fo(\000)p FD(2400000.5\).)311 2074 y(4.)46 b(The)30 b(algorithm)g(is)g -(a)g(simpli\014ed)d(form)j(of)h(Enc)m(k)m(e's)h(metho)s(d.)41 -b(It)30 b(tak)m(es)i(as)f(a)g(basis)e(the)i(unp)s(er-)427 -2187 y(turb)s(ed)i(motion)h(of)h(the)f(b)s(o)s(dy)-8 -b(,)35 b(and)f(n)m(umerically)e(in)m(tegrates)k(the)e(p)s(erturbing)e -(accelerations)427 2300 y(from)i(the)h(ma)5 b(jor)35 -b(planets.)52 b(The)34 b(expression)f(used)h(is)f(essen)m(tially)h -(Sterne's)g(6.7-2)j(\(reference)427 2413 y(1\).)57 b(Ev)m(erhart)35 -b(&)g(Pitkin)e(\(reference)k(2\))f(suggest)g(rectifying)e(the)i(orbit)e -(at)i(eac)m(h)g(in)m(tegration)427 2526 y(step)i(b)m(y)g(propagating)g -(the)g(new)g(p)s(erturb)s(ed)d(p)s(osition)h(and)i(v)m(elo)s(cit)m(y)g -(as)h(the)f(new)f(univ)m(ersal)427 2639 y(v)-5 b(ariables.)66 -b(In)38 b(the)h(presen)m(t)h(routine)e(the)h(orbit)f(is)g(recti\014ed)h -(less)f(frequen)m(tly)g(than)h(this,)i(in)427 2751 y(order)31 -b(to)g(gain)f(a)i(sligh)m(t)d(sp)s(eed)h(adv)-5 b(an)m(tage.)44 -b(Ho)m(w)m(ev)m(er,)33 b(the)e(recti\014cation)g(is)f(done)g(directly)g -(in)427 2864 y(terms)g(of)f(p)s(osition)f(and)h(v)m(elo)s(cit)m(y)-8 -b(,)31 b(as)e(suggested)i(b)m(y)e(Ev)m(erhart)h(&)f(Pitkin,)f(b)m -(ypassing)g(the)i(use)427 2977 y(of)h(con)m(v)m(en)m(tional)g(orbital)e -(elemen)m(ts.)427 3137 y(The)34 b Fl(f)10 b FD(\()p Fl(q)s -FD(\))34 b(part)h(of)f(the)h(full)d(Enc)m(k)m(e)k(metho)s(d)e(is)f(not) -i(used.)52 b(The)34 b(purp)s(ose)f(of)i(this)e(part)h(is)g(to)427 -3249 y(a)m(v)m(oid)21 b(subtracting)f(t)m(w)m(o)i(nearly)e(equal)g -(quan)m(tities)h(when)e(calculating)h(the)h(\\indirect)e(mem)m(b)s -(er",)427 3362 y(whic)m(h)34 b(tak)m(es)j(accoun)m(t)f(of)g(the)f -(small)f(c)m(hange)i(in)e(the)h(Sun's)f(attraction)i(due)f(to)h(the)f -(sligh)m(tly)427 3475 y(displaced)k(p)s(osition)g(of)i(the)h(p)s -(erturb)s(ed)c(b)s(o)s(dy)-8 b(.)71 b(A)41 b(simpler,)h(direct)e -(calculation)g(in)g(double)427 3588 y(precision)29 b(pro)m(v)m(es)i(to) -g(b)s(e)f(faster)g(and)g(not)h(signi\014can)m(tly)d(less)i(accurate.) -427 3747 y(Apart)g(from)f(emplo)m(ying)f(a)i(v)-5 b(ariable)28 -b(timestep,)h(and)g(o)s(ccasionally)g(\\rectifying)f(the)i(orbit")f(to) -427 3860 y(k)m(eep)38 b(the)g(indirect)e(mem)m(b)s(er)g(small,)i(the)g -(in)m(tegration)f(is)g(done)g(in)f(a)i(fairly)e(straigh)m(tforw)m(ard) -427 3973 y(w)m(a)m(y)-8 b(.)48 b(The)32 b(acceleration)h(estimated)g -(for)f(the)g(middle)e(of)i(the)h(timestep)f(is)f(assumed)h(to)h(apply) -427 4086 y(throughout)c(that)g(timestep;)g(it)g(is)f(also)g(used)g(in)g -(the)h(extrap)s(olation)f(of)h(the)g(p)s(erturbations)e(to)427 -4199 y(the)33 b(middle)d(of)j(the)g(next)g(timestep,)g(to)g(predict)f -(the)h(new)f(disturb)s(ed)d(p)s(osition.)46 b(There)32 -b(is)g(no)427 4312 y(iteration)e(within)e(a)j(timestep.)427 -4471 y(Measures)24 b(are)h(tak)m(en)f(to)h(reac)m(h)g(a)f(compromise)f -(b)s(et)m(w)m(een)h(execution)g(time)g(and)f(accuracy)-8 -b(.)40 b(The)427 4584 y(starting-p)s(oin)m(t)29 b(is)f(the)i(goal)g(of) -g(ac)m(hieving)f(arcsecond)h(accuracy)g(for)f(ordinary)f(minor)g -(planets)427 4697 y(o)m(v)m(er)35 b(a)f(ten-y)m(ear)h(timespan.)48 -b(This)32 b(goal)i(dictates)g(ho)m(w)f(large)h(the)f(timesteps)g(can)h -(b)s(e,)g(whic)m(h)427 4810 y(in)c(turn)g(dictates)i(ho)m(w)f(frequen)m -(tly)f(the)h(unp)s(erturb)s(ed)d(motion)j(has)g(to)g(b)s(e)g -(recalculated)g(from)427 4923 y(the)g(osculating)f(elemen)m(ts.)427 -5082 y(Within)h(predetermined)g(limits,)f(the)j(timestep)f(for)h(the)f -(n)m(umerical)f(in)m(tegration)i(is)e(v)-5 b(aried)32 -b(in)427 5195 y(length)38 b(in)e(in)m(v)m(erse)i(prop)s(ortion)e(to)j -(the)f(magnitude)f(of)h(the)g(net)g(acceleration)h(on)f(the)g(b)s(o)s -(dy)427 5308 y(from)30 b(the)h(ma)5 b(jor)30 b(planets.)427 -5467 y(The)h(n)m(umerical)f(in)m(tegration)h(requires)f(estimates)i(of) -g(the)f(ma)5 b(jor-planet)31 b(motions.)43 b(Appro)m(xi-)427 -5580 y(mate)33 b(p)s(ositions)c(for)i(the)h(ma)5 b(jor)32 -b(planets)e(\(Pluto)i(alone)f(is)g(omitted\))g(are)h(obtained)f(from)g -(the)427 5693 y(routine)25 b(sla)p Ft(_)p FD(PLANET.)g(Tw)m(o)h(lev)m -(els)g(of)g(in)m(terp)s(olation)e(are)i(used,)h(to)f(enhance)g(sp)s -(eed)f(without)p eop -%%Page: 116 118 -116 117 bop 0 52 a FD(116)427 351 y(signi\014can)m(tly)39 -b(degrading)h(accuracy)-8 b(.)72 b(A)m(t)42 b(a)e(lo)m(w)h(frequency)-8 -b(,)43 b(the)e(routine)e(sla)p Ft(_)p FD(PLANET)g(is)427 -464 y(called)30 b(to)h(generate)g(up)s(dated)e(p)s(osition+v)m(elo)s -(cit)m(y)g(\\state)j(v)m(ectors".)42 b(The)30 b(only)f(task)i(remain-) -427 577 y(ing)38 b(to)i(b)s(e)e(carried)g(out)h(at)h(the)f(full)e -(frequency)h(\()p Fq(i.e.)g FD(at)i(eac)m(h)g(in)m(tegration)f(step\))g -(is)f(to)i(use)427 690 y(the)33 b(state)h(v)m(ectors)g(to)f(extrap)s -(olate)h(the)e(planetary)g(p)s(ositions.)46 b(In)31 b(place)i(of)g(a)g -(strictly)e(linear)427 803 y(extrap)s(olation,)g(some)g(allo)m(w)m -(ance)g(is)f(made)g(for)h(the)g(curv)-5 b(ature)30 b(of)h(the)g(orbit)e -(b)m(y)i(scaling)f(bac)m(k)427 916 y(the)h(radius)d(v)m(ector)k(as)f -(the)f(linear)f(extrap)s(olation)h(go)s(es)h(o\013)g(at)g(a)g(tangen)m -(t.)427 1115 y(V)-8 b(arious)37 b(other)g(appro)m(ximations)e(are)j -(made.)60 b(F)-8 b(or)37 b(example,)i(p)s(erturbations)34 -b(b)m(y)j(Pluto)f(and)427 1228 y(the)31 b(minor)e(planets)g(are)i -(neglected)g(and)f(relativistic)f(e\013ects)i(are)g(not)g(tak)m(en)g -(in)m(to)g(accoun)m(t.)427 1427 y(In)j(the)g(in)m(terests)g(of)g -(simplicit)m(y)-8 b(,)33 b(the)h(bac)m(kground)g(calculations)f(for)h -(the)h(ma)5 b(jor)34 b(planets)f(are)427 1540 y(carried)i(out)i -Fq(en)g(masse.)59 b FD(The)35 b(mean)h(elemen)m(ts)h(and)e(state)i(v)m -(ectors)h(for)e(all)f(the)h(planets)f(are)427 1653 y(refreshed)30 -b(at)h(the)f(same)h(time,)f(without)g(regard)g(for)g(orbit)g(curv)-5 -b(ature,)30 b(mass)g(or)h(pro)m(ximit)m(y)-8 b(.)427 -1853 y(The)30 b(Earth-Mo)s(on)h(system)g(is)f(treated)h(as)g(a)g -(single)e(b)s(o)s(dy)g(when)h(the)g(b)s(o)s(dy)f(is)h(distan)m(t)g(but) -g(as)427 1966 y(separate)38 b(b)s(o)s(dies)c(when)i(closer)h(to)g(the)g -(EMB)g(than)f(the)h(parameter)g(RNE,)g(whic)m(h)e(incurs)g(a)427 -2078 y(time)30 b(p)s(enalt)m(y)g(but)g(impro)m(v)m(es)g(accuracy)h(for) -f(near-Earth)h(ob)5 b(jects.)311 2313 y(5.)46 b(This)30 -b(routine)h(is)g(not)h(in)m(tended)f(to)i(b)s(e)e(used)g(for)h(ma)5 -b(jor)32 b(planets.)44 b(Ho)m(w)m(ev)m(er,)35 b(if)c(ma)5 -b(jor-planet)427 2426 y(elemen)m(ts)36 b(are)f(supplied,)e(sensible)h -(results)f(will,)h(in)g(fact,)j(b)s(e)e(pro)s(duced.)53 -b(This)33 b(happ)s(ens)h(b)s(e-)427 2539 y(cause)26 b(the)f(routine)f -(c)m(hec)m(ks)i(the)f(separation)g(b)s(et)m(w)m(een)g(the)g(b)s(o)s(dy) -f(and)g(eac)m(h)i(of)f(the)g(planets)f(and)427 2651 y(in)m(terprets)g -(a)h(suspiciously)d(small)h(v)-5 b(alue)24 b(\(0.001)k(A)m(U\))d(as)g -(an)g(attempt)h(to)g(apply)d(the)i(routine)f(to)427 2764 -y(the)29 b(planet)e(concerned.)41 b(If)27 b(this)h(condition)e(is)i -(detected,)i(the)f(con)m(tribution)d(from)i(that)h(planet)427 -2877 y(is)d(ignored,)g(and)g(the)h(status)g(is)e(set)i(to)h(the)e -(planet)g(n)m(um)m(b)s(er)f(\(1{10)k(=)d(Mercury)-8 b(,)28 -b(V)-8 b(en)m(us,)28 b(EMB,)427 2990 y(Mars,)j(Jupiter,)e(Saturn,)g -(Uran)m(us,)i(Neptune,)f(Earth,)g(Mo)s(on\))h(as)g(a)g(w)m(arning.)0 -3535 y FB(REFERENCES)44 b FD(:)311 3796 y(1.)i(Sterne,)25 -b(Theo)s(dore)f(E.,)h Fq(A)n(n)h(Intr)-5 b(o)g(duction)29 -b(to)f(Celestial)f(Me)-5 b(chanics,)25 b FD(In)m(terscience)g -(Publishers,)427 3909 y(1960.)43 b(Section)30 b(6.7,)i(p199.)311 -4092 y(2.)46 b(Ev)m(erhart,)31 b(E.)g(&)f(Pitkin,)e(E.T.,)j(Am.)f(J.)h -(Ph)m(ys.)f(51,)h(712,)h(1983.)p 0 4298 3780 8 v 0 4411 -a Fx(SLA)p Fn(_)p Fx(PLANEL)236 b Fm(Planet)37 b(P)m(osition)f(from)h -(Elemen)m(ts)234 b Fx(SLA)p Fn(_)p Fx(PLANEL)0 4761 y -FB(A)m(CTION)44 b FD(:)59 b(Helio)s(cen)m(tric)40 b(p)s(osition)e(and)h -(v)m(elo)s(cit)m(y)h(of)g(a)g(planet,)i(asteroid)e(or)g(comet,)j -(starting)d(from)227 4874 y(orbital)29 b(elemen)m(ts.)0 -5062 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PLANEL)f(\(DATE,)h -(JFORM,)h(EPOCH,)f(ORBINC,)f(ANODE,)i(PERIH,)1239 5175 -y(AORQ,)f(E,)i(AORL,)e(DM,)h(PV,)g(JSTAT\))0 5634 y FB(GIVEN)e -FD(:)p eop -%%Page: 117 119 -117 118 bop 0 52 a Fw(SUN/67.70)3206 b FD(117)277 339 -y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(TT)30 b(MJD)h(of)f(observ)-5 -b(ation)30 b(\(JD)p Fo(\000)p FD(2400000.5,)1825 452 -y(Note)i(1\))277 565 y Fq(JF)n(ORM)413 b FB(I)605 b FD(c)m(hoice)31 -b(of)g(elemen)m(t)g(set)g(\(1-3,)h(Note)f(3\))277 678 -y Fq(EPOCH)409 b FB(D)565 b FD(ep)s(o)s(c)m(h)30 b(of)h(elemen)m(ts)g -(\()p Fl(t)2462 692 y Fu(0)2531 678 y FD(or)g Fl(T)13 -b FD(,)30 b(TT)g(MJD,)h(Note)g(4\))277 791 y Fq(ORBINC)368 -b FB(D)565 b FD(inclination)28 b(\()p Fl(i)p FD(,)j(radians\))277 -904 y Fq(ANODE)399 b FB(D)565 b FD(longitude)29 b(of)i(the)f(ascending) -g(no)s(de)g(\(\012,)g(radians\))277 1016 y Fq(PERIH)443 -b FB(D)565 b FD(longitude)29 b(or)i(argumen)m(t)f(of)h(p)s(erihelion)c -(\()p Fl($)33 b FD(or)e Fl(!)s FD(,)1825 1129 y(radians\))277 -1242 y Fq(A)n(OR)n(Q)466 b FB(D)565 b FD(mean)30 b(distance)f(or)g(p)s -(erihelion)d(distance)k(\()p Fl(a)f FD(or)h Fl(q)s FD(,)g(A)m(U\))277 -1355 y Fq(E)674 b FB(D)565 b FD(eccen)m(tricit)m(y)32 -b(\()p Fl(e)p FD(\))277 1468 y Fq(A)n(ORL)477 b FB(D)565 -b FD(mean)31 b(anomaly)f(or)g(longitude)f(\()p Fl(M)41 -b FD(or)30 b Fl(L)p FD(,)h(radians,)1825 1581 y(JF)m(ORM=1,2)g(only\)) -277 1694 y Fq(DM)585 b FB(D)565 b FD(daily)29 b(motion)h(\()p -Fl(n)p FD(,)g(radians,)g(JF)m(ORM=1)h(only\))0 2111 y -FB(RETURNED)46 b FD(:)277 2257 y Fq(PV)606 b FB(D\(6\))431 -b FD(helio)s(cen)m(tric)29 b([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 -b FD(_)-43 b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 -b Fl(z)20 b FD(],)31 b(equatorial,)f(J2000)1825 2370 -y(\(A)m(U,)i(A)m(U/s\))277 2482 y Fq(JST)-7 b(A)g(T)453 -b FB(I)605 b FD(status:)1898 2595 y(0)30 b(=)g(OK)1825 -2708 y Fo(\000)p FD(1)g(=)g(illegal)f(JF)m(ORM)1825 2821 -y Fo(\000)p FD(2)h(=)g(illegal)f(E)1825 2934 y Fo(\000)p -FD(3)h(=)g(illegal)f(A)m(OR)m(Q)1825 3047 y Fo(\000)p -FD(4)h(=)g(illegal)f(DM)1825 3160 y Fo(\000)p FD(5)h(=)g(n)m(umerical)f -(error)0 3577 y FB(NOTES)44 b FD(:)311 3789 y(1.)i(D)m(A)-8 -b(TE)34 b(is)d(the)i(instan)m(t)f(for)g(whic)m(h)f(the)h(prediction)f -(is)g(required.)45 b(It)33 b(is)e(in)g(the)i(TT)e(time)h(scale)427 -3902 y(\(formerly)e(Ephemeris)e(Time,)i(ET\))g(and)g(is)f(a)i(Mo)s -(di\014ed)e(Julian)f(Date)k(\(JD)p Fo(\000)p FD(2400000.5\).)311 -4061 y(2.)46 b(The)30 b(elemen)m(ts)h(are)g(with)e(resp)s(ect)h(to)h -(the)g(J2000)h(ecliptic)d(and)g(equino)m(x.)311 4220 -y(3.)46 b(A)31 b(c)m(hoice)g(of)f(three)h(di\013eren)m(t)f(elemen)m -(t-format)h(options)f(is)g(a)m(v)-5 b(ailable,)30 b(as)g(follo)m(ws.) -427 4469 y(JF)m(ORM=1,)h(suitable)e(for)i(the)f(ma)5 -b(jor)30 b(planets:)602 4686 y(EPOCH)37 b(=)55 b(ep)s(o)s(c)m(h)30 -b(of)h(elemen)m(ts)f Fl(t)1862 4700 y Fu(0)1932 4686 -y FD(\(TT)g(MJD\))602 4799 y(ORBINC)m(=)55 b(inclination)27 -b Fl(i)k FD(\(radians\))602 4911 y(ANODE)d(=)55 b(longitude)29 -b(of)h(the)h(ascending)f(no)s(de)f(\012)h(\(radians\))602 -5024 y(PERIH)74 b(=)55 b(longitude)29 b(of)h(p)s(erihelion)d -Fl($)34 b FD(\(radians\))602 5137 y(A)m(OR)m(Q)95 b(=)55 -b(mean)30 b(distance)g Fl(a)h FD(\(A)m(U\))602 5250 y(E)304 -b(=)55 b(eccen)m(tricit)m(y)32 b Fl(e)602 5363 y FD(A)m(ORL)106 -b(=)55 b(mean)30 b(longitude)f Fl(L)i FD(\(radians\))602 -5476 y(DM)214 b(=)55 b(daily)29 b(motion)h Fl(n)g FD(\(radians\))427 -5693 y(JF)m(ORM=2,)h(suitable)e(for)i(minor)d(planets:)p -eop -%%Page: 118 120 -118 119 bop 0 52 a FD(118)602 351 y(EPOCH)37 b(=)55 b(ep)s(o)s(c)m(h)30 -b(of)h(elemen)m(ts)f Fl(t)1862 365 y Fu(0)1932 351 y -FD(\(TT)g(MJD\))602 464 y(ORBINC)m(=)55 b(inclination)27 -b Fl(i)k FD(\(radians\))602 577 y(ANODE)d(=)55 b(longitude)29 -b(of)h(the)h(ascending)f(no)s(de)f(\012)h(\(radians\))602 -690 y(PERIH)74 b(=)55 b(argumen)m(t)31 b(of)f(p)s(erihelion)d -Fl(!)33 b FD(\(radians\))602 803 y(A)m(OR)m(Q)95 b(=)55 -b(mean)30 b(distance)g Fl(a)h FD(\(A)m(U\))602 916 y(E)304 -b(=)55 b(eccen)m(tricit)m(y)32 b Fl(e)602 1029 y FD(A)m(ORL)106 -b(=)55 b(mean)30 b(anomaly)h Fl(M)40 b FD(\(radians\))427 -1229 y(JF)m(ORM=3,)31 b(suitable)e(for)i(comets:)602 -1428 y(EPOCH)37 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(p)s(erihelion)c -Fl(T)43 b FD(\(TT)30 b(MJD\))602 1541 y(ORBINC)m(=)55 -b(inclination)27 b Fl(i)k FD(\(radians\))602 1654 y(ANODE)d(=)55 -b(longitude)29 b(of)h(the)h(ascending)f(no)s(de)f(\012)h(\(radians\)) -602 1767 y(PERIH)74 b(=)55 b(argumen)m(t)31 b(of)f(p)s(erihelion)d -Fl(!)33 b FD(\(radians\))602 1880 y(A)m(OR)m(Q)95 b(=)55 -b(p)s(erihelion)27 b(distance)j Fl(q)j FD(\(A)m(U\))602 -1993 y(E)304 b(=)55 b(eccen)m(tricit)m(y)32 b Fl(e)427 -2193 y FD(Un)m(used)k(elemen)m(ts)h(\(DM)h(for)f(JF)m(ORM=2,)i(A)m(ORL) -e(and)f(DM)h(for)g(JF)m(ORM=3\))g(are)g(not)g(ac-)427 -2306 y(cessed.)311 2456 y(4.)46 b(Eac)m(h)30 b(of)f(the)g(three)g -(elemen)m(t)g(sets)g(de\014nes)f(an)h(unp)s(erturb)s(ed)c(helio)s(cen)m -(tric)i(orbit.)40 b(F)-8 b(or)29 b(a)g(giv)m(en)427 2569 -y(ep)s(o)s(c)m(h)c(of)h(observ)-5 b(ation,)26 b(the)g(p)s(osition)d(of) -i(the)h(b)s(o)s(dy)e(in)g(its)g(orbit)h(can)g(b)s(e)g(predicted)f(from) -h(these)427 2682 y(elemen)m(ts,)38 b(whic)m(h)d(are)i(called)e -Fq(osculating)j(elements,)g FD(using)d(standard)g(t)m(w)m(o-b)s(o)s(dy) -h(analytical)427 2794 y(solutions.)h(Ho)m(w)m(ev)m(er,)27 -b(due)c(to)h(planetary)f(p)s(erturbations,)g(a)h(giv)m(en)g(set)g(of)f -(osculating)g(elemen)m(ts)427 2907 y(remains)44 b(usable)g(for)h(only)g -(as)g(long)g(as)h(the)f(unp)s(erturb)s(ed)d(orbit)i(that)i(it)f -(describ)s(es)e(is)i(an)427 3020 y(adequate)27 b(appro)m(ximation)e(to) -i(realit)m(y)-8 b(.)39 b(A)m(ttac)m(hed)28 b(to)f(suc)m(h)e(a)i(set)f -(of)g(elemen)m(ts)g(is)f(a)i(date)f(called)427 3133 y(the)e -Fq(osculating)j(ep)-5 b(o)g(ch,)26 b FD(at)f(whic)m(h)d(the)h(elemen)m -(ts)h(are,)i(momen)m(tarily)-8 b(,)24 b(a)g(p)s(erfect)f(represen)m -(tation)427 3246 y(of)31 b(the)f(instan)m(taneous)h(p)s(osition)d(and)i -(v)m(elo)s(cit)m(y)h(of)f(the)h(b)s(o)s(dy)-8 b(.)427 -3417 y(Therefore,)33 b(for)g(an)m(y)g(giv)m(en)f(problem)f(there)i(are) -g(up)e(to)j(three)e(di\013eren)m(t)g(ep)s(o)s(c)m(hs)g(in)g(pla)m(y)-8 -b(,)33 b(and)427 3530 y(it)d(is)g(vital)f(to)i(distinguish)c(clearly)j -(b)s(et)m(w)m(een)h(them:)506 3680 y Fo(\017)46 b FD(The)25 -b(ep)s(o)s(c)m(h)g(of)g(observ)-5 b(ation:)38 b(the)26 -b(momen)m(t)g(in)e(time)g(for)h(whic)m(h)f(the)i(p)s(osition)d(of)j -(the)f(b)s(o)s(dy)597 3793 y(is)30 b(to)h(b)s(e)f(predicted.)506 -3924 y Fo(\017)46 b FD(The)24 b(ep)s(o)s(c)m(h)g(de\014ning)f(the)h(p)s -(osition)f(of)h(the)h(b)s(o)s(dy:)36 b(the)24 b(momen)m(t)h(in)f(time)g -(at)h(whic)m(h,)f(in)f(the)597 4037 y(absence)i(of)e(purturbations,)g -(the)h(sp)s(eci\014ed)e(p)s(osition|mean)g(longitude,)i(mean)g(anomaly) --8 b(,)597 4150 y(or)31 b(p)s(erihelion|is)26 b(reac)m(hed.)506 -4282 y Fo(\017)46 b FD(The)f(osculating)f(ep)s(o)s(c)m(h:)70 -b(the)45 b(momen)m(t)h(in)e(time)h(at)h(whic)m(h)d(the)j(giv)m(en)f -(elemen)m(ts)g(are)597 4394 y(correct.)427 4545 y(F)-8 -b(or)24 b(the)f(ma)5 b(jor-planet)22 b(and)g(minor-planet)f(cases)j(it) -e(is)g(usual)f(to)j(mak)m(e)g(the)f(ep)s(o)s(c)m(h)f(that)h(de\014nes) -427 4658 y(the)i(p)s(osition)e(of)i(the)h(b)s(o)s(dy)d(the)i(same)g(as) -g(the)h(ep)s(o)s(c)m(h)e(of)h(osculation.)39 b(Th)m(us,)25 -b(only)f(t)m(w)m(o)i(di\013eren)m(t)427 4770 y(ep)s(o)s(c)m(hs)38 -b(are)g(in)m(v)m(olv)m(ed:)55 b(the)37 b(ep)s(o)s(c)m(h)h(of)g(the)f -(elemen)m(ts)h(and)f(the)h(ep)s(o)s(c)m(h)g(of)f(observ)-5 -b(ation.)63 b(F)-8 b(or)427 4883 y(comets,)26 b(the)d(ep)s(o)s(c)m(h)f -(of)h(p)s(erihelion)d(\014xes)i(the)h(p)s(osition)e(in)h(the)h(orbit)e -(and)i(in)e(general)i(a)g(di\013eren)m(t)427 4996 y(ep)s(o)s(c)m(h)30 -b(of)h(osculation)f(will)d(b)s(e)j(c)m(hosen.)41 b(Th)m(us,)30 -b(all)f(three)i(t)m(yp)s(es)f(of)h(ep)s(o)s(c)m(h)f(are)h(in)m(v)m(olv) -m(ed.)427 5167 y(F)-8 b(or)31 b(the)g(presen)m(t)f(routine:)506 -5317 y Fo(\017)46 b FD(The)30 b(ep)s(o)s(c)m(h)g(of)h(observ)-5 -b(ation)30 b(is)f(the)i(argumen)m(t)g(D)m(A)-8 b(TE.)506 -5449 y Fo(\017)46 b FD(The)30 b(ep)s(o)s(c)m(h)g(de\014ning)f(the)h(p)s -(osition)f(of)h(the)h(b)s(o)s(dy)e(is)g(the)i(argumen)m(t)f(EPOCH.)506 -5580 y Fo(\017)46 b FD(The)f(osculating)g(ep)s(o)s(c)m(h)g(is)f(not)i -(used)e(and)h(is)f(assumed)h(to)h(b)s(e)f(close)g(enough)g(to)h(the)597 -5693 y(ep)s(o)s(c)m(h)34 b(of)g(observ)-5 b(ation)34 -b(to)h(deliv)m(er)d(adequate)j(accuracy)-8 b(.)54 b(If)33 -b(not,)j(a)e(preliminary)c(call)k(to)p eop -%%Page: 119 121 -119 120 bop 0 52 a Fw(SUN/67.70)3206 b FD(119)597 351 -y(sla)p Ft(_)p FD(PER)-8 b(TEL)27 b(ma)m(y)h(b)s(e)f(used)g(to)h(up)s -(date)f(the)h(elemen)m(t-set)h(\(and)f(its)f(asso)s(ciated)h(osculat-) -597 464 y(ing)i(ep)s(o)s(c)m(h\))g(b)m(y)h(applying)d(planetary)i(p)s -(erturbations.)311 637 y(5.)46 b(The)e(reference)h(frame)f(for)g(the)g -(result)g(is)f(equatorial)h(and)f(is)h(with)f(resp)s(ect)h(to)h(the)f -(mean)427 750 y(equino)m(x)30 b(and)g(ecliptic)f(of)i(ep)s(o)s(c)m(h)f -(J2000.)311 924 y(6.)46 b(The)36 b(algorithm)f(w)m(as)h(originally)e -(adapted)i(from)g(the)g(EPHSLA)f(program)h(of)g(D.)16 -b(H.)g(P)-8 b(.)16 b(Jones)427 1037 y(\(priv)-5 b(ate)36 -b(comm)m(unication,)h(1996\).)59 b(The)35 b(metho)s(d)h(is)f(based)g -(on)h(Stump\013)7 b('s)35 b(Univ)m(ersal)f(V)-8 b(ari-)427 -1150 y(ables.)0 1648 y FB(REFERENCE)44 b FD(:)d(Ev)m(erhart,)31 -b(E.)f(&)g(Pitkin,)f(E.T.,)h(Am.)h(J.)f(Ph)m(ys.)g(51,)i(712,)g(1983.)p -0 1835 3780 8 v 0 1948 a Fx(SLA)p Fn(_)p Fx(PLANET)412 -b Fm(Planetary)37 b(Ephemerides)412 b Fx(SLA)p Fn(_)p -Fx(PLANET)0 2298 y FB(A)m(CTION)44 b FD(:)c(Appro)m(ximate)31 -b(helio)s(cen)m(tric)e(p)s(osition)f(and)i(v)m(elo)s(cit)m(y)h(of)f(a)h -(planet.)0 2486 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PLANET)f -(\(DATE,)h(NP,)h(PV,)g(JSTAT\))0 2917 y FB(GIVEN)e FD(:)277 -3063 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(Mo)s(di\014ed)29 -b(Julian)f(Date)k(\(JD)p Fo(\000)p FD(2400000.5\))277 -3176 y Fq(NP)606 b FB(I)f FD(planet:)1825 3289 y(1)15 -b(=)g(Mercury)1825 3402 y(2)g(=)g(V)-8 b(en)m(us)1825 -3515 y(3)15 b(=)g(Earth-Mo)s(on)31 b(Barycen)m(tre)1825 -3627 y(4)15 b(=)g(Mars)1825 3740 y(5)g(=)g(Jupiter)1825 -3853 y(6)g(=)g(Saturn)1825 3966 y(7)g(=)g(Uran)m(us)1825 -4079 y(8)g(=)g(Neptune)1825 4192 y(9)g(=)g(Pluto)0 4682 -y FB(RETURNED)46 b FD(:)277 4828 y Fq(PV)606 b FB(D\(6\))431 -b FD(helio)s(cen)m(tric)29 b([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 -b FD(_)-43 b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 -b Fl(z)20 b FD(],)31 b(equatorial,)f(J2000)1825 4941 -y(\(A)m(U,)i(A)m(U/s\))277 5053 y Fq(JST)-7 b(A)g(T)453 -b FB(I)605 b FD(status:)1825 5166 y(+1)30 b(=)g(w)m(arning:)40 -b(date)31 b(outside)f(of)g(range)1898 5279 y(0)g(=)g(OK)1825 -5392 y Fo(\000)p FD(1)g(=)g(illegal)f(NP)h(\(outside)g(1-9\))1825 -5505 y Fo(\000)p FD(2)g(=)g(solution)f(didn't)g(con)m(v)m(erge)p -eop -%%Page: 120 122 -120 121 bop 0 52 a FD(120)0 351 y FB(NOTES)44 b FD(:)311 -541 y(1.)i(The)31 b(ep)s(o)s(c)m(h,)g(D)m(A)-8 b(TE,)33 -b(is)d(in)g(the)h(TDB)h(time)e(scale)i(and)e(is)h(in)e(the)j(form)e(of) -i(a)f(Mo)s(di\014ed)f(Julian)427 654 y(Date)i(\(JD)p -Fo(\000)p FD(2400000.5\).)311 801 y(2.)46 b(The)24 b(reference)h(frame) -g(is)e(equatorial)h(and)g(is)g(with)f(resp)s(ect)h(to)i(the)e(mean)h -(equino)m(x)f(and)g(ecliptic)427 914 y(of)31 b(ep)s(o)s(c)m(h)f(J2000.) -311 1061 y(3.)46 b(If)29 b(a)g(planet)g(n)m(um)m(b)s(er,)f(NP)-8 -b(,)29 b(outside)g(the)g(range)g(1-9)h(is)f(supplied,)d(an)j(error)f -(status)i(is)e(returned)427 1174 y(\(JST)-8 b(A)g(T)30 -b(=)h Fo(\000)p FD(1\))f(and)g(the)h(PV)f(v)m(ector)i(is)d(set)i(to)g -(zero)s(es.)311 1321 y(4.)46 b(The)29 b(algorithm)f(for)h(obtaining)f -(the)h(mean)g(elemen)m(ts)h(of)f(the)g(planets)g(from)f(Mercury)h(to)h -(Nep-)427 1434 y(tune)23 b(is)f(due)h(to)h(J.)15 b(L.)g(Simon,)24 -b(P)-8 b(.)15 b(Bretagnon,)26 b(J.)15 b(Chapron)m(t,)25 -b(M.)16 b(Chapron)m(t-T)-8 b(ouze,)25 b(G.)16 b(F)-8 -b(rancou)427 1547 y(and)30 b(J.)15 b(Lask)-5 b(ar)30 -b(\(Bureau)g(des)g(Longitudes,)g(P)m(aris,)g(F)-8 b(rance\).)42 -b(The)29 b(\(completely)i(di\013eren)m(t\))f(al-)427 -1660 y(gorithm)g(for)g(calculating)g(the)g(ecliptic)f(co)s(ordinates)h -(of)h(Pluto)f(is)f(b)m(y)h(Meeus.)311 1807 y(5.)46 b(Comparisons)24 -b(of)i(the)f(presen)m(t)h(routine)e(with)h(the)g(JPL)g(DE200)i -(ephemeris)d(giv)m(e)i(the)g(follo)m(wing)427 1920 y(RMS)k(errors)g(o)m -(v)m(er)i(the)e(in)m(terv)-5 b(al)30 b(1960-2025:)1543 -2088 y Fq(p)-5 b(osition)35 b(\(km\))170 b(sp)-5 b(e)g(e)g(d)35 -b(\(metr)-5 b(e/se)g(c\))697 2314 y FD(Mercury)694 b(334)613 -b(0.437)697 2427 y(V)-8 b(en)m(us)748 b(1060)613 b(0.855)697 -2540 y(EMB)774 b(2010)613 b(0.815)697 2653 y(Mars)783 -b(7690)613 b(1.98)697 2766 y(Jupiter)651 b(71700)614 -b(7.70)697 2878 y(Saturn)623 b(199000)568 b(19.4)697 -2991 y(Uran)m(us)608 b(564000)568 b(16.4)697 3104 y(Neptune)556 -b(158000)568 b(14.4)697 3217 y(Pluto)718 b(36400)614 -b(0.137)427 3386 y(F)-8 b(rom)27 b(comparisons)e(with)g(DE102,)k(Simon) -24 b Fq(et)29 b(al.)39 b FD(quote)27 b(the)f(follo)m(wing)f(longitude)g -(accuracies)427 3498 y(o)m(v)m(er)32 b(the)f(in)m(terv)-5 -b(al)29 b(1800-2200:)697 3667 y(Mercury)702 b(4)1773 -3630 y Fk(0)l(0)697 3780 y FD(V)-8 b(en)m(us)801 b(5)1773 -3743 y Fk(0)l(0)697 3893 y FD(EMB)827 b(6)1773 3856 y -Fk(0)l(0)697 4006 y FD(Mars)790 b(17)1772 3969 y Fk(0)m(0)697 -4118 y FD(Jupiter)704 b(71)1772 4082 y Fk(0)m(0)697 4231 -y FD(Saturn)721 b(81)1772 4194 y Fk(0)m(0)697 4344 y -FD(Uran)m(us)706 b(86)1772 4307 y Fk(0)m(0)697 4457 y -FD(Neptune)654 b(11)1772 4420 y Fk(0)m(0)427 4626 y FD(In)27 -b(the)g(case)i(of)e(Pluto,)h(Meeus)g(quotes)g(an)f(accuracy)h(of)g(0) -2451 4589 y Fk(0)l(0)2455 4626 y Fl(:)p FD(6)g(in)e(longitude)g(and)h -(0)3266 4589 y Fk(0)l(0)3270 4626 y Fl(:)p FD(2)h(in)e(latitude)427 -4738 y(for)k(the)h(p)s(erio)s(d)d(1885-2099.)427 4868 -y(F)-8 b(or)28 b(all)e(except)i(Pluto,)f(o)m(v)m(er)h(the)f(p)s(erio)s -(d)e(1000-3000,)32 b(the)27 b(accuracy)h(is)e(b)s(etter)h(than)g(1.5)h -(times)427 4981 y(that)g(o)m(v)m(er)f(1800-2200.)44 b(Outside)25 -b(the)i(in)m(terv)-5 b(al)26 b(1000-3000)k(the)d(accuracy)h(declines.) -38 b(F)-8 b(or)27 b(Pluto)427 5094 y(the)42 b(accuracy)g(declines)e -(rapidly)f(outside)i(the)g(p)s(erio)s(d)e(1885-2099.)78 -b(Outside)39 b(these)j(ranges)427 5207 y(\(1885-2099)f(for)36 -b(Pluto,)i(1000-3000)i(for)c(the)h(rest\))g(a)g(\\date)g(out)g(of)g -(range")g(w)m(arning)e(status)427 5320 y(\()p Ft(JSTAT=+1)p -FD(\))29 b(is)h(returned.)311 5467 y(6.)46 b(The)30 b(algorithms)e(for) -i(\(i\))f(Mercury)h(through)f(Neptune)h(and)f(\(ii\))g(Pluto)g(are)h -(completely)g(inde-)427 5580 y(p)s(enden)m(t.)38 b(In)25 -b(the)h(Mercury)f(through)g(Neptune)g(case,)j(the)d(presen)m(t)h -(SLALIB)f(implemen)m(tation)427 5693 y(di\013ers)k(from)h(the)h -(original)d(Simon)h Fq(et)k(al.)41 b FD(F)-8 b(ortran)31 -b(co)s(de)f(in)f(the)i(follo)m(wing)e(resp)s(ects:)p -eop -%%Page: 121 123 -121 122 bop 0 52 a Fw(SUN/67.70)3206 b FD(121)506 351 -y Fo(\017)46 b FD(The)37 b(date)i(is)d(supplied)f(as)j(a)g(Mo)s -(di\014ed)e(Julian)f(Date)k(rather)f(a)g(Julian)d(Date)40 -b(\(MJD)e(=)597 464 y(\(JD)21 b Fo(\000)f FD(2400000)p -Fl(:)p FD(5\).)506 635 y Fo(\017)46 b FD(The)33 b(result)g(is)f -(returned)g(only)h(in)f(equatorial)h(Cartesian)g(form;)i(the)e -(ecliptic)g(longitude,)597 748 y(latitude)d(and)f(radius)g(v)m(ector)j -(are)f(not)f(returned.)506 919 y Fo(\017)46 b FD(The)30 -b(v)m(elo)s(cit)m(y)h(is)e(in)g(A)m(U)j(p)s(er)d(second,)i(not)f(A)m(U) -h(p)s(er)f(da)m(y)-8 b(.)506 1091 y Fo(\017)46 b FD(Di\013eren)m(t)31 -b(error/w)m(arning)e(status)i(v)-5 b(alues)30 b(are)h(used.)506 -1262 y Fo(\017)46 b FD(Kepler's)30 b(Equation)f(is)h(not)g(solv)m(ed)h -(inline.)506 1433 y Fo(\017)46 b FD(P)m(olynomials)29 -b(in)g(T)h(are)h(nested)f(to)h(minimize)d(rounding)g(errors.)506 -1604 y Fo(\017)46 b FD(Explicit)28 b(double-precision)g(constan)m(ts)j -(are)g(used)f(to)h(a)m(v)m(oid)g(mixed-mo)s(de)e(expressions.)506 -1775 y Fo(\017)46 b FD(There)26 b(are)h(other,)h(cosmetic,)h(c)m -(hanges)e(to)h(comply)e(with)f(Starlink/SLALIB)f(st)m(yle)j(guide-)597 -1888 y(lines.)427 2118 y(None)k(of)g(the)f(ab)s(o)m(v)m(e)i(c)m(hanges) -f(a\013ects)h(the)f(result)e(signi\014can)m(tly)-8 b(.)311 -2347 y(7.)46 b(F)-8 b(or)42 b(NP)15 b(=)g(3)41 b(the)g(result)f(is)f -(for)i(the)g(Earth-Mo)s(on)g(Barycen)m(tre.)73 b(T)-8 -b(o)41 b(obtain)g(the)g(helio)s(cen-)427 2460 y(tric)34 -b(p)s(osition)d(and)i(v)m(elo)s(cit)m(y)i(of)e(the)h(Earth,)h(either)e -(use)g(the)h(SLALIB)g(routine)e(sla)p Ft(_)p FD(EVP)h(\(or)427 -2573 y(sla)p Ft(_)p FD(EPV\))e(or)h(call)f(sla)p Ft(_)p -FD(DMOON)g(and)g(subtract)h(0.012150581)k(times)c(the)f(geo)s(cen)m -(tric)i(Mo)s(on)427 2686 y(v)m(ector)41 b(from)e(the)h(EMB)g(v)m(ector) -h(pro)s(duced)d(b)m(y)h(the)h(presen)m(t)g(routine.)67 -b(\(The)39 b(Mo)s(on)h(v)m(ector)427 2799 y(should)29 -b(b)s(e)i(precessed)g(to)h(J2000)g(\014rst,)f(but)g(this)f(can)h(b)s(e) -g(omitted)g(for)g(mo)s(dern)f(ep)s(o)s(c)m(hs)g(with-)427 -2912 y(out)h(in)m(tro)s(ducing)d(signi\014can)m(t)h(inaccuracy)-8 -b(.\))227 3453 y FB(REFERENCES)44 b FD(:)481 3682 y(1.)i(Simon)29 -b Fq(et)k(al.,)d FD(Astron.)h(Astroph)m(ys.)f FB(282)p -FD(,)i(663)f(\(1994\).)481 3854 y(2.)46 b(Meeus,)31 b(J.,)g -Fq(Astr)-5 b(onomic)g(al)35 b(A)n(lgorithms,)c FD(Willmann-Bell)d -(\(1991\).)p 0 4158 3780 8 v 0 4271 a Fx(SLA)p Fn(_)p -Fx(PLANTE)219 b Fm([)20 b Fg(\013)q(;)g(\016)k Fm(])38 -b(of)g(Planet)g(from)e(Elemen)m(ts)219 b Fx(SLA)p Fn(_)p -Fx(PLANTE)0 4621 y FB(A)m(CTION)44 b FD(:)57 b(T)-8 b(op)s(o)s(cen)m -(tric)38 b(apparen)m(t)h([)15 b Fl(\013;)g(\016)20 b -FD(])39 b(of)f(a)h(Solar-System)f(ob)5 b(ject)39 b(whose)f(helio)s(cen) -m(tric)g(orbital)227 4734 y(elemen)m(ts)31 b(are)g(kno)m(wn.)0 -4922 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PLANTE)f(\(DATE,)h -(ELONG,)h(PHI,)f(JFORM,)g(EPOCH,)g(ORBINC,)g(ANODE,)g(PERIH,)1239 -5035 y(AORQ,)g(E,)i(AORL,)e(DM,)h(RA,)g(DEC,)f(R,)i(JSTAT\))0 -5634 y FB(GIVEN)d FD(:)p eop -%%Page: 122 124 -122 123 bop 0 52 a FD(122)277 339 y Fq(D)n(A)-7 b(TE)481 -b FB(D)565 b FD(TT)30 b(MJD)h(of)f(observ)-5 b(ation)30 -b(\(JD)p Fo(\000)p FD(2400000.5,)1825 452 y(Notes)h(1,5\))277 -565 y Fq(ELONG,PHI)216 b FB(D)565 b FD(observ)m(er's)31 -b(longitude)e(\(east)j(+v)m(e\))f(and)f(latitude)1825 -678 y(\(radians,)f(Note)j(2\))277 791 y Fq(JF)n(ORM)413 -b FB(I)605 b FD(c)m(hoice)31 b(of)g(elemen)m(t)g(set)g(\(1-3,)h(Notes)f -(3-6\))277 904 y Fq(EPOCH)409 b FB(D)565 b FD(ep)s(o)s(c)m(h)30 -b(of)h(elemen)m(ts)g(\()p Fl(t)2462 918 y Fu(0)2531 904 -y FD(or)g Fl(T)13 b FD(,)30 b(TT)g(MJD,)h(Note)g(5\))277 -1016 y Fq(ORBINC)368 b FB(D)565 b FD(inclination)28 b(\()p -Fl(i)p FD(,)j(radians\))277 1129 y Fq(ANODE)399 b FB(D)565 -b FD(longitude)29 b(of)i(the)f(ascending)g(no)s(de)g(\(\012,)g -(radians\))277 1242 y Fq(PERIH)443 b FB(D)565 b FD(longitude)29 -b(or)i(argumen)m(t)f(of)h(p)s(erihelion)c(\()p Fl($)33 -b FD(or)e Fl(!)s FD(,)1825 1355 y(radians\))277 1468 -y Fq(A)n(OR)n(Q)466 b FB(D)565 b FD(mean)30 b(distance)f(or)g(p)s -(erihelion)d(distance)k(\()p Fl(a)f FD(or)h Fl(q)s FD(,)g(A)m(U\))277 -1581 y Fq(E)674 b FB(D)565 b FD(eccen)m(tricit)m(y)32 -b(\()p Fl(e)p FD(\))277 1694 y Fq(A)n(ORL)477 b FB(D)565 -b FD(mean)31 b(anomaly)f(or)g(longitude)f(\()p Fl(M)41 -b FD(or)30 b Fl(L)p FD(,)h(radians,)1825 1807 y(JF)m(ORM=1,2)g(only\)) -277 1920 y Fq(DM)585 b FB(D)565 b FD(daily)29 b(motion)h(\()p -Fl(n)p FD(,)g(radians,)g(JF)m(ORM=1)h(only\))0 2252 y -FB(RETURNED)46 b FD(:)277 2399 y Fq(RA,DEC)378 b FB(D)565 -b FD(top)s(o)s(cen)m(tric)31 b(apparen)m(t)f([)15 b Fl(\013;)g(\016)21 -b FD(])30 b(\(radians\))277 2511 y Fq(R)670 b FB(D)565 -b FD(distance)30 b(from)g(observ)m(er)h(\(A)m(U\))277 -2624 y Fq(JST)-7 b(A)g(T)453 b FB(I)605 b FD(status:)1898 -2737 y(0)30 b(=)g(OK)1825 2850 y Fo(\000)p FD(1)g(=)g(illegal)f(JF)m -(ORM)1825 2963 y Fo(\000)p FD(2)h(=)g(illegal)f(E)1825 -3076 y Fo(\000)p FD(3)h(=)g(illegal)f(A)m(OR)m(Q)1825 -3189 y Fo(\000)p FD(4)h(=)g(illegal)f(DM)1825 3302 y -Fo(\000)p FD(5)h(=)g(n)m(umerical)f(error)0 3635 y FB(NOTES)44 -b FD(:)311 3819 y(1.)i(D)m(A)-8 b(TE)34 b(is)d(the)i(instan)m(t)f(for)g -(whic)m(h)f(the)h(prediction)f(is)g(required.)45 b(It)33 -b(is)e(in)g(the)i(TT)e(time)h(scale)427 3932 y(\(formerly)e(Ephemeris)e -(Time,)i(ET\))g(and)g(is)f(a)i(Mo)s(di\014ed)e(Julian)f(Date)k(\(JD)p -Fo(\000)p FD(2400000.5\).)311 4075 y(2.)46 b(The)34 b(longitude)g(and)g -(latitude)g(allo)m(w)g(correction)h(for)f(geo)s(cen)m(tric)i(parallax.) -53 b(This)33 b(is)h(usually)427 4188 y(a)f(small)d(e\013ect,)35 -b(but)c(can)i(b)s(ecome)f(imp)s(ortan)m(t)g(for)g(near-Earth)g -(asteroids.)45 b(Geo)s(cen)m(tric)34 b(p)s(osi-)427 4301 -y(tions)27 b(can)h(b)s(e)e(generated)j(b)m(y)e(appropriate)f(use)h(of)h -(the)f(routines)f(sla)p Ft(_)p FD(EVP)h(\(or)g(sla)p -Ft(_)p FD(EPV\))g(and)427 4414 y(sla)p Ft(_)p FD(PLANEL.)311 -4557 y(3.)46 b(The)30 b(elemen)m(ts)h(are)g(with)e(resp)s(ect)h(to)h -(the)g(J2000)h(ecliptic)d(and)g(equino)m(x.)311 4700 -y(4.)46 b(A)31 b(c)m(hoice)g(of)f(three)h(di\013eren)m(t)f(elemen)m -(t-format)h(options)f(is)g(a)m(v)-5 b(ailable,)30 b(as)g(follo)m(ws.) -427 4941 y(JF)m(ORM=1,)h(suitable)e(for)i(the)f(ma)5 -b(jor)30 b(planets:)602 5128 y(EPOCH)37 b(=)55 b(ep)s(o)s(c)m(h)30 -b(of)h(elemen)m(ts)f Fl(t)1862 5142 y Fu(0)1932 5128 -y FD(\(TT)g(MJD\))602 5241 y(ORBINC)m(=)55 b(inclination)27 -b Fl(i)k FD(\(radians\))602 5354 y(ANODE)d(=)55 b(longitude)29 -b(of)h(the)h(ascending)f(no)s(de)f(\012)h(\(radians\))602 -5467 y(PERIH)74 b(=)55 b(longitude)29 b(of)h(p)s(erihelion)d -Fl($)34 b FD(\(radians\))602 5580 y(A)m(OR)m(Q)95 b(=)55 -b(mean)30 b(distance)g Fl(a)h FD(\(A)m(U\))602 5693 y(E)304 -b(=)55 b(eccen)m(tricit)m(y)32 b Fl(e)p eop -%%Page: 123 125 -123 124 bop 0 52 a Fw(SUN/67.70)3206 b FD(123)602 351 -y(A)m(ORL)106 b(=)55 b(mean)30 b(longitude)f Fl(L)i FD(\(radians\))602 -464 y(DM)214 b(=)55 b(daily)29 b(motion)h Fl(n)g FD(\(radians\))427 -682 y(JF)m(ORM=2,)h(suitable)e(for)i(minor)d(planets:)602 -899 y(EPOCH)37 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(elemen)m(ts)f -Fl(t)1862 913 y Fu(0)1932 899 y FD(\(TT)g(MJD\))602 1012 -y(ORBINC)m(=)55 b(inclination)27 b Fl(i)k FD(\(radians\))602 -1125 y(ANODE)d(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de)f -(\012)h(\(radians\))602 1238 y(PERIH)74 b(=)55 b(argumen)m(t)31 -b(of)f(p)s(erihelion)d Fl(!)33 b FD(\(radians\))602 1351 -y(A)m(OR)m(Q)95 b(=)55 b(mean)30 b(distance)g Fl(a)h -FD(\(A)m(U\))602 1463 y(E)304 b(=)55 b(eccen)m(tricit)m(y)32 -b Fl(e)602 1576 y FD(A)m(ORL)106 b(=)55 b(mean)30 b(anomaly)h -Fl(M)40 b FD(\(radians\))427 1794 y(JF)m(ORM=3,)31 b(suitable)e(for)i -(comets:)602 2011 y(EPOCH)37 b(=)55 b(ep)s(o)s(c)m(h)30 -b(of)h(p)s(erihelion)c Fl(T)43 b FD(\(TT)30 b(MJD\))602 -2124 y(ORBINC)m(=)55 b(inclination)27 b Fl(i)k FD(\(radians\))602 -2237 y(ANODE)d(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de)f -(\012)h(\(radians\))602 2350 y(PERIH)74 b(=)55 b(argumen)m(t)31 -b(of)f(p)s(erihelion)d Fl(!)33 b FD(\(radians\))602 2463 -y(A)m(OR)m(Q)95 b(=)55 b(p)s(erihelion)27 b(distance)j -Fl(q)j FD(\(A)m(U\))602 2576 y(E)304 b(=)55 b(eccen)m(tricit)m(y)32 -b Fl(e)427 2793 y FD(Un)m(used)k(elemen)m(ts)h(\(DM)h(for)f(JF)m -(ORM=2,)i(A)m(ORL)e(and)f(DM)h(for)g(JF)m(ORM=3\))g(are)g(not)g(ac-)427 -2906 y(cessed.)311 3065 y(5.)46 b(Eac)m(h)30 b(of)f(the)g(three)g -(elemen)m(t)g(sets)g(de\014nes)f(an)h(unp)s(erturb)s(ed)c(helio)s(cen)m -(tric)i(orbit.)40 b(F)-8 b(or)29 b(a)g(giv)m(en)427 3178 -y(ep)s(o)s(c)m(h)c(of)h(observ)-5 b(ation,)26 b(the)g(p)s(osition)d(of) -i(the)h(b)s(o)s(dy)e(in)g(its)g(orbit)h(can)g(b)s(e)g(predicted)f(from) -h(these)427 3291 y(elemen)m(ts,)38 b(whic)m(h)d(are)i(called)e -Fq(osculating)j(elements,)g FD(using)d(standard)g(t)m(w)m(o-b)s(o)s(dy) -h(analytical)427 3404 y(solutions.)h(Ho)m(w)m(ev)m(er,)27 -b(due)c(to)h(planetary)f(p)s(erturbations,)g(a)h(giv)m(en)g(set)g(of)f -(osculating)g(elemen)m(ts)427 3517 y(remains)44 b(usable)g(for)h(only)g -(as)g(long)g(as)h(the)f(unp)s(erturb)s(ed)d(orbit)i(that)i(it)f -(describ)s(es)e(is)i(an)427 3629 y(adequate)27 b(appro)m(ximation)e(to) -i(realit)m(y)-8 b(.)39 b(A)m(ttac)m(hed)28 b(to)f(suc)m(h)e(a)i(set)f -(of)g(elemen)m(ts)g(is)f(a)i(date)f(called)427 3742 y(the)e -Fq(osculating)j(ep)-5 b(o)g(ch,)26 b FD(at)f(whic)m(h)d(the)h(elemen)m -(ts)h(are,)i(momen)m(tarily)-8 b(,)24 b(a)g(p)s(erfect)f(represen)m -(tation)427 3855 y(of)31 b(the)f(instan)m(taneous)h(p)s(osition)d(and)i -(v)m(elo)s(cit)m(y)h(of)f(the)h(b)s(o)s(dy)-8 b(.)427 -4030 y(Therefore,)33 b(for)g(an)m(y)g(giv)m(en)f(problem)f(there)i(are) -g(up)e(to)j(three)e(di\013eren)m(t)g(ep)s(o)s(c)m(hs)g(in)g(pla)m(y)-8 -b(,)33 b(and)427 4143 y(it)d(is)g(vital)f(to)i(distinguish)c(clearly)j -(b)s(et)m(w)m(een)h(them:)506 4302 y Fo(\017)46 b FD(The)25 -b(ep)s(o)s(c)m(h)g(of)g(observ)-5 b(ation:)38 b(the)26 -b(momen)m(t)g(in)e(time)g(for)h(whic)m(h)f(the)i(p)s(osition)d(of)j -(the)f(b)s(o)s(dy)597 4415 y(is)30 b(to)h(b)s(e)f(predicted.)506 -4551 y Fo(\017)46 b FD(The)24 b(ep)s(o)s(c)m(h)g(de\014ning)f(the)h(p)s -(osition)f(of)h(the)h(b)s(o)s(dy:)36 b(the)24 b(momen)m(t)h(in)f(time)g -(at)h(whic)m(h,)f(in)f(the)597 4664 y(absence)i(of)e(purturbations,)g -(the)h(sp)s(eci\014ed)e(p)s(osition|mean)g(longitude,)i(mean)g(anomaly) --8 b(,)597 4777 y(or)31 b(p)s(erihelion|is)26 b(reac)m(hed.)506 -4913 y Fo(\017)46 b FD(The)f(osculating)f(ep)s(o)s(c)m(h:)70 -b(the)45 b(momen)m(t)h(in)e(time)h(at)h(whic)m(h)d(the)j(giv)m(en)f -(elemen)m(ts)g(are)597 5026 y(correct.)427 5185 y(F)-8 -b(or)24 b(the)f(ma)5 b(jor-planet)22 b(and)g(minor-planet)f(cases)j(it) -e(is)g(usual)f(to)j(mak)m(e)g(the)f(ep)s(o)s(c)m(h)f(that)h(de\014nes) -427 5297 y(the)i(p)s(osition)e(of)i(the)h(b)s(o)s(dy)d(the)i(same)g(as) -g(the)h(ep)s(o)s(c)m(h)e(of)h(osculation.)39 b(Th)m(us,)25 -b(only)f(t)m(w)m(o)i(di\013eren)m(t)427 5410 y(ep)s(o)s(c)m(hs)38 -b(are)g(in)m(v)m(olv)m(ed:)55 b(the)37 b(ep)s(o)s(c)m(h)h(of)g(the)f -(elemen)m(ts)h(and)f(the)h(ep)s(o)s(c)m(h)g(of)f(observ)-5 -b(ation.)63 b(F)-8 b(or)427 5523 y(comets,)26 b(the)d(ep)s(o)s(c)m(h)f -(of)h(p)s(erihelion)d(\014xes)i(the)h(p)s(osition)e(in)h(the)h(orbit)e -(and)i(in)e(general)i(a)g(di\013eren)m(t)427 5636 y(ep)s(o)s(c)m(h)30 -b(of)h(osculation)f(will)d(b)s(e)j(c)m(hosen.)41 b(Th)m(us,)30 -b(all)f(three)i(t)m(yp)s(es)f(of)h(ep)s(o)s(c)m(h)f(are)h(in)m(v)m(olv) -m(ed.)p eop -%%Page: 124 126 -124 125 bop 0 52 a FD(124)427 351 y(F)-8 b(or)31 b(the)g(presen)m(t)f -(routine:)506 493 y Fo(\017)46 b FD(The)30 b(ep)s(o)s(c)m(h)g(of)h -(observ)-5 b(ation)30 b(is)f(the)i(argumen)m(t)g(D)m(A)-8 -b(TE.)506 621 y Fo(\017)46 b FD(The)30 b(ep)s(o)s(c)m(h)g(de\014ning)f -(the)h(p)s(osition)f(of)h(the)h(b)s(o)s(dy)e(is)g(the)i(argumen)m(t)f -(EPOCH.)506 749 y Fo(\017)46 b FD(The)f(osculating)g(ep)s(o)s(c)m(h)g -(is)f(not)i(used)e(and)h(is)f(assumed)h(to)h(b)s(e)f(close)g(enough)g -(to)h(the)597 861 y(ep)s(o)s(c)m(h)34 b(of)g(observ)-5 -b(ation)34 b(to)h(deliv)m(er)d(adequate)j(accuracy)-8 -b(.)54 b(If)33 b(not,)j(a)e(preliminary)c(call)k(to)597 -974 y(sla)p Ft(_)p FD(PER)-8 b(TEL)27 b(ma)m(y)h(b)s(e)f(used)g(to)h -(up)s(date)f(the)h(elemen)m(t-set)h(\(and)f(its)f(asso)s(ciated)h -(osculat-)597 1087 y(ing)i(ep)s(o)s(c)m(h\))g(b)m(y)h(applying)d -(planetary)i(p)s(erturbations.)311 1229 y(6.)46 b(Tw)m(o)25 -b(imp)s(ortan)m(t)e(sources)h(for)g(orbital)f(elemen)m(ts)h(are)h -Fq(Horizons,)h FD(op)s(erated)e(b)m(y)g(the)h(Jet)f(Propul-)427 -1342 y(sion)i(Lab)s(oratory)-8 b(,)27 b(P)m(asadena,)i(and)c(the)i -Fq(Minor)i(Planet)g(Center,)e FD(op)s(erated)g(b)m(y)f(the)g(Cen)m(ter) -h(for)427 1455 y(Astroph)m(ysics,)j(Harv)-5 b(ard.)41 -b(F)-8 b(or)31 b(further)e(details,)g(see)i(Section)f(4.17.)p -0 1576 3780 8 v 0 1689 a Fx(SLA)p Fn(_)p Fx(PLANTU)198 -b Fm([)20 b Fg(\013)q(;)g(\016)k Fm(])38 b(from)e(Univ)m(ersal)h -(Elemen)m(ts)198 b Fx(SLA)p Fn(_)p Fx(PLANTU)0 2039 y -FB(A)m(CTION)44 b FD(:)c(T)-8 b(op)s(o)s(cen)m(tric)30 -b(apparen)m(t)h([)15 b Fl(\013;)g(\016)20 b FD(])30 b(of)h(a)f -(Solar-System)f(ob)5 b(ject)31 b(whose)f(helio)s(cen)m(tric)f(univ)m -(ersal)227 2152 y(orbital)g(elemen)m(ts)i(are)g(kno)m(wn.)0 -2340 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PLANTU)f(\(DATE,)h -(ELONG,)h(PHI,)f(U,)h(RA,)g(DEC,)g(R,)g(JSTAT\))0 2674 -y FB(GIVEN)e FD(:)277 2820 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 -b FD(TT)30 b(MJD)h(of)f(observ)-5 b(ation)30 b(\(JD)p -Fo(\000)p FD(2400000.5\))277 2933 y Fq(ELONG,PHI)216 -b FB(D)565 b FD(observ)m(er's)31 b(longitude)e(\(east)j(+v)m(e\))f(and) -f(latitude)1825 3046 y(radians\))0 3372 y FB(GIVEN)k(and)h(RETURNED)46 -b FD(:)277 3519 y Fq(U)668 b FB(D\(13\))379 b FD(univ)m(ersal)29 -b(orbital)g(elemen)m(ts)537 3631 y(\(1\))1006 b(com)m(bined)30 -b(mass)g(\()p Fl(M)h FD(+)20 b Fl(m)p FD(\))537 3744 -y(\(2\))1006 b(total)31 b(energy)g(of)g(the)f(orbit)g(\()p -Fl(\013)p FD(\))537 3857 y(\(3\))1006 b(reference)31 -b(\(osculating\))f(ep)s(o)s(c)m(h)h(\()p Fl(t)2869 3871 -y Fu(0)2908 3857 y FD(\))499 3970 y(\(4-6\))969 b(p)s(osition)29 -b(at)i(reference)g(ep)s(o)s(c)m(h)f(\()p FB(r)2836 3984 -y Fu(0)2876 3970 y FD(\))499 4083 y(\(7-9\))969 b(v)m(elo)s(cit)m(y)31 -b(at)g(reference)g(ep)s(o)s(c)m(h)f(\()p FB(v)2837 4097 -y Fu(0)2877 4083 y FD(\))514 4196 y(\(10\))984 b(helio)s(cen)m(tric)29 -b(distance)h(at)h(reference)g(ep)s(o)s(c)m(h)514 4309 -y(\(11\))984 b FB(r)1701 4323 y Fu(0)1741 4309 y Fl(:)p -FB(v)1821 4323 y Fe(0)514 4422 y FD(\(12\))g(date)31 -b(\()p Fl(t)p FD(\))514 4535 y(\(13\))984 b(univ)m(ersal)29 -b(eccen)m(tric)i(anomaly)f(\()p Fl( )s FD(\))i(of)e(date,)i(appro)m(x)0 -4861 y FB(RETURNED)46 b FD(:)277 5007 y Fq(RA,DEC)378 -b FB(D)565 b FD(top)s(o)s(cen)m(tric)31 b(apparen)m(t)f([)15 -b Fl(\013;)g(\016)21 b FD(])30 b(\(radians\))277 5120 -y Fq(R)670 b FB(D)565 b FD(distance)30 b(from)g(observ)m(er)h(\(A)m -(U\))277 5233 y Fq(JST)-7 b(A)g(T)453 b FB(I)605 b FD(status:)1898 -5346 y(0)30 b(=)g(OK)1825 5458 y Fo(\000)p FD(1)g(=)g(radius)f(v)m -(ector)j(zero)1825 5571 y Fo(\000)p FD(2)e(=)g(failed)f(to)i(con)m(v)m -(erge)p eop -%%Page: 125 127 -125 126 bop 0 52 a Fw(SUN/67.70)3206 b FD(125)0 351 y -FB(NOTES)44 b FD(:)311 533 y(1.)i(D)m(A)-8 b(TE)34 b(is)d(the)i(instan) -m(t)f(for)g(whic)m(h)f(the)h(prediction)f(is)g(required.)45 -b(It)33 b(is)e(in)g(the)i(TT)e(time)h(scale)427 646 y(\(formerly)e -(Ephemeris)e(Time,)i(ET\))g(and)g(is)f(a)i(Mo)s(di\014ed)e(Julian)f -(Date)k(\(JD)p Fo(\000)p FD(2400000.5\).)311 786 y(2.)46 -b(The)34 b(longitude)g(and)g(latitude)g(allo)m(w)g(correction)h(for)f -(geo)s(cen)m(tric)i(parallax.)53 b(This)33 b(is)h(usually)427 -899 y(a)f(small)d(e\013ect,)35 b(but)c(can)i(b)s(ecome)f(imp)s(ortan)m -(t)g(for)g(near-Earth)g(asteroids.)45 b(Geo)s(cen)m(tric)34 -b(p)s(osi-)427 1012 y(tions)27 b(can)h(b)s(e)e(generated)j(b)m(y)e -(appropriate)f(use)h(of)h(the)f(routines)f(sla)p Ft(_)p -FD(EVP)h(\(or)g(sla)p Ft(_)p FD(EPV\))g(and)427 1125 -y(sla)p Ft(_)p FD(UE2PV.)311 1265 y(3.)46 b(The)40 b(\\univ)m(ersal")f -(elemen)m(ts)h(are)g(those)h(whic)m(h)d(de\014ne)h(the)h(orbit)f(for)h -(the)g(purp)s(oses)e(of)i(the)427 1378 y(metho)s(d)26 -b(of)g(univ)m(ersal)f(v)-5 b(ariables)25 b(\(see)i(reference)f(2\).)41 -b(They)25 b(consist)h(of)g(the)h(com)m(bined)e(mass)h(of)427 -1491 y(the)33 b(t)m(w)m(o)h(b)s(o)s(dies,)e(an)g(ep)s(o)s(c)m(h,)h(and) -f(the)h(p)s(osition)e(and)h(v)m(elo)s(cit)m(y)h(v)m(ectors)h -(\(arbitrary)e(reference)427 1604 y(frame\))j(at)g(that)g(ep)s(o)s(c)m -(h.)53 b(The)34 b(parameter)h(set)g(used)f(here)g(includes)e(also)j(v) --5 b(arious)33 b(quan)m(tities)427 1717 y(that)i(can,)g(in)d(fact,)k(b) -s(e)d(deriv)m(ed)f(from)i(the)f(other)h(information.)49 -b(This)32 b(approac)m(h)i(is)f(tak)m(en)i(to)427 1830 -y(a)m(v)m(oiding)d(unnecessary)f(computation)h(and)g(loss)f(of)h -(accuracy)-8 b(.)48 b(The)31 b(supplemen)m(tary)g(quan)m(ti-)427 -1943 y(ties)22 b(are)h(\(i\))f Fl(\013)p FD(,)i(whic)m(h)d(is)g(prop)s -(ortional)f(to)j(the)g(total)g(energy)f(of)h(the)f(orbit,)h(\(ii\))e -(the)i(helio)s(cen)m(tric)427 2056 y(distance)35 b(at)g(ep)s(o)s(c)m -(h,)h(\(iii\))d(the)i(out)m(w)m(ards)g(comp)s(onen)m(t)g(of)g(the)g(v)m -(elo)s(cit)m(y)g(at)h(the)f(giv)m(en)f(ep)s(o)s(c)m(h,)427 -2168 y(\(iv\))29 b(an)f(estimate)h(of)g Fl( )s FD(,)h(the)e(\\univ)m -(ersal)g(eccen)m(tric)h(anomaly")g(at)g(a)g(giv)m(en)g(date)g(and)f -(\(v\))h(that)427 2281 y(date.)311 2422 y(4.)46 b(The)30 -b(univ)m(ersal)f(elemen)m(ts)h(are)h(with)e(resp)s(ect)i(to)g(the)f -(J2000)i(ecliptic)d(and)h(equino)m(x.)0 2742 y FB(REFERENCES)44 -b FD(:)311 2924 y(1.)i(Sterne,)25 b(Theo)s(dore)f(E.,)h -Fq(A)n(n)h(Intr)-5 b(o)g(duction)29 b(to)f(Celestial)f(Me)-5 -b(chanics,)25 b FD(In)m(terscience)g(Publishers,)427 -3037 y(1960.)43 b(Section)30 b(6.7,)i(p199.)311 3177 -y(2.)46 b(Ev)m(erhart,)31 b(E.)g(&)f(Pitkin,)e(E.T.,)j(Am.)f(J.)h(Ph)m -(ys.)f(51,)h(712,)h(1983.)p 0 3292 3780 8 v 0 3405 a -Fx(SLA)p Fn(_)p Fx(PM)972 b Fm(Prop)s(er)37 b(Motion)972 -b Fx(SLA)p Fn(_)p Fx(PM)0 3756 y FB(A)m(CTION)44 b FD(:)c(Apply)29 -b(corrections)i(for)f(prop)s(er)f(motion)h(to)h(a)g(star)f([)15 -b Fl(\013;)g(\016)21 b FD(].)0 3943 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_PM)g(\(R0,)h(D0,)g(PR,)g(PD,)g(PX,)g(RV,)g(EP0,)f -(EP1,)h(R1,)g(D1\))0 4270 y FB(GIVEN)e FD(:)277 4416 -y Fq(R0,D0)481 b FB(D)565 b FD([)15 b Fl(\013;)g(\016)20 -b FD(])31 b(at)g(ep)s(o)s(c)m(h)f(EP0)h(\(radians\))277 -4529 y Fq(PR,PD)449 b FB(D)565 b FD(prop)s(er)36 b(motions:)55 -b(rate)38 b(of)g(c)m(hange)g(of)g([)15 b Fl(\013;)g(\016)20 -b FD(])38 b(\(radians)1658 4641 y(p)s(er)30 b(y)m(ear\))277 -4754 y Fq(PX)606 b FB(D)565 b FD(parallax)29 b(\(arcsec\))277 -4867 y Fq(R)-9 b(V)611 b FB(D)565 b FD(radial)29 b(v)m(elo)s(cit)m(y)i -(\(km)f(s)2477 4834 y Fp(\000)p Fu(1)2571 4867 y FD(,)h(+v)m(e)g(if)e -(receding\))277 4980 y Fq(EP0)566 b FB(D)f FD(start)31 -b(ep)s(o)s(c)m(h)f(in)f(y)m(ears)i(\()p Fq(e.g.)f FD(Julian)e(ep)s(o)s -(c)m(h\))277 5093 y Fq(EP1)566 b FB(D)f FD(end)30 b(ep)s(o)s(c)m(h)g -(in)f(y)m(ears)i(\(same)g(system)g(as)f(EP0\))0 5406 -y FB(RETURNED)46 b FD(:)277 5577 y Fq(R1,D1)481 b FB(D)565 -b FD([)15 b Fl(\013;)g(\016)20 b FD(])31 b(at)g(ep)s(o)s(c)m(h)f(EP1)h -(\(radians\))p eop -%%Page: 126 128 -126 127 bop 0 52 a FD(126)0 351 y FB(NOTES)44 b FD(:)311 -552 y(1.)i(The)c Fl(\013)h FD(prop)s(er)e(motions)h(are)61 -b(_)-44 b Fl(\013)43 b FD(rather)f(than)61 b(_)-44 b -Fl(\013)16 b FD(cos)g Fl(\016)s FD(,)46 b(and)c(are)g(in)f(the)i(same)g -(co)s(ordinate)427 665 y(system)31 b(as)f(R0,D0.)311 -818 y(2.)46 b(If)26 b(the)g(a)m(v)-5 b(ailable)25 b(prop)s(er)f -(motions)i(are)g(pre-FK5)g(they)g(will)d(b)s(e)i(p)s(er)g(tropical)g(y) -m(ear)i(rather)f(than)427 931 y(p)s(er)37 b(Julian)e(y)m(ear,)41 -b(and)c(so)h(the)g(ep)s(o)s(c)m(hs)g(m)m(ust)f(b)s(oth)g(b)s(e)g -(Besselian)h(rather)f(than)h(Julian.)60 b(In)427 1044 -y(suc)m(h)33 b(cases,)h(a)f(scaling)f(factor)i(of)f(365.2422D0/365.25)q -(D0)39 b(should)31 b(b)s(e)h(applied)f(to)i(the)g(radial)427 -1157 y(v)m(elo)s(cit)m(y)e(b)s(efore)f(use)g(also.)0 -1552 y FB(REFERENCES)44 b FD(:)311 1752 y(1.)i(1984)32 -b Fq(Astr)-5 b(onomic)g(al)36 b(A)n(lmanac)p FD(,)31 -b(pp)e(B39-B41.)311 1905 y(2.)46 b(Lederle)30 b(&)g(Sc)m(h)m(w)m(an,)h -(1984.)h Fq(Astr.)42 b(Astr)-5 b(ophys.)33 b FB(134)p -FD(,)e(1-6.)p 0 2051 3780 8 v 0 2164 a Fx(SLA)p Fn(_)p -Fx(POLMO)728 b Fm(P)m(olar)36 b(Motion)729 b Fx(SLA)p -Fn(_)p Fx(POLMO)0 2514 y FB(A)m(CTION)44 b FD(:)50 b(P)m(olar)35 -b(motion:)50 b(correct)36 b(site)f(longitude)f(and)h(latitude)f(for)h -(p)s(olar)f(motion)h(and)f(calculate)227 2627 y(azim)m(uth)c -(di\013erence)g(b)s(et)m(w)m(een)h(celestial)f(and)g(terrestrial)f(p)s -(oles.)0 2815 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_POLMO)g -(\(ELONGM,)f(PHIM,)i(XP,)f(YP,)h(ELONG,)f(PHI,)h(DAZ\))0 -3185 y FB(GIVEN)e FD(:)277 3331 y Fq(ELONGM)327 b FB(D)565 -b FD(mean)31 b(longitude)e(of)h(the)h(site)f(\(radians,)f(east)j(+v)m -(e\))277 3444 y Fq(PHIM)489 b FB(D)565 b FD(mean)31 b(geo)s(detic)g -(latitude)e(of)i(the)f(site)g(\(radians\))277 3556 y -Fq(XP)606 b FB(D)565 b FD(p)s(olar)29 b(motion)h Fl(x)p -FD(-co)s(ordinate)h(\(radians\))277 3669 y Fq(YP)606 -b FB(D)565 b FD(p)s(olar)29 b(motion)h Fl(y)s FD(-co)s(ordinate)h -(\(radians\))0 4056 y FB(RETURNED)46 b FD(:)277 4202 -y Fq(ELONG)409 b FB(D)565 b FD(true)30 b(longitude)f(of)i(the)f(site)h -(\(radians,)e(east)j(+v)m(e\))277 4315 y Fq(PHI)571 b -FB(D)565 b FD(true)30 b(geo)s(detic)h(latitude)f(of)g(the)h(site)f -(\(radians\))277 4428 y Fq(D)n(AZ)545 b FB(D)565 b FD(azim)m(uth)25 -b(correction)g(\(terrestrial)p Fo(\000)p FD(celestial,)g(radians\))0 -4815 y FB(NOTES)44 b FD(:)311 5016 y(1.)i(\\Mean")22 -b(longitude)d(and)h(latitude)f(are)i(the)g(\(\014xed\))f(v)-5 -b(alues)20 b(for)g(the)g(site's)g(lo)s(cation)g(with)f(resp)s(ect)427 -5128 y(to)26 b(the)f(IERS)f(terrestrial)g(reference)h(frame;)i(the)e -(latitude)f(is)g(geo)s(detic.)39 b(T)-8 b(AKE)25 b(CARE)f(WITH)427 -5241 y(THE)29 b(LONGITUDE)h(SIGN)f(CONVENTION.)g(The)g(longitudes)f -(used)h(b)m(y)g(the)h(presen)m(t)g(rou-)427 5354 y(tine)22 -b(are)h(east-p)s(ositiv)m(e,)i(in)c(accordance)j(with)d(geographical)i -(con)m(v)m(en)m(tion)h(\(and)e(righ)m(t-handed\).)427 -5467 y(In)39 b(particular,)h(note)g(that)g(the)g(longitudes)e(returned) -g(b)m(y)h(the)h(sla)p Ft(_)p FD(OBS)e(routine)h(are)g(w)m(est-)427 -5580 y(p)s(ositiv)m(e,)27 b(follo)m(wing)f(astronomical)h(usage,)i(and) -e(m)m(ust)g(b)s(e)g(rev)m(ersed)g(in)f(sign)g(b)s(efore)h(use)g(in)f -(the)427 5693 y(presen)m(t)31 b(routine.)p eop -%%Page: 127 129 -127 128 bop 0 52 a Fw(SUN/67.70)3206 b FD(127)311 351 -y(2.)46 b(XP)e(and)f(YP)g(are)h(the)g(\(c)m(hanging\))g(co)s(ordinates) -f(of)h(the)g(Celestial)e(Ephemeris)g(P)m(ole)i(with)427 -464 y(resp)s(ect)33 b(to)g(the)g(IERS)f(Reference)i(P)m(ole.)48 -b(XP)33 b(is)e(p)s(ositiv)m(e)h(along)h(the)g(meridian)d(at)k -(longitude)427 577 y(0)472 544 y Fp(\016)512 577 y FD(,)i(and)e(YP)g -(is)g(p)s(ositiv)m(e)f(along)i(the)g(meridian)d(at)j(longitude)e(270) -2798 544 y Fp(\016)2873 577 y FD(\()p Fq(i.e.)i FD(90)3159 -544 y Fp(\016)3233 577 y FD(w)m(est\).)54 b(V)-8 b(alues)427 -690 y(for)43 b(XP)-8 b(,YP)44 b(can)g(b)s(e)e(obtained)h(from)g(IERS)f -(circulars)g(and)g(equiv)-5 b(alen)m(t)43 b(publications;)k(the)427 -803 y(maxim)m(um)30 b(amplitude)e(observ)m(ed)i(so)h(far)f(is)f(ab)s -(out)i(0)2298 766 y Fk(0)l(0)2302 803 y Fl(:)p FD(3.)311 -957 y(3.)46 b(\\T)-8 b(rue")41 b(longitude)e(and)g(latitude)g(are)i -(the)f(\(mo)m(ving\))h(v)-5 b(alues)40 b(for)g(the)g(site's)g(lo)s -(cation)g(with)427 1070 y(resp)s(ect)f(to)h(the)f(celestial)f -(ephemeris)f(p)s(ole)h(and)g(the)h(meridian)e(whic)m(h)g(corresp)s -(onds)h(to)h(the)427 1182 y(Green)m(wic)m(h)24 b(apparen)m(t)h -(sidereal)d(time.)39 b(The)23 b(true)h(longitude)f(and)g(latitude)g -(link)f(the)i(terrestrial)427 1295 y(co)s(ordinates)h(with)f(the)h -(standard)f(celestial)h(mo)s(dels)e(\(for)i(precession,)h(n)m(utation,) -g(sidereal)e(time)427 1408 y Fq(etc)p FD(\).)311 1562 -y(4.)46 b(The)30 b(azim)m(uths)g(pro)s(duced)f(b)m(y)h(sla)p -Ft(_)p FD(A)m(OP)g(and)g(sla)p Ft(_)p FD(A)m(OPQK)g(are)g(with)g(resp)s -(ect)g(to)h(due)f(north)427 1675 y(as)42 b(de\014ned)e(b)m(y)i(the)g -(Celestial)e(Ephemeris)g(P)m(ole,)45 b(and)c(can)h(therefore)g(b)s(e)f -(called)f(\\celestial)427 1788 y(azim)m(uths".)75 b(Ho)m(w)m(ev)m(er,) -46 b(a)c(telescop)s(e)g(\014xed)f(to)i(the)f(Earth)f(measures)g(azim)m -(uth)g(essen)m(tially)427 1901 y(with)31 b(resp)s(ect)g(to)i(due)e -(north)g(as)h(de\014ned)e(b)m(y)i(the)g(IERS)f(Reference)h(P)m(ole,)h -(and)e(can)h(therefore)427 2014 y(b)s(e)27 b(called)f(\\terrestrial)h -(azim)m(uth".)40 b(Uncorrected,)28 b(this)e(w)m(ould)g(manifest)h -(itself)f(as)h(a)h(c)m(hanging)427 2127 y(\\azim)m(uth)c(zero-p)s(oin)m -(t)f(error".)38 b(The)23 b(v)-5 b(alue)23 b(D)m(AZ)g(is)g(the)g -(correction)g(to)h(b)s(e)f(added)f(to)i(a)g(celestial)427 -2240 y(azim)m(uth)30 b(to)h(pro)s(duce)f(a)g(terrestrial)g(azim)m(uth.) -311 2393 y(5.)46 b(The)28 b(presen)m(t)g(routine)f(is)g(rigorous.)39 -b(F)-8 b(or)29 b(most)g(practical)e(purp)s(oses,)g(the)i(follo)m(wing)d -(simpli\014ed)427 2506 y(form)m(ulae)k(pro)m(vide)g(an)g(adequate)h -(appro)m(ximation:)568 2689 y Ft(ELONG)98 b(=)i -(ELONGM+XP*COS\(ELONGM\)-Y)o(P*SI)o(N\(E)o(LONG)o(M\))568 -2802 y(PHI)194 b(=)100 b(PHIM+\(XP*SIN\(ELONGM\)+YP)o(*COS)o(\(EL)o -(ONGM)o(\)\)*)o(TAN\()o(PHIM)o(\))568 2915 y(DAZ)194 -b(=)100 b(-SQRT\(XP*XP+YP*YP\)*COS\()o(ELON)o(GM-)o(ATAN)o(2\(X)o(P,YP) -o(\)\)/C)o(OS\()o(PHIM)o(\))427 3099 y FD(An)30 b(alternativ)m(e)h -(form)m(ulation)e(for)h(D)m(AZ)h(is:)568 3265 y Ft(X)195 -b(=)99 b(COS\(ELONGM\)*COS\(PHIM\))568 3377 y(Y)195 b(=)99 -b(SIN\(ELONGM\)*COS\(PHIM\))568 3490 y(DAZ)g(=)g -(ATAN2\(-X*YP-Y*XP,X*X+Y*Y\))0 3888 y FB(REFERENCE)44 -b FD(:)50 b(Seidelmann,)33 b(P)-8 b(.K.)36 b(\(ed\),)g(1992.)56 -b Fq(Explanatory)39 b(Supplement)f(to)g(the)f(Astr)-5 -b(onomic)g(al)227 4001 y(A)n(lmanac,)31 b FD(ISBN)f(0-935702-68-7,)36 -b(sections)31 b(3.27,)h(4.25,)g(4.52.)p 0 4149 3780 8 -v 0 4262 a Fx(SLA)p Fn(_)p Fx(PREBN)451 b Fm(Precession)38 -b(Matrix)f(\(FK4\))451 b Fx(SLA)p Fn(_)p Fx(PREBN)0 4612 -y FB(A)m(CTION)44 b FD(:)36 b(Generate)24 b(the)e(matrix)g(of)g -(precession)f(b)s(et)m(w)m(een)i(t)m(w)m(o)g(ep)s(o)s(c)m(hs,)h(using)d -(the)h(old,)h(pre)f(IA)m(U)g(1976,)227 4725 y(Bessel-New)m(com)m(b)32 -b(mo)s(del,)e(in)f(Ando)m(y)m(er's)i(form)m(ulation.)0 -4913 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PREBN)g(\(BEP0,)g(BEP1,) -g(RMATP\))0 5285 y FB(GIVEN)f FD(:)277 5431 y Fq(BEP0)502 -b FB(D)565 b FD(b)s(eginning)28 b(Besselian)i(ep)s(o)s(c)m(h)277 -5544 y Fq(BEP1)502 b FB(D)565 b FD(ending)29 b(Besselian)h(ep)s(o)s(c)m -(h)p eop -%%Page: 128 130 -128 129 bop 0 52 a FD(128)0 351 y FB(RETURNED)46 b FD(:)277 -523 y Fq(RMA)-7 b(TP)400 b FB(D\(3,3\))350 b FD(precession)30 -b(matrix)0 814 y FB(NOTE)44 b FD(:)d(The)30 b(matrix)f(is)h(in)f(the)h -(sense:)427 992 y FB(v)482 1006 y Fu(1)552 992 y FD(=)g -FB(M)p Fo(\001)p FB(v)832 1006 y Fu(0)227 1170 y FD(where)i -FB(v)547 1184 y Fu(1)619 1170 y FD(is)f(the)i(star)f(v)m(ector)i -(relativ)m(e)f(to)g(the)f(mean)h(equator)g(and)e(equino)m(x)h(of)h(ep)s -(o)s(c)m(h)f(BEP1,)h FB(M)227 1282 y FD(is)i(the)h(3)24 -b Fo(\002)f FD(3)36 b(matrix)f(RMA)-8 b(TP)36 b(and)f -FB(v)1642 1296 y Fu(0)1718 1282 y FD(is)f(the)i(star)g(v)m(ector)h -(relativ)m(e)f(to)g(the)g(mean)g(equator)g(and)227 1395 -y(equino)m(x)30 b(of)h(ep)s(o)s(c)m(h)f(BEP0.)0 1687 -y FB(REFERENCE)44 b FD(:)d(Smith)28 b Fq(et)33 b(al.)p -FD(,)e(1989.)i Fq(Astr.J.)d FB(97)p FD(,)h(269.)p 0 1789 -3780 8 v 0 1902 a Fx(SLA)p Fn(_)p Fx(PREC)555 b Fm(Precession)38 -b(Matrix)f(\(FK5\))554 b Fx(SLA)p Fn(_)p Fx(PREC)0 2253 -y FB(A)m(CTION)44 b FD(:)c(F)-8 b(orm)31 b(the)g(matrix)f(of)g -(precession)g(b)s(et)m(w)m(een)h(t)m(w)m(o)g(ep)s(o)s(c)m(hs)f(\(IA)m -(U)i(1976,)g(FK5\).)0 2440 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_PREC)g(\(EP0,)g(EP1,)h(RMATP\))0 2750 y FB(GIVEN)e -FD(:)277 2896 y Fq(EP0)566 b FB(D)f FD(b)s(eginning)28 -b(ep)s(o)s(c)m(h)277 3009 y Fq(EP1)566 b FB(D)f FD(ending)29 -b(ep)s(o)s(c)m(h)0 3292 y FB(RETURNED)46 b FD(:)277 3463 -y Fq(RMA)-7 b(TP)400 b FB(D\(3,3\))350 b FD(precession)30 -b(matrix)0 3755 y FB(NOTES)44 b FD(:)311 3933 y(1.)i(The)30 -b(ep)s(o)s(c)m(hs)g(are)h(TDB)g(Julian)d(ep)s(o)s(c)m(hs.)311 -4069 y(2.)46 b(The)30 b(matrix)g(is)f(in)g(the)i(sense:)597 -4205 y FB(v)652 4219 y Fu(1)722 4205 y FD(=)f FB(M)p -Fo(\001)p FB(v)1002 4219 y Fu(0)427 4341 y FD(where)i -FB(v)747 4355 y Fu(1)818 4341 y FD(is)g(the)g(star)g(v)m(ector)i -(relativ)m(e)e(to)h(the)f(mean)g(equator)h(and)e(equino)m(x)h(of)g(ep)s -(o)s(c)m(h)g(EP1,)427 4454 y FB(M)c FD(is)e(the)i(3)14 -b Fo(\002)g FD(3)27 b(matrix)g(RMA)-8 b(TP)28 b(and)e -FB(v)1899 4468 y Fu(0)1966 4454 y FD(is)h(the)g(star)h(v)m(ector)g -(relativ)m(e)g(to)g(the)f(mean)h(equator)427 4567 y(and)i(equino)m(x)g -(of)g(ep)s(o)s(c)m(h)h(EP0.)311 4703 y(3.)46 b(Though)d(the)i(matrix)e -(metho)s(d)h(itself)f(is)g(rigorous,)k(the)d(precession)f(angles)h(are) -h(expressed)427 4816 y(through)34 b(canonical)h(p)s(olynomials)d(whic)m -(h)h(are)j(v)-5 b(alid)33 b(only)h(for)g(a)i(limited)c(time)j(span.)53 -b(There)427 4928 y(are)45 b(also)f(kno)m(wn)g(errors)f(in)g(the)h(IA)m -(U)h(precession)e(rate.)83 b(The)44 b(absolute)g(accuracy)h(of)f(the) -427 5041 y(presen)m(t)28 b(form)m(ulation)f(is)g(b)s(etter)h(than)f(0) -1835 5004 y Fk(0)l(0)1839 5041 y Fl(:)p FD(1)i(from)e(1960)17 -b(AD)29 b(to)f(2040)17 b(AD,)29 b(b)s(etter)f(than)f(1)3526 -5004 y Fk(0)m(0)3595 5041 y FD(from)427 5154 y(1640)17 -b(AD)39 b(to)g(2360)17 b(AD,)40 b(and)d(remains)h(b)s(elo)m(w)f(3)2155 -5117 y Fk(0)l(0)2234 5154 y FD(for)h(the)h(whole)f(of)g(the)h(p)s(erio) -s(d)d(500)16 b(BC)39 b(to)427 5267 y(3000)17 b(AD.)34 -b(The)e(errors)h(exceed)h(10)1649 5230 y Fk(0)m(0)1723 -5267 y FD(outside)e(the)h(range)h(1200)17 b(BC)32 b(to)i(3900)17 -b(AD,)34 b(exceed)g(100)3738 5230 y Fk(0)m(0)427 5380 -y FD(outside)45 b(4200)17 b(BC)45 b(to)h(5600)16 b(AD)46 -b(and)f(exceed)h(1000)2305 5343 y Fk(0)m(0)2392 5380 -y FD(outside)e(6800)17 b(BC)45 b(to)h(8200)17 b(AD.)46 -b(The)427 5493 y(SLALIB)37 b(routine)f(sla)p Ft(_)p FD(PRECL)g -(implemen)m(ts)f(a)j(more)f(elab)s(orate)h(mo)s(del)e(whic)m(h)g(is)g -(suitable)427 5606 y(for)30 b(problems)f(spanning)f(sev)m(eral)j -(thousand)f(y)m(ears.)p eop -%%Page: 129 131 -129 130 bop 0 52 a Fw(SUN/67.70)3206 b FD(129)0 351 y -FB(REFERENCES)44 b FD(:)311 554 y(1.)i(Liesk)m(e,)31 -b(J.H.,)g(1979.)h Fq(Astr.Astr)-5 b(ophys.)33 b FB(73)p -FD(,)e(282;)h(equations)e(6)h(&)f(7,)h(p283.)311 708 -y(2.)46 b(Kaplan,)30 b(G.H.,)h(1981.)i Fq(USNO)e(cir)-5 -b(cular)34 b(no.)f(163)p FD(,)f(pA2.)p 0 856 3780 8 v -0 969 a Fx(SLA)p Fn(_)p Fx(PRECES)765 b Fm(Precession)f -Fx(SLA)p Fn(_)p Fx(PRECES)0 1319 y FB(A)m(CTION)44 b -FD(:)39 b(Precession)26 b({)h(either)f(the)g(old)g(\\FK4")i -(\(Bessel-New)m(com)m(b,)i(pre)c(IA)m(U)h(1976\))i(or)d(new)g(\\FK5") -227 1432 y(\(F)-8 b(ric)m(k)m(e,)33 b(p)s(ost)d(IA)m(U)h(1976\))h(as)f -(required.)0 1620 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_PRECES)f(\(SYSTEM,)h(EP0,)h(EP1,)f(RA,)h(DC\))0 -1993 y FB(GIVEN)e FD(:)277 2139 y Fq(SYSTEM)357 b FB(C)569 -b FD(precession)30 b(to)h(b)s(e)f(applied:)38 b(`FK4')31 -b(or)g(`FK5')277 2252 y Fq(EP0,EP1)368 b FB(D)565 b FD(starting)30 -b(and)g(ending)f(ep)s(o)s(c)m(h)277 2365 y Fq(RA,DC)440 -b FB(D)565 b FD([)15 b Fl(\013;)g(\016)20 b FD(],)31 -b(mean)g(equator)g(&)f(equino)m(x)g(of)g(ep)s(o)s(c)m(h)g(EP0)0 -2757 y FB(RETURNED)46 b FD(:)277 2928 y Fq(RA,DC)440 -b FB(D)565 b FD([)15 b Fl(\013;)g(\016)20 b FD(],)31 -b(mean)g(equator)g(&)f(equino)m(x)g(of)g(ep)s(o)s(c)m(h)g(EP1)0 -3329 y FB(NOTES)44 b FD(:)311 3532 y(1.)i(Lo)m(w)m(ercase)33 -b(c)m(haracters)e(in)e(SYSTEM)h(are)h(acceptable.)311 -3685 y(2.)46 b(The)36 b(ep)s(o)s(c)m(hs)g(are)g(Besselian)g(if)f -(SYSTEM=`FK4')h(and)f(Julian)f(if)h(`FK5'.)59 b(F)-8 -b(or)37 b(example,)h(to)427 3798 y(precess)d(co)s(ordinates)g(in)e(the) -i(old)f(system)h(from)g(equino)m(x)f(1900.0)j(to)f(1950.0)h(the)f(call) -e(w)m(ould)427 3911 y(b)s(e:)597 4065 y Ft(CALL)47 b(sla_PRECES)e -(\('FK4',)h(1900D0,)g(1950D0,)f(RA,)i(DC\))311 4219 y -FD(3.)f(This)39 b(routine)h(will)e FB(NOT)i FD(correctly)i(con)m(v)m -(ert)g(b)s(et)m(w)m(een)f(the)h(old)e(and)g(the)h(new)f(systems)h({)427 -4332 y(for)h(example)g(con)m(v)m(ersion)g(from)g(B1950)i(to)e(J2000.)78 -b(F)-8 b(or)42 b(these)h(purp)s(oses)d(see)j(sla)p Ft(_)p -FD(FK425,)427 4445 y(sla)p Ft(_)p FD(FK524,)32 b(sla)p -Ft(_)p FD(FK45Z)e(and)f(sla)p Ft(_)p FD(FK54Z.)311 4599 -y(4.)46 b(If)27 b(an)h(in)m(v)-5 b(alid)25 b(SYSTEM)h(is)h(supplied,)e -(v)-5 b(alues)27 b(of)g Fo(\000)p FD(99D0,)p Fo(\000)p -FD(99D0)k(are)d(returned)e(for)i(b)s(oth)e(RA)427 4711 -y(and)k(DC.)p 0 4842 V 0 4955 a Fx(SLA)p Fn(_)p Fx(PRECL)447 -b Fm(Precession)37 b(Matrix)h(\(latest\))444 b Fx(SLA)p -Fn(_)p Fx(PRECL)0 5305 y FB(A)m(CTION)44 b FD(:)k(F)-8 -b(orm)35 b(the)f(matrix)f(of)i(precession)e(b)s(et)m(w)m(een)i(t)m(w)m -(o)g(ep)s(o)s(c)m(hs,)g(using)e(the)h(mo)s(del)f(of)h(Simon)f -Fq(et)227 5418 y(al)p FD(.)f(\(1994\),)h(whic)m(h)c(is)g(suitable)g -(for)h(long)g(p)s(erio)s(ds)e(of)j(time.)0 5606 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_PRECL)g(\(EP0,)g(EP1,)h(RMATP\))p -eop -%%Page: 130 132 -130 131 bop 0 52 a FD(130)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(EP0)566 b FB(D)f FD(b)s(eginning)28 b(ep)s(o)s(c)m(h)277 -610 y Fq(EP1)566 b FB(D)f FD(ending)29 b(ep)s(o)s(c)m(h)0 -1014 y FB(RETURNED)46 b FD(:)277 1186 y Fq(RMA)-7 b(TP)400 -b FB(D\(3,3\))350 b FD(precession)30 b(matrix)0 1598 -y FB(NOTES)44 b FD(:)311 1806 y(1.)i(The)30 b(ep)s(o)s(c)m(hs)g(are)h -(TDB)g(Julian)d(ep)s(o)s(c)m(hs.)311 1962 y(2.)46 b(The)30 -b(matrix)g(is)f(in)g(the)i(sense:)597 2119 y FB(v)652 -2133 y Fu(1)722 2119 y FD(=)f FB(M)p Fo(\001)p FB(v)1002 -2133 y Fu(0)427 2275 y FD(where)i FB(v)747 2289 y Fu(1)818 -2275 y FD(is)g(the)g(star)g(v)m(ector)i(relativ)m(e)e(to)h(the)f(mean)g -(equator)h(and)e(equino)m(x)h(of)g(ep)s(o)s(c)m(h)g(EP1,)427 -2388 y FB(M)c FD(is)e(the)i(3)14 b Fo(\002)g FD(3)27 -b(matrix)g(RMA)-8 b(TP)28 b(and)e FB(v)1899 2402 y Fu(0)1966 -2388 y FD(is)h(the)g(star)h(v)m(ector)g(relativ)m(e)g(to)g(the)f(mean)h -(equator)427 2501 y(and)i(equino)m(x)g(of)g(ep)s(o)s(c)m(h)h(EP0.)311 -2657 y(3.)46 b(The)f(absolute)f(accuracy)i(of)f(the)g(mo)s(del)f(is)g -(limited)f(b)m(y)i(the)g(uncertain)m(t)m(y)g(in)e(the)i(general)427 -2770 y(precession,)37 b(ab)s(out)f(0)1196 2733 y Fk(0)l(0)1200 -2770 y Fl(:)p FD(3)h(p)s(er)e(1000)i(y)m(ears.)58 b(The)36 -b(remainder)e(of)i(the)g(form)m(ulation)f(pro)m(vides)g(a)427 -2883 y(precision)j(of)i(1)g(milliarcsecond)d(o)m(v)m(er)k(the)f(in)m -(terv)-5 b(al)38 b(from)h(1000)17 b(AD)41 b(to)f(3000)17 -b(AD,)40 b(0)3480 2846 y Fk(0)m(0)3484 2883 y Fl(:)p -FD(1)h(from)427 2996 y(1000)17 b(BC)31 b(to)g(5000)17 -b(AD)31 b(and)e(1)1477 2959 y Fk(0)m(0)1548 2996 y FD(from)h(4000)17 -b(BC)31 b(to)g(8000)17 b(AD.)0 3408 y FB(REFERENCE)44 -b FD(:)d(Simon,)29 b(J.L.)h Fq(et)j(al)p FD(.,)e(1994.)i -Fq(Astr.Astr)-5 b(ophys.)32 b FB(282)p FD(,)g(663.)p -0 3561 3780 8 v 0 3674 a Fx(SLA)p Fn(_)p Fx(PRENUT)279 -b Fm(Precession-Nutation)35 b(Matrix)278 b Fx(SLA)p Fn(_)p -Fx(PRENUT)0 4024 y FB(A)m(CTION)44 b FD(:)c(F)-8 b(orm)31 -b(the)g(matrix)f(of)g(precession)g(and)f(n)m(utation)i(\(SF2001\).)0 -4212 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PRENUT)f(\(EPOCH,)h -(DATE,)h(RMATPN\))0 4592 y FB(GIVEN)e FD(:)277 4738 y -Fq(EPOCH)409 b FB(D)565 b FD(Julian)28 b(Ep)s(o)s(c)m(h)i(for)g(mean)g -(co)s(ordinates)277 4851 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 -b FD(Mo)s(di\014ed)29 b(Julian)g(Date)j(\(JD)p Fo(\000)p -FD(2400000.5\))j(for)30 b(true)h(co-)1658 4964 y(ordinates)0 -5368 y FB(RETURNED)46 b FD(:)277 5539 y Fq(RMA)-7 b(TPN)332 -b FB(D\(3,3\))350 b FD(com)m(bined)30 b(precession-n)m(utation)f -(matrix)p eop -%%Page: 131 133 -131 132 bop 0 52 a Fw(SUN/67.70)3206 b FD(131)0 351 y -FB(NOTES)44 b FD(:)311 576 y(1.)i(The)30 b(ep)s(o)s(c)m(h)g(and)g(date) -h(are)g(TDB.)g(TT)e(\(or)i(ev)m(en)g(UTC\))f(will)e(do.)311 -741 y(2.)46 b(The)30 b(matrix)g(is)f(in)g(the)i(sense:)597 -906 y FB(v)652 920 y Ff(tr)r(ue)820 906 y FD(=)f FB(M)p -Fo(\001)p FB(v)1100 920 y Ff(mean)427 1071 y FD(where)23 -b FB(v)738 1085 y Ff(tr)r(ue)898 1071 y FD(is)g(the)g(star)g(v)m(ector) -i(relativ)m(e)e(to)h(the)g(true)f(equator)h(and)e(equino)m(x)h(of)g(ep) -s(o)s(c)m(h)g(D)m(A)-8 b(TE,)427 1184 y FB(M)35 b FD(is)e(the)h(3)23 -b Fo(\002)g FD(3)34 b(matrix)g(RMA)-8 b(TPN)34 b(and)g -FB(v)2033 1198 y Ff(mean)2246 1184 y FD(is)g(the)g(star)g(v)m(ector)i -(relativ)m(e)e(to)h(the)f(mean)427 1297 y(equator)d(and)f(equino)m(x)g -(of)g(ep)s(o)s(c)m(h)h(EPOCH.)p 0 1467 3780 8 v 0 1580 -a Fx(SLA)p Fn(_)p Fx(PV2EL)100 b Fm(Orbital)37 b(Elemen)m(ts)f(from)h -(P)m(osition/V)-10 b(elo)s(cit)m(y)96 b Fx(SLA)p Fn(_)p -Fx(PV2EL)0 1930 y FB(A)m(CTION)44 b FD(:)36 b(Helio)s(cen)m(tric)22 -b(osculating)g(elemen)m(ts)g(obtained)g(from)f(instan)m(taneous)h(p)s -(osition)f(and)g(v)m(elo)s(cit)m(y)-8 b(.)0 2118 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_PV2EL)g(\(PV,)g(DATE,)h(PMASS,)f(JFORMR,)g -(JFORM,)g(EPOCH,)g(ORBINC,)1192 2231 y(ANODE,)f(PERIH,)i(AORQ,)f(E,)h -(AORL,)f(DM,)h(JSTAT\))0 2637 y FB(GIVEN)e FD(:)277 2783 -y Fq(PV)606 b FB(D\(6\))431 b FD(helio)s(cen)m(tric)29 -b([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 b FD(_)-43 b Fl(x)r(;)32 -b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 b FD(],)31 -b(equatorial,)f(J2000)1825 2896 y(\(A)m(U,)i(A)m(U/s;)f(Note)h(1\))277 -3009 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(date)29 b(\(TT)f(Mo)s -(di\014ed)e(Julian)g(Date)k(=)e(JD)p Fo(\000)p FD(2400000.5\))277 -3122 y Fq(PMASS)422 b FB(D)565 b FD(mass)30 b(of)h(the)f(planet)g -(\(Sun)f(=)h(1;)h(Note)h(2\))277 3235 y Fq(JF)n(ORMR)347 -b FB(I)605 b FD(requested)30 b(elemen)m(t)h(set)g(\(1-3;)h(Note)g(3\))0 -3682 y FB(RETURNED)46 b FD(:)277 3828 y Fq(JF)n(ORM)413 -b FB(I)605 b FD(elemen)m(t)31 b(set)g(actually)f(returned)f(\(1-3;)j -(Note)g(4\))277 3941 y Fq(EPOCH)409 b FB(D)565 b FD(ep)s(o)s(c)m(h)30 -b(of)h(elemen)m(ts)g(\()p Fl(t)2462 3955 y Fu(0)2531 -3941 y FD(or)g Fl(T)13 b FD(,)30 b(TT)g(MJD\))277 4054 -y Fq(ORBINC)368 b FB(D)565 b FD(inclination)28 b(\()p -Fl(i)p FD(,)j(radians\))277 4167 y Fq(ANODE)399 b FB(D)565 -b FD(longitude)29 b(of)i(the)f(ascending)g(no)s(de)g(\(\012,)g -(radians\))277 4280 y Fq(PERIH)443 b FB(D)565 b FD(longitude)29 -b(or)i(argumen)m(t)f(of)h(p)s(erihelion)c(\()p Fl($)33 -b FD(or)e Fl(!)s FD(,)1825 4393 y(radians\))277 4506 -y Fq(A)n(OR)n(Q)466 b FB(D)565 b FD(mean)30 b(distance)f(or)g(p)s -(erihelion)d(distance)k(\()p Fl(a)f FD(or)h Fl(q)s FD(,)g(A)m(U\))277 -4619 y Fq(E)674 b FB(D)565 b FD(eccen)m(tricit)m(y)32 -b(\()p Fl(e)p FD(\))277 4732 y Fq(A)n(ORL)477 b FB(D)565 -b FD(mean)31 b(anomaly)f(or)g(longitude)f(\()p Fl(M)41 -b FD(or)30 b Fl(L)p FD(,)h(radians,)1825 4844 y(JF)m(ORM=1,2)g(only\)) -277 4957 y Fq(DM)585 b FB(D)565 b FD(daily)29 b(motion)h(\()p -Fl(n)p FD(,)g(radians,)g(JF)m(ORM=1)h(only\))277 5070 -y Fq(JST)-7 b(A)g(T)453 b FB(I)605 b FD(status:)1898 -5183 y(0)30 b(=)g(OK)1825 5296 y Fo(\000)p FD(1)g(=)g(illegal)f(PMASS) -1825 5409 y Fo(\000)p FD(2)h(=)g(illegal)f(JF)m(ORMR)1825 -5522 y Fo(\000)p FD(3)h(=)g(p)s(osition/v)m(elo)s(cit)m(y)g(out)g(of)h -(allo)m(w)m(ed)f(range)p eop -%%Page: 132 134 -132 133 bop 0 52 a FD(132)0 351 y FB(NOTES)44 b FD(:)311 -539 y(1.)i(The)22 b(PV)g(6-v)m(ector)i(is)d(with)f(resp)s(ect)i(to)h -(the)f(mean)g(equator)g(and)g(equino)m(x)f(of)h(ep)s(o)s(c)m(h)g -(J2000.)39 b(The)427 652 y(orbital)29 b(elemen)m(ts)i(pro)s(duced)e -(are)i(with)e(resp)s(ect)h(to)h(the)g(J2000)h(ecliptic)d(and)h(mean)g -(equino)m(x.)311 798 y(2.)46 b(The)e(mass,)j(PMASS,)c(is)g(imp)s(ortan) -m(t)g(only)g(for)g(the)h(larger)g(planets.)80 b(F)-8 -b(or)44 b(most)g(purp)s(oses)427 911 y(\()p Fq(e.g.)30 -b FD(asteroids\))h(use)f(0D0.)42 b(V)-8 b(alues)30 b(less)g(than)g -(zero)h(are)g(illegal.)311 1058 y(3.)46 b(Three)30 b(di\013eren)m(t)g -(elemen)m(t-format)i(options)d(are)i(supp)s(orted,)e(as)h(follo)m(ws.) -427 1300 y(JF)m(ORM=1,)h(suitable)e(for)i(the)f(ma)5 -b(jor)30 b(planets:)602 1492 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 -b(of)h(elemen)m(ts)f Fl(t)1910 1506 y Fu(0)1980 1492 -y FD(\(TT)g(MJD\))602 1605 y(ORBINC)45 b(=)55 b(inclination)27 -b Fl(i)k FD(\(radians\))602 1718 y(ANODE)76 b(=)55 b(longitude)29 -b(of)h(the)h(ascending)f(no)s(de)f(\012)h(\(radians\))602 -1831 y(PERIH)122 b(=)55 b(longitude)29 b(of)h(p)s(erihelion)d -Fl($)34 b FD(\(radians\))602 1944 y(A)m(OR)m(Q)143 b(=)55 -b(mean)30 b(distance)g Fl(a)h FD(\(A)m(U\))602 2057 y(E)352 -b(=)55 b(eccen)m(tricit)m(y)31 b Fl(e)g FD(\(0)26 b Fo(\024)f -Fl(e)h(<)f FD(1\))602 2170 y(A)m(ORL)154 b(=)55 b(mean)30 -b(longitude)f Fl(L)i FD(\(radians\))602 2282 y(DM)262 -b(=)55 b(daily)29 b(motion)h Fl(n)g FD(\(radians\))427 -2474 y(JF)m(ORM=2,)h(suitable)e(for)i(minor)d(planets:)602 -2667 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(elemen)m(ts)f -Fl(t)1910 2681 y Fu(0)1980 2667 y FD(\(TT)g(MJD\))602 -2779 y(ORBINC)45 b(=)55 b(inclination)27 b Fl(i)k FD(\(radians\))602 -2892 y(ANODE)76 b(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de) -f(\012)h(\(radians\))602 3005 y(PERIH)122 b(=)55 b(argumen)m(t)31 -b(of)f(p)s(erihelion)d Fl(!)33 b FD(\(radians\))602 3118 -y(A)m(OR)m(Q)143 b(=)55 b(mean)30 b(distance)g Fl(a)h -FD(\(A)m(U\))602 3231 y(E)352 b(=)55 b(eccen)m(tricit)m(y)31 -b Fl(e)g FD(\(0)26 b Fo(\024)f Fl(e)h(<)f FD(1\))602 -3344 y(A)m(ORL)154 b(=)55 b(mean)30 b(anomaly)h Fl(M)40 -b FD(\(radians\))427 3536 y(JF)m(ORM=3,)31 b(suitable)e(for)i(comets:) -602 3728 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(p)s(erihelion)c -Fl(T)43 b FD(\(TT)30 b(MJD\))602 3841 y(ORBINC)45 b(=)55 -b(inclination)27 b Fl(i)k FD(\(radians\))602 3954 y(ANODE)76 -b(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de)f(\012)h -(\(radians\))602 4067 y(PERIH)122 b(=)55 b(argumen)m(t)31 -b(of)f(p)s(erihelion)d Fl(!)33 b FD(\(radians\))602 4180 -y(A)m(OR)m(Q)143 b(=)55 b(p)s(erihelion)27 b(distance)j -Fl(q)j FD(\(A)m(U\))602 4293 y(E)352 b(=)55 b(eccen)m(tricit)m(y)31 -b Fl(e)g FD(\(0)26 b Fo(\024)f Fl(e)h Fo(\024)f FD(10\))311 -4485 y(4.)46 b(It)26 b(ma)m(y)g(not)g(b)s(e)f(p)s(ossible)e(to)j -(generate)h(elemen)m(ts)f(in)f(the)g(form)g(requested)h(through)f(JF)m -(ORMR.)427 4598 y(The)45 b(caller)f(is)g(noti\014ed)g(of)h(the)g(form)f -(of)h(elemen)m(ts)g(actually)g(returned)f(b)m(y)g(means)h(of)g(the)427 -4711 y(JF)m(ORM)31 b(argumen)m(t:)554 4903 y(JF)m(ORMR)119 -b(JF)m(ORM)234 b(meaning)705 5128 y(1)465 b(1)362 b(OK:)30 -b(elemen)m(ts)g(are)h(in)e(the)i(requested)f(format)705 -5241 y(1)465 b(2)362 b(nev)m(er)30 b(happ)s(ens)705 5354 -y(1)465 b(3)362 b(orbit)29 b(not)i(elliptical)705 5467 -y(2)465 b(1)362 b(nev)m(er)30 b(happ)s(ens)705 5580 y(2)465 -b(2)362 b(OK:)30 b(elemen)m(ts)g(are)h(in)e(the)i(requested)f(format) -705 5693 y(2)465 b(3)362 b(orbit)29 b(not)i(elliptical)p -eop -%%Page: 133 135 -133 134 bop 0 52 a Fw(SUN/67.70)3206 b FD(133)705 351 -y(3)465 b(1)362 b(nev)m(er)30 b(happ)s(ens)705 464 y(3)465 -b(2)362 b(nev)m(er)30 b(happ)s(ens)705 577 y(3)465 b(3)362 -b(OK:)30 b(elemen)m(ts)g(are)h(in)e(the)i(requested)f(format)311 -840 y(5.)46 b(The)30 b(argumen)m(ts)h(returned)f(for)g(eac)m(h)i(v)-5 -b(alue)31 b(of)f(JF)m(ORM)i(\()p Fq(cf.)41 b FD(Note)32 -b(5:)42 b(JF)m(ORM)31 b(ma)m(y)g(not)g(b)s(e)427 953 -y(the)g(same)g(as)f(JF)m(ORMR\))h(are)g(as)g(follo)m(ws:)602 -1217 y(JF)m(ORM)282 b(1)273 b(2)g(3)602 1443 y(EPOCH)k -Fl(t)1241 1457 y Fu(0)1526 1443 y Fl(t)1559 1457 y Fu(0)1844 -1443 y Fl(T)602 1556 y FD(ORBINC)237 b Fl(i)287 b(i)g(i)602 -1668 y FD(ANODE)268 b(\012)252 b(\012)g(\012)602 1781 -y(PERIH)314 b Fl($)243 b(!)261 b(!)602 1894 y FD(A)m(OR)m(Q)335 -b Fl(a)270 b(a)g(q)602 2007 y FD(E)544 b Fl(e)276 b(e)g(e)602 -2120 y FD(A)m(ORL)346 b Fl(L)256 b(M)230 b FD(-)602 2233 -y(DM)454 b Fl(n)263 b FD(-)288 b(-)427 2496 y(where:)602 -2717 y Fl(t)635 2731 y Fu(0)1016 2717 y FD(is)29 b(the)i(ep)s(o)s(c)m -(h)f(of)g(the)h(elemen)m(ts)g(\(MJD,)g(TT\))602 2830 -y Fl(T)361 b FD(is)29 b(the)i(ep)s(o)s(c)m(h)f(of)g(p)s(erihelion)d -(\(MJD,)32 b(TT\))602 2943 y Fl(i)383 b FD(is)29 b(the)i(inclination)c -(\(radians\))602 3056 y(\012)348 b(is)29 b(the)i(longitude)e(of)h(the)h -(ascending)e(no)s(de)h(\(radians\))602 3169 y Fl($)339 -b FD(is)29 b(the)i(longitude)e(of)h(p)s(erihelion)d(\(radians\))602 -3282 y Fl(!)357 b FD(is)29 b(the)i(argumen)m(t)f(of)h(p)s(erihelion)c -(\(radians\))602 3394 y Fl(a)366 b FD(is)29 b(the)i(mean)f(distance)g -(\(A)m(U\))602 3507 y Fl(q)373 b FD(is)29 b(the)i(p)s(erihelion)c -(distance)j(\(A)m(U\))602 3620 y Fl(e)372 b FD(is)29 -b(the)i(eccen)m(tricit)m(y)602 3733 y Fl(L)352 b FD(is)29 -b(the)i(longitude)e(\(radians,)g(0)21 b Fo(\000)f FD(2)p -Fl(\031)s FD(\))602 3846 y Fl(M)326 b FD(is)29 b(the)i(mean)f(anomaly)g -(\(radians,)g(0)20 b Fo(\000)g FD(2)p Fl(\031)s FD(\))602 -3959 y Fl(n)359 b FD(is)29 b(the)i(daily)d(motion)i(\(radians\))602 -4072 y(-)384 b(means)30 b(no)g(v)-5 b(alue)30 b(is)f(set)311 -4293 y(6.)46 b(A)m(t)c(v)m(ery)g(small)e(inclinations,)h(the)h -(longitude)e(of)h(the)g(ascending)g(no)s(de)g(ANODE)g(b)s(ecomes)427 -4405 y(indeterminate)36 b(and)g(under)f(some)i(circumstances)f(ma)m(y)h -(b)s(e)f(set)h(arbitrarily)d(to)j(zero.)60 b(Simi-)427 -4518 y(larly)-8 b(,)38 b(if)d(the)i(orbit)f(is)f(close)i(to)h -(circular,)e(the)h(true)g(anomaly)f(b)s(ecomes)h(indeterminate)e(and) -427 4631 y(under)h(some)i(circumstances)g(ma)m(y)g(b)s(e)f(set)h -(arbitrarily)d(to)j(zero.)63 b(In)37 b(suc)m(h)g(cases,)j(the)e(other) -427 4744 y(elemen)m(ts)h(are)g(automatically)g(adjusted)f(to)i(comp)s -(ensate,)h(and)d(so)h(the)g(elemen)m(ts)g(remain)f(a)427 -4857 y(v)-5 b(alid)29 b(description)f(of)j(the)f(orbit.)311 -5039 y(7.)46 b(The)30 b(osculating)g(ep)s(o)s(c)m(h)g(for)g(the)h -(returned)e(elemen)m(ts)i(is)e(the)i(argumen)m(t)f(D)m(A)-8 -b(TE.)0 5580 y FB(REFERENCE)44 b FD(:)55 b(Sterne,)40 -b(Theo)s(dore)d(E.,)j Fq(A)n(n)e(Intr)-5 b(o)g(duction)42 -b(to)e(Celestial)g(Me)-5 b(chanics,)40 b FD(In)m(terscience)227 -5693 y(Publishers,)27 b(1960.)p eop -%%Page: 134 136 -134 135 bop 0 52 a FD(134)p 0 267 3780 8 v 0 380 a Fx(SLA)p -Fn(_)p Fx(PV2UE)91 b Fm(P)m(osition/V)-10 b(elo)s(cit)m(y)34 -b(to)k(Univ)m(ersal)e(Elemen)m(ts)90 b Fx(SLA)p Fn(_)p -Fx(PV2UE)0 730 y FB(A)m(CTION)44 b FD(:)39 b(Construct)26 -b(a)g(univ)m(ersal)f(elemen)m(t)i(set)g(based)f(on)g(an)h(instan)m -(taneous)f(p)s(osition)e(and)i(v)m(elo)s(cit)m(y)-8 b(.)0 -918 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_PV2UE)g(\(PV,)g(DATE,)h -(PMASS,)f(U,)h(JSTAT\))0 1269 y FB(GIVEN)e FD(:)277 1416 -y Fq(PV)606 b FB(D\(6\))431 b FD(helio)s(cen)m(tric)29 -b([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 b FD(_)-43 b Fl(x)r(;)32 -b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 b FD(],)31 -b(equatorial,)f(J2000)1825 1528 y(\(A)m(U,)i(A)m(U/s;)f(Note)h(1\))277 -1641 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(date)29 b(\(TT)f(Mo)s -(di\014ed)e(Julian)g(Date)k(=)e(JD)p Fo(\000)p FD(2400000.5\))277 -1754 y Fq(PMASS)422 b FB(D)565 b FD(mass)30 b(of)h(the)f(planet)g -(\(Sun)f(=)h(1;)h(Note)h(2\))0 2111 y FB(RETURNED)46 -b FD(:)277 2257 y Fq(U)668 b FB(D\(13\))379 b FD(univ)m(ersal)29 -b(orbital)g(elemen)m(ts)i(\(Note)h(3\))537 2370 y(\(1\))1006 -b(com)m(bined)30 b(mass)g(\()p Fl(M)h FD(+)20 b Fl(m)p -FD(\))537 2483 y(\(2\))1006 b(total)31 b(energy)g(of)g(the)f(orbit)g -(\()p Fl(\013)p FD(\))537 2596 y(\(3\))1006 b(reference)31 -b(\(osculating\))f(ep)s(o)s(c)m(h)h(\()p Fl(t)2869 2610 -y Fu(0)2908 2596 y FD(\))499 2709 y(\(4-6\))969 b(p)s(osition)29 -b(at)i(reference)g(ep)s(o)s(c)m(h)f(\()p FB(r)2836 2723 -y Fu(0)2876 2709 y FD(\))499 2822 y(\(7-9\))969 b(v)m(elo)s(cit)m(y)31 -b(at)g(reference)g(ep)s(o)s(c)m(h)f(\()p FB(v)2837 2836 -y Fu(0)2877 2822 y FD(\))514 2934 y(\(10\))984 b(helio)s(cen)m(tric)29 -b(distance)h(at)h(reference)g(ep)s(o)s(c)m(h)514 3047 -y(\(11\))984 b FB(r)1701 3061 y Fu(0)1741 3047 y Fl(:)p -FB(v)1821 3061 y Fu(0)514 3160 y FD(\(12\))g(date)31 -b(\()p Fl(t)p FD(\))514 3273 y(\(13\))984 b(univ)m(ersal)29 -b(eccen)m(tric)i(anomaly)f(\()p Fl( )s FD(\))i(of)e(date,)i(appro)m(x) -277 3386 y Fq(JST)-7 b(A)g(T)453 b FB(I)605 b FD(status:)1866 -3499 y(0)30 b(=)h(OK)1798 3612 y Fo(\000)p FD(1)f(=)g(illegal)f(PMASS) -1798 3725 y Fo(\000)p FD(2)h(=)g(to)s(o)h(close)g(to)g(Sun)1798 -3838 y Fo(\000)p FD(3)f(=)g(to)s(o)h(slo)m(w)0 4194 y -FB(NOTES)44 b FD(:)311 4383 y(1.)i(The)30 b(PV)h(6-v)m(ector)i(can)e(b) -s(e)e(with)h(resp)s(ect)g(to)h(an)m(y)g(c)m(hosen)g(inertial)e(frame,)i -(and)f(the)g(resulting)427 4496 y(univ)m(ersal-elemen)m(t)h(set)h(will) -d(b)s(e)h(with)h(resp)s(ect)g(to)h(the)g(same)g(frame.)44 -b(A)31 b(common)h(c)m(hoice)g(will)427 4609 y(b)s(e)e(mean)g(equator)h -(and)f(ecliptic)f(of)i(ep)s(o)s(c)m(h)f(J2000.)311 4756 -y(2.)46 b(The)e(mass,)j(PMASS,)c(is)g(imp)s(ortan)m(t)g(only)g(for)g -(the)h(larger)g(planets.)80 b(F)-8 b(or)44 b(most)g(purp)s(oses)427 -4869 y(\()p Fq(e.g.)30 b FD(asteroids\))h(use)f(0D0.)42 -b(V)-8 b(alues)30 b(less)g(than)g(zero)h(are)g(illegal.)311 -5016 y(3.)46 b(The)40 b(\\univ)m(ersal")f(elemen)m(ts)h(are)g(those)h -(whic)m(h)d(de\014ne)h(the)h(orbit)f(for)h(the)g(purp)s(oses)e(of)i -(the)427 5128 y(metho)s(d)32 b(of)g(univ)m(ersal)e(v)-5 -b(ariables)31 b(\(see)i(reference\).)47 b(They)32 b(consist)f(of)i(the) -f(com)m(bined)f(mass)h(of)427 5241 y(the)h(t)m(w)m(o)h(b)s(o)s(dies,)e -(an)g(ep)s(o)s(c)m(h,)h(and)f(the)h(p)s(osition)e(and)h(v)m(elo)s(cit)m -(y)h(v)m(ectors)h(\(arbitrary)e(reference)427 5354 y(frame\))j(at)g -(that)g(ep)s(o)s(c)m(h.)53 b(The)34 b(parameter)h(set)g(used)f(here)g -(includes)e(also)j(v)-5 b(arious)33 b(quan)m(tities)427 -5467 y(that)i(can,)g(in)d(fact,)k(b)s(e)d(deriv)m(ed)f(from)i(the)f -(other)h(information.)49 b(This)32 b(approac)m(h)i(is)f(tak)m(en)i(to) -427 5580 y(a)m(v)m(oiding)d(unnecessary)f(computation)h(and)g(loss)f -(of)h(accuracy)-8 b(.)48 b(The)31 b(supplemen)m(tary)g(quan)m(ti-)427 -5693 y(ties)22 b(are)h(\(i\))f Fl(\013)p FD(,)i(whic)m(h)d(is)g(prop)s -(ortional)f(to)j(the)g(total)g(energy)f(of)h(the)f(orbit,)h(\(ii\))e -(the)i(helio)s(cen)m(tric)p eop -%%Page: 135 137 -135 136 bop 0 52 a Fw(SUN/67.70)3206 b FD(135)427 351 -y(distance)35 b(at)g(ep)s(o)s(c)m(h,)h(\(iii\))d(the)i(out)m(w)m(ards)g -(comp)s(onen)m(t)g(of)g(the)g(v)m(elo)s(cit)m(y)g(at)h(the)f(giv)m(en)f -(ep)s(o)s(c)m(h,)427 464 y(\(iv\))29 b(an)f(estimate)h(of)g -Fl( )s FD(,)h(the)e(\\univ)m(ersal)g(eccen)m(tric)h(anomaly")g(at)g(a)g -(giv)m(en)g(date)g(and)f(\(v\))h(that)427 577 y(date.)0 -978 y FB(REFERENCE)44 b FD(:)d(Ev)m(erhart,)31 b(E.)f(&)g(Pitkin,)f -(E.T.,)h(Am.)h(J.)f(Ph)m(ys.)g(51,)i(712,)g(1983.)p 0 -1126 3780 8 v 0 1239 a Fx(SLA)p Fn(_)p Fx(PV)l(OBS)277 -b Fm(Observ)-7 b(atory)37 b(P)m(osition)f(&)j(V)-10 b(elo)s(cit)m(y)278 -b Fx(SLA)p Fn(_)p Fx(PV)l(OBS)0 1589 y FB(A)m(CTION)44 -b FD(:)c(P)m(osition)30 b(and)g(v)m(elo)s(cit)m(y)h(of)f(an)h -(observing)e(station.)0 1777 y FB(CALL)45 b FD(:)77 b -Ft(CALL)46 b(sla_PVOBS)g(\(P,)h(H,)g(STL,)f(PV\))0 2150 -y FB(GIVEN)f FD(:)277 2296 y Fq(P)674 b FB(D)565 b FD(latitude)30 -b(\(geo)s(detic,)h(radians\))277 2409 y Fq(H)668 b FB(D)565 -b FD(heigh)m(t)31 b(ab)s(o)m(v)m(e)i(reference)f(spheroid)d(\(geo)s -(detic,)k(metres\))277 2635 y Fq(STL)563 b FB(D)i FD(lo)s(cal)30 -b(apparen)m(t)g(sidereal)f(time)h(\(radians\))0 3027 -y FB(RETURNED)46 b FD(:)277 3173 y Fq(PV)606 b FB(D\(6\))431 -b FD([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 b FD(_)-43 b Fl(x)r(;)32 -b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 b FD(])54 -b(\(A)m(U,)i(A)m(U)g(s)2761 3140 y Fp(\000)p Fu(1)2855 -3173 y FD(,)k(true)55 b(equator)g(and)1658 3286 y(equino)m(x)30 -b(of)h(date\))0 3679 y FB(NOTE)44 b FD(:)d(IA)m(U)31 -b(1976)h(constan)m(ts)f(are)g(used.)p 0 3810 V 0 3922 -a Fx(SLA)p Fn(_)p Fx(PXY)756 b Fm(Apply)38 b(Linear)g(Mo)s(del)758 -b Fx(SLA)p Fn(_)p Fx(PXY)0 4273 y FB(A)m(CTION)44 b FD(:)64 -b(Giv)m(en)42 b(arra)m(ys)h(of)f Fq(exp)-5 b(e)g(cte)g(d)53 -b FD(and)42 b Fq(me)-5 b(asur)g(e)g(d)60 b FD([)15 b -Fl(x;)g(y)j FD(])43 b(co)s(ordinates,)i(and)c(a)i(linear)e(mo)s(del)227 -4386 y(relating)36 b(them)h(\(as)g(pro)s(duced)f(b)m(y)g(sla)p -Ft(_)p FD(FITXY\),)h(compute)g(the)g(arra)m(y)g(of)g -Fq(pr)-5 b(e)g(dicte)g(d)49 b FD(co)s(ordinates)227 4499 -y(and)30 b(the)h(RMS)f(residuals.)0 4686 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_PXY)g(\(NP,XYE,XYM,COEFFS,XYP,XR)o(MS,Y)o -(RMS)o(,RRM)o(S\))0 5059 y FB(GIVEN)f FD(:)277 5205 y -Fq(NP)606 b FB(I)f FD(n)m(um)m(b)s(er)29 b(of)i(samples)277 -5318 y Fq(XYE)538 b FB(D\(2,NP\))249 b FD(exp)s(ected)31 -b([)15 b Fl(x;)g(y)k FD(])30 b(for)g(eac)m(h)i(sample)277 -5431 y Fq(XYM)518 b FB(D\(2,NP\))249 b FD(measured)30 -b([)15 b Fl(x;)g(y)k FD(])30 b(for)g(eac)m(h)i(sample)277 -5544 y Fq(COEFFS)370 b FB(D\(6\))431 b FD(co)s(e\016cien)m(ts)31 -b(of)g(mo)s(del)e(\(see)i(b)s(elo)m(w\))p eop -%%Page: 136 138 -136 137 bop 0 52 a FD(136)0 351 y FB(RETURNED)46 b FD(:)277 -497 y Fq(XYP)538 b FB(D\(2,NP\))249 b FD(predicted)29 -b([)15 b Fl(x;)g(y)k FD(])31 b(for)f(eac)m(h)h(sample)277 -610 y Fq(XRMS)469 b FB(D)565 b FD(RMS)30 b(in)f(X)277 -723 y Fq(YRMS)469 b FB(D)565 b FD(RMS)30 b(in)f(Y)277 -836 y Fq(RRMS)471 b FB(D)565 b FD(total)31 b(RMS)f(\(v)m(ector)j(sum)c -(of)i(XRMS)f(and)g(YRMS\))0 1214 y FB(NOTES)44 b FD(:)311 -1411 y(1.)i(The)33 b(mo)s(del)g(is)f(supplied)f(in)h(the)i(arra)m(y)g -(COEFFS.)f(Naming)g(the)h(six)e(elemen)m(ts)i(of)g(COEFFS)427 -1524 y Fl(a;)15 b(b;)g(c;)g(d;)g(e)40 b FD(&)d Fl(f)10 -b FD(,)39 b(the)e(mo)s(del)f(transforms)h Fq(me)-5 b(asur)g(e)g(d)49 -b FD(co)s(ordinates)37 b([)p Fl(x)2945 1538 y Ff(m)3012 -1524 y Fl(;)15 b(y)3097 1538 y Ff(m)3178 1524 y FD(])38 -b(in)m(to)f Fq(pr)-5 b(e)g(dicte)g(d)427 1637 y FD(co)s(ordinates)30 -b([)p Fl(x)987 1651 y Ff(p)1027 1637 y Fl(;)15 b(y)1112 -1651 y Ff(p)1167 1637 y FD(])31 b(as)f(follo)m(ws:)597 -1788 y Fl(x)649 1802 y Ff(p)714 1788 y FD(=)25 b Fl(a)20 -b FD(+)g Fl(bx)1060 1802 y Ff(m)1147 1788 y FD(+)g Fl(cy)1322 -1802 y Ff(m)597 1901 y Fl(y)642 1915 y Ff(p)707 1901 -y FD(=)25 b Fl(d)20 b FD(+)g Fl(ex)1055 1915 y Ff(m)1142 -1901 y FD(+)g Fl(f)10 b(y)1333 1915 y Ff(m)311 2052 y -FD(2.)46 b(The)30 b(residuals)e(are)j(\()p Fl(x)1228 -2066 y Ff(p)1288 2052 y Fo(\000)20 b Fl(x)1431 2066 y -Ff(e)1468 2052 y FD(\))31 b(and)e(\()p Fl(y)1790 2066 -y Ff(p)1850 2052 y Fo(\000)20 b Fl(y)1986 2066 y Ff(e)2022 -2052 y FD(\).)311 2203 y(3.)46 b(If)38 b(NP)g(is)f(less)h(than)g(or)g -(equal)g(to)h(zero,)i(no)d(co)s(ordinates)g(are)g(transformed,)i(and)d -(the)i(RMS)427 2316 y(residuals)28 b(are)j(all)e(zero.)311 -2467 y(4.)46 b(See)31 b(also)f(sla)p Ft(_)p FD(FITXY,)g(sla)p -Ft(_)p FD(INVF,)h(sla)p Ft(_)p FD(XY2XY,)g(sla)p Ft(_)p -FD(DCMPF)p 0 2609 3780 8 v 0 2722 a Fx(SLA)p Fn(_)p Fx(RANDOM)489 -b Fm(Random)37 b(Num)m(b)s(er)489 b Fx(SLA)p Fn(_)p Fx(RANDOM)0 -3073 y FB(A)m(CTION)44 b FD(:)c(Generate)32 b(pseudo-random)d(real)h(n) -m(um)m(b)s(er)f(in)h(the)g(range)h(0)26 b Fo(\024)e Fl(x)i(<)f -FD(1.)0 3260 y FB(CALL)45 b FD(:)77 b Ft(R)47 b(=)h(sla_RANDOM)d -(\(SEED\))0 3621 y FB(GIVEN)g FD(:)277 3792 y Fq(SEED)492 -b FB(R)567 b FD(an)30 b(arbitrary)g(real)g(n)m(um)m(b)s(er)0 -4179 y FB(RETURNED)46 b FD(:)277 4325 y Fq(SEED)492 b -FB(R)567 b FD(a)31 b(new)f(arbitrary)f(v)-5 b(alue)277 -4438 y Fq(sla)p Ft(_)p Fq(RANDOM)159 b FB(R)567 b FD(Pseudo-random)30 -b(real)g(n)m(um)m(b)s(er)f(0)c Fo(\024)g Fl(x)h(<)f FD(1.)0 -4816 y FB(NOTE)44 b FD(:)d(The)30 b(implemen)m(tation)f(is)g(mac)m -(hine-dep)s(enden)m(t.)p 0 4959 V 0 5072 a Fx(SLA)p Fn(_)p -Fx(RANGE)407 b Fm(Put)38 b(Angle)g(in)m(to)f(Range)h -Fh(\006)p Fg(\031)413 b Fx(SLA)p Fn(_)p Fx(RANGE)0 5422 -y FB(A)m(CTION)44 b FD(:)c(Normalize)31 b(an)f(angle)g(in)m(to)h(the)f -(range)h Fo(\006)p Fl(\031)i FD(\(single)c(precision\).)0 -5610 y FB(CALL)45 b FD(:)77 b Ft(R)47 b(=)h(sla_RANGE)d(\(ANGLE\))p -eop -%%Page: 137 139 -137 138 bop 0 52 a Fw(SUN/67.70)3206 b FD(137)0 351 y -FB(GIVEN)45 b FD(:)277 523 y Fq(ANGLE)411 b FB(R)567 -b FD(angle)31 b(in)e(radians)0 871 y FB(RETURNED)46 b -FD(:)277 1042 y Fq(sla)p Ft(_)p Fq(RANGE)248 b FB(R)567 -b FD(ANGLE)31 b(expressed)f(in)f(the)h(range)h Fo(\006)p -Fl(\031)s FD(.)p 0 1185 3780 8 v 0 1298 a Fx(SLA)p Fn(_)p -Fx(RANORM)206 b Fm(Put)39 b(Angle)e(in)m(to)h(Range)g(0)7 -b Fh(\000)g Fm(2)p Fg(\031)211 b Fx(SLA)p Fn(_)p Fx(RANORM)0 -1648 y FB(A)m(CTION)44 b FD(:)c(Normalize)31 b(an)f(angle)g(in)m(to)h -(the)f(range)h(0)5 b Fo(\000)g FD(2)p Fl(\031)34 b FD(\(single)29 -b(precision\).)0 1836 y FB(CALL)45 b FD(:)77 b Ft(R)47 -b(=)h(sla_RANORM)d(\(ANGLE\))0 2174 y FB(GIVEN)g FD(:)277 -2345 y Fq(ANGLE)411 b FB(R)567 b FD(angle)31 b(in)e(radians)0 -2693 y FB(RETURNED)46 b FD(:)277 2865 y Fq(sla)p Ft(_)p -Fq(RANORM)162 b FB(R)567 b FD(ANGLE)31 b(expressed)f(in)f(the)h(range)h -(0)5 b Fo(\000)g FD(2)p Fl(\031)p 0 3008 V 0 3120 a Fx(SLA)p -Fn(_)p Fx(R)l(CC)528 b Fm(Barycen)m(tric)36 b(Co)s(ordinate)g(Time)526 -b Fx(SLA)p Fn(_)p Fx(R)l(CC)0 3471 y FB(CALL)45 b FD(:)77 -b Ft(D)47 b(=)h(sla_RCC)d(\(TDB,)i(UT1,)f(WL,)h(U,)h(V\))0 -3658 y FB(A)m(CTION)c FD(:)c(The)29 b(relativistic)f(clo)s(c)m(k)j -(correction:)40 b(the)30 b(di\013erence)g(b)s(et)m(w)m(een)g -Fq(pr)-5 b(op)g(er)34 b(time)j FD(at)31 b(a)f(p)s(oin)m(t)f(on)227 -3771 y(the)21 b(Earth)f(and)f Fq(c)-5 b(o)g(or)g(dinate)27 -b(time)g FD(in)19 b(the)i(solar)e(system)i(barycen)m(tric)f(space-time) -h(frame)f(of)h(reference.)227 3884 y(The)40 b(prop)s(er)f(time)h(is)g -(T)-8 b(errestrial)39 b(Time,)j(TT;)e(the)g(co)s(ordinate)h(time)f(is)f -(an)h(implemen)m(tation)f(of)227 3997 y(Barycen)m(tric)31 -b(Dynamical)f(Time,)g(TDB.)0 4344 y FB(GIVEN)45 b FD(:)277 -4490 y Fq(TDB)538 b FB(D)565 b FD(TDB)31 b(\(MJD:)g(JD)p -Fo(\000)p FD(2400000.5\))277 4603 y Fq(UT1)557 b FB(D)565 -b FD(univ)m(ersal)29 b(time)h(\(fraction)g(of)h(one)f(da)m(y\))277 -4716 y Fq(WL)588 b FB(D)565 b FD(clo)s(c)m(k)31 b(longitude)e -(\(radians)g(w)m(est\))277 4829 y Fq(U)668 b FB(D)565 -b FD(clo)s(c)m(k)31 b(distance)f(from)g(Earth)g(spin)e(axis)i(\(km\)) -277 4942 y Fq(V)668 b FB(D)565 b FD(clo)s(c)m(k)23 b(distance)e(north)h -(of)g(Earth)g(equatorial)g(plane)f(\(km\))0 5394 y FB(RETURNED)46 -b FD(:)277 5566 y Fq(sla)p Ft(_)p Fq(R)n(CC)388 b FB(D)565 -b FD(TDB)p Fo(\000)p FD(TT)30 b(\(sec;)i(Note)f(1\))p -eop -%%Page: 138 140 -138 139 bop 0 52 a FD(138)0 351 y FB(NOTES)44 b FD(:)311 -550 y(1.)i(TDB)37 b(is)e(co)s(ordinate)h(time)f(in)g(the)h(solar)g -(system)g(barycen)m(tre)h(frame)f(of)g(reference,)i(in)d(units)427 -663 y(c)m(hosen)j(to)g(eliminate)e(the)h(scale)h(di\013erence)f(with)f -(resp)s(ect)h(to)h(terrestrial)e(time.)61 b(TT)37 b(is)f(the)427 -776 y(prop)s(er)29 b(time)h(for)g(clo)s(c)m(ks)h(at)g(mean)g(sea)g(lev) -m(el)f(on)g(the)h(Earth.)311 928 y(2.)46 b(The)f(n)m(um)m(b)s(er)f -(returned)h(b)m(y)g(sla)p Ft(_)p FD(R)m(CC)f(comprises)h(a)h(main)e -(\(ann)m(ual\))h(sin)m(usoidal)e(term)i(of)427 1041 y(amplitude)30 -b(appro)m(ximately)i(1.66ms,)i(plus)c(lunar)g(and)i(planetary)f(terms)h -(up)f(to)i(ab)s(out)f(20)p Fl(\026)p FD(s,)427 1154 y(and)d(diurnal)e -(terms)i(up)f(to)i(2)p Fl(\026)p FD(s.)41 b(The)29 b(v)-5 -b(ariation)28 b(arises)h(from)g(the)h(transv)m(erse)f(Doppler)g -(e\013ect)427 1267 y(and)40 b(the)h(gra)m(vitational)f(red-shift)f(as)i -(the)f(observ)m(er)h(v)-5 b(aries)40 b(in)f(sp)s(eed)h(and)f(mo)m(v)m -(es)j(through)427 1380 y(di\013eren)m(t)30 b(gra)m(vitational)h(p)s -(oten)m(tials.)311 1532 y(3.)46 b(The)29 b(argumen)m(t)g(TDB)h(is,)f -(strictly)-8 b(,)29 b(the)g(barycen)m(tric)g(co)s(ordinate)g(time;)h -(ho)m(w)m(ev)m(er,)h(the)e(terres-)427 1645 y(trial)g(time)i(\(TT\))f -(can)h(in)e(practice)h(b)s(e)g(used)g(without)f(signi\014can)m(t)g -(loss)h(of)h(accuracy)-8 b(.)311 1797 y(4.)46 b(The)27 -b(geo)s(cen)m(tric)i(mo)s(del)e(is)f(that)i(of)g(F)-8 -b(airhead)28 b(&)f(Bretagnon)i(\(1990\),)h(in)d(its)g(full)e(form.)39 -b(It)28 b(w)m(as)427 1910 y(supplied)34 b(b)m(y)j(F)-8 -b(airhead)37 b(\(priv)-5 b(ate)36 b(comm)m(unication\))h(as)g(a)h(F)-8 -b(ortran)37 b(subroutine.)59 b(A)37 b(n)m(um)m(b)s(er)427 -2022 y(of)32 b(co)s(ding)f(c)m(hanges)i(w)m(ere)g(made)f(to)h(this)e -(subroutine)e(in)i(order)h(matc)m(h)g(the)h(calling)d(sequence)427 -2135 y(of)41 b(previous)e(v)m(ersions)h(of)h(the)g(presen)m(t)g -(routine,)h(to)g(comply)e(with)f(Starlink)g(programming)427 -2248 y(standards)f(and)f(to)i(a)m(v)m(oid)g(compilation)e(problems)f -(on)i(certain)g(mac)m(hines.)64 b(The)38 b(n)m(umerical)427 -2361 y(results)29 b(are)i(essen)m(tially)f(una\013ected)g(b)m(y)h(the)f -(c)m(hanges.)311 2513 y(5.)46 b(The)27 b(top)s(o)s(cen)m(tric)h(mo)s -(del)e(is)g(from)h(Mo)m(y)m(er)i(\(1981\))h(and)d(Murra)m(y)g -(\(1983\).)43 b(It)27 b(is)f(an)i(appro)m(xima-)427 2626 -y(tion)i(to)h(the)g(expression)1860 2729 y FB(v)1915 -2743 y Ff(e)1972 2729 y Fo(\001)21 b FD(\()p FB(x)f Fo(\000)g -FB(x)2274 2743 y Ff(e)2311 2729 y FD(\))p 1860 2769 487 -4 v 2064 2853 a Fl(c)2103 2826 y Fu(2)427 2988 y FD(where)31 -b FB(v)746 3002 y Ff(e)813 2988 y FD(is)f(the)h(barycen)m(tric)g(v)m -(elo)s(cit)m(y)g(of)g(the)g(Earth,)f FB(x)h FD(and)f -FB(x)2737 3002 y Ff(e)2805 2988 y FD(are)h(the)g(barycen)m(tric)g(p)s -(osi-)427 3101 y(tions)j(of)h(the)f(observ)m(er)h(and)f(the)h(Earth)f -(resp)s(ectiv)m(ely)-8 b(,)35 b(and)f(c)h(is)e(the)i(sp)s(eed)f(of)g -(ligh)m(t.)53 b(It)34 b(can)427 3214 y(b)s(e)c(disabled,)e(if)i -(necessary)-8 b(,)31 b(b)m(y)f(setting)h(the)f(argumen)m(ts)h(U)g(and)e -(V)i(to)g(zero.)311 3366 y(6.)46 b(During)30 b(the)h(in)m(terv)-5 -b(al)30 b(1950-2050,)36 b(the)31 b(absolute)g(accuracy)h(is)e(b)s -(etter)h(than)g Fo(\006)p FD(3)g(nanoseconds)427 3479 -y(relativ)m(e)37 b(to)h(direct)f(n)m(umerical)e(in)m(tegrations)i -(using)f(the)h(JPL)g(DE200/LE200)j(solar)c(system)427 -3592 y(ephemeris.)311 3744 y(7.)46 b(The)35 b(IA)m(U)h(1976)h -(de\014nition)c(of)j(TDB)g(w)m(as)f(that)h(it)f(m)m(ust)h(di\013er)e -(from)h(TT)f(only)h(b)m(y)g(p)s(erio)s(dic)427 3857 y(terms.)51 -b(Though)33 b(practical,)h(this)f(is)g(an)h(imprecise)e(de\014nition)f -(whic)m(h)i(ignores)g(the)h(existence)427 3970 y(of)40 -b(v)m(ery)h(long-p)s(erio)s(d)c(and)j(secular)f(e\013ects)i(in)e(the)h -(dynamics)f(of)h(the)g(solar)g(system.)69 b(As)40 b(a)427 -4082 y(consequence,)e(di\013eren)m(t)d(implemen)m(tations)f(of)i(TDB)f -(will,)g(in)f(general,)j(di\013er)d(in)g(zero-p)s(oin)m(t)427 -4195 y(and)i(will)e(drift)h(linearly)g(relativ)m(e)i(to)g(one)g(other.) -60 b(In)36 b(1991)i(the)f(IA)m(U)g(in)m(tro)s(duced)f(new)g(time)427 -4308 y(scales)31 b(designed)f(to)i(o)m(v)m(ercome)h(these)f(ob)5 -b(jections:)42 b(geo)s(cen)m(tric)32 b(co)s(ordinate)f(time,)g(TCG,)g -(and)427 4421 y(barycen)m(tric)26 b(co)s(ordinate)f(time,)i(TCB.)f(In)f -(principle,)e(therefore,)k(TDB)g(is)d(obsolete.)40 b(Ho)m(w)m(ev)m(er,) -427 4534 y(sla)p Ft(_)p FD(R)m(CC)30 b(can)g(b)s(e)g(used)g(to)h -(implemen)m(t)e(the)h(p)s(erio)s(dic)e(part)i(of)h(TCB)p -Fo(\000)p FD(TCG.)0 4925 y FB(REFERENCES)44 b FD(:)311 -5124 y(1.)i(F)-8 b(airhead,)16 b(L.,)30 b(&)g(Bretagnon,)17 -b(P)-8 b(.,)31 b Fq(Astr)-5 b(on.)16 b(Astr)-5 b(ophys.,)33 -b FB(229)p FD(,)e(240-247)j(\(1990\).)311 5276 y(2.)46 -b(Mo)m(y)m(er,)17 b(T.D.,)32 b Fq(Cel.)15 b(Me)-5 b(ch.,)30 -b FB(23)p FD(,)h(33)g(\(1981\).)311 5428 y(3.)46 b(Murra)m(y)-8 -b(,)16 b(C.A.,)31 b Fq(V)-7 b(e)i(ctorial)34 b(Astr)-5 -b(ometry,)32 b FD(Adam)e(Hilger)f(\(1983\).)311 5580 -y(4.)46 b(Seidelmann,)13 b(P)-8 b(.K.)26 b Fq(et)i(al,)e(Explanatory)31 -b(Supplement)e(to)g(the)f(Astr)-5 b(onomic)g(al)30 b(A)n(lmanac,)d -FD(Chap-)427 5693 y(ter)k(2,)g(Univ)m(ersit)m(y)f(Science)g(Bo)s(oks)h -(\(1992\).)p eop -%%Page: 139 141 -139 140 bop 0 52 a Fw(SUN/67.70)3206 b FD(139)311 351 -y(5.)46 b(Simon,)14 b(J.L.,)23 b(Bretagnon,)16 b(P)-8 -b(.,)23 b(Chapron)m(t,)15 b(J.,)23 b(Chapron)m(t-T)-8 -b(ouze,)16 b(M.,)23 b(F)-8 b(rancou,)16 b(G.)21 b(&)f(Lask)-5 -b(ar,)15 b(J.,)427 464 y Fq(Astr)-5 b(on.Astr)g(ophys.,)34 -b FB(282)p FD(,)d(663-683)i(\(1994\).)p 0 597 3780 8 -v 0 710 a Fx(SLA)p Fn(_)p Fx(RDPLAN)329 b Fm(Apparen)m(t)38 -b([)20 b Fg(\013)q(;)g(\016)j Fm(])39 b(of)f(Planet)329 -b Fx(SLA)p Fn(_)p Fx(RDPLAN)0 1060 y FB(A)m(CTION)44 -b FD(:)c(Appro)m(ximate)31 b(top)s(o)s(cen)m(tric)f(apparen)m(t)h([)15 -b Fl(\013;)g(\016)20 b FD(])31 b(and)e(angular)h(size)g(of)h(a)f -(planet.)0 1248 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_RDPLAN)f -(\(DATE,)h(NP,)h(ELONG,)f(PHI,)h(RA,)g(DEC,)g(DIAM\))0 -1591 y FB(GIVEN)e FD(:)277 1737 y Fq(D)n(A)-7 b(TE)481 -b FB(D)565 b FD(MJD)31 b(of)f(observ)-5 b(ation)31 b(\(JD)p -Fo(\000)p FD(2400000.5\))277 1850 y Fq(NP)606 b FB(I)f -FD(planet:)1825 1963 y(1)15 b(=)g(Mercury)1825 2076 y(2)g(=)g(V)-8 -b(en)m(us)1825 2189 y(3)15 b(=)g(Mo)s(on)1825 2302 y(4)g(=)g(Mars)1825 -2415 y(5)g(=)g(Jupiter)1825 2528 y(6)g(=)g(Saturn)1825 -2641 y(7)g(=)g(Uran)m(us)1825 2754 y(8)g(=)g(Neptune)1825 -2867 y(9)g(=)g(Pluto)1728 2979 y(else)h(=)e(Sun)277 3092 -y Fq(ELONG,PHI)216 b FB(D)565 b FD(observ)m(er's)30 b(longitude)f -(\(east)i(+v)m(e\))g(and)f(latitude)f(\(radi-)1658 3205 -y(ans\))0 3548 y FB(RETURNED)46 b FD(:)277 3694 y Fq(RA,DEC)378 -b FB(D)565 b FD(top)s(o)s(cen)m(tric)31 b(apparen)m(t)f([)15 -b Fl(\013;)g(\016)21 b FD(])30 b(\(radians\))277 3807 -y Fq(DIAM)482 b FB(D)565 b FD(angular)30 b(diameter)g(\(equatorial,)g -(radians\))0 4149 y FB(NOTES)44 b FD(:)311 4335 y(1.)i(The)35 -b(date)h(is)f(in)f(a)i(dynamical)e(time)h(scale)h(\(TDB,)g(formerly)e -(ET\))h(and)g(is)g(in)f(the)i(form)e(of)i(a)427 4448 -y(Mo)s(di\014ed)e(Julian)g(Date)j(\(JD)p Fo(\000)p FD(2400000.5\).)61 -b(F)-8 b(or)37 b(all)d(practical)i(purp)s(oses,)f(TT)g(can)h(b)s(e)f -(used)427 4561 y(instead)30 b(of)g(TDB,)h(and)f(for)g(man)m(y)h -(applications)d(UT)j(will)c(do)k(\(except)g(for)f(the)h(Mo)s(on\).)311 -4706 y(2.)46 b(The)32 b(longitude)f(and)h(latitude)f(allo)m(w)h -(correction)g(for)g(geo)s(cen)m(tric)i(parallax.)45 b(This)30 -b(is)i(a)g(ma)5 b(jor)427 4819 y(e\013ect)31 b(for)d(the)h(Mo)s(on,)h -(but)e(in)f(the)i(con)m(text)i(of)e(the)g(limited)e(accuracy)j(of)f -(the)g(presen)m(t)f(routine)427 4932 y(its)35 b(e\013ect)h(on)f -(planetary)f(p)s(ositions)f(is)h(small)f(\(negligible)g(for)h(the)h -(outer)g(planets\).)54 b(Geo)s(cen-)427 5044 y(tric)32 -b(p)s(ositions)e(can)j(b)s(e)e(generated)i(b)m(y)f(appropriate)g(use)g -(of)g(the)g(routines)f(sla)p Ft(_)p FD(DMOON)h(and)427 -5157 y(sla)p Ft(_)p FD(PLANET.)311 5302 y(3.)46 b(The)30 -b(direction)f(accuracy)j(\(arcsec,)g(1000-3000)19 b(AD\))31 -b(is)f(of)g(order:)793 5467 y(Sun)787 b(5)793 5580 y(Mercury)606 -b(2)793 5693 y(V)-8 b(en)m(us)659 b(10)p eop -%%Page: 140 142 -140 141 bop 0 52 a FD(140)793 351 y(Mo)s(on)667 b(30)793 -464 y(Mars)694 b(50)793 577 y(Jupiter)608 b(90)793 690 -y(Saturn)625 b(90)793 803 y(Uran)m(us)610 b(90)793 916 -y(Neptune)558 b(10)793 1029 y(Pluto)721 b(1)91 b(\(1885-2099)20 -b(AD)31 b(only\))427 1193 y(The)40 b(angular)g(diameter)g(accuracy)h -(is)f(ab)s(out)g(0.4\045)h(for)f(the)h(Mo)s(on,)i(and)d(0.01\045)i(or)e -(b)s(etter)427 1306 y(for)g(the)g(Sun)f(and)h(planets.)69 -b(F)-8 b(or)41 b(more)f(information)e(on)i(accuracy)-8 -b(,)45 b(refer)39 b(to)i(the)g(routines)427 1419 y(sla)p -Ft(_)p FD(PLANET)29 b(and)h(sla)p Ft(_)p FD(DMOON,)g(whic)m(h)g(the)g -(presen)m(t)h(routine)e(uses.)p 0 1545 3780 8 v 0 1658 -a Fx(SLA)p Fn(_)p Fx(REF)l(CO)562 b Fm(Refraction)36 -b(Constan)m(ts)560 b Fx(SLA)p Fn(_)p Fx(REF)l(CO)0 2009 -y FB(A)m(CTION)44 b FD(:)36 b(Determine)21 b(the)g(constan)m(ts)g -Fl(a)g FD(and)f Fl(b)h FD(in)f(the)h(atmospheric)f(refraction)h(mo)s -(del)e(\001)p Fl(\020)32 b FD(=)25 b Fl(a)15 b FD(tan)g -Fl(\020)8 b FD(+)227 2122 y Fl(b)15 b FD(tan)413 2089 -y Fu(3)467 2122 y Fl(\020)7 b FD(,)25 b(where)f Fl(\020)30 -b FD(is)23 b(the)i Fq(observe)-5 b(d)34 b FD(zenith)24 -b(distance)f(\()p Fq(i.e.)h FD(a\013ected)i(b)m(y)e(refraction\))g(and) -f(\001)p Fl(\020)30 b FD(is)24 b(what)227 2235 y(to)31 -b(add)f(to)h Fl(\020)37 b FD(to)31 b(giv)m(e)g(the)g -Fq(top)-5 b(o)g(c)g(entric)48 b FD(\()p Fq(i.e.)32 b(in)h(vacuo)p -FD(\))e(zenith)e(distance.)0 2422 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_REFCO)g(\(HM,)g(TDK,)h(PMB,)g(RH,)f(WL,)h(PHI,)g -(TLR,)g(EPS,)f(REFA,)h(REFB\))0 2763 y FB(GIVEN)e FD(:)277 -2909 y Fq(HM)586 b FB(D)565 b FD(heigh)m(t)30 b(of)h(the)g(observ)m(er) -f(ab)s(o)m(v)m(e)i(sea)f(lev)m(el)f(\(metre\))277 3022 -y Fq(TDK)532 b FB(D)565 b FD(am)m(bien)m(t)31 b(temp)s(erature)f(at)h -(the)g(observ)m(er)f(K\))277 3135 y Fq(PMB)528 b FB(D)565 -b FD(pressure)29 b(at)i(the)g(observ)m(er)f(\(m)m(b\))277 -3248 y Fq(RH)602 b FB(D)565 b FD(relativ)m(e)31 b(h)m(umidit)m(y)d(at)j -(the)g(observ)m(er)f(\(range)h(0)16 b({)g(1\))277 3361 -y Fq(WL)588 b FB(D)565 b FD(e\013ectiv)m(e)32 b(w)m(a)m(v)m(elength)g -(of)e(the)h(source)g(\()p Fl(\026)p FD(m\))277 3474 y -Fq(PHI)571 b FB(D)565 b FD(latitude)30 b(of)g(the)h(observ)m(er)f -(\(radian,)g(astronomical\))277 3587 y Fq(TLR)548 b FB(D)565 -b FD(temp)s(erature)32 b(lapse)f(rate)h(in)e(the)i(trop)s(osphere)f(\() -h(K)f(p)s(er)1658 3700 y(metre\))277 3813 y Fq(EPS)561 -b FB(D)k FD(precision)27 b(required)f(to)j(terminate)f(iteration)g -(\(radian\))0 4151 y FB(RETURNED)46 b FD(:)277 4297 y -Fq(REF)-9 b(A)490 b FB(D)565 b FD(tan)16 b Fl(\020)36 -b FD(co)s(e\016cien)m(t)c(\(radians\))277 4410 y Fq(REFB)485 -b FB(D)565 b FD(tan)1789 4377 y Fu(3)1844 4410 y Fl(\020)37 -b FD(co)s(e\016cien)m(t)31 b(\(radians\))0 4748 y FB(NOTES)44 -b FD(:)311 4934 y(1.)i(Suggested)36 b(v)-5 b(alues)34 -b(for)g(the)h(TLR)g(and)f(EPS)g(argumen)m(ts)h(are)g(0.0065D0)j(and)d -(1D)p Fo(\000)p FD(8)h(resp)s(ec-)427 5047 y(tiv)m(ely)-8 -b(.)41 b(The)30 b(signs)f(of)i(b)s(oth)e(are)i(immaterial.)311 -5191 y(2.)46 b(The)30 b(radio)g(refraction)g(is)f(c)m(hosen)i(b)m(y)f -(sp)s(ecifying)f(WL)h Fl(>)25 b FD(100)32 b Fl(\026)p -FD(m.)311 5335 y(3.)46 b(The)34 b(routine)f(is)g(a)i(slo)m(w)m(er)f -(but)f(more)i(accurate)g(alternativ)m(e)g(to)g(the)f(sla)p -Ft(_)p FD(REF)m(COQ)f(routine.)427 5448 y(The)21 b(constan)m(ts)i(it)e -(pro)s(duces)g(giv)m(e)h(p)s(erfect)g(agreemen)m(t)h(with)d(sla)p -Ft(_)p FD(REFR)m(O)h(at)i(zenith)e(distances)427 5561 -y(tan)559 5528 y Fp(\000)p Fu(1)668 5561 y FD(1)27 b(\(45)865 -5528 y Fp(\016)906 5561 y FD(\))g(and)f(tan)1273 5528 -y Fp(\000)p Fu(1)1382 5561 y FD(4)i(\()p Fo(\030)d FD(76)1676 -5528 y Fp(\016)1716 5561 y FD(\).)40 b(A)m(t)28 b(other)f(zenith)f -(distances,)i(the)f(mo)s(del)e(ac)m(hiev)m(es:)40 b(0)3704 -5524 y Fk(0)m(0)3708 5561 y Fl(:)p FD(5)427 5673 y(accuracy)32 -b(for)e Fl(\020)i(<)25 b FD(80)1201 5640 y Fp(\016)1241 -5673 y FD(,)31 b(0)1337 5637 y Fk(0)l(0)1341 5673 y Fl(:)p -FD(01)g(accuracy)h(for)e Fl(\020)i(<)25 b FD(60)2261 -5640 y Fp(\016)2301 5673 y FD(,)31 b(and)e(0)2573 5637 -y Fk(0)m(0)2577 5673 y Fl(:)p FD(001)k(accuracy)e(for)f -Fl(\020)i(<)25 b FD(45)3543 5640 y Fp(\016)3583 5673 -y FD(.)p eop -%%Page: 141 143 -141 142 bop 0 52 a Fw(SUN/67.70)3206 b FD(141)p 0 267 -3780 8 v 0 380 a Fx(SLA)p Fn(_)p Fx(REF)l(COQ)303 b Fm(Refraction)36 -b(Constan)m(ts)h(\(fast\))301 b Fx(SLA)p Fn(_)p Fx(REF)l(COQ)0 -730 y FB(A)m(CTION)44 b FD(:)36 b(Determine)21 b(the)g(constan)m(ts)g -Fl(a)g FD(and)f Fl(b)h FD(in)f(the)h(atmospheric)f(refraction)h(mo)s -(del)e(\001)p Fl(\020)32 b FD(=)25 b Fl(a)15 b FD(tan)g -Fl(\020)8 b FD(+)227 843 y Fl(b)15 b FD(tan)413 810 y -Fu(3)467 843 y Fl(\020)7 b FD(,)25 b(where)f Fl(\020)30 -b FD(is)23 b(the)i Fq(observe)-5 b(d)34 b FD(zenith)24 -b(distance)f(\()p Fq(i.e.)h FD(a\013ected)i(b)m(y)e(refraction\))g(and) -f(\001)p Fl(\020)30 b FD(is)24 b(what)227 956 y(to)g(add)e(to)i -Fl(\020)29 b FD(to)24 b(giv)m(e)g(the)f Fq(top)-5 b(o)g(c)g(entric)41 -b FD(\()p Fq(i.e.)25 b(in)h(vacuo)p FD(\))d(zenith)g(distance.)38 -b(\(This)21 b(is)h(a)i(fast)f(alternativ)m(e)227 1069 -y(to)31 b(the)g(sla)p Ft(_)p FD(REF)m(CO)f(routine)f({)i(see)g -(notes.\))0 1257 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_REFCOQ)f(\(TDK,)i(PMB,)f(RH,)h(WL,)g(REFA,)g(REFB\))0 -1595 y FB(GIVEN)e FD(:)277 1741 y Fq(TDK)532 b FB(D)565 -b FD(am)m(bien)m(t)31 b(temp)s(erature)f(at)h(the)g(observ)m(er)f -(\(K\))277 1854 y Fq(PMB)528 b FB(D)565 b FD(pressure)29 -b(at)i(the)g(observ)m(er)f(\(m)m(b\))277 1967 y Fq(RH)602 -b FB(D)565 b FD(relativ)m(e)31 b(h)m(umidit)m(y)d(at)j(the)g(observ)m -(er)f(\(range)h(0)16 b({)g(1\))277 2080 y Fq(WL)588 b -FB(D)565 b FD(e\013ectiv)m(e)32 b(w)m(a)m(v)m(elength)g(of)e(the)h -(source)g(\()p Fl(\026)p FD(m\))0 2414 y FB(RETURNED)46 -b FD(:)277 2560 y Fq(REF)-9 b(A)490 b FB(D)565 b FD(tan)16 -b Fl(\020)36 b FD(co)s(e\016cien)m(t)c(\(radians\))277 -2673 y Fq(REFB)485 b FB(D)565 b FD(tan)1789 2640 y Fu(3)1844 -2673 y Fl(\020)37 b FD(co)s(e\016cien)m(t)31 b(\(radians\))0 -3007 y FB(NOTES)44 b FD(:)311 3192 y(1.)i(The)30 b(radio)g(refraction)g -(is)f(c)m(hosen)i(b)m(y)f(sp)s(ecifying)f(WL)h Fl(>)25 -b FD(100)32 b Fl(\026)p FD(m.)311 3335 y(2.)46 b(The)31 -b(mo)s(del)f(is)g(an)h(appro)m(ximation,)g(for)g(mo)s(derate)h(zenith)e -(distances,)i(to)g(the)f(predictions)e(of)427 3448 y(the)34 -b(sla)p Ft(_)p FD(REFR)m(O)f(routine.)50 b(The)34 b(appro)m(ximation)e -(is)h(main)m(tained)g(across)h(a)g(range)g(of)g(condi-)427 -3561 y(tions,)c(and)g(applies)f(to)i(b)s(oth)e(optical/IR)h(and)g -(radio.)311 3704 y(3.)46 b(The)35 b(algorithm)f(is)g(a)h(fast)g -(alternativ)m(e)g(to)h(the)f(sla)p Ft(_)p FD(REF)m(CO)f(routine.)54 -b(The)34 b(latter)h(calls)f(the)427 3817 y(sla)p Ft(_)p -FD(REFR)m(O)39 b(routine)f(itself:)57 b(this)38 b(in)m(v)m(olv)m(es)i -(in)m(tegrations)f(through)f(a)i(mo)s(del)e(atmosphere,)427 -3930 y(and)d(is)g(costly)g(in)f(pro)s(cessor)h(time.)56 -b(Ho)m(w)m(ev)m(er,)39 b(the)d(mo)s(del)e(whic)m(h)g(is)h(pro)s(duced)e -(is)i(precisely)427 4043 y(correct)44 b(for)e(t)m(w)m(o)i(zenith)e -(distances)f(\(45)1889 4010 y Fp(\016)1972 4043 y FD(and)h -Fo(\030)30 b FD(76)2352 4010 y Fp(\016)2392 4043 y FD(\))43 -b(and)f(at)h(other)g(zenith)e(distances)h(is)427 4156 -y(limited)23 b(in)h(accuracy)j(only)d(b)m(y)i(the)f(\001)p -Fl(\020)32 b FD(=)25 b Fl(a)15 b FD(tan)g Fl(\020)i FD(+)10 -b Fl(b)15 b FD(tan)2446 4123 y Fu(3)2501 4156 y Fl(\020)32 -b FD(form)m(ulation)24 b(itself.)38 b(The)24 b(presen)m(t)427 -4269 y(routine)30 b(is)f(not)i(as)f(accurate,)i(though)f(it)e -(satis\014es)h(most)h(practical)f(requiremen)m(ts.)311 -4412 y(4.)46 b(The)40 b(mo)s(del)f(omits)g(the)i(e\013ects)g(of)f -(\(i\))g(heigh)m(t)g(ab)s(o)m(v)m(e)h(sea)g(lev)m(el)f(\(apart)g(from)g -(the)g(reduced)427 4525 y(pressure)34 b(itself)7 b(\),)36 -b(\(ii\))e(latitude)g(\()p Fq(i.e.)h FD(the)g(\015attening)f(of)i(the)f -(Earth\))g(and)f(\(iii\))g(v)-5 b(ariations)34 b(in)427 -4638 y(trop)s(ospheric)29 b(lapse)h(rate.)311 4781 y(5.)46 -b(The)30 b(mo)s(del)f(has)h(b)s(een)g(tested)h(using)e(the)i(follo)m -(wing)e(range)h(of)h(conditions:)527 4924 y Fo(\001)45 -b FD(lapse)30 b(rates)h(0.0055,)i(0.0065,)g(0.0075)g(K)d(p)s(er)f -(metre)527 5052 y Fo(\001)45 b FD(latitudes)30 b(0)1017 -5019 y Fp(\016)1056 5052 y FD(,)h(25)1202 5019 y Fp(\016)1242 -5052 y FD(,)g(50)1388 5019 y Fp(\016)1428 5052 y FD(,)g(75)1574 -5019 y Fp(\016)527 5181 y Fo(\001)45 b FD(heigh)m(ts)30 -b(0,)h(2500,)i(5000)f(metres)f(ab)s(o)m(v)m(e)g(sea)g(lev)m(el)527 -5309 y Fo(\001)45 b FD(pressures)29 b(mean)i(for)f(heigh)m(t)g -Fo(\000)p FD(10\045)h(to)g(+5\045)f(in)f(steps)h(of)h(5\045)527 -5437 y Fo(\001)45 b FD(temp)s(eratures)30 b Fo(\000)p -FD(10)1312 5404 y Fp(\016)1383 5437 y FD(to)h(+20)1655 -5404 y Fp(\016)1725 5437 y FD(with)e(resp)s(ect)i(to)g(280K)g(at)g(sea) -g(lev)m(el)527 5565 y Fo(\001)45 b FD(relativ)m(e)31 -b(h)m(umidit)m(y)d(0,)j(0.5,)h(1)527 5693 y Fo(\001)45 -b FD(w)m(a)m(v)m(elength)32 b(0.4,)g(0.6,)f(.)16 b(.)f(.)46 -b(2)p Fl(\026)p FD(m,)30 b(+)g(radio)p eop -%%Page: 142 144 -142 143 bop 0 52 a FD(142)527 351 y Fo(\001)45 b FD(zenith)30 -b(distances)g(15)1350 318 y Fp(\016)1390 351 y FD(,)h(45)1536 -318 y Fp(\016)1576 351 y FD(,)g(75)1722 318 y Fp(\016)427 -493 y FD(F)-8 b(or)31 b(the)g(ab)s(o)m(v)m(e)h(conditions,)d(the)h -(comparison)g(with)f(sla)p Ft(_)p FD(REFR)m(O)h(w)m(as)g(as)h(follo)m -(ws:)p 761 615 1124 4 v 759 728 4 113 v 1271 728 V 1323 -694 a Fq(worst)p 1584 728 V 101 w(RMS)p 1882 728 V 761 -731 1124 4 v 759 844 4 113 v 810 810 a FD(optical/IR)p -1271 844 V 222 w(62)p 1584 844 V 254 w(8)p 1882 844 V -759 957 V 1021 923 a(radio)p 1271 957 V 175 w(319)p 1584 -957 V 209 w(49)p 1882 957 V 761 960 1124 4 v 759 1073 -4 113 v 1271 1073 V 1378 1039 a(mas)p 1584 1073 V 142 -w(mas)p 1882 1073 V 761 1076 1124 4 v 427 1280 a(F)-8 -b(or)31 b(this)f(particular)e(set)j(of)g(conditions:)527 -1421 y Fo(\001)45 b FD(lapse)30 b(rate)h(6.5)h(K)e(km)1384 -1388 y Fp(\000)p Fu(1)527 1549 y Fo(\001)45 b FD(latitude)30 -b(50)1026 1516 y Fp(\016)527 1676 y Fo(\001)45 b FD(sea)31 -b(lev)m(el)527 1803 y Fo(\001)45 b FD(pressure)29 b(1005)17 -b(m)m(b)527 1930 y Fo(\001)45 b FD(temp)s(erature)30 -b(7)1160 1897 y Fp(\016)1200 1930 y FD(C)527 2058 y Fo(\001)45 -b FD(h)m(umidit)m(y)29 b(80\045)527 2185 y Fo(\001)45 -b FD(w)m(a)m(v)m(elength)32 b(5740)1285 2162 y(_)1264 -2185 y(A)427 2327 y(the)f(results)e(w)m(ere)i(as)f(follo)m(ws:)p -761 2431 2106 4 v 759 2544 4 113 v 855 2510 a Fl(\020)p -995 2544 V 151 w FD(sla)p Ft(_)p FD(REFR)m(O)p 1572 2544 -V 100 w(sla)p Ft(_)p FD(REF)m(COQ)p 2219 2544 V 98 w(Saastamoinen)p -2864 2544 V 761 2547 2106 4 v 759 2660 4 113 v 856 2626 -a(10)p 995 2660 V 371 w(10.27)p 1572 2660 V 441 w(10.27)p -2219 2660 V 441 w(10.27)p 2864 2660 V 759 2773 V 856 -2739 a(20)p 995 2773 V 371 w(21.19)p 1572 2773 V 441 -w(21.20)p 2219 2773 V 441 w(21.19)p 2864 2773 V 759 2886 -V 856 2852 a(30)p 995 2886 V 371 w(33.61)p 1572 2886 -V 441 w(33.61)p 2219 2886 V 441 w(33.60)p 2864 2886 V -759 2999 V 856 2965 a(40)p 995 2999 V 371 w(48.82)p 1572 -2999 V 441 w(48.83)p 2219 2999 V 441 w(48.81)p 2864 2999 -V 759 3112 V 856 3078 a(45)p 995 3112 V 371 w(58.16)p -1572 3112 V 441 w(58.18)p 2219 3112 V 441 w(58.16)p 2864 -3112 V 759 3225 V 856 3191 a(50)p 995 3225 V 371 w(69.28)p -1572 3225 V 441 w(69.30)p 2219 3225 V 441 w(69.27)p 2864 -3225 V 759 3338 V 856 3304 a(55)p 995 3338 V 371 w(82.97)p -1572 3338 V 441 w(82.99)p 2219 3338 V 441 w(82.95)p 2864 -3338 V 759 3450 V 856 3417 a(60)p 995 3450 V 325 w(100.51)p -1572 3450 V 397 w(100.54)p 2219 3450 V 396 w(100.50)p -2864 3450 V 759 3563 V 856 3529 a(65)p 995 3563 V 325 -w(124.23)p 1572 3563 V 397 w(124.26)p 2219 3563 V 396 -w(124.20)p 2864 3563 V 759 3676 V 856 3642 a(70)p 995 -3676 V 325 w(158.63)p 1572 3676 V 397 w(158.68)p 2219 -3676 V 396 w(158.61)p 2864 3676 V 759 3789 V 856 3755 -a(72)p 995 3789 V 325 w(177.32)p 1572 3789 V 397 w(177.37)p -2219 3789 V 396 w(177.31)p 2864 3789 V 759 3902 V 856 -3868 a(74)p 995 3902 V 325 w(200.35)p 1572 3902 V 397 -w(200.38)p 2219 3902 V 396 w(200.32)p 2864 3902 V 759 -4015 V 856 3981 a(76)p 995 4015 V 325 w(229.45)p 1572 -4015 V 397 w(229.43)p 2219 4015 V 396 w(229.42)p 2864 -4015 V 759 4128 V 856 4094 a(78)p 995 4128 V 325 w(267.44)p -1572 4128 V 397 w(267.29)p 2219 4128 V 396 w(267.41)p -2864 4128 V 759 4241 V 856 4207 a(80)p 995 4241 V 325 -w(319.13)p 1572 4241 V 397 w(318.55)p 2219 4241 V 396 -w(319.10)p 2864 4241 V 761 4244 2106 4 v 759 4357 4 113 -v 810 4323 a(deg)p 995 4357 V 340 w(arcsec)p 1572 4357 -V 409 w(arcsec)p 2219 4357 V 409 w(arcsec)p 2864 4357 -V 761 4360 2106 4 v 427 4576 a(The)j(v)-5 b(alues)33 -b(for)h(Saastamoinen's)f(form)m(ula)g(\(whic)m(h)g(includes)e(terms)j -(up)e(to)j(tan)3299 4543 y Fu(5)3338 4576 y FD(\))f(are)g(tak)m(en)427 -4689 y(from)c(Hohenk)m(erk)h(&)f(Sinclair)e(\(1985\).)427 -4816 y(The)36 b(results)f(from)h(the)g(m)m(uc)m(h)g(slo)m(w)m(er)h(but) -e(more)h(accurate)i(sla)p Ft(_)p FD(REF)m(CO)e(routine)f(ha)m(v)m(e)i -(not)427 4929 y(b)s(een)k(included)e(in)i(the)h(tabulation)f(as)h(they) -g(are)g(iden)m(tical)f(to)h(those)g(in)f(the)h(sla)p -Ft(_)p FD(REFR)m(O)427 5042 y(column)29 b(to)j(the)e(0)1053 -5005 y Fk(0)l(0)1057 5042 y Fl(:)p FD(01)i(resolution)d(used.)311 -5184 y(6.)46 b(Outlandish)25 b(input)h(parameters)i(are)h(silen)m(tly)d -(limited)g(to)i(mathematically)g(safe)g(v)-5 b(alues.)40 -b(Zero)427 5297 y(pressure)29 b(is)h(p)s(ermissible,)c(and)k(causes)h -(zero)s(es)g(to)g(b)s(e)f(returned.)311 5438 y(7.)46 -b(The)30 b(algorithm)g(dra)m(ws)f(on)i(sev)m(eral)f(sources,)h(as)g -(follo)m(ws:)506 5580 y Fo(\017)46 b FD(The)27 b(form)m(ula)g(for)g -(the)g(saturation)h(v)-5 b(ap)s(our)26 b(pressure)g(of)h(w)m(ater)i(as) -e(a)h(function)e(of)i(temp)s(er-)597 5693 y(ature)j(and)f(temp)s -(erature)g(is)f(tak)m(en)j(from)e(expressions)f(A4.5-A4.7)k(of)d(Gill)f -(\(1982\).)p eop -%%Page: 143 145 -143 144 bop 0 52 a Fw(SUN/67.70)3206 b FD(143)506 351 -y Fo(\017)46 b FD(The)25 b(form)m(ula)g(for)h(the)g(w)m(ater)g(v)-5 -b(ap)s(our)25 b(pressure,)h(giv)m(en)f(the)h(saturation)g(pressure)e -(and)h(the)597 464 y(relativ)m(e)31 b(h)m(umidit)m(y)d(is)i(from)f -(Crane)h(\(1976\),)j(expression)d(2.5.5.)506 593 y Fo(\017)46 -b FD(The)30 b(refractivit)m(y)f(of)h(air)f(is)g(a)h(function)f(of)h -(temp)s(erature,)g(total)g(pressure,)f(w)m(ater-v)-5 -b(ap)s(our)597 706 y(pressure)29 b(and,)i(in)e(the)h(case)i(of)f -(optical/IR)f(but)g(not)g(radio,)g(w)m(a)m(v)m(elength.)43 -b(The)30 b(form)m(ulae)597 819 y(for)37 b(the)f(t)m(w)m(o)i(cases)g -(are)f(dev)m(elop)s(ed)f(from)g(Hohenk)m(erk)h(&)f(Sinclair)e(\(1985\)) -39 b(and)d(Rueger)597 932 y(\(2002\).)506 1061 y Fo(\017)46 -b FD(The)33 b(form)m(ula)f(for)h Fl(\014)38 b FD(\(=)30 -b Fl(H)1566 1075 y Fu(0)1605 1061 y Fl(=r)1691 1075 y -Fu(0)1731 1061 y FD(\))j(is)f(an)h(adaption)g(of)g(expression)f(9)h -(from)g(Stone)g(\(1996\).)597 1174 y(The)e(adaptations,)i(arriv)m(ed)d -(at)j(empirically)-8 b(,)29 b(consist)i(of)h(\(i\))g(a)f(small)g -(adjustmen)m(t)g(to)h(the)597 1287 y(co)s(e\016cien)m(t)g(and)d(\(ii\)) -h(a)h(h)m(umidit)m(y)d(term)i(for)g(the)h(radio)f(case)h(only)-8 -b(.)506 1415 y Fo(\017)46 b FD(The)32 b(form)m(ulae)f(for)h(the)g -(refraction)f(constan)m(ts)i(as)g(a)f(function)e(of)i -Fl(n)21 b Fo(\000)g FD(1)32 b(and)g Fl(\014)37 b FD(are)32 -b(from)597 1528 y(Green)f(\(1987\),)i(expression)c(4.31.)427 -1673 y(The)h(\014rst)g(three)g(items)g(are)h(as)g(used)e(in)g(the)i -(sla)p Ft(_)p FD(REFR)m(O)f(routine.)0 2027 y FB(REFERENCES)44 -b FD(:)311 2213 y(1.)i(Crane,)h(R.K.,)h(Meeks,)g(M.L.)c(\(ed\),)k -(\\Refraction)d(E\013ects)f(in)f(the)h(Neutral)f(A)m(tmosphere",)427 -2326 y Fq(Metho)-5 b(ds)34 b(of)f(Exp)-5 b(erimental)34 -b(Physics:)43 b(Astr)-5 b(ophysics)34 b(12B,)d FD(Academic)g(Press,)f -(1976.)311 2471 y(2.)46 b(Gill,)29 b(Adrian)g(E.,)h Fq(A)n(tmospher)-5 -b(e-Oc)g(e)g(an)35 b(Dynamics,)c FD(Academic)f(Press,)g(1982.)311 -2616 y(3.)46 b(Green,)31 b(R.M.,)g Fq(Spheric)-5 b(al)35 -b(Astr)-5 b(onomy,)32 b FD(Cam)m(bridge)e(Univ)m(ersit)m(y)f(Press,)h -(1987.)311 2761 y(4.)46 b(Hohenk)m(erk,)31 b(C.Y.,)g(&)f(Sinclair,)e -(A.T.,)j(NA)m(O)g(T)-8 b(ec)m(hnical)30 b(Note)i(No.)f(63,)g(1985.)311 -2906 y(5.)46 b(Rueger,)36 b(J.M.,)f Fq(R)-5 b(efr)g(active)37 -b(Index)g(F)-7 b(ormulae)38 b(for)e(Ele)-5 b(ctr)g(onic)37 -b(Distanc)-5 b(e)37 b(Me)-5 b(asur)g(ement)37 b(with)427 -3018 y(R)-5 b(adio)27 b(and)f(Mil)5 b(limetr)-5 b(e)25 -b(Waves)p FD(,)f(in)d(Unisurv)f(Rep)s(ort)h(S-68,)k(Sc)m(ho)s(ol)c(of)i -(Surv)m(eying)d(and)i(Spatial)427 3131 y(Information)30 -b(Systems,)g(Univ)m(ersit)m(y)f(of)i(New)g(South)e(W)-8 -b(ales,)32 b(Sydney)-8 b(,)29 b(Australia,)h(2002.)311 -3276 y(6.)46 b(Stone,)31 b(Ronald)e(C.,)i(P)-8 b(.A.S.P)g(.)31 -b FB(108)h FD(1051-1058,)i(1996.)p 0 3405 3780 8 v 0 -3518 a Fx(SLA)p Fn(_)p Fx(REFR)l(O)834 b Fm(Refraction)e -Fx(SLA)p Fn(_)p Fx(REFR)l(O)0 3869 y FB(A)m(CTION)44 -b FD(:)c(A)m(tmospheric)31 b(refraction,)f(for)g(radio)g(or)g -(optical/IR)g(w)m(a)m(v)m(elengths.)0 4056 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_REFRO)g(\(ZOBS,)g(HM,)h(TDK,)f(PMB,)h(RH,) -g(WL,)g(PHI,)f(TLR,)h(EPS,)g(REF\))0 4401 y FB(GIVEN)e -FD(:)277 4547 y Fq(ZOBS)495 b FB(D)565 b FD(observ)m(ed)31 -b(zenith)e(distance)h(of)h(the)g(source)f(\(radians\))277 -4660 y Fq(HM)586 b FB(D)565 b FD(heigh)m(t)30 b(of)h(the)g(observ)m(er) -f(ab)s(o)m(v)m(e)i(sea)f(lev)m(el)f(\(metre\))277 4773 -y Fq(TDK)532 b FB(D)565 b FD(am)m(bien)m(t)31 b(temp)s(erature)f(at)h -(the)g(observ)m(er)f(\(K\))277 4886 y Fq(PMB)528 b FB(D)565 -b FD(pressure)29 b(at)i(the)g(observ)m(er)f(\(m)m(b\))277 -4999 y Fq(RH)602 b FB(D)565 b FD(relativ)m(e)31 b(h)m(umidit)m(y)d(at)j -(the)g(observ)m(er)f(\(range)h(0)16 b({)g(1\))277 5112 -y Fq(WL)588 b FB(D)565 b FD(e\013ectiv)m(e)32 b(w)m(a)m(v)m(elength)g -(of)e(the)h(source)g(\()p Fl(\026)p FD(m\))277 5224 y -Fq(PHI)571 b FB(D)565 b FD(latitude)30 b(of)g(the)h(observ)m(er)f -(\(radian,)g(astronomical\))277 5337 y Fq(TLR)548 b FB(D)565 -b FD(temp)s(erature)36 b(lapse)g(rate)h(in)d(the)j(trop)s(osphere)e -(\(K)h(p)s(er)1658 5450 y(metre\))277 5563 y Fq(EPS)561 -b FB(D)k FD(precision)27 b(required)f(to)j(terminate)f(iteration)g -(\(radian\))p eop -%%Page: 144 146 -144 145 bop 0 52 a FD(144)0 351 y FB(RETURNED)46 b FD(:)277 -497 y Fq(REF)549 b FB(D)565 b FD(refraction:)42 b Fq(in)34 -b(vacuo)j FD(ZD)31 b(min)m(us)e(observ)m(ed)j(ZD)f(\(radi-)1658 -610 y(ans\))0 963 y FB(NOTES)44 b FD(:)311 1151 y(1.)i(A)31 -b(suggested)g(v)-5 b(alue)30 b(for)g(the)h(TLR)f(argumen)m(t)h(is)e -(0.0065D0)34 b(\(sign)c(immaterial\).)40 b(The)30 b(refrac-)427 -1264 y(tion)c(is)f(signi\014can)m(tly)g(a\013ected)j(b)m(y)e(TLR,)g -(and)f(if)h(studies)f(of)h(the)h(lo)s(cal)e(atmosphere)i(ha)m(v)m(e)g -(b)s(een)427 1377 y(carried)j(out)g(a)h(b)s(etter)g(TLR)e(v)-5 -b(alue)30 b(ma)m(y)h(b)s(e)f(a)m(v)-5 b(ailable.)311 -1523 y(2.)46 b(A)31 b(suggested)h(v)-5 b(alue)30 b(for)g(the)h(EPS)f -(argumen)m(t)h(is)f(1D)p Fo(\000)p FD(8.)43 b(The)30 -b(result)f(is)h(usually)f(at)i(least)g(t)m(w)m(o)427 -1636 y(orders)f(of)h(magnitude)e(more)i(computationally)e(precise)h -(than)g(the)g(supplied)d(EPS)j(v)-5 b(alue.)311 1782 -y(3.)46 b(The)36 b(routine)g(computes)g(the)h(refraction)f(for)h -(zenith)e(distances)h(up)g(to)h(and)f(a)h(little)e(b)s(ey)m(ond)427 -1895 y(90)517 1862 y Fp(\016)598 1895 y FD(using)k(the)i(metho)s(d)g -(of)f(Hohenk)m(erk)i(&)e(Sinclair)e(\(NA)m(O)j(T)-8 b(ec)m(hnical)41 -b(Notes)h(59)f(and)f(63,)427 2008 y(subsequen)m(tly)31 -b(adopted)h(in)f(the)h Fq(Explanatory)37 b(Supplement)e(to)g(the)f -(Astr)-5 b(onomic)g(al)37 b(A)n(lmanac,)427 2120 y FD(1992)32 -b({)f(see)g(section)g(3.281\).)311 2266 y(4.)46 b(The)24 -b(co)s(de)h(is)f(based)g(on)g(the)h Ft(AREF)e FD(optical/IR)h -(refraction)h(subroutine)d(\(HMNA)m(O,)k(Septem)m(b)s(er)427 -2379 y(1984,)33 b(R)m(GO:)d(Hohenk)m(erk)h(1985\),)i(with)c(extensions) -h(to)h(supp)s(ort)d(the)j(radio)e(case.)42 b(The)30 b(mo)s(di-)427 -2492 y(\014cations)j(to)g(the)g(original)e(HMNA)m(O)i(optical/IR)g -(refraction)f(co)s(de)h(whic)m(h)f(a\013ect)i(the)f(results)427 -2605 y(are:)506 2751 y Fo(\017)46 b FD(The)24 b(angle)g(argumen)m(ts)g -(ha)m(v)m(e)h(b)s(een)f(c)m(hanged)g(to)h(radians,)f(an)m(y)h(v)-5 -b(alue)23 b(of)h(ZOBS)g(is)f(allo)m(w)m(ed)597 2864 y(\(see)32 -b(Note)f(6,)g(b)s(elo)m(w\))f(and)g(other)h(argumen)m(t)f(v)-5 -b(alues)30 b(ha)m(v)m(e)i(b)s(een)d(limited)f(to)k(safe)e(v)-5 -b(alues.)506 2994 y Fo(\017)46 b FD(Revised)30 b(v)-5 -b(alues)30 b(for)g(the)g(gas)h(constan)m(ts)h(are)f(used,)f(from)f -(Murra)m(y)i(\(1983\).)506 3123 y Fo(\017)46 b FD(A)31 -b(b)s(etter)f(mo)s(del)f(for)i Fl(P)1434 3137 y Ff(s)1471 -3123 y FD(\()p Fl(T)13 b FD(\))30 b(has)h(b)s(een)e(adopted,)i(from)f -(Gill)e(\(1982\).)506 3253 y Fo(\017)46 b FD(More)31 -b(accurate)h(expressions)d(for)h Fl(P)13 b(w)1945 3267 -y Ff(o)2014 3253 y FD(ha)m(v)m(e)32 b(b)s(een)d(adopted)i(\(again)g -(from)e(Gill)g(1982\).)506 3382 y Fo(\017)46 b FD(The)25 -b(form)m(ula)g(for)h(the)g(w)m(ater)g(v)-5 b(ap)s(our)25 -b(pressure,)h(giv)m(en)f(the)h(saturation)g(pressure)e(and)h(the)597 -3495 y(relativ)m(e)31 b(h)m(umidit)m(y)-8 b(,)29 b(is)g(from)h(Crane)g -(\(1976\),)j(expression)c(2.5.5.)506 3624 y Fo(\017)46 -b FD(Pro)m(vision)c(for)i(radio)e(w)m(a)m(v)m(elengths)j(has)e(b)s(een) -g(added)f(using)g(expressions)g(devised)h(b)m(y)597 3737 -y(A.)16 b(T.)f(Sinclair,)20 b(R)m(GO)h(\(Sinclair)d(1989\).)39 -b(The)20 b(refractivit)m(y)g(mo)s(del)g(is)f(from)h(Rueger)h(\(2002\).) -506 3867 y Fo(\017)46 b FD(The)30 b(optical)g(refractivit)m(y)g(for)g -(dry)g(air)f(is)h(from)g(IA)m(G)h(\(1999\).)311 4013 -y(5.)46 b(The)34 b(radio)g(refraction)g(is)f(c)m(hosen)i(b)m(y)f(sp)s -(ecifying)e(WL)j Fl(>)c FD(100)36 b Fl(\026)p FD(m.)52 -b(Because)36 b(the)e(algorithm)427 4126 y(tak)m(es)23 -b(no)f(accoun)m(t)h(of)f(the)g(ionosphere,)h(the)e(accuracy)i -(deteriorates)g(at)f(lo)m(w)g(frequencies,)g(b)s(elo)m(w)427 -4239 y(ab)s(out)30 b(30)16 b(MHz.)311 4385 y(6.)46 b(Before)38 -b(use,)g(the)f(v)-5 b(alue)37 b(of)g(ZOBS)e(is)h(expressed)g(in)g(the)h -(range)g Fo(\006)p Fl(\031)s FD(.)60 b(If)36 b(this)g(ranged)g(ZOBS)427 -4498 y(is)f(negativ)m(e,)k(the)d(result)f(REF)h(is)e(computed)i(from)f -(its)h(absolute)f(v)-5 b(alue)36 b(b)s(efore)f(b)s(eing)f(made)427 -4611 y(negativ)m(e)g(to)g(matc)m(h.)50 b(In)32 b(addition,)g(if)g(it)h -(has)f(an)h(absolute)g(v)-5 b(alue)33 b(greater)h(than)f(93)3413 -4578 y Fp(\016)3453 4611 y FD(,)h(a)f(\014xed)427 4723 -y(REF)e(v)-5 b(alue)30 b(equal)f(to)j(the)e(result)f(for)i(ZOBS)e(=)c -(93)2238 4690 y Fp(\016)2309 4723 y FD(is)k(returned,)g(appropriately)g -(signed.)311 4870 y(7.)46 b(As)33 b(in)e(the)i(original)e(Hohenk)m(erk) -i(&)f(Sinclair)d(algorithm,)k(\014xed)f(v)-5 b(alues)32 -b(of)g(the)h(w)m(ater)h(v)-5 b(ap)s(our)427 4982 y(p)s(olytrop)s(e)27 -b(exp)s(onen)m(t,)i(the)g(heigh)m(t)f(of)h(the)f(trop)s(opause,)h(and)f -(the)g(heigh)m(t)g(at)i(whic)m(h)d(refraction)427 5095 -y(is)j(negligible)e(are)i(used.)311 5241 y(8.)46 b(The)27 -b(radio)f(refraction)h(has)g(b)s(een)g(tested)g(against)h(w)m(ork)f -(done)g(b)m(y)g(Iain)f(Coulson,)h(JA)m(CH,)h(\(pri-)427 -5354 y(v)-5 b(ate)32 b(comm)m(unication)e(1995\))j(for)e(the)f(James)h -(Clerk)f(Maxw)m(ell)g(T)-8 b(elescop)s(e,)32 b(Mauna)e(Kea.)43 -b(F)-8 b(or)427 5467 y(t)m(ypical)27 b(conditions,)g(agreemen)m(t)i(at) -g(the)e(0)1916 5430 y Fk(0)l(0)1920 5467 y Fl(:)p FD(1)i(lev)m(el)e(is) -f(ac)m(hiev)m(ed)j(for)e(mo)s(derate)h(ZD,)f(w)m(orsening)427 -5580 y(to)h(p)s(erhaps)d(0)913 5543 y Fk(0)m(0)917 5580 -y Fl(:)p FD(5)17 b({)e(1)1104 5543 y Fk(0)l(0)1108 5580 -y Fl(:)p FD(0)28 b(at)g(ZD)f(80)1556 5547 y Fp(\016)1596 -5580 y FD(.)40 b(A)m(t)28 b(hot)f(and)g(h)m(umid)e(sea-lev)m(el)j -(sites)e(the)i(accuracy)g(will)c(not)427 5693 y(b)s(e)30 -b(as)h(go)s(o)s(d.)p eop -%%Page: 145 147 -145 146 bop 0 52 a Fw(SUN/67.70)3206 b FD(145)311 351 -y(9.)46 b(It)d(should)d(b)s(e)h(noted)h(that)h(the)f(relativ)m(e)h(h)m -(umidit)m(y)d(RH)i(is)f(formally)g(de\014ned)f(in)h(terms)h(of)427 -464 y(\\mixing)36 b(ratio")h(rather)g(than)g(pressures)e(or)i -(densities)e(as)j(is)e(often)h(stated.)61 b(It)37 b(is)f(the)i(mass)427 -577 y(of)45 b(w)m(ater)h(p)s(er)d(unit)h(mass)g(of)h(dry)f(air)g -(divided)e(b)m(y)j(that)g(for)g(saturated)g(air)f(at)h(the)g(same)427 -690 y(temp)s(erature)c(and)e(pressure)h(\(see)h(Gill)d(1982\).)73 -b(The)40 b(familiar)f Fl(\027)47 b FD(=)42 b Fl(p)2995 -704 y Ff(w)3051 690 y Fl(=p)3142 704 y Ff(s)3220 690 -y FD(or)e Fl(\027)48 b FD(=)42 b Fl(\032)3594 704 y Ff(w)3650 -690 y Fl(=\032)3742 704 y Ff(s)427 803 y FD(expressions)27 -b(can)i(di\013er)e(from)h(the)h(formal)e(de\014nition)f(b)m(y)j(sev)m -(eral)g(p)s(ercen)m(t,)g(signi\014can)m(t)e(in)g(the)427 -916 y(radio)j(case.)266 1054 y(10.)46 b(The)20 b(algorithm)g(is)g -(designed)g(for)g(observ)m(ers)h(in)e(the)i(trop)s(osphere.)37 -b(The)20 b(supplied)d(temp)s(erature,)427 1167 y(pressure)25 -b(and)h(lapse)g(rate)h(are)f(assumed)g(to)h(b)s(e)f(for)g(a)h(p)s(oin)m -(t)e(in)g(the)h(trop)s(osphere)g(and)g(are)g(used)427 -1280 y(to)34 b(de\014ne)e(a)h(mo)s(del)f(atmosphere)h(with)e(the)i -(trop)s(opause)g(at)g(11km)h(altitude)e(and)g(a)h(constan)m(t)427 -1393 y(temp)s(erature)43 b(ab)s(o)m(v)m(e)i(that.)79 -b(Ho)m(w)m(ev)m(er,)49 b(in)42 b(practice,)47 b(the)c(refraction)g(v)-5 -b(alues)43 b(returned)f(for)427 1505 y(stratospheric)30 -b(observ)m(ers,)h(at)g(altitudes)e(up)h(to)h(25km,)g(are)g(quite)e -(usable.)0 1811 y FB(REFERENCES)44 b FD(:)311 1990 y(1.)i(Coulsen,)29 -b(I.)i(1995,)h(priv)-5 b(ate)30 b(comm)m(unication.)311 -2128 y(2.)46 b(Crane,)23 b(R.K.,)h(Meeks,)g(M.L.)e(\(ed\),)i(1976,)h -(\\Refraction)d(E\013ects)h(in)d(the)h(Neutral)g(A)m(tmosphere",)427 -2241 y Fq(Metho)-5 b(ds)34 b(of)f(Exp)-5 b(erimental)34 -b(Physics:)43 b(Astr)-5 b(ophysics)34 b(12B)p FD(,)e(Academic)e(Press.) -311 2379 y(3.)46 b(Gill,)29 b(Adrian)g(E.)h(1982,)j Fq(A)n(tmospher)-5 -b(e-Oc)g(e)g(an)34 b(Dynamics)p FD(,)d(Academic)g(Press.)311 -2517 y(4.)46 b(Hohenk)m(erk,)31 b(C.Y.)g(1985,)h(priv)-5 -b(ate)30 b(comm)m(unication.)311 2655 y(5.)46 b(Hohenk)m(erk,)34 -b(C.Y.,)f(&)f(Sinclair,)e(A.T.)j(1985,)h Fq(NA)n(O)f(T)-7 -b(e)i(chnic)g(al)36 b(Note)j FD(No.)33 b(63,)h(Ro)m(y)m(al)f(Green-)427 -2768 y(wic)m(h)d(Observ)-5 b(atory)d(.)311 2906 y(6.)46 -b(In)m(ternational)34 b(Asso)s(ciation)g(of)h(Geo)s(desy)-8 -b(,)36 b(XXI)s(Ith)e(General)g(Assem)m(bly)-8 b(,)36 -b(Birmingham,)d(UK,)427 3019 y(1999,)g(Resolution)c(3.)311 -3157 y(7.)46 b(Murra)m(y)-8 b(,)31 b(C.A.)g(1983,)h Fq(V)-7 -b(e)i(ctorial)34 b(Astr)-5 b(ometry,)32 b FD(Adam)e(Hilger,)g(Bristol.) -311 3295 y(8.)46 b(Seidelmann,)13 b(P)-8 b(.K.)31 b Fq(et)h(al.)e -FD(1992,)i Fq(Explanatory)j(Supplement)e(to)g(the)g(Astr)-5 -b(onomic)g(al)35 b(A)n(lmanac)p FD(,)427 3408 y(Chapter)30 -b(3,)h(Univ)m(ersit)m(y)f(Science)g(Bo)s(oks.)311 3546 -y(9.)46 b(Rueger,)34 b(J.M.)f(2002,)h Fq(R)-5 b(efr)g(active)36 -b(Index)f(F)-7 b(ormulae)36 b(for)f(Ele)-5 b(ctr)g(onic)36 -b(Distanc)-5 b(e)34 b(Me)-5 b(asur)g(ement)427 3659 y(with)35 -b(R)-5 b(adio)36 b(and)e(Mil)5 b(limetr)-5 b(e)34 b(Waves)p -FD(,)f(in)d(Unisurv)f(Rep)s(ort)j(S-68,)h(Sc)m(ho)s(ol)e(of)h(Surv)m -(eying)e(and)427 3772 y(Spatial)f(Information)h(Systems,)g(Univ)m -(ersit)m(y)g(of)g(New)h(South)e(W)-8 b(ales,)32 b(Sydney)-8 -b(,)29 b(Australia.)266 3910 y(10.)46 b(Sinclair,)28 -b(A.T.)j(1989,)h(priv)-5 b(ate)30 b(comm)m(unication.)p -0 4018 3780 8 v 0 4131 a Fx(SLA)p Fn(_)p Fx(REFV)497 -b Fm(Apply)38 b(Refraction)e(to)i(V)-10 b(ector)497 b -Fx(SLA)p Fn(_)p Fx(REFV)0 4481 y FB(A)m(CTION)44 b FD(:)39 -b(Adjust)26 b(an)h(unrefracted)g(Cartesian)f(v)m(ector)j(to)f(include)d -(the)i(e\013ect)i(of)e(atmospheric)g(refrac-)227 4594 -y(tion,)j(using)f(the)i(simple)d(\001)p Fl(\020)k FD(=)25 -b Fl(a)15 b FD(tan)g Fl(\020)27 b FD(+)20 b Fl(b)15 b -FD(tan)1913 4561 y Fu(3)1968 4594 y Fl(\020)37 b FD(mo)s(del.)0 -4782 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_REFV)g(\(VU,)h(REFA,)f -(REFB,)g(VR\))0 5099 y FB(GIVEN)f FD(:)277 5245 y Fq(VU)600 -b FB(D)565 b FD(unrefracted)50 b(p)s(osition)e(of)i(the)h(source)f(\([) -15 b Fl(Az)t(;)g(E)5 b(l)54 b FD(])c(3-)1658 5358 y(v)m(ector\))277 -5471 y Fq(REF)-9 b(A)490 b FB(D)565 b FD(tan)16 b Fl(\020)36 -b FD(co)s(e\016cien)m(t)c(\(radians\))277 5584 y Fq(REFB)485 -b FB(D)565 b FD(tan)1789 5551 y Fu(3)1844 5584 y Fl(\020)37 -b FD(co)s(e\016cien)m(t)31 b(\(radians\))p eop -%%Page: 146 148 -146 147 bop 0 52 a FD(146)0 351 y FB(RETURNED)46 b FD(:)277 -497 y Fq(VR)602 b FB(D)565 b FD(refracted)25 b(p)s(osition)e(of)j(the)f -(source)g(\([)15 b Fl(Az)t(;)g(E)5 b(l)28 b FD(])d(3-v)m(ector\))0 -983 y FB(NOTES)44 b FD(:)311 1179 y(1.)i(This)30 b(routine)g(applies)g -(the)h(adjustmen)m(t)g(for)g(refraction)g(in)f(the)i(opp)s(osite)e -(sense)h(to)h(the)g(usual)427 1291 y(one)24 b({)f(it)g(tak)m(es)h(an)f -(unrefracted)f(\()p Fq(in)27 b(vacuo)6 b FD(\))23 b(p)s(osition)e(and)i -(pro)s(duces)e(an)i(observ)m(ed)g(\(refracted\))427 1404 -y(p)s(osition,)28 b(whereas)g(the)h(\001)p Fl(\020)i -FD(=)25 b Fl(a)15 b FD(tan)h Fl(\020)23 b FD(+)16 b Fl(b)f -FD(tan)2083 1371 y Fu(3)2138 1404 y Fl(\020)35 b FD(mo)s(del)27 -b(strictly)h(applies)e(to)k(the)e(case)i(where)427 1517 -y(an)g(observ)m(ed)g(p)s(osition)e(is)h(to)i(ha)m(v)m(e)g(the)f -(refraction)g(remo)m(v)m(ed.)41 b(The)30 b(unrefracted)f(to)i -(refracted)427 1630 y(case)h(is)d(harder,)h(and)f(requires)g(an)i(in)m -(v)m(erted)f(form)g(of)g(the)h(text-b)s(o)s(ok)g(refraction)f(mo)s -(dels;)f(the)427 1743 y(algorithm)38 b(used)g(here)g(is)g(equiv)-5 -b(alen)m(t)38 b(to)i(one)e(iteration)h(of)g(the)f(Newton-Raphson)h -(metho)s(d)427 1856 y(applied)28 b(to)k(the)e(ab)s(o)m(v)m(e)i(form)m -(ula.)311 2006 y(2.)46 b(Though)31 b(optimized)f(for)h(sp)s(eed)f -(rather)h(than)g(precision,)f(the)i(presen)m(t)f(routine)f(ac)m(hiev)m -(es)j(con-)427 2119 y(sistency)41 b(with)e(the)i -(refracted-to-unrefracted)h(\001)p Fl(\020)49 b FD(=)43 -b Fl(a)15 b FD(tan)g Fl(\020)34 b FD(+)27 b Fl(b)15 b -FD(tan)2995 2086 y Fu(3)3050 2119 y Fl(\020)47 b FD(mo)s(del)40 -b(at)h(b)s(etter)427 2232 y(than)32 b(1)g(microarcsecond)f(within)e(30) -1730 2199 y Fp(\016)1802 2232 y FD(of)j(the)g(zenith)f(and)g(remains)f -(within)f(1)j(milliarcsecond)427 2345 y(to)j Fl(\020)j -FD(=)31 b(70)812 2312 y Fp(\016)853 2345 y FD(.)52 b(The)33 -b(inheren)m(t)h(accuracy)h(of)f(the)g(mo)s(del)f(is,)i(of)f(course,)i -(far)e(w)m(orse)g(than)g(this)f({)427 2458 y(see)e(the)g(do)s(cumen)m -(tation)f(for)g(sla)p Ft(_)p FD(REF)m(CO)g(for)g(more)g(information.) -311 2608 y(3.)46 b(A)m(t)34 b(lo)m(w)f(elev)-5 b(ations)33 -b(\(b)s(elo)m(w)g(ab)s(out)g(3)1752 2575 y Fp(\016)1791 -2608 y FD(\))h(the)f(refraction)g(correction)g(is)f(held)g(bac)m(k)i -(to)g(prev)m(en)m(t)427 2721 y(arithmetic)k(problems)f(and)h(wildly)e -(wrong)i(results.)64 b(F)-8 b(or)40 b(optical/IR)e(w)m(a)m(v)m -(elengths,)k(o)m(v)m(er)e(a)427 2833 y(wide)e(range)g(of)h(observ)m(er) -g(heigh)m(ts)f(and)g(corresp)s(onding)f(temp)s(eratures)h(and)g -(pressures,)h(the)427 2946 y(follo)m(wing)21 b(lev)m(els)g(of)i -(accuracy)g(\(w)m(orst)f(case\))i(are)e(ac)m(hiev)m(ed,)j(relativ)m(e)d -(to)h(n)m(umerical)d(in)m(tegration)427 3059 y(through)30 -b(a)h(mo)s(del)e(atmosphere:)1519 3224 y Fl(\020)1559 -3239 y Ff(obs)1769 3224 y Fq(err)-5 b(or)1525 3450 y -FD(80)1615 3417 y Fp(\016)1811 3450 y FD(0)1851 3413 -y Fk(0)l(0)1855 3450 y Fl(:)p FD(7)1525 3563 y(81)1615 -3530 y Fp(\016)1811 3563 y FD(1)1851 3526 y Fk(0)l(0)1855 -3563 y Fl(:)p FD(3)1525 3676 y(82)1615 3643 y Fp(\016)1811 -3676 y FD(2)1851 3639 y Fk(0)l(0)1855 3676 y Fl(:)p FD(5)1525 -3789 y(83)1615 3756 y Fp(\016)1828 3789 y FD(5)1868 3752 -y Fk(0)l(0)1525 3901 y FD(84)1615 3868 y Fp(\016)1805 -3901 y FD(10)1890 3865 y Fk(0)m(0)1525 4014 y FD(85)1615 -3981 y Fp(\016)1805 4014 y FD(20)1890 3978 y Fk(0)m(0)1525 -4127 y FD(86)1615 4094 y Fp(\016)1805 4127 y FD(55)1890 -4090 y Fk(0)m(0)1525 4240 y FD(87)1615 4207 y Fp(\016)1782 -4240 y FD(160)1912 4203 y Fk(0)n(0)1525 4353 y FD(88)1615 -4320 y Fp(\016)1782 4353 y FD(360)1912 4316 y Fk(0)n(0)1525 -4466 y FD(89)1615 4433 y Fp(\016)1782 4466 y FD(640)1912 -4429 y Fk(0)n(0)1525 4579 y FD(90)1615 4546 y Fp(\016)1760 -4579 y FD(1100)1935 4542 y Fk(0)m(0)1525 4692 y FD(91)1615 -4659 y Fp(\016)1760 4692 y FD(1700)1935 4655 y Fk(0)m(0)2076 -4692 y Fl(<)30 b FD(high-altitude)1525 4805 y(92)1615 -4772 y Fp(\016)1760 4805 y FD(2600)1935 4768 y Fk(0)m(0)2076 -4805 y Fl(<)g FD(sites)g(only)427 4970 y(The)c(results)g(for)g(radio)g -(are)h(sligh)m(tly)d(w)m(orse)j(o)m(v)m(er)h(most)f(of)g(the)g(range,)h -(b)s(ecoming)d(signi\014can)m(tly)427 5083 y(w)m(orse)31 -b(b)s(elo)m(w)f Fl(\020)h FD(=)25 b(88)1193 5050 y Fp(\016)1264 -5083 y FD(and)30 b(un)m(usable)e(b)s(ey)m(ond)i Fl(\020)i -FD(=)25 b(90)2391 5050 y Fp(\016)2431 5083 y FD(.)311 -5233 y(4.)46 b(See)27 b(also)f(the)g(routine)f(sla)p -Ft(_)p FD(REFZ,)g(whic)m(h)g(p)s(erforms)g(the)h(adjustmen)m(t)g(to)h -(the)f(zenith)g(distance)427 5346 y(rather)40 b(than)f(in)f([)15 -b Fl(x;)g(y)s(;)g(z)21 b FD(].)68 b(The)39 b(presen)m(t)h(routine)f(is) -f(faster)i(than)f(sla)p Ft(_)p FD(REFZ)g(and,)i(except)427 -5459 y(v)m(ery)28 b(lo)m(w)f(do)m(wn,)g(is)g(equally)f(accurate)i(for)f -(all)f(practical)h(purp)s(oses.)38 b(Ho)m(w)m(ev)m(er,)30 -b(b)s(ey)m(ond)d(ab)s(out)427 5571 y Fl(\020)54 b FD(=)47 -b(84)729 5538 y Fp(\016)812 5571 y FD(sla)p Ft(_)p FD(REFZ)c(should)e -(b)s(e)i(used,)j(and)d(for)g(the)h(utmost)g(accuracy)g(iterativ)m(e)g -(use)f(of)427 5684 y(sla)p Ft(_)p FD(REFR)m(O)30 b(should)e(b)s(e)i -(considered.)p eop -%%Page: 147 149 -147 148 bop 0 52 a Fw(SUN/67.70)3206 b FD(147)p 0 267 -3780 8 v 0 380 a Fx(SLA)p Fn(_)p Fx(REFZ)602 b Fm(Apply)38 -b(Refraction)f(to)h(ZD)603 b Fx(SLA)p Fn(_)p Fx(REFZ)0 -730 y FB(A)m(CTION)44 b FD(:)f(Adjust)31 b(an)h(unrefracted)f(zenith)h -(distance)f(to)i(include)c(the)j(e\013ect)i(of)e(atmospheric)f(refrac-) -227 843 y(tion,)f(using)f(the)i(simple)d(\001)p Fl(\020)k -FD(=)25 b Fl(a)15 b FD(tan)g Fl(\020)27 b FD(+)20 b Fl(b)15 -b FD(tan)1913 810 y Fu(3)1968 843 y Fl(\020)37 b FD(mo)s(del.)0 -1031 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_REFZ)g(\(ZU,)h(REFA,)f -(REFB,)g(ZR\))0 1448 y FB(GIVEN)f FD(:)277 1594 y Fq(ZU)612 -b FB(D)565 b FD(unrefracted)29 b(zenith)f(distance)h(of)g(the)h(source) -f(\(radians\))277 1820 y Fq(REF)-9 b(A)490 b FB(D)565 -b FD(tan)16 b Fl(\020)36 b FD(co)s(e\016cien)m(t)c(\(radians\))277 -1933 y Fq(REFB)485 b FB(D)565 b FD(tan)1789 1900 y Fu(3)1844 -1933 y Fl(\020)37 b FD(co)s(e\016cien)m(t)31 b(\(radians\))0 -2399 y FB(RETURNED)46 b FD(:)277 2571 y Fq(ZR)614 b FB(D)565 -b FD(refracted)31 b(zenith)f(distance)g(\(radians\))0 -3046 y FB(NOTES)44 b FD(:)311 3278 y(1.)i(This)30 b(routine)g(applies)g -(the)h(adjustmen)m(t)g(for)g(refraction)g(in)f(the)i(opp)s(osite)e -(sense)h(to)h(the)g(usual)427 3391 y(one)24 b({)f(it)g(tak)m(es)h(an)f -(unrefracted)f(\()p Fq(in)27 b(vacuo)6 b FD(\))23 b(p)s(osition)e(and)i -(pro)s(duces)e(an)i(observ)m(ed)g(\(refracted\))427 3504 -y(p)s(osition,)28 b(whereas)g(the)h(\001)p Fl(\020)i -FD(=)25 b Fl(a)15 b FD(tan)h Fl(\020)23 b FD(+)16 b Fl(b)f -FD(tan)2083 3471 y Fu(3)2138 3504 y Fl(\020)35 b FD(mo)s(del)27 -b(strictly)h(applies)e(to)k(the)e(case)i(where)427 3617 -y(an)g(observ)m(ed)g(p)s(osition)e(is)h(to)i(ha)m(v)m(e)g(the)f -(refraction)g(remo)m(v)m(ed.)41 b(The)30 b(unrefracted)f(to)i -(refracted)427 3730 y(case)h(is)d(harder,)h(and)f(requires)g(an)i(in)m -(v)m(erted)f(form)g(of)g(the)h(text-b)s(o)s(ok)g(refraction)f(mo)s -(dels;)f(the)427 3843 y(form)m(ula)21 b(used)f(here)h(is)f(based)g(on)h -(the)h(Newton-Raphson)f(metho)s(d.)37 b(F)-8 b(or)21 -b(the)h(utmost)f(n)m(umerical)427 3956 y(consistency)35 -b(with)f(the)h(refracted)g(to)h(unrefracted)e(mo)s(del,)h(t)m(w)m(o)h -(iterations)f(are)g(carried)f(out,)427 4069 y(ac)m(hieving)29 -b(agreemen)m(t)h(at)g(the)f(10)1615 4036 y Fp(\000)p -Fu(11)1774 4069 y FD(arcsecond)g(lev)m(el)g(for)f Fl(\020)k -FD(=)25 b(80)2788 4036 y Fp(\016)2828 4069 y FD(.)40 -b(The)29 b(inheren)m(t)e(accuracy)427 4182 y(of)d(the)g(mo)s(del)f(is,) -h(of)g(course,)h(far)f(w)m(orse)g(than)f(this)g({)h(see)g(the)g(do)s -(cumen)m(tation)g(for)f(sla)p Ft(_)p FD(REF)m(CO)427 -4295 y(for)30 b(more)h(information.)311 4463 y(2.)46 -b(A)m(t)28 b Fl(\020)k FD(=)25 b(83)813 4430 y Fp(\016)853 -4463 y FD(,)j(the)f(rapidly-w)m(orsening)d(\001)p Fl(\020)31 -b FD(=)25 b Fl(a)15 b FD(tan)h Fl(\020)k FD(+)13 b Fl(b)i -FD(tan)2571 4430 y Fu(3)2626 4463 y Fl(\020)33 b FD(mo)s(del)26 -b(is)g(abandoned)g(and)h(an)427 4576 y(empirical)h(form)m(ula)i(tak)m -(es)i(o)m(v)m(er:)1201 4902 y(\001)p Fl(\020)g FD(=)25 -b Fl(F)1531 4758 y Fi( )1607 4841 y FD(0)1652 4808 y -Fp(\016)1658 4841 y Fl(:)r FD(55445)d Fo(\000)e FD(0)2068 -4808 y Fp(\016)2074 4841 y Fl(:)r FD(01133)p Fl(E)29 -b FD(+)19 b(0)2557 4808 y Fp(\016)2563 4841 y Fl(:)r -FD(00202)p Fl(E)2887 4808 y Fu(2)p 1607 4881 1324 4 v -1744 4965 a FD(1)i(+)f(0)p Fl(:)p FD(28385)p Fl(E)28 -b FD(+)20 b(0)p Fl(:)p FD(02390)p Fl(E)2749 4939 y Fu(2)2940 -4758 y Fi(!)427 5213 y FD(where)33 b Fl(E)j FD(=)30 b(90)987 -5180 y Fp(\016)1050 5213 y Fo(\000)22 b Fl(\020)1183 -5227 y Ff(tr)r(ue)1353 5213 y FD(and)33 b Fl(F)47 b FD(is)32 -b(a)i(factor)g(c)m(hosen)g(to)h(meet)f(the)g(\001)p Fl(\020)i -FD(=)31 b Fl(a)15 b FD(tan)g Fl(\020)29 b FD(+)22 b Fl(b)15 -b FD(tan)3678 5180 y Fu(3)3733 5213 y Fl(\020)427 5326 -y FD(form)m(ula)30 b(at)h Fl(\020)h FD(=)25 b(83)1130 -5293 y Fp(\016)1170 5326 y FD(.)427 5467 y(F)-8 b(or)30 -b(optical/IR)e(w)m(a)m(v)m(elengths,)i(o)m(v)m(er)g(a)f(wide)e(range)i -(of)g(observ)m(er)f(heigh)m(ts)h(and)e(corresp)s(onding)427 -5580 y(temp)s(eratures)c(and)f(pressures,)i(the)f(follo)m(wing)e(lev)m -(els)i(of)g(accuracy)h(\(w)m(orst)g(case\))g(are)f(ac)m(hiev)m(ed,)427 -5693 y(relativ)m(e)31 b(to)g(n)m(umerical)e(in)m(tegration)h(through)g -(a)h(mo)s(del)e(atmosphere:)p eop -%%Page: 148 150 -148 149 bop 0 52 a FD(148)1528 339 y Fl(\020)1568 354 -y Ff(obs)1769 339 y Fq(err)-5 b(or)1534 565 y FD(80)1624 -532 y Fp(\016)1811 565 y FD(0)1851 528 y Fk(0)l(0)1855 -565 y Fl(:)p FD(7)1534 678 y(81)1624 645 y Fp(\016)1811 -678 y FD(1)1851 641 y Fk(0)l(0)1855 678 y Fl(:)p FD(3)1534 -791 y(82)1624 758 y Fp(\016)1811 791 y FD(2)1851 754 -y Fk(0)l(0)1855 791 y Fl(:)p FD(4)1534 904 y(83)1624 -871 y Fp(\016)1811 904 y FD(4)1851 867 y Fk(0)l(0)1855 -904 y Fl(:)p FD(7)1534 1016 y(84)1624 983 y Fp(\016)1811 -1016 y FD(6)1851 980 y Fk(0)l(0)1855 1016 y Fl(:)p FD(2)1534 -1129 y(85)1624 1096 y Fp(\016)1811 1129 y FD(6)1851 1092 -y Fk(0)l(0)1855 1129 y Fl(:)p FD(4)1534 1242 y(86)1624 -1209 y Fp(\016)1828 1242 y FD(8)1868 1205 y Fk(0)l(0)1534 -1355 y FD(87)1624 1322 y Fp(\016)1805 1355 y FD(10)1890 -1318 y Fk(0)m(0)1534 1468 y FD(88)1624 1435 y Fp(\016)1805 -1468 y FD(15)1890 1431 y Fk(0)m(0)1534 1581 y FD(89)1624 -1548 y Fp(\016)1805 1581 y FD(30)1890 1544 y Fk(0)m(0)1534 -1694 y FD(90)1624 1661 y Fp(\016)1805 1694 y FD(60)1890 -1657 y Fk(0)m(0)1534 1807 y FD(91)1624 1774 y Fp(\016)1782 -1807 y FD(150)1912 1770 y Fk(0)n(0)2067 1807 y Fl(<)30 -b FD(high-altitude)1534 1920 y(92)1624 1887 y Fp(\016)1782 -1920 y FD(400)1912 1883 y Fk(0)n(0)2067 1920 y Fl(<)g -FD(sites)g(only)427 2104 y(F)-8 b(or)28 b(radio)e(w)m(a)m(v)m(elengths) -i(the)f(errors)g(are)g(t)m(ypically)f(50\045)i(larger)e(than)h(the)g -(optical)g(\014gures)f(and)427 2217 y(b)m(y)31 b Fl(\020)h -FD(=)25 b(85)812 2184 y Fp(\016)882 2217 y FD(are)31 -b(t)m(wice)g(as)g(bad,)f(w)m(orsening)g(rapidly)e(b)s(elo)m(w)h(that.) -42 b(T)-8 b(o)31 b(main)m(tain)e(1)3362 2180 y Fk(0)l(0)3433 -2217 y FD(accuracy)427 2329 y(do)m(wn)36 b(to)h Fl(\020)42 -b FD(=)35 b(85)1068 2296 y Fp(\016)1144 2329 y FD(at)i(the)g(Green)g -(Bank)f(site,)i(Condon)d(\(2004\))k(has)d(suggested)h(amplifying)427 -2442 y(the)e(amoun)m(t)f(of)g(refraction)g(predicted)f(b)m(y)h(sla)p -Ft(_)p FD(REFZ)f(b)s(elo)m(w)g(10)2761 2409 y Fp(\016)2767 -2442 y Fl(:)r FD(8)i(elev)-5 b(ation)34 b(b)m(y)g(the)g(factor)427 -2555 y(\(1)21 b(+)f(0)p Fl(:)p FD(00195)j Fo(\003)e FD(\(10)p -Fl(:)p FD(8)h Fo(\000)e Fl(E)1378 2569 y Ff(topo)1512 -2555 y FD(\)\),)31 b(where)f Fl(E)1968 2569 y Ff(topo)2132 -2555 y FD(is)f(the)i(unrefracted)e(elev)-5 b(ation)31 -b(in)e(degrees.)427 2683 y(The)24 b(high-ZD)e(mo)s(del)h(is)g(scaled)g -(to)i(matc)m(h)f(the)g(normal)f(mo)s(del)f(at)j(the)f(transition)e(p)s -(oin)m(t;)j(there)427 2796 y(is)30 b(no)g(glitc)m(h.)311 -2939 y(3.)46 b(See)29 b(also)f(the)h(routine)f(sla)p -Ft(_)p FD(REFV,)g(whic)m(h)f(p)s(erforms)g(the)i(adjustmen)m(t)f(in)f -([)15 b Fl(x;)g(y)s(;)g(z)21 b FD(],)29 b(and)f(with)427 -3051 y(the)j(emphasis)e(on)h(sp)s(eed)g(rather)g(than)g(n)m(umerical)f -(accuracy)-8 b(.)0 3389 y FB(REFERENCE)44 b FD(:)j(Condon,)15 -b(J.J.,)34 b Fq(R)-5 b(efr)g(action)38 b(Corr)-5 b(e)g(ctions)37 -b(for)g(the)f(GBT,)d FD(PTCS/PN/35.2,)j(NRA)m(O)227 3502 -y(Green)31 b(Bank,)g(2004.)p 0 3624 3780 8 v 0 3737 a -Fx(SLA)p Fn(_)p Fx(R)-15 b(VER)l(OT)326 b Fm(R)-13 b(V)39 -b(Corrn)e(to)h(Earth)f(Cen)m(tre)326 b Fx(SLA)p Fn(_)p -Fx(R)-15 b(VER)l(OT)0 4087 y FB(A)m(CTION)44 b FD(:)c(V)-8 -b(elo)s(cit)m(y)31 b(comp)s(onen)m(t)g(in)e(a)i(giv)m(en)f(direction)f -(due)h(to)h(Earth)f(rotation.)0 4275 y FB(CALL)45 b FD(:)77 -b Ft(R)47 b(=)h(sla_RVEROT)d(\(PHI,)h(RA,)h(DA,)g(ST\))0 -4610 y FB(GIVEN)e FD(:)277 4756 y Fq(PHI)571 b FB(R)c -FD(geo)s(detic)31 b(latitude)f(of)g(observing)f(station)i(\(radians\)) -277 4869 y Fq(RA,D)n(A)439 b FB(R)567 b FD(apparen)m(t)31 -b([)15 b Fl(\013;)g(\016)20 b FD(])31 b(\(radians\))277 -4982 y Fq(ST)620 b FB(R)567 b FD(lo)s(cal)30 b(apparen)m(t)g(sidereal)f -(time)h(\(radians\))0 5311 y FB(RETURNED)46 b FD(:)277 -5457 y Fq(sla)p Ft(_)p Fq(R)-9 b(VER)n(OT)196 b FB(R)567 -b FD(Comp)s(onen)m(t)99 b(of)g(Earth)g(rotation)h(in)d(direction)1658 -5570 y([RA,D)m(A])32 b(\(km)f(s)2260 5537 y Fp(\000)p -Fu(1)2354 5570 y FD(\))p eop -%%Page: 149 151 -149 150 bop 0 52 a Fw(SUN/67.70)3206 b FD(149)0 351 y -FB(NOTES)44 b FD(:)311 536 y(1.)i(Sign)22 b(con)m(v)m(en)m(tion:)38 -b(the)24 b(result)e(is)g(p)s(ositiv)m(e)g(when)g(the)h(observ)-5 -b(atory)24 b(is)e(receding)h(from)f(the)h(giv)m(en)427 -649 y(p)s(oin)m(t)30 b(on)g(the)g(sky)-8 b(.)311 792 -y(2.)46 b(Accuracy:)60 b(the)40 b(simple)e(algorithm)h(used)f(assumes)i -(a)g(spherical)e(Earth)h(and)g(an)h(observing)427 905 -y(station)j(at)g(sea)h(lev)m(el;)k(for)43 b(actual)g(observing)e -(sites,)46 b(the)d(error)f(is)g(unlik)m(ely)e(to)j(b)s(e)f(greater)427 -1018 y(than)g(0.0005)i(km)e(s)1147 985 y Fp(\000)p Fu(1)1241 -1018 y FD(.)75 b(F)-8 b(or)43 b(applications)d(requiring)f(greater)k -(accuracy)-8 b(,)47 b(use)41 b(the)h(routine)427 1131 -y(sla)p Ft(_)p FD(PV)m(OBS.)p 0 1245 3780 8 v 0 1358 -a Fx(SLA)p Fn(_)p Fx(R)-15 b(V)l(GALC)258 b Fm(R)-13 -b(V)39 b(Corrn)e(to)h(Galactic)f(Cen)m(tre)258 b Fx(SLA)p -Fn(_)p Fx(R)-15 b(V)l(GALC)0 1708 y FB(A)m(CTION)44 b -FD(:)c(V)-8 b(elo)s(cit)m(y)31 b(comp)s(onen)m(t)g(in)e(a)i(giv)m(en)f -(direction)f(due)h(to)h(the)g(rotation)f(of)h(the)g(Galaxy)-8 -b(.)0 1896 y FB(CALL)45 b FD(:)77 b Ft(R)47 b(=)h(sla_RVGALC)d -(\(R2000,)g(D2000\))0 2234 y FB(GIVEN)g FD(:)277 2405 -y Fq(R2000,D2000)205 b FB(R)567 b FD(J2000.0)33 b(mean)d([)15 -b Fl(\013;)g(\016)20 b FD(])31 b(\(radians\))0 2746 y -FB(RETURNED)46 b FD(:)277 2892 y Fq(sla)p Ft(_)p Fq(R)-9 -b(V)n(GALC)199 b FB(R)567 b FD(Comp)s(onen)m(t)30 b(of)h(dynamical)f -(LSR)g(motion)g(in)f(direction)1658 3005 y(R2000,D2000)35 -b(\(km)30 b(s)2439 2972 y Fp(\000)p Fu(1)2533 3005 y -FD(\))0 3337 y FB(NOTES)44 b FD(:)311 3522 y(1.)i(Sign)26 -b(con)m(v)m(en)m(tion:)41 b(the)27 b(result)f(is)g(p)s(ositiv)m(e)h -(when)f(the)h(LSR)g(is)f(receding)h(from)g(the)g(giv)m(en)g(p)s(oin)m -(t)427 3635 y(on)k(the)f(sky)-8 b(.)311 3778 y(2.)46 -b(The)33 b(Lo)s(cal)g(Standard)g(of)g(Rest)h(used)f(here)g(is)f(a)i(p)s -(oin)m(t)f(in)f(the)h(vicinit)m(y)f(of)i(the)f(Sun)f(whic)m(h)g(is)427 -3891 y(in)c(a)h(circular)f(orbit)g(around)f(the)j(Galactic)f(cen)m -(tre.)42 b(Sometimes)28 b(called)g(the)i Fq(dynamic)-5 -b(al)40 b FD(LSR,)427 4004 y(it)31 b(is)g(not)h(to)g(b)s(e)f(confused)g -(with)g(a)h Fq(kinematic)-5 b(al)42 b FD(LSR,)31 b(whic)m(h)f(is)h(the) -h(mean)g(standard)f(of)g(rest)427 4117 y(of)g(star)f(catalogues)i(or)f -(stellar)e(p)s(opulations.)311 4260 y(3.)46 b(The)34 -b(dynamical)f(LSR)g(v)m(elo)s(cit)m(y)i(due)f(to)h(Galactic)g(rotation) -g(is)e(assumed)h(to)h(b)s(e)f(220)h(km)f(s)3685 4227 -y Fp(\000)p Fu(1)427 4373 y FD(to)m(w)m(ards)d Fl(l)795 -4340 y Ff(I)-7 b(I)885 4373 y FD(=)24 b(90)1070 4340 -y Fp(\016)1111 4373 y FD(,)30 b Fl(b)1205 4340 y Ff(I)-7 -b(I)1295 4373 y FD(=)25 b(0.)0 4713 y FB(REFERENCE)44 -b FD(:)d(Kerr)29 b(&)h(Lynden-Bell)f(\(1986\),)k(MNRAS,)e(221,)h -(p1023.)p 0 4842 V 0 4955 a Fx(SLA)p Fn(_)p Fx(R)-15 -b(VLG)534 b Fm(R)-13 b(V)39 b(Corrn)e(to)h(Lo)s(cal)g(Group)534 -b Fx(SLA)p Fn(_)p Fx(R)-15 b(VLG)0 5305 y FB(A)m(CTION)44 -b FD(:)c(V)-8 b(elo)s(cit)m(y)30 b(comp)s(onen)m(t)g(in)f(a)h(giv)m(en) -g(direction)e(due)h(to)i(the)e(com)m(bination)g(of)h(the)g(rotation)g -(of)227 5418 y(the)h(Galaxy)f(and)g(the)g(motion)g(of)h(the)f(Galaxy)h -(relativ)m(e)f(to)h(the)f(mean)h(motion)e(of)i(the)f(lo)s(cal)g(group.) -0 5606 y FB(CALL)45 b FD(:)77 b Ft(R)47 b(=)h(sla_RVLG)d(\(R2000,)h -(D2000\))p eop -%%Page: 150 152 -150 151 bop 0 52 a FD(150)0 351 y FB(GIVEN)45 b FD(:)277 -523 y Fq(R2000,D2000)205 b FB(R)567 b FD(J2000.0)33 b(mean)d([)15 -b Fl(\013;)g(\016)20 b FD(])31 b(\(radians\))0 876 y -FB(RETURNED)46 b FD(:)277 1022 y Fq(sla)p Ft(_)p Fq(R)-9 -b(VLG)330 b FB(R)567 b FD(Comp)s(onen)m(t)47 b(of)h FB(solar)g -FD(\()p Fq(n.b.)p FD(\))92 b(motion)47 b(in)f(direction)1658 -1135 y(R2000,D2000)35 b(\(km)30 b(s)2439 1102 y Fp(\000)p -Fu(1)2533 1135 y FD(\))0 1481 y FB(NOTE)44 b FD(:)d(Sign)28 -b(con)m(v)m(en)m(tion:)42 b(the)30 b(result)f(is)g(p)s(ositiv)m(e)g -(when)g(the)i(Sun)d(is)h(receding)h(from)f(the)h(giv)m(en)g(p)s(oin)m -(t)227 1594 y(on)h(the)f(sky)-8 b(.)0 1947 y FB(REFERENCE)44 -b FD(:)d Fq(IA)n(U)31 b(T)-7 b(r)i(ans.)32 b FD(1976.)g -FB(16B)p FD(,)g(p201.)p 0 2076 3780 8 v 0 2189 a Fx(SLA)p -Fn(_)p Fx(R)-15 b(VLSRD)278 b Fm(R)-13 b(V)38 b(Corrn)g(to)g(Dynamical) -e(LSR)279 b Fx(SLA)p Fn(_)p Fx(R)-15 b(VLSRD)0 2539 y -FB(A)m(CTION)44 b FD(:)i(V)-8 b(elo)s(cit)m(y)34 b(comp)s(onen)m(t)f -(in)f(a)h(giv)m(en)g(direction)f(due)g(to)i(the)f(Sun's)f(motion)h -(with)f(resp)s(ect)h(to)227 2652 y(the)e(\\dynamical")f(Lo)s(cal)g -(Standard)f(of)i(Rest.)0 2840 y FB(CALL)45 b FD(:)77 -b Ft(R)47 b(=)h(sla_RVLSRD)d(\(R2000,)g(D2000\))0 3185 -y FB(GIVEN)g FD(:)277 3356 y Fq(R2000,D2000)205 b FB(R)567 -b FD(J2000.0)33 b(mean)d([)15 b Fl(\013;)g(\016)20 b -FD(])31 b(\(radians\))0 3710 y FB(RETURNED)46 b FD(:)277 -3856 y Fq(sla)p Ft(_)p Fq(R)-9 b(VLSRD)214 b FB(R)567 -b FD(Comp)s(onen)m(t)43 b(of)h Fq(p)-5 b(e)g(culiar)55 -b FD(solar)44 b(motion)f(in)f(direction)1658 3969 y(R2000,D2000)35 -b(\(km)30 b(s)2439 3936 y Fp(\000)p Fu(1)2533 3969 y -FD(\))0 4314 y FB(NOTES)44 b FD(:)311 4500 y(1.)i(Sign)28 -b(con)m(v)m(en)m(tion:)41 b(the)29 b(result)f(is)g(p)s(ositiv)m(e)g -(when)g(the)h(Sun)e(is)h(receding)h(from)f(the)i(giv)m(en)e(p)s(oin)m -(t)427 4613 y(on)j(the)f(sky)-8 b(.)311 4758 y(2.)46 -b(The)32 b(Lo)s(cal)f(Standard)g(of)h(Rest)g(used)f(here)h(is)f(the)h -Fq(dynamic)-5 b(al)43 b FD(LSR,)31 b(a)i(p)s(oin)m(t)e(in)f(the)i -(vicinit)m(y)427 4871 y(of)e(the)g(Sun)e(whic)m(h)g(is)h(in)f(a)i -(circular)e(orbit)g(around)h(the)h(Galactic)g(cen)m(tre.)42 -b(The)29 b(Sun's)f(motion)427 4984 y(with)h(resp)s(ect)i(to)g(the)f -(dynamical)f(LSR)h(is)f(called)h(the)g Fq(p)-5 b(e)g(culiar)42 -b FD(solar)30 b(motion.)311 5128 y(3.)46 b(There)35 b(is)f(another)i(t) -m(yp)s(e)f(of)g(LSR,)g(called)f(a)i Fq(kinematic)-5 b(al)46 -b FD(LSR.)34 b(A)i(kinematical)e(LSR)g(is)g(the)427 5241 -y(mean)d(standard)g(of)g(rest)g(of)g(sp)s(eci\014ed)f(star)h -(catalogues)h(or)f(stellar)g(p)s(opulations,)e(and)h(sev)m(eral)427 -5354 y(sligh)m(tly)h(di\013eren)m(t)h(kinematical)g(LSRs)f(are)i(in)f -(use.)47 b(The)32 b(Sun's)f(motion)h(with)g(resp)s(ect)g(to)i(an)427 -5467 y(agreed)c(kinematical)f(LSR)f(is)g(kno)m(wn)h(as)h(the)f -Fq(standar)-5 b(d)42 b FD(solar)29 b(motion.)40 b(The)29 -b(dynamical)e(LSR)427 5580 y(is)35 b(seldom)f(used)h(b)m(y)h(observ)-5 -b(ational)34 b(astronomers,)k(who)d(con)m(v)m(en)m(tionally)g(use)h(a)f -(kinematical)427 5693 y(LSR)30 b(suc)m(h)g(as)g(the)h(one)g(implemen)m -(ted)e(in)g(the)h(routine)g(sla)p Ft(_)p FD(R)-10 b(VLSRK.)p -eop -%%Page: 151 153 -151 152 bop 0 52 a Fw(SUN/67.70)3206 b FD(151)311 351 -y(4.)46 b(The)25 b(p)s(eculiar)f(solar)h(motion)g(is)g(from)g(Delha)m -(y)m(e)i(\(1965\),)i(in)24 b Fq(Stars)29 b(and)g(Stel)5 -b(lar)30 b(Systems)p FD(,)d(v)m(ol)f(5,)427 464 y(p73:)57 -b(in)37 b(Galactic)j(Cartesian)e(co)s(ordinates)g(\(+9,+12,+7\))i(km)e -(s)2792 431 y Fp(\000)p Fu(1)2886 464 y FD(.)65 b(This)37 -b(corresp)s(onds)g(to)427 577 y(ab)s(out)30 b(16.6)i(km)e(s)1069 -544 y Fp(\000)p Fu(1)1194 577 y FD(to)m(w)m(ards)h(Galactic)g(co)s -(ordinates)f Fl(l)2404 544 y Ff(I)-7 b(I)2493 577 y FD(=)25 -b(53)2679 544 y Fp(\016)2720 577 y Fl(;)15 b(b)2799 544 -y Ff(I)-7 b(I)2888 577 y FD(=)25 b(+25)3145 544 y Fp(\016)3185 -577 y FD(.)p 0 679 3780 8 v 0 792 a Fx(SLA)p Fn(_)p Fx(R)-15 -b(VLSRK)241 b Fm(R)-13 b(V)39 b(Corrn)e(to)h(Kinematical)d(LSR)242 -b Fx(SLA)p Fn(_)p Fx(R)-15 b(VLSRK)0 1142 y FB(A)m(CTION)44 -b FD(:)39 b(V)-8 b(elo)s(cit)m(y)29 b(comp)s(onen)m(t)f(in)f(a)h(giv)m -(en)g(direction)f(due)g(to)i(the)f(Sun's)e(motion)i(with)e(resp)s(ect)i -(to)h(a)227 1255 y(kinematical)h(Lo)s(cal)g(Standard)f(of)i(Rest.)0 -1443 y FB(CALL)45 b FD(:)77 b Ft(R)47 b(=)h(sla_RVLSRK)d(\(R2000,)g -(D2000\))0 1752 y FB(GIVEN)g FD(:)277 1923 y Fq(R2000,D2000)205 -b FB(R)567 b FD(J2000.0)33 b(mean)d([)15 b Fl(\013;)g(\016)20 -b FD(])31 b(\(radians\))0 2214 y FB(RETURNED)46 b FD(:)277 -2360 y Fq(sla)p Ft(_)p Fq(R)-9 b(VLSRK)213 b FB(R)567 -b FD(Comp)s(onen)m(t)38 b(of)h Fq(standar)-5 b(d)50 b -FD(solar)38 b(motion)g(in)f(direction)1658 2473 y(R2000,D2000)e(\(km)30 -b(s)2439 2440 y Fp(\000)p Fu(1)2533 2473 y FD(\))0 2755 -y FB(NOTES)44 b FD(:)311 2933 y(1.)i(Sign)28 b(con)m(v)m(en)m(tion:)41 -b(the)29 b(result)f(is)g(p)s(ositiv)m(e)g(when)g(the)h(Sun)e(is)h -(receding)h(from)f(the)i(giv)m(en)e(p)s(oin)m(t)427 3046 -y(on)j(the)f(sky)-8 b(.)311 3181 y(2.)46 b(The)29 b(Lo)s(cal)f -(Standard)g(of)h(Rest)h(used)e(here)h(is)e(one)j(of)f(sev)m(eral)g -Fq(kinematic)-5 b(al)40 b FD(LSRs)28 b(in)f(common)427 -3294 y(use.)49 b(A)33 b(kinematical)g(LSR)f(is)g(the)h(mean)h(standard) -e(of)h(rest)h(of)f(sp)s(eci\014ed)e(star)j(catalogues)g(or)427 -3407 y(stellar)h(p)s(opulations.)52 b(The)35 b(Sun's)e(motion)i(with)f -(resp)s(ect)h(to)h(a)f(kinematical)g(LSR)f(is)g(kno)m(wn)427 -3520 y(as)d(the)f Fq(standar)-5 b(d)43 b FD(solar)30 -b(motion.)311 3656 y(3.)46 b(There)33 b(is)g(another)g(sort)h(of)f -(LSR,)g(seldom)g(used)f(b)m(y)h(observ)-5 b(ational)33 -b(astronomers,)i(called)d(the)427 3769 y Fq(dynamic)-5 -b(al)42 b FD(LSR.)29 b(This)f(is)g(a)i(p)s(oin)m(t)f(in)g(the)h -(vicinit)m(y)e(of)h(the)h(Sun)f(whic)m(h)f(is)h(in)f(a)i(circular)e -(orbit)427 3882 y(around)h(the)h(Galactic)h(cen)m(tre.)42 -b(The)30 b(Sun's)e(motion)i(with)f(resp)s(ect)h(to)g(the)h(dynamical)d -(LSR)h(is)427 3995 y(called)j(the)h Fq(p)-5 b(e)g(culiar)44 -b FD(solar)32 b(motion.)47 b(T)-8 b(o)34 b(obtain)e(a)h(radial)e(v)m -(elo)s(cit)m(y)i(correction)g(with)e(resp)s(ect)427 4108 -y(to)g(the)g(dynamical)e(LSR)g(use)h(the)h(routine)e(sla)p -Ft(_)p FD(R)-10 b(VLSRD.)311 4244 y(4.)46 b(The)30 b(adopted)h -(standard)e(solar)h(motion)g(is)g(20)h(km)f(s)2271 4211 -y Fp(\000)p Fu(1)2395 4244 y FD(to)m(w)m(ards)h Fl(\013)26 -b FD(=)f(18)3004 4211 y Fu(h)3048 4244 y Fl(;)15 b(\016)30 -b FD(=)25 b(+30)3415 4211 y Fp(\016)3485 4244 y FD(\(1900\).)0 -4534 y FB(REFERENCES)44 b FD(:)311 4712 y(1.)i(Delha)m(y)m(e)32 -b(\(1965\),)h(in)c Fq(Stars)34 b(and)f(Stel)5 b(lar)34 -b(Systems)p FD(,)e(v)m(ol)e(5,)h(p73.)311 4848 y(2.)46 -b Fq(Metho)-5 b(ds)34 b(of)f(Exp)-5 b(erimental)34 b(Physics)39 -b FD(\(ed)30 b(Meeks\),)i(v)m(ol)e(12,)i(part)e(C,)g(sec)h(6.1.5.2,)i -(p281.)p 0 4955 V 0 5068 a Fx(SLA)p Fn(_)p Fx(S2TP)545 -b Fm(Spherical)37 b(to)h(T)-10 b(angen)m(t)38 b(Plane)546 -b Fx(SLA)p Fn(_)p Fx(S2TP)0 5418 y FB(A)m(CTION)44 b -FD(:)c(Pro)5 b(jection)31 b(of)f(spherical)f(co)s(ordinates)h(on)m(to)i -(the)e(tangen)m(t)i(plane)d(\(single)h(precision\).)0 -5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_S2TP)g(\(RA,)h(DEC,)f -(RAZ,)h(DECZ,)f(XI,)h(ETA,)g(J\))p eop -%%Page: 152 154 -152 153 bop 0 52 a FD(152)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(RA,DEC)378 b FB(R)567 b FD(spherical)29 b(co)s(ordinates)h(of) -g(star)h(\(radians\))277 610 y Fq(RAZ,DECZ)266 b FB(R)567 -b FD(spherical)29 b(co)s(ordinates)h(of)g(tangen)m(t)i(p)s(oin)m(t)e -(\(radians\))0 865 y FB(RETURNED)46 b FD(:)277 1011 y -Fq(XI,ET)-7 b(A)417 b FB(R)567 b FD(tangen)m(t)32 b(plane)d(co)s -(ordinates)h(\(radians\))277 1124 y Fq(J)688 b FB(I)605 -b FD(status:)1825 1236 y(0)31 b(=)f(OK,)g(star)g(on)g(tangen)m(t)i -(plane)1825 1349 y(1)f(=)f(error,)g(star)g(to)s(o)h(far)g(from)f(axis) -1825 1462 y(2)h(=)f(error,)g(an)m(tistar)g(on)h(tangen)m(t)h(plane)1825 -1575 y(3)f(=)f(error,)g(an)m(tistar)g(to)s(o)i(far)e(from)g(axis)0 -1830 y FB(NOTES)44 b FD(:)311 2003 y(1.)i(The)24 b(pro)5 -b(jection)25 b(is)f(called)f(the)i Fq(gnomonic)31 b FD(pro)5 -b(jection;)27 b(the)d(Cartesian)h(co)s(ordinates)f([)15 -b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 2116 y(called)30 -b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 2229 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 2361 y(2.)46 b(When)26 b(w)m(orking)g(in)e([)15 -b Fl(x;)g(y)s(;)g(z)21 b FD(])26 b(rather)g(than)g(spherical)e(co)s -(ordinates,)j(the)f(equiv)-5 b(alen)m(t)26 b(Cartesian)427 -2474 y(routine)k(sla)p Ft(_)p FD(V2TP)f(is)h(a)m(v)-5 -b(ailable.)p 0 2555 3780 8 v 0 2668 a Fx(SLA)p Fn(_)p -Fx(SEP)432 b Fm(Angle)38 b(Bet)m(w)m(een)f(2)i(P)m(oin)m(ts)e(on)h -(Sphere)433 b Fx(SLA)p Fn(_)p Fx(SEP)0 3018 y FB(A)m(CTION)44 -b FD(:)c(Angle)31 b(b)s(et)m(w)m(een)g(t)m(w)m(o)g(p)s(oin)m(ts)f(on)g -(a)h(sphere)e(\(single)h(precision\).)0 3206 y FB(CALL)45 -b FD(:)77 b Ft(R)47 b(=)h(sla_SEP)d(\(A1,)i(B1,)g(A2,)g(B2\))0 -3499 y FB(GIVEN)e FD(:)277 3645 y Fq(A1,B1)484 b FB(R)567 -b FD(spherical)29 b(co)s(ordinates)h(of)g(one)h(p)s(oin)m(t)e -(\(radians\))277 3758 y Fq(A2,B2)484 b FB(R)567 b FD(spherical)26 -b(co)s(ordinates)i(of)h(the)f(other)g(p)s(oin)m(t)g(\(radians\))0 -4012 y FB(RETURNED)46 b FD(:)277 4184 y Fq(sla)p Ft(_)p -Fq(SEP)407 b FB(R)567 b FD(angle)31 b(b)s(et)m(w)m(een)g([A1,B1])h(and) -e([A2,B2])i(in)d(radians)0 4446 y FB(NOTES)44 b FD(:)311 -4620 y(1.)i(The)26 b(spherical)e(co)s(ordinates)h(are)h(righ)m(t)g -(ascension)f(and)g(declination,)h(longitude)e(and)h(latitude,)427 -4733 y Fq(etc.)30 b FD(in)f(radians.)311 4865 y(2.)46 -b(The)30 b(result)f(is)h(alw)m(a)m(ys)h(p)s(ositiv)m(e.)p -0 4955 V 0 5068 a Fx(SLA)p Fn(_)p Fx(SEPV)574 b Fm(Angle)38 -b(Bet)m(w)m(een)g(2)g(V)-10 b(ectors)575 b Fx(SLA)p Fn(_)p -Fx(SEPV)0 5418 y FB(A)m(CTION)44 b FD(:)c(Angle)31 b(b)s(et)m(w)m(een)g -(t)m(w)m(o)g(v)m(ectors)h(\(single)e(precision\).)0 5606 -y FB(CALL)45 b FD(:)77 b Ft(R)47 b(=)h(sla_SEPV)d(\(V1,)i(V2\))p -eop -%%Page: 153 155 -153 154 bop 0 52 a Fw(SUN/67.70)3206 b FD(153)0 351 y -FB(GIVEN)45 b FD(:)277 497 y Fq(V1)622 b FB(R\(3\))433 -b FD(\014rst)30 b(v)m(ector)277 610 y Fq(V2)622 b FB(R\(3\))433 -b FD(second)31 b(v)m(ector)0 967 y FB(RETURNED)46 b FD(:)277 -1138 y Fq(sla)p Ft(_)p Fq(SEPV)339 b FB(R)567 b FD(angle)31 -b(b)s(et)m(w)m(een)g(V1)f(and)g(V2)h(in)e(radians)0 1503 -y FB(NOTES)44 b FD(:)311 1692 y(1.)i(There)30 b(is)g(no)g(requiremen)m -(t)f(for)i(either)e(v)m(ector)j(to)f(b)s(e)f(of)h(unit)e(length.)311 -1839 y(2.)46 b(If)30 b(either)g(v)m(ector)i(is)d(n)m(ull,)g(zero)i(is)f -(returned.)311 1986 y(3.)46 b(The)30 b(result)f(is)h(alw)m(a)m(ys)h(p)s -(ositiv)m(e.)p 0 2119 3780 8 v 0 2232 a Fx(SLA)p Fn(_)p -Fx(SMA)-11 b(T)413 b Fm(Solv)m(e)38 b(Sim)m(ultaneous)d(Equations)414 -b Fx(SLA)p Fn(_)p Fx(SMA)-11 b(T)0 2583 y FB(A)m(CTION)44 -b FD(:)c(Matrix)31 b(in)m(v)m(ersion)e(and)h(solution)f(of)h(sim)m -(ultaneous)f(equations)h(\(single)f(precision\).)0 2770 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_SMAT)g(\(N,)h(A,)g(Y,)g(D,)g -(JF,)g(IW\))0 3122 y FB(GIVEN)e FD(:)277 3268 y Fq(N)668 -b FB(I)605 b FD(n)m(um)m(b)s(er)29 b(of)i(unkno)m(wns)277 -3381 y Fq(A)668 b FB(R\(N,N\))292 b FD(matrix)277 3494 -y Fq(Y)668 b FB(R\(N\))403 b FD(v)m(ector)0 3850 y FB(RETURNED)46 -b FD(:)277 3996 y Fq(A)668 b FB(R\(N,N\))292 b FD(matrix)30 -b(in)m(v)m(erse)277 4109 y Fq(Y)668 b FB(R\(N\))403 b -FD(solution)277 4222 y Fq(D)667 b FB(R)567 b FD(determinan)m(t)277 -4335 y Fq(JF)629 b FB(I)605 b FD(singularit)m(y)28 b(\015ag:)41 -b(0=OK)277 4448 y Fq(IW)610 b FB(I\(N\))441 b FD(w)m(orkspace)0 -4804 y FB(NOTES)44 b FD(:)311 4993 y(1.)i(F)-8 b(or)31 -b(the)g(set)g(of)f Fl(n)g FD(sim)m(ultaneous)f(linear)g(equations)h(in) -f Fl(n)h FD(unkno)m(wns:)597 5140 y FB(A)p Fo(\001)p -FB(y)h FD(=)f FB(x)427 5287 y FD(where:)506 5433 y Fo(\017)46 -b FB(A)31 b FD(is)e(a)i(non-singular)d Fl(n)20 b Fo(\002)f -Fl(n)30 b FD(matrix,)506 5563 y Fo(\017)46 b FB(y)31 -b FD(is)e(the)i(v)m(ector)h(of)e Fl(n)g FD(unkno)m(wns,)f(and)506 -5693 y Fo(\017)46 b FB(x)31 b FD(is)e(the)i(kno)m(wn)f(v)m(ector,)p -eop -%%Page: 154 156 -154 155 bop 0 52 a FD(154)427 351 y(sla)p Ft(_)p FD(SMA)-8 -b(T)30 b(computes:)506 487 y Fo(\017)46 b FD(the)31 b(in)m(v)m(erse)f -(of)h(matrix)e FB(A)p FD(,)506 611 y Fo(\017)46 b FD(the)31 -b(determinan)m(t)f(of)g(matrix)g FB(A)p FD(,)h(and)506 -736 y Fo(\017)46 b FD(the)31 b(v)m(ector)h(of)e Fl(n)g -FD(unkno)m(wns)f FB(y)p FD(.)427 871 y(Argumen)m(t)h(N)f(is)g(the)h -(order)f Fl(n)p FD(,)g(A)h(\(giv)m(en\))g(is)e(the)i(matrix)f -FB(A)p FD(,)g(Y)h(\(giv)m(en\))g(is)f(the)g(v)m(ector)i -FB(x)f FD(and)427 984 y(Y)g(\(returned\))g(is)f(the)i(v)m(ector)g -FB(y)p FD(.)41 b(The)30 b(argumen)m(t)g(A)g(\(returned\))g(is)f(the)h -(in)m(v)m(erse)g(matrix)g FB(A)3660 951 y Fp(\000)p Fu(1)3754 -984 y FD(,)427 1097 y(and)g(D)h(is)e Fq(det)9 b FD(\()p -FB(A)p FD(\).)311 1233 y(2.)46 b(JF)40 b(is)e(the)i(singularit)m(y)d -(\015ag.)68 b(If)39 b(the)g(matrix)g(is)f(non-singular,)i(JF=0)f(is)g -(returned.)66 b(If)39 b(the)427 1346 y(matrix)32 b(is)f(singular,)h -(JF=)p Fo(\000)p FD(1)g(and)g(D=0.0)h(are)g(returned.)46 -b(In)31 b(the)i(latter)g(case,)h(the)f(con)m(ten)m(ts)427 -1459 y(of)e(arra)m(y)g(A)f(on)g(return)g(are)g(unde\014ned.)311 -1594 y(3.)46 b(The)38 b(algorithm)g(is)f(Gaussian)h(elimination)e(with) -h(partial)h(piv)m(oting.)64 b(This)37 b(metho)s(d)h(is)f(v)m(ery)427 -1707 y(fast;)49 b(some)43 b(m)m(uc)m(h)f(slo)m(w)m(er)h(algorithms)e -(can)i(giv)m(e)f(b)s(etter)h(accuracy)-8 b(,)47 b(but)42 -b(only)f(b)m(y)h(a)h(small)427 1820 y(factor.)311 1956 -y(4.)j(This)29 b(routine)g(replaces)h(the)h(obsolete)g(sla)p -Ft(_)p FD(SMA)-8 b(TRX.)p 0 2057 3780 8 v 0 2170 a Fx(SLA)p -Fn(_)p Fx(SUBET)691 b Fm(Remo)m(v)m(e)36 b(E-terms)690 -b Fx(SLA)p Fn(_)p Fx(SUBET)0 2521 y FB(A)m(CTION)44 b -FD(:)36 b(Remo)m(v)m(e)25 b(the)d(E-terms)g(\(elliptic)f(comp)s(onen)m -(t)h(of)h(ann)m(ual)e(ab)s(erration\))h(from)f(a)i(pre)f(IA)m(U)h(1976) -227 2634 y(catalogue)32 b([)15 b Fl(\013;)g(\016)21 b -FD(])30 b(to)h(giv)m(e)g(a)g(mean)f(place.)0 2821 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_SUBET)g(\(RC,)g(DC,)h(EQ,)g(RM,)g(DM\))0 -3129 y FB(GIVEN)e FD(:)277 3275 y Fq(R)n(C,DC)445 b FB(D)565 -b FD([)15 b Fl(\013;)g(\016)20 b FD(])31 b(with)e(E-terms)i(included)c -(\(radians\))277 3388 y Fq(EQ)604 b FB(D)565 b FD(Besselian)30 -b(ep)s(o)s(c)m(h)g(of)g(mean)h(equator)g(and)f(equino)m(x)0 -3669 y FB(RETURNED)46 b FD(:)277 3841 y Fq(RM,DM)409 -b FB(D)565 b FD([)15 b Fl(\013;)g(\016)20 b FD(])31 b(without)e -(E-terms)i(\(radians\))0 4130 y FB(NOTE)44 b FD(:)39 -b(Most)28 b(star)g(p)s(ositions)d(from)i(pre-1984)h(optical)f -(catalogues)i(\(or)e(obtained)g(b)m(y)g(astrometry)h(with)227 -4243 y(resp)s(ect)k(to)g(suc)m(h)f(stars\))g(ha)m(v)m(e)i(the)e -(E-terms)h(built-in.)40 b(This)30 b(routine)g(con)m(v)m(erts)j(suc)m(h) -e(a)g(p)s(osition)f(to)227 4356 y(a)h(formal)f(mean)g(place)g(\(allo)m -(wing,)g(for)g(example,)h(comparison)e(with)g(a)i(pulsar)d(timing)h(p)s -(osition\).)0 4645 y FB(REFERENCE)44 b FD(:)56 b Fq(Explanatory)42 -b(Supplement)f(to)f(the)g(Astr)-5 b(onomic)g(al)43 b(Ephemeris)p -FD(,)e(section)d(2D,)h(page)227 4758 y(48.)p 0 4842 V -0 4955 a Fx(SLA)p Fn(_)p Fx(SUPGAL)365 b Fm(Sup)s(ergalactic)36 -b(to)i(Galactic)365 b Fx(SLA)p Fn(_)p Fx(SUPGAL)0 5305 -y FB(A)m(CTION)44 b FD(:)39 b(T)-8 b(ransformation)26 -b(from)h(de)g(V)-8 b(aucouleurs)27 b(sup)s(ergalactic)f(co)s(ordinates) -h(to)h(IA)m(U)g(1958)h(galac-)227 5418 y(tic)i(co)s(ordinates.)0 -5606 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_SUPGAL)f(\(DSL,)i(DSB,)f -(DL,)h(DB\))p eop -%%Page: 155 157 -155 156 bop 0 52 a Fw(SUN/67.70)3206 b FD(155)0 351 y -FB(GIVEN)45 b FD(:)277 523 y Fq(DSL,DSB)347 b FB(D)565 -b FD(sup)s(ergalactic)30 b(longitude)f(and)h(latitude)f(\(radians\))0 -997 y FB(RETURNED)46 b FD(:)277 1169 y Fq(DL,DB)449 b -FB(D)565 b FD(galactic)29 b(longitude)e(and)h(latitude)f([)15 -b Fl(l)2966 1136 y Ff(I)-7 b(I)3030 1169 y Fl(;)15 b(b)3109 -1136 y Ff(I)-7 b(I)3189 1169 y FD(])28 b(\(radians\))0 -1643 y FB(REFERENCES)44 b FD(:)311 1875 y(1.)i(de)41 -b(V)-8 b(aucouleurs,)42 b(de)f(V)-8 b(aucouleurs,)43 -b(&)d(Corwin,)h Fq(Se)-5 b(c)g(ond)43 b(R)-5 b(efer)g(enc)g(e)43 -b(Catalo)-5 b(gue)44 b(of)e(Bright)427 1988 y(Galaxies)p -FD(,)32 b(U.T)-8 b(exas,)32 b(p8.)311 2157 y(2.)46 b(Systems)31 -b(&)h(Applied)d(Sciences)i(Corp.,)g(do)s(cumen)m(tation)h(for)f(the)h -(mac)m(hine-readable)f(v)m(ersion)427 2270 y(of)g(the)f(ab)s(o)m(v)m(e) -i(catalogue,)g(Con)m(tract)g(NAS)e(5-26490.)227 2502 -y(\(These)k(t)m(w)m(o)h(references)g(giv)m(e)f(di\013eren)m(t)f(v)-5 -b(alues)33 b(for)h(the)g(galactic)h(longitude)d(of)i(the)g(sup)s -(ergalactic)227 2615 y(origin.)39 b(Both)31 b(are)g(wrong;)f(the)h -(correct)h(v)-5 b(alue)29 b(is)h Fl(l)2012 2582 y Ff(I)-7 -b(I)2101 2615 y FD(=)25 b(137)p Fl(:)p FD(37.\))p 0 2798 -3780 8 v 0 2911 a Fx(SLA)p Fn(_)p Fx(SVD)518 b Fm(Singular)37 -b(V)-10 b(alue)38 b(Decomp)s(osition)517 b Fx(SLA)p Fn(_)p -Fx(SVD)0 3261 y FB(A)m(CTION)44 b FD(:)60 b(Singular)37 -b(v)-5 b(alue)40 b(decomp)s(osition.)69 b(This)38 b(routine)h -(expresses)h(a)g(giv)m(en)g(matrix)g FB(A)g FD(as)g(the)227 -3374 y(pro)s(duct)29 b(of)i(three)g(matrices)f FB(U)p -FD(,)h FB(W)p FD(,)g FB(V)1648 3341 y Ff(T)1703 3374 -y FD(:)667 3599 y FB(A)f FD(=)g FB(U)h Fo(\001)f FB(W)h -Fo(\001)f FB(V)1316 3566 y Ff(T)227 3824 y FD(where:)667 -4049 y FB(A)224 b FD(is)29 b(an)m(y)i Fl(m)f FD(\(ro)m(ws\))h -Fo(\002)p Fl(n)f FD(\(columns\))f(matrix,)h(where)g Fl(m)25 -b Fo(\025)g Fl(n)667 4162 y FB(U)223 b FD(is)29 b(an)h -Fl(m)20 b Fo(\002)g Fl(n)30 b FD(column-orthogonal)g(matrix)667 -4275 y FB(W)195 b FD(is)29 b(an)h Fl(n)20 b Fo(\002)g -Fl(n)30 b FD(diagonal)g(matrix)f(with)g Fl(w)2369 4289 -y Ff(ii)2447 4275 y Fo(\025)c FD(0)667 4388 y FB(V)746 -4355 y Ff(T)970 4388 y FD(is)k(the)i(transp)s(ose)f(of)g(an)g -Fl(n)20 b Fo(\002)g Fl(n)30 b FD(orthogonal)h(matrix)0 -4613 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_SVD)g(\(M,)h(N,)g(MP,)g -(NP,)g(A,)g(W,)g(V,)h(WORK,)e(JSTAT\))0 5030 y FB(GIVEN)f -FD(:)277 5176 y Fq(M,N)558 b FB(I)605 b Fl(m)p FD(,)32 -b Fl(n)p FD(,)h(the)f(n)m(um)m(b)s(ers)e(of)i(ro)m(ws)g(and)g(columns)e -(in)h(matrix)1658 5289 y FB(A)277 5402 y Fq(MP,NP)434 -b FB(I)605 b FD(ph)m(ysical)29 b(dimensions)e(of)j(arra)m(y)g(con)m -(taining)g(matrix)f FB(A)277 5515 y Fq(A)668 b FB(D\(MP)-9 -b(,NP\))140 b FD(arra)m(y)31 b(con)m(taining)f Fl(m)20 -b Fo(\002)g Fl(n)30 b FD(matrix)f FB(A)p eop -%%Page: 156 158 -156 157 bop 0 52 a FD(156)0 351 y FB(RETURNED)46 b FD(:)277 -497 y Fq(A)668 b FB(D\(MP)-9 b(,NP\))140 b FD(arra)m(y)32 -b(con)m(taining)f Fl(m)21 b Fo(\002)g Fl(n)31 b FD(column-orthogonal)g -(matrix)1658 610 y FB(U)277 723 y Fq(W)645 b FB(D\(N\))401 -b Fl(n)15 b Fo(\002)g Fl(n)28 b FD(diagonal)f(matrix)h -FB(W)g FD(\(diagonal)f(elemen)m(ts)i(only\))277 949 y -Fq(V)668 b FB(D\(NP)-9 b(,NP\))157 b FD(arra)m(y)35 b(con)m(taining)e -Fl(n)22 b Fo(\002)g Fl(n)34 b FD(orthogonal)g(matrix)f -FB(V)h FD(\()p Fq(n.b.)1658 1062 y FD(not)d FB(V)1899 -1029 y Ff(T)1954 1062 y FD(\))277 1175 y Fq(WORK)439 -b FB(D\(N\))401 b FD(w)m(orkspace)277 1288 y Fq(JST)-7 -b(A)g(T)453 b FB(I)605 b FD(0)24 b(=)g(OK,)f Fo(\000)p -FD(1)h(=)g(arra)m(y)g(A)g(wrong)f(shap)s(e,)i Fl(>)p -FD(0)f(=)g(index)e(of)1658 1401 y(W)29 b(for)e(whic)m(h)g(con)m(v)m -(ergence)j(failed)d(\(see)i(note)f(3,)i(b)s(elo)m(w\))0 -1937 y FB(NOTES)44 b FD(:)311 2152 y(1.)i(M)27 b(and)g(N)g(are)g(the)g -Fq(lo)-5 b(gic)g(al)38 b FD(dimensions)24 b(of)j(the)g(matrices)g(and)f -(v)m(ectors)j(concerned,)f(whic)m(h)d(can)427 2265 y(b)s(e)30 -b(lo)s(cated)h(in)e(arra)m(ys)h(of)h(larger)f Fq(physic)-5 -b(al)42 b FD(dimensions,)28 b(giv)m(en)i(b)m(y)g(MP)h(and)f(NP)-8 -b(.)311 2425 y(2.)46 b(V)31 b(con)m(tains)f(matrix)g(V,)h(not)f(the)h -(transp)s(ose)f(of)g(matrix)g(V.)311 2585 y(3.)46 b(If)36 -b(the)h(status)g(JST)-8 b(A)g(T)37 b(is)e(greater)j(than)f(zero,)i -(this)c(need)i(not)g(necessarily)e(b)s(e)h(treated)i(as)f(a)427 -2698 y(failure.)h(It)28 b(means)g(that,)h(due)e(to)h(c)m(hance)h(prop)s -(erties)d(of)i(the)f(matrix)g(A,)h(the)g(QR)f(transforma-)427 -2811 y(tion)i(phase)g(of)h(the)f(routine)g(did)e(not)j(fully)d(con)m(v) -m(erge)32 b(in)c(a)h(prede\014ned)f(n)m(um)m(b)s(er)g(of)i(iterations,) -427 2924 y(something)39 b(that)g(v)m(ery)h(seldom)e(o)s(ccurs.)66 -b(When)39 b(this)e(condition)h(do)s(es)h(arise,)h(it)f(is)f(p)s -(ossible)427 3037 y(that)29 b(the)f(elemen)m(ts)g(of)g(the)g(diagonal)f -(matrix)h(W)g(ha)m(v)m(e)h(not)f(b)s(een)f(correctly)i(found.)38 -b(Ho)m(w)m(ev)m(er,)427 3150 y(in)e(practice)h(the)f(results)g(are)h -(lik)m(ely)e(to)i(b)s(e)f(trust)m(w)m(orth)m(y)-8 b(.)61 -b(Applications)35 b(should)f(rep)s(ort)i(the)427 3263 -y(condition)29 b(as)i(a)g(w)m(arning,)e(but)h(then)g(pro)s(ceed)g -(normally)-8 b(.)0 3695 y FB(REFERENCES)44 b FD(:)54 -b(The)37 b(algorithm)f(is)g(an)h(adaptation)g(of)g(the)h(routine)e(SVD) -h(in)f(the)h Fq(EISP)-7 b(A)n(CK)51 b FD(li-)227 3807 -y(brary)26 b(\(Garb)s(o)m(w)g Fq(et)j(al.)d FD(1977,)k -Fq(EISP)-7 b(A)n(CK)27 b(Guide)i(Extension)p FD(,)f(Springer)c(V)-8 -b(erlag\),)28 b(whic)m(h)d(is)g(a)i(F)m(OR-)227 3920 -y(TRAN)j(66)g(implemen)m(tation)e(of)h(the)h(Algol)f(routine)f(SVD)i -(of)f(Wilkinson)e(&)i(Reinsc)m(h)g(1971)i(\()p Fq(Hand-)227 -4033 y(b)-5 b(o)g(ok)29 b(for)e(A)n(utomatic)h(Computation)p -FD(,)g(v)m(ol)d(2,)h(ed)e(Bauer)h Fq(et)i(al.)p FD(,)g(Springer)22 -b(V)-8 b(erlag\).)40 b(These)24 b(references)227 4146 -y(giv)m(e)37 b(full)e(details)g(of)i(the)g(algorithm)f(used)g(here.)59 -b(A)37 b(go)s(o)s(d)f(accoun)m(t)i(of)f(the)g(use)f(of)h(SVD)g(in)e -(least)227 4259 y(squares)d(problems)f(is)h(giv)m(en)g(in)f -Fq(Numeric)-5 b(al)36 b(R)-5 b(e)g(cip)g(es)41 b FD(\(Press)32 -b Fq(et)j(al.)e FD(1987,)i(Cam)m(bridge)c(Univ)m(ersit)m(y)227 -4372 y(Press\),)g(whic)m(h)e(includes)f(another)i(v)-5 -b(arian)m(t)31 b(of)f(the)h(EISP)-8 b(A)m(CK)30 b(co)s(de.)p -0 4538 3780 8 v 0 4651 a Fx(SLA)p Fn(_)p Fx(SVDCO)l(V)240 -b Fm(Co)m(v)-7 b(ariance)37 b(Matrix)g(from)f(SVD)243 -b Fx(SLA)p Fn(_)p Fx(SVDCO)l(V)0 5001 y FB(A)m(CTION)44 -b FD(:)c(F)-8 b(rom)29 b(the)g FB(W)g FD(and)f FB(V)g -FD(matrices)h(from)f(the)h(SVD)g(factorization)h(of)f(a)g(matrix)f -(\(as)h(obtained)227 5114 y(from)h(the)h(sla)p Ft(_)p -FD(SVD)e(routine\),)h(obtain)g(the)h(co)m(v)-5 b(ariance)31 -b(matrix.)0 5301 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_SVDCOV)f(\(N,)i(NP,)g(NC,)g(W,)g(V,)g(WORK,)g(CVM\))0 -5693 y FB(GIVEN)e FD(:)p eop -%%Page: 157 159 -157 158 bop 0 52 a Fw(SUN/67.70)3206 b FD(157)277 339 -y Fq(N)668 b FB(I)605 b Fl(n)p FD(,)28 b(the)h(n)m(um)m(b)s(er)d(of)i -(ro)m(ws)g(and)g(columns)e(in)h(matrices)h FB(W)1658 -452 y FD(and)i FB(V)277 565 y Fq(NP)606 b FB(I)f FD(\014rst)27 -b(dimension)f(of)i(arra)m(y)h(con)m(taining)e Fl(n)15 -b Fo(\002)g Fl(n)28 b FD(matrix)f FB(V)277 791 y Fq(NC)603 -b FB(I)i FD(\014rst)30 b(dimension)e(of)i(arra)m(y)h(CVM)277 -904 y Fq(W)645 b FB(D\(N\))401 b Fl(n)15 b Fo(\002)g -Fl(n)28 b FD(diagonal)f(matrix)h FB(W)g FD(\(diagonal)f(elemen)m(ts)i -(only\))277 1129 y Fq(V)668 b FB(D\(NP)-9 b(,NP\))157 -b FD(arra)m(y)31 b(con)m(taining)f Fl(n)20 b Fo(\002)g -Fl(n)30 b FD(orthogonal)g(matrix)g FB(V)0 1528 y(RETURNED)46 -b FD(:)277 1675 y Fq(WORK)439 b FB(D\(N\))401 b FD(w)m(orkspace)277 -1787 y Fq(CVM)521 b FB(D\(NC,NC\))138 b FD(arra)m(y)31 -b(to)g(receiv)m(e)g(co)m(v)-5 b(ariance)32 b(matrix)0 -2187 y FB(REFERENCE)44 b FD(:)d Fq(Numeric)-5 b(al)33 -b(R)-5 b(e)g(cip)g(es)p FD(,)32 b(section)e(14.3.)p 0 -2338 3780 8 v 0 2451 a Fx(SLA)p Fn(_)p Fx(SVDSOL)357 -b Fm(Solution)37 b(V)-10 b(ector)38 b(from)e(SVD)360 -b Fx(SLA)p Fn(_)p Fx(SVDSOL)0 2802 y FB(A)m(CTION)44 -b FD(:)60 b(F)-8 b(rom)41 b(a)g(giv)m(en)f(v)m(ector)i(and)d(the)i(SVD) -f(of)g(a)h(matrix)f(\(as)g(obtained)g(from)g(the)g(sla)p -Ft(_)p FD(SVD)227 2914 y(routine\),)30 b(obtain)g(the)h(solution)e(v)m -(ector.)42 b(This)29 b(routine)g(solv)m(es)h(the)h(equation:)667 -3139 y FB(A)f Fo(\001)h FB(x)f FD(=)g FB(b)227 3364 y -FD(where:)667 3589 y FB(A)224 b FD(is)29 b(a)i(giv)m(en)f -Fl(m)g FD(\(ro)m(ws\))h Fo(\002)p Fl(n)f FD(\(columns\))g(matrix,)g -(where)g Fl(m)25 b Fo(\025)g Fl(n)667 3702 y FB(x)248 -b FD(is)29 b(the)i Fl(n)p FD(-v)m(ector)h(w)m(e)e(wish)f(to)i(\014nd,)e -(and)667 3815 y FB(b)245 b FD(is)29 b(a)i(giv)m(en)f -Fl(m)p FD(-v)m(ector)227 4040 y(b)m(y)h(means)f(of)g(the)h -Fq(Singular)i(V)-7 b(alue)33 b(De)-5 b(c)g(omp)g(osition)40 -b FD(metho)s(d)29 b(\(SVD\).)0 4228 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_SVDSOL)f(\(M,)i(N,)g(MP,)g(NP,)g(B,)g(U,)h(W,)f(V,)g -(WORK,)f(X\))0 4605 y FB(GIVEN)f FD(:)277 4751 y Fq(M,N)558 -b FB(I)605 b Fl(m)p FD(,)32 b Fl(n)p FD(,)h(the)f(n)m(um)m(b)s(ers)e -(of)i(ro)m(ws)g(and)g(columns)e(in)h(matrix)1658 4864 -y FB(A)277 4977 y Fq(MP,NP)434 b FB(I)605 b FD(ph)m(ysical)29 -b(dimensions)e(of)j(arra)m(y)g(con)m(taining)g(matrix)f -FB(A)277 5090 y Fq(B)672 b FB(D\(M\))384 b FD(kno)m(wn)30 -b(v)m(ector)i FB(b)277 5203 y Fq(U)668 b FB(D\(MP)-9 -b(,NP\))140 b FD(arra)m(y)31 b(con)m(taining)f Fl(m)20 -b Fo(\002)g Fl(n)30 b FD(matrix)f FB(U)277 5315 y Fq(W)645 -b FB(D\(N\))401 b Fl(n)15 b Fo(\002)g Fl(n)28 b FD(diagonal)f(matrix)h -FB(W)g FD(\(diagonal)f(elemen)m(ts)i(only\))277 5541 -y Fq(V)668 b FB(D\(NP)-9 b(,NP\))157 b FD(arra)m(y)31 -b(con)m(taining)f Fl(n)20 b Fo(\002)g Fl(n)30 b FD(orthogonal)g(matrix) -g FB(V)p eop -%%Page: 158 160 -158 159 bop 0 52 a FD(158)0 351 y FB(RETURNED)46 b FD(:)277 -497 y Fq(WORK)439 b FB(D\(N\))401 b FD(w)m(orkspace)277 -610 y Fq(X)668 b FB(D\(N\))401 b FD(unkno)m(wn)29 b(v)m(ector)j -FB(x)0 984 y(NOTES)44 b FD(:)311 1179 y(1.)i(In)28 b(the)h(Singular)d -(V)-8 b(alue)29 b(Decomp)s(osition)g(metho)s(d)f(\(SVD\),)h(the)g -(matrix)f FB(A)h FD(is)f(\014rst)g(factorized)427 1292 -y(\(for)j(example)f(b)m(y)g(the)h(routine)e(sla)p Ft(_)p -FD(SVD\))h(in)m(to)g(the)h(follo)m(wing)e(comp)s(onen)m(ts:)867 -1465 y FB(A)h FD(=)g FB(U)h Fo(\001)f FB(W)h Fo(\001)f -FB(V)1516 1432 y Ff(T)427 1638 y FD(where:)867 1810 y -FB(A)224 b FD(is)29 b(an)m(y)i Fl(m)f FD(\(ro)m(ws\))h -Fo(\002)p Fl(n)f FD(\(columns\))f(matrix,)h(where)g Fl(m)25 -b(>)g(n)867 1923 y FB(U)223 b FD(is)29 b(an)h Fl(m)20 -b Fo(\002)g Fl(n)30 b FD(column-orthogonal)g(matrix)867 -2036 y FB(W)195 b FD(is)29 b(an)h Fl(n)20 b Fo(\002)g -Fl(n)30 b FD(diagonal)g(matrix)f(with)g Fl(w)2569 2050 -y Ff(ii)2647 2036 y Fo(\025)c FD(0)867 2149 y FB(V)946 -2116 y Ff(T)1170 2149 y FD(is)k(the)i(transp)s(ose)f(of)g(an)g -Fl(n)20 b Fo(\002)g Fl(n)30 b FD(orthogonal)h(matrix)427 -2322 y(Note)f(that)g Fl(m)f FD(and)f Fl(n)g FD(are)h(the)h -Fq(lo)-5 b(gic)g(al)39 b FD(dimensions)26 b(of)k(the)f(matrices)f(and)h -(v)m(ectors)h(concerned,)427 2435 y(whic)m(h)22 b(can)i(b)s(e)e(lo)s -(cated)i(in)e(arra)m(ys)h(of)h(larger)e Fq(physic)-5 -b(al)35 b FD(dimensions)20 b(MP)k(and)e(NP)-8 b(.)24 -b(The)f(solution)427 2548 y(is)30 b(then)g(found)f(from)h(the)g -(expression:)867 2720 y FB(x)g FD(=)g FB(V)h Fo(\001)f -FD([)p Fl(diag)s FD(\(1)p Fl(=)p FB(W)1648 2734 y Ff(j)1687 -2720 y FD(\)])21 b Fo(\001)g FD(\()p FB(U)1929 2688 y -Ff(T)1985 2720 y Fo(\001)p FB(b)p FD(\))311 2893 y(2.)46 -b(If)37 b(matrix)f FB(A)h FD(is)f(square,)j(and)d(if)g(the)h(diagonal)f -(matrix)h FB(W)g FD(is)f(not)h(altered,)i(the)e(metho)s(d)f(is)427 -3006 y(equiv)-5 b(alen)m(t)30 b(to)h(con)m(v)m(en)m(tional)g(solution)e -(of)i(sim)m(ultaneous)e(equations.)311 3156 y(3.)46 b(If)30 -b Fl(m)25 b(>)g(n)p FD(,)30 b(the)h(result)e(is)h(a)g(least-squares)h -(\014t.)311 3306 y(4.)46 b(If)32 b(the)g(solution)f(is)g(p)s(o)s(orly)f -(determined,)h(this)g(sho)m(ws)h(up)f(in)g(the)h(SVD)g(factorization)h -(as)f(v)m(ery)427 3419 y(small)23 b(or)h(zero)h FB(W)1058 -3433 y Ff(j)1119 3419 y FD(v)-5 b(alues.)38 b(Where)24 -b(a)h FB(W)1885 3433 y Ff(j)1946 3419 y FD(v)-5 b(alue)23 -b(is)g(small)g(but)h(non-zero)g(it)g(can)g(b)s(e)g(set)h(to)g(zero)427 -3532 y(to)32 b(a)m(v)m(oid)g(ill)d(e\013ects.)44 b(The)30 -b(presen)m(t)i(routine)e(detects)i(suc)m(h)f(zero)h FB(W)2835 -3546 y Ff(j)2902 3532 y FD(v)-5 b(alues)31 b(and)f(pro)s(duces)g(a)427 -3645 y(sensible)h(solution,)g(with)g(highly)g(correlated)h(terms)h(k)m -(ept)g(under)e(con)m(trol)h(rather)h(than)f(b)s(eing)427 -3758 y(allo)m(w)m(ed)f(to)g(elop)s(e)e(to)j(in\014nit)m(y)-8 -b(,)28 b(and)i(with)f(meaningful)f(v)-5 b(alues)30 b(for)g(the)h(other) -f(terms.)0 4140 y FB(REFERENCE)44 b FD(:)d Fq(Numeric)-5 -b(al)33 b(R)-5 b(e)g(cip)g(es)p FD(,)32 b(section)e(2.9.)p -0 4280 3780 8 v 0 4393 a Fx(SLA)p Fn(_)p Fx(TP2S)545 -b Fm(T)-10 b(angen)m(t)37 b(Plane)h(to)g(Spherical)546 -b Fx(SLA)p Fn(_)p Fx(TP2S)0 4744 y FB(A)m(CTION)44 b -FD(:)c(T)-8 b(ransform)30 b(tangen)m(t)i(plane)d(co)s(ordinates)h(in)m -(to)h(spherical)d(co)s(ordinates)i(\(single)g(precision\))0 -4931 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_TP2S)g(\(XI,)h(ETA,)f -(RAZ,)h(DECZ,)f(RA,)h(DEC\))0 5293 y FB(GIVEN)e FD(:)277 -5439 y Fq(XI,ET)-7 b(A)417 b FB(R)567 b FD(tangen)m(t)32 -b(plane)d(rectangular)i(co)s(ordinates)f(\(radians\))277 -5552 y Fq(RAZ,DECZ)266 b FB(R)567 b FD(spherical)29 b(co)s(ordinates)h -(of)g(tangen)m(t)i(p)s(oin)m(t)e(\(radians\))p eop -%%Page: 159 161 -159 160 bop 0 52 a Fw(SUN/67.70)3206 b FD(159)0 351 y -FB(RETURNED)46 b FD(:)277 523 y Fq(RA,DEC)378 b FB(R)567 -b FD(spherical)29 b(co)s(ordinates)h(\(radians\))0 848 -y FB(NOTES)44 b FD(:)311 1030 y(1.)i(The)24 b(pro)5 b(jection)25 -b(is)f(called)f(the)i Fq(gnomonic)31 b FD(pro)5 b(jection;)27 -b(the)d(Cartesian)h(co)s(ordinates)f([)15 b Fl(\030)t(;)g(\021)k -FD(])25 b(are)427 1143 y(called)30 b Fq(standar)-5 b(d)37 -b(c)-5 b(o)g(or)g(dinates.)45 b FD(The)30 b(latter)i(are)f(in)f(units)f -(of)i(the)h(distance)e(from)h(the)g(tangen)m(t)427 1256 -y(plane)f(to)h(the)f(pro)5 b(jection)30 b(p)s(oin)m(t,)g -Fq(i.e.)g FD(radians)f(near)h(the)h(origin.)311 1397 -y(2.)46 b(When)26 b(w)m(orking)g(in)e([)15 b Fl(x;)g(y)s(;)g(z)21 -b FD(])26 b(rather)g(than)g(spherical)e(co)s(ordinates,)j(the)f(equiv) --5 b(alen)m(t)26 b(Cartesian)427 1510 y(routine)k(sla)p -Ft(_)p FD(TP2V)f(is)h(a)m(v)-5 b(ailable.)p 0 1617 3780 -8 v 0 1730 a Fx(SLA)p Fn(_)p Fx(TP2V)304 b Fm(T)-10 b(angen)m(t)37 -b(Plane)h(to)g(Direction)f(Cosines)305 b Fx(SLA)p Fn(_)p -Fx(TP2V)0 2081 y FB(A)m(CTION)44 b FD(:)63 b(Giv)m(en)42 -b(the)g(tangen)m(t-plane)h(co)s(ordinates)e(of)h(a)g(star)g(and)f(the)h -(direction)f(cosines)g(of)h(the)227 2194 y(tangen)m(t)32 -b(p)s(oin)m(t,)e(determine)f(the)i(direction)e(cosines)h(of)g(the)h -(star)g(\(single)e(precision\).)0 2381 y FB(CALL)45 b -FD(:)77 b Ft(CALL)46 b(sla_TP2V)g(\(XI,)h(ETA,)f(V0,)h(V\))0 -2710 y FB(GIVEN)e FD(:)277 2856 y Fq(XI,ET)-7 b(A)417 -b FB(R)567 b FD(tangen)m(t)32 b(plane)d(co)s(ordinates)h(of)h(star)g -(\(radians\))277 2969 y Fq(V0)622 b FB(R\(3\))433 b FD(direction)29 -b(cosines)h(of)h(tangen)m(t)h(p)s(oin)m(t)0 3285 y FB(RETURNED)46 -b FD(:)277 3457 y Fq(V)668 b FB(R\(3\))433 b FD(direction)29 -b(cosines)h(of)h(star)0 3782 y FB(NOTES)44 b FD(:)311 -3964 y(1.)i(If)30 b(v)m(ector)i(V0)f(is)f(not)g(of)h(unit)e(length,)h -(the)g(returned)f(v)m(ector)j(V)f(will)d(b)s(e)h(wrong.)311 -4105 y(2.)46 b(If)35 b(v)m(ector)i(V0)f(p)s(oin)m(ts)e(at)i(a)f(p)s -(ole,)h(the)g(returned)e(v)m(ector)j(V)e(will)e(b)s(e)h(based)h(on)g -(the)h(arbitrary)427 4218 y(assumption)29 b(that)i Fl(\013)26 -b FD(=)f(0)31 b(at)g(the)f(tangen)m(t)i(p)s(oin)m(t.)311 -4358 y(3.)46 b(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i -Fq(gnomonic)31 b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s -(ordinates)f([)15 b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 -4471 y(called)30 b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 4584 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 4725 y(4.)46 b(This)29 b(routine)g(is)h(the)g(Cartesian)g -(equiv)-5 b(alen)m(t)30 b(of)g(the)h(routine)e(sla)p -Ft(_)p FD(TP2S.)p 0 4842 V 0 4955 a Fx(SLA)p Fn(_)p Fx(TPS2C)368 -b Fm(Plate)37 b(cen)m(tre)h(from)f Fg(\030)6 b(;)20 b(\021)42 -b Fm(and)d Fg(\013)q(;)20 b(\016)373 b Fx(SLA)p Fn(_)p -Fx(TPS2C)0 5305 y FB(A)m(CTION)44 b FD(:)39 b(F)-8 b(rom)27 -b(the)h(tangen)m(t)g(plane)e(co)s(ordinates)h(of)g(a)g(star)h(of)f(kno) -m(wn)f([)15 b Fl(\013;)g(\016)21 b FD(],)28 b(determine)e(the)h([)15 -b Fl(\013;)g(\016)20 b FD(])227 5418 y(of)31 b(the)f(tangen)m(t)i(p)s -(oin)m(t)e(\(single)f(precision\))0 5606 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_TPS2C)g(\(XI,)g(ETA,)h(RA,)g(DEC,)f(RAZ1,) -h(DECZ1,)f(RAZ2,)g(DECZ2,)g(N\))p eop -%%Page: 160 162 -160 161 bop 0 52 a FD(160)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(XI,ET)-7 b(A)417 b FB(R)567 b FD(tangen)m(t)32 -b(plane)d(rectangular)i(co)s(ordinates)f(\(radians\))277 -610 y Fq(RA,DEC)378 b FB(R)567 b FD(spherical)29 b(co)s(ordinates)h -(\(radians\))0 903 y FB(RETURNED)46 b FD(:)277 1049 y -Fq(RAZ1,DECZ1)174 b FB(R)567 b FD(spherical)29 b(co)s(ordinates)h(of)g -(tangen)m(t)i(p)s(oin)m(t,)e(solution)f(1)277 1162 y -Fq(RAZ2,DECZ2)174 b FB(R)567 b FD(spherical)29 b(co)s(ordinates)h(of)g -(tangen)m(t)i(p)s(oin)m(t,)e(solution)f(2)277 1275 y -Fq(N)668 b FB(I)605 b FD(n)m(um)m(b)s(er)29 b(of)i(solutions:)1779 -1387 y(0)g(=)f(no)g(solutions)f(returned)g(\(note)j(2\))1779 -1500 y(1)f(=)f(only)g(the)g(\014rst)g(solution)f(is)g(useful)g(\(note)i -(3\))1779 1613 y(2)g(=)f(there)h(are)f(t)m(w)m(o)i(useful)d(solutions)g -(\(note)i(3\))0 1906 y FB(NOTES)44 b FD(:)311 2085 y(1.)i(The)30 -b(RAZ1)h(and)e(RAZ2)i(v)-5 b(alues)29 b(returned)h(are)g(in)f(the)i -(range)g(0)5 b Fo(\000)g FD(2)p Fl(\031)s FD(.)311 2222 -y(2.)46 b(Cases)39 b(where)f(there)h(is)f(no)g(solution)f(can)i(only)f -(arise)g(near)g(the)h(p)s(oles.)64 b(F)-8 b(or)40 b(example,)g(it)e(is) -427 2335 y(clearly)27 b(imp)s(ossible)d(for)j(a)h(star)f(at)h(the)g(p)s -(ole)e(itself)g(to)j(ha)m(v)m(e)f(a)g(non-zero)g Fl(\030)j -FD(v)-5 b(alue,)28 b(and)e(hence)i(it)427 2448 y(is)k(meaningless)g(to) -h(ask)g(where)f(the)h(tangen)m(t)i(p)s(oin)m(t)c(w)m(ould)h(ha)m(v)m(e) -i(to)f(b)s(e)g(to)g(bring)e(ab)s(out)i(this)427 2561 -y(com)m(bination)d(of)g Fl(\030)35 b FD(and)30 b Fl(\016)s -FD(.)311 2698 y(3.)46 b(Also)33 b(near)f(the)h(p)s(oles,)f(cases)i(can) -f(arise)f(where)g(there)h(are)g(t)m(w)m(o)g(useful)e(solutions.)46 -b(The)32 b(argu-)427 2811 y(men)m(t)j(N)g(indicates)e(whether)h(the)h -(second)g(of)g(the)f(t)m(w)m(o)i(solutions)d(returned)h(is)f(useful.)52 -b(N)15 b(=)g(1)427 2924 y(indicates)41 b(only)h(one)g(useful)e -(solution,)k(the)e(usual)f(case;)49 b(under)41 b(these)h -(circumstances,)j(the)427 3037 y(second)35 b(solution)e(corresp)s(onds) -g(to)j(the)f(\\o)m(v)m(er-the-p)s(ole")i(case,)g(and)d(this)f(is)h -(re\015ected)h(in)e(the)427 3150 y(v)-5 b(alues)30 b(of)h(RAZ2)f(and)g -(DECZ2)g(whic)m(h)f(are)i(returned.)311 3287 y(4.)46 -b(The)35 b(DECZ1)g(and)f(DECZ2)h(v)-5 b(alues)34 b(returned)g(are)h(in) -f(the)h(range)g Fo(\006)p Fl(\031)s FD(,)h(but)f(in)e(the)i(ordinary)-8 -b(,)427 3400 y(non-p)s(ole-crossing,)29 b(case,)j(the)f(range)f(is)g -Fo(\006)p Fl(\031)s(=)p FD(2.)311 3537 y(5.)46 b(RA,)31 -b(DEC,)f(RAZ1,)h(DECZ1,)g(RAZ2,)f(DECZ2)h(are)f(all)g(in)f(radians.)311 -3675 y(6.)46 b(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i -Fq(gnomonic)31 b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s -(ordinates)f([)15 b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 -3788 y(called)30 b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 3901 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 4038 y(7.)46 b(When)26 b(w)m(orking)g(in)e([)15 -b Fl(x;)g(y)s(;)g(z)21 b FD(])26 b(rather)g(than)g(spherical)e(co)s -(ordinates,)j(the)f(equiv)-5 b(alen)m(t)26 b(Cartesian)427 -4151 y(routine)k(sla)p Ft(_)p FD(TPV2C)f(is)g(a)m(v)-5 -b(ailable.)p 0 4248 3780 8 v 0 4361 a Fx(SLA)p Fn(_)p -Fx(TPV2C)287 b Fm(Plate)37 b(cen)m(tre)h(from)e Fg(\030)6 -b(;)20 b(\021)43 b Fm(and)38 b Fg(x;)20 b(y)t(;)g(z)294 -b Fx(SLA)p Fn(_)p Fx(TPV2C)0 4712 y FB(A)m(CTION)44 b -FD(:)38 b(F)-8 b(rom)26 b(the)f(tangen)m(t)i(plane)d(co)s(ordinates)h -(of)g(a)h(star)f(of)h(kno)m(wn)e(direction)g(cosines,)i(determine)227 -4824 y(the)31 b(direction)e(cosines)h(of)g(the)h(tangen)m(t)h(p)s(oin)m -(t)d(\(single)h(precision\))0 5012 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_TPV2C)g(\(XI,)g(ETA,)h(V,)g(V01,)g(V02,)f(N\))0 -5327 y FB(GIVEN)f FD(:)277 5473 y Fq(XI,ET)-7 b(A)417 -b FB(R)567 b FD(tangen)m(t)32 b(plane)d(co)s(ordinates)h(of)h(star)g -(\(radians\))277 5586 y Fq(V)668 b FB(R\(3\))433 b FD(direction)29 -b(cosines)h(of)h(star)p eop -%%Page: 161 163 -161 162 bop 0 52 a Fw(SUN/67.70)3206 b FD(161)0 351 y -FB(RETURNED)46 b FD(:)277 497 y Fq(V01)576 b FB(R\(3\))433 -b FD(direction)29 b(cosines)h(of)h(tangen)m(t)h(p)s(oin)m(t,)d -(solution)g(1)277 610 y Fq(V01)576 b FB(R\(3\))433 b -FD(direction)29 b(cosines)h(of)h(tangen)m(t)h(p)s(oin)m(t,)d(solution)g -(2)277 723 y Fq(N)668 b FB(I)605 b FD(n)m(um)m(b)s(er)29 -b(of)i(solutions:)1779 836 y(0)g(=)f(no)g(solutions)f(returned)g -(\(note)j(2\))1779 949 y(1)f(=)f(only)g(the)g(\014rst)g(solution)f(is)g -(useful)g(\(note)i(3\))1779 1062 y(2)g(=)f(there)h(are)f(t)m(w)m(o)i -(useful)d(solutions)g(\(note)i(3\))0 1363 y FB(NOTES)44 -b FD(:)311 1543 y(1.)i(The)30 b(v)m(ector)i(V)f(m)m(ust)f(b)s(e)g(of)g -(unit)f(length)h(or)g(the)h(result)e(will)f(b)s(e)h(wrong.)311 -1681 y(2.)46 b(Cases)39 b(where)f(there)h(is)f(no)g(solution)f(can)i -(only)f(arise)g(near)g(the)h(p)s(oles.)64 b(F)-8 b(or)40 -b(example,)g(it)e(is)427 1794 y(clearly)30 b(imp)s(ossible)d(for)j(a)h -(star)f(at)h(the)g(p)s(ole)e(itself)h(to)h(ha)m(v)m(e)g(a)g(non-zero)g -(XI)f(v)-5 b(alue.)311 1933 y(3.)46 b(Also)33 b(near)f(the)h(p)s(oles,) -f(cases)i(can)f(arise)f(where)g(there)h(are)g(t)m(w)m(o)g(useful)e -(solutions.)46 b(The)32 b(argu-)427 2046 y(men)m(t)j(N)g(indicates)e -(whether)h(the)h(second)g(of)g(the)f(t)m(w)m(o)i(solutions)d(returned)h -(is)f(useful.)52 b(N)15 b(=)g(1)427 2159 y(indicates)41 -b(only)h(one)g(useful)e(solution,)k(the)e(usual)f(case;)49 -b(under)41 b(these)h(circumstances,)j(the)427 2272 y(second)27 -b(solution)f(can)h(b)s(e)g(regarded)f(as)i(v)-5 b(alid)25 -b(if)h(the)h(v)m(ector)i(V02)f(is)e(in)m(terpreted)g(as)h(the)g(\\o)m -(v)m(er-)427 2385 y(the-p)s(ole")k(case.)311 2523 y(4.)46 -b(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i Fq(gnomonic)31 -b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s(ordinates)f([)15 -b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 2636 y(called)30 -b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 2749 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 2888 y(5.)46 b(This)29 b(routine)g(is)h(the)g(Cartesian)g -(equiv)-5 b(alen)m(t)30 b(of)g(the)h(routine)e(sla)p -Ft(_)p FD(TPS2C.)p 0 2998 3780 8 v 0 3111 a Fx(SLA)p -Fn(_)p Fx(UE2EL)224 b Fm(Univ)m(ersal)37 b(to)h(Con)m(v)m(en)m(tional)d -(Elemen)m(ts)222 b Fx(SLA)p Fn(_)p Fx(UE2EL)0 3461 y -FB(A)m(CTION)44 b FD(:)c(T)-8 b(ransform)30 b(univ)m(ersal)e(elemen)m -(ts)j(in)m(to)g(con)m(v)m(en)m(tional)g(helio)s(cen)m(tric)e -(osculating)h(elemen)m(ts.)0 3649 y FB(CALL)45 b FD(:)77 -b Ft(CALL)46 b(sla_UE2EL)g(\(U,)h(JFORMR,)1192 3762 y(JFORM,)e(EPOCH,)i -(ORBINC,)e(ANODE,)h(PERIH,)1192 3874 y(AORQ,)g(E,)h(AORL,)f(DM,)h -(JSTAT\))0 4194 y FB(GIVEN)e FD(:)277 4340 y Fq(U)668 -b FB(D\(13\))379 b FD(univ)m(ersal)29 b(orbital)g(elemen)m(ts)i(\(up)s -(dated;)e(Note)j(1\))537 4453 y(\(1\))1006 b(com)m(bined)30 -b(mass)g(\()p Fl(M)h FD(+)20 b Fl(m)p FD(\))537 4566 -y(\(2\))1006 b(total)31 b(energy)g(of)g(the)f(orbit)g(\()p -Fl(\013)p FD(\))537 4679 y(\(3\))1006 b(reference)31 -b(\(osculating\))f(ep)s(o)s(c)m(h)h(\()p Fl(t)2869 4693 -y Fu(0)2908 4679 y FD(\))499 4792 y(\(4-6\))969 b(p)s(osition)29 -b(at)i(reference)g(ep)s(o)s(c)m(h)f(\()p FB(r)2836 4806 -y Fu(0)2876 4792 y FD(\))499 4905 y(\(7-9\))969 b(v)m(elo)s(cit)m(y)31 -b(at)g(reference)g(ep)s(o)s(c)m(h)f(\()p FB(v)2837 4919 -y Fu(0)2877 4905 y FD(\))514 5018 y(\(10\))984 b(helio)s(cen)m(tric)29 -b(distance)h(at)h(reference)g(ep)s(o)s(c)m(h)514 5130 -y(\(11\))984 b FB(r)1701 5144 y Fu(0)1741 5130 y Fl(:)p -FB(v)1821 5144 y Fu(0)514 5243 y FD(\(12\))g(date)31 -b(\()p Fl(t)p FD(\))514 5356 y(\(13\))984 b(univ)m(ersal)29 -b(eccen)m(tric)i(anomaly)f(\()p Fl( )s FD(\))i(of)e(date,)i(appro)m(x) -277 5582 y Fq(JF)n(ORMR)347 b FB(I)605 b FD(requested)30 -b(elemen)m(t)h(set)g(\(1-3;)h(Note)g(3\))p eop -%%Page: 162 164 -162 163 bop 0 52 a FD(162)0 351 y FB(RETURNED)46 b FD(:)277 -497 y Fq(JF)n(ORM)413 b FB(I)605 b FD(elemen)m(t)31 b(set)g(actually)f -(returned)f(\(1-3;)j(Note)g(4\))277 610 y Fq(EPOCH)409 -b FB(D)565 b FD(ep)s(o)s(c)m(h)30 b(of)h(elemen)m(ts)g(\()p -Fl(t)2462 624 y Fu(0)2531 610 y FD(or)g Fl(T)13 b FD(,)30 -b(TT)g(MJD\))277 723 y Fq(ORBINC)368 b FB(D)565 b FD(inclination)28 -b(\()p Fl(i)p FD(,)j(radians\))277 836 y Fq(ANODE)399 -b FB(D)565 b FD(longitude)29 b(of)i(the)f(ascending)g(no)s(de)g -(\(\012,)g(radians\))277 949 y Fq(PERIH)443 b FB(D)565 -b FD(longitude)29 b(or)i(argumen)m(t)f(of)h(p)s(erihelion)c(\()p -Fl($)33 b FD(or)e Fl(!)s FD(,)1825 1062 y(radians\))277 -1175 y Fq(A)n(OR)n(Q)466 b FB(D)565 b FD(mean)30 b(distance)f(or)g(p)s -(erihelion)d(distance)k(\()p Fl(a)f FD(or)h Fl(q)s FD(,)g(A)m(U\))277 -1288 y Fq(E)674 b FB(D)565 b FD(eccen)m(tricit)m(y)32 -b(\()p Fl(e)p FD(\))277 1401 y Fq(A)n(ORL)477 b FB(D)565 -b FD(mean)31 b(anomaly)f(or)g(longitude)f(\()p Fl(M)41 -b FD(or)30 b Fl(L)p FD(,)h(radians,)1825 1514 y(JF)m(ORM=1,2)g(only\)) -277 1626 y Fq(DM)585 b FB(D)565 b FD(daily)29 b(motion)h(\()p -Fl(n)p FD(,)g(radians,)g(JF)m(ORM=1)h(only\))277 1739 -y Fq(JST)-7 b(A)g(T)453 b FB(I)605 b FD(status:)1898 -1852 y(0)30 b(=)g(OK)1825 1965 y Fo(\000)p FD(1)g(=)g(illegal)f(PMASS) -1825 2078 y Fo(\000)p FD(2)h(=)g(illegal)f(JF)m(ORMR)1825 -2191 y Fo(\000)p FD(3)h(=)g(p)s(osition/v)m(elo)s(cit)m(y)g(out)g(of)h -(allo)m(w)m(ed)f(range)0 2570 y FB(NOTES)44 b FD(:)311 -2768 y(1.)i(The)40 b(\\univ)m(ersal")f(elemen)m(ts)h(are)g(those)h -(whic)m(h)d(de\014ne)h(the)h(orbit)f(for)h(the)g(purp)s(oses)e(of)i -(the)427 2881 y(metho)s(d)26 b(of)g(univ)m(ersal)f(v)-5 -b(ariables)25 b(\(see)i(reference)f(2\).)41 b(They)25 -b(consist)h(of)g(the)h(com)m(bined)e(mass)h(of)427 2994 -y(the)33 b(t)m(w)m(o)h(b)s(o)s(dies,)e(an)g(ep)s(o)s(c)m(h,)h(and)f -(the)h(p)s(osition)e(and)h(v)m(elo)s(cit)m(y)h(v)m(ectors)h -(\(arbitrary)e(reference)427 3107 y(frame\))j(at)g(that)g(ep)s(o)s(c)m -(h.)53 b(The)34 b(parameter)h(set)g(used)f(here)g(includes)e(also)j(v) --5 b(arious)33 b(quan)m(tities)427 3220 y(that)i(can,)g(in)d(fact,)k(b) -s(e)d(deriv)m(ed)f(from)i(the)f(other)h(information.)49 -b(This)32 b(approac)m(h)i(is)f(tak)m(en)i(to)427 3333 -y(a)m(v)m(oiding)d(unnecessary)f(computation)h(and)g(loss)f(of)h -(accuracy)-8 b(.)48 b(The)31 b(supplemen)m(tary)g(quan)m(ti-)427 -3446 y(ties)22 b(are)h(\(i\))f Fl(\013)p FD(,)i(whic)m(h)d(is)g(prop)s -(ortional)f(to)j(the)g(total)g(energy)f(of)h(the)f(orbit,)h(\(ii\))e -(the)i(helio)s(cen)m(tric)427 3558 y(distance)35 b(at)g(ep)s(o)s(c)m -(h,)h(\(iii\))d(the)i(out)m(w)m(ards)g(comp)s(onen)m(t)g(of)g(the)g(v)m -(elo)s(cit)m(y)g(at)h(the)f(giv)m(en)f(ep)s(o)s(c)m(h,)427 -3671 y(\(iv\))29 b(an)f(estimate)h(of)g Fl( )s FD(,)h(the)e(\\univ)m -(ersal)g(eccen)m(tric)h(anomaly")g(at)g(a)g(giv)m(en)g(date)g(and)f -(\(v\))h(that)427 3784 y(date.)311 3971 y(2.)46 b(The)34 -b(univ)m(ersal)f(elemen)m(ts)h(are)h(with)e(resp)s(ect)i(to)g(the)f -(mean)h(equator)g(and)e(equino)m(x)h(of)h(ep)s(o)s(c)m(h)427 -4084 y(J2000.)40 b(The)23 b(orbital)f(elemen)m(ts)h(pro)s(duced)f(are)h -(with)f(resp)s(ect)h(to)h(the)f(J2000)i(ecliptic)d(and)g(mean)427 -4197 y(equino)m(x.)311 4384 y(3.)46 b(Three)30 b(di\013eren)m(t)g -(elemen)m(t-format)i(options)d(are)i(supp)s(orted,)e(as)h(follo)m(ws.) -427 4665 y(JF)m(ORM=1,)h(suitable)e(for)i(the)f(ma)5 -b(jor)30 b(planets:)602 4903 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 -b(of)h(elemen)m(ts)f Fl(t)1910 4917 y Fu(0)1980 4903 -y FD(\(TT)g(MJD\))602 5016 y(ORBINC)45 b(=)55 b(inclination)27 -b Fl(i)k FD(\(radians\))602 5128 y(ANODE)76 b(=)55 b(longitude)29 -b(of)h(the)h(ascending)f(no)s(de)f(\012)h(\(radians\))602 -5241 y(PERIH)122 b(=)55 b(longitude)29 b(of)h(p)s(erihelion)d -Fl($)34 b FD(\(radians\))602 5354 y(A)m(OR)m(Q)143 b(=)55 -b(mean)30 b(distance)g Fl(a)h FD(\(A)m(U\))602 5467 y(E)352 -b(=)55 b(eccen)m(tricit)m(y)31 b Fl(e)g FD(\(0)26 b Fo(\024)f -Fl(e)h(<)f FD(1\))602 5580 y(A)m(ORL)154 b(=)55 b(mean)30 -b(longitude)f Fl(L)i FD(\(radians\))602 5693 y(DM)262 -b(=)55 b(daily)29 b(motion)h Fl(n)g FD(\(radians\))p -eop -%%Page: 163 165 -163 164 bop 0 52 a Fw(SUN/67.70)3206 b FD(163)427 351 -y(JF)m(ORM=2,)31 b(suitable)e(for)i(minor)d(planets:)602 -582 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(elemen)m(ts)f -Fl(t)1910 596 y Fu(0)1980 582 y FD(\(TT)g(MJD\))602 695 -y(ORBINC)45 b(=)55 b(inclination)27 b Fl(i)k FD(\(radians\))602 -808 y(ANODE)76 b(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de)f -(\012)h(\(radians\))602 921 y(PERIH)122 b(=)55 b(argumen)m(t)31 -b(of)f(p)s(erihelion)d Fl(!)33 b FD(\(radians\))602 1034 -y(A)m(OR)m(Q)143 b(=)55 b(mean)30 b(distance)g Fl(a)h -FD(\(A)m(U\))602 1147 y(E)352 b(=)55 b(eccen)m(tricit)m(y)31 -b Fl(e)g FD(\(0)26 b Fo(\024)f Fl(e)h(<)f FD(1\))602 -1260 y(A)m(ORL)154 b(=)55 b(mean)30 b(anomaly)h Fl(M)40 -b FD(\(radians\))427 1490 y(JF)m(ORM=3,)31 b(suitable)e(for)i(comets:) -602 1721 y(EPOCH)85 b(=)55 b(ep)s(o)s(c)m(h)30 b(of)h(p)s(erihelion)c -Fl(T)43 b FD(\(TT)30 b(MJD\))602 1834 y(ORBINC)45 b(=)55 -b(inclination)27 b Fl(i)k FD(\(radians\))602 1947 y(ANODE)76 -b(=)55 b(longitude)29 b(of)h(the)h(ascending)f(no)s(de)f(\012)h -(\(radians\))602 2060 y(PERIH)122 b(=)55 b(argumen)m(t)31 -b(of)f(p)s(erihelion)d Fl(!)33 b FD(\(radians\))602 2173 -y(A)m(OR)m(Q)143 b(=)55 b(p)s(erihelion)27 b(distance)j -Fl(q)j FD(\(A)m(U\))602 2286 y(E)352 b(=)55 b(eccen)m(tricit)m(y)31 -b Fl(e)g FD(\(0)26 b Fo(\024)f Fl(e)h Fo(\024)f FD(10\))311 -2517 y(4.)46 b(It)26 b(ma)m(y)g(not)g(b)s(e)f(p)s(ossible)e(to)j -(generate)h(elemen)m(ts)f(in)f(the)g(form)g(requested)h(through)f(JF)m -(ORMR.)427 2629 y(The)45 b(caller)f(is)g(noti\014ed)g(of)h(the)g(form)f -(of)h(elemen)m(ts)g(actually)g(returned)f(b)m(y)g(means)h(of)g(the)427 -2742 y(JF)m(ORM)31 b(argumen)m(t:)554 2973 y(JF)m(ORMR)119 -b(JF)m(ORM)234 b(meaning)705 3199 y(1)465 b(1)362 b(OK:)30 -b(elemen)m(ts)g(are)h(in)e(the)i(requested)f(format)705 -3312 y(1)465 b(2)362 b(nev)m(er)30 b(happ)s(ens)705 3425 -y(1)465 b(3)362 b(orbit)29 b(not)i(elliptical)705 3538 -y(2)465 b(1)362 b(nev)m(er)30 b(happ)s(ens)705 3651 y(2)465 -b(2)362 b(OK:)30 b(elemen)m(ts)g(are)h(in)e(the)i(requested)f(format) -705 3764 y(2)465 b(3)362 b(orbit)29 b(not)i(elliptical)705 -3876 y(3)465 b(1)362 b(nev)m(er)30 b(happ)s(ens)705 3989 -y(3)465 b(2)362 b(nev)m(er)30 b(happ)s(ens)705 4102 y(3)465 -b(3)362 b(OK:)30 b(elemen)m(ts)g(are)h(in)e(the)i(requested)f(format) -311 4333 y(5.)46 b(The)30 b(argumen)m(ts)h(returned)f(for)g(eac)m(h)i -(v)-5 b(alue)31 b(of)f(JF)m(ORM)i(\()p Fq(cf.)41 b FD(Note)32 -b(5:)42 b(JF)m(ORM)31 b(ma)m(y)g(not)g(b)s(e)427 4446 -y(the)g(same)g(as)f(JF)m(ORMR\))h(are)g(as)g(follo)m(ws:)602 -4677 y(JF)m(ORM)282 b(1)273 b(2)g(3)602 4903 y(EPOCH)k -Fl(t)1241 4917 y Fu(0)1526 4903 y Fl(t)1559 4917 y Fu(0)1844 -4903 y Fl(T)602 5016 y FD(ORBINC)237 b Fl(i)287 b(i)g(i)602 -5128 y FD(ANODE)268 b(\012)252 b(\012)g(\012)602 5241 -y(PERIH)314 b Fl($)243 b(!)261 b(!)602 5354 y FD(A)m(OR)m(Q)335 -b Fl(a)270 b(a)g(q)602 5467 y FD(E)544 b Fl(e)276 b(e)g(e)602 -5580 y FD(A)m(ORL)346 b Fl(L)256 b(M)230 b FD(-)602 5693 -y(DM)454 b Fl(n)263 b FD(-)288 b(-)p eop -%%Page: 164 166 -164 165 bop 0 52 a FD(164)427 351 y(where:)602 584 y -Fl(t)635 598 y Fu(0)1016 584 y FD(is)29 b(the)i(ep)s(o)s(c)m(h)f(of)g -(the)h(elemen)m(ts)g(\(MJD,)g(TT\))602 696 y Fl(T)361 -b FD(is)29 b(the)i(ep)s(o)s(c)m(h)f(of)g(p)s(erihelion)d(\(MJD,)32 -b(TT\))602 809 y Fl(i)383 b FD(is)29 b(the)i(inclination)c(\(radians\)) -602 922 y(\012)348 b(is)29 b(the)i(longitude)e(of)h(the)h(ascending)e -(no)s(de)h(\(radians\))602 1035 y Fl($)339 b FD(is)29 -b(the)i(longitude)e(of)h(p)s(erihelion)d(\(radians\))602 -1148 y Fl(!)357 b FD(is)29 b(the)i(argumen)m(t)f(of)h(p)s(erihelion)c -(\(radians\))602 1261 y Fl(a)366 b FD(is)29 b(the)i(mean)f(distance)g -(\(A)m(U\))602 1374 y Fl(q)373 b FD(is)29 b(the)i(p)s(erihelion)c -(distance)j(\(A)m(U\))602 1487 y Fl(e)372 b FD(is)29 -b(the)i(eccen)m(tricit)m(y)602 1600 y Fl(L)352 b FD(is)29 -b(the)i(longitude)e(\(radians,)g(0)21 b Fo(\000)f FD(2)p -Fl(\031)s FD(\))602 1713 y Fl(M)326 b FD(is)29 b(the)i(mean)f(anomaly)g -(\(radians,)g(0)20 b Fo(\000)g FD(2)p Fl(\031)s FD(\))602 -1826 y Fl(n)359 b FD(is)29 b(the)i(daily)d(motion)i(\(radians\))602 -1938 y(-)384 b(means)30 b(no)g(v)-5 b(alue)30 b(is)f(set)311 -2171 y(6.)46 b(A)m(t)c(v)m(ery)g(small)e(inclinations,)h(the)h -(longitude)e(of)h(the)g(ascending)g(no)s(de)g(ANODE)g(b)s(ecomes)427 -2284 y(indeterminate)36 b(and)g(under)f(some)i(circumstances)f(ma)m(y)h -(b)s(e)f(set)h(arbitrarily)d(to)j(zero.)60 b(Simi-)427 -2397 y(larly)-8 b(,)38 b(if)d(the)i(orbit)f(is)f(close)i(to)h -(circular,)e(the)h(true)g(anomaly)f(b)s(ecomes)h(indeterminate)e(and) -427 2509 y(under)h(some)i(circumstances)g(ma)m(y)g(b)s(e)f(set)h -(arbitrarily)d(to)j(zero.)63 b(In)37 b(suc)m(h)g(cases,)j(the)e(other) -427 2622 y(elemen)m(ts)h(are)g(automatically)g(adjusted)f(to)i(comp)s -(ensate,)h(and)d(so)h(the)g(elemen)m(ts)g(remain)f(a)427 -2735 y(v)-5 b(alid)29 b(description)f(of)j(the)f(orbit.)0 -3178 y FB(REFERENCES)44 b FD(:)311 3397 y(1.)i(Sterne,)25 -b(Theo)s(dore)f(E.,)h Fq(A)n(n)h(Intr)-5 b(o)g(duction)29 -b(to)f(Celestial)f(Me)-5 b(chanics,)25 b FD(In)m(terscience)g -(Publishers,)427 3510 y(1960.)43 b(Section)30 b(6.7,)i(p199.)311 -3673 y(2.)46 b(Ev)m(erhart,)31 b(E.)g(&)f(Pitkin,)e(E.T.,)j(Am.)f(J.)h -(Ph)m(ys.)f(51,)h(712,)h(1983.)p 0 3837 3780 8 v 0 3950 -a Fx(SLA)p Fn(_)p Fx(UE2PV)267 b Fm(P)m(os/V)-10 b(el)37 -b(from)f(Univ)m(ersal)h(Elemen)m(ts)265 b Fx(SLA)p Fn(_)p -Fx(UE2PV)0 4301 y FB(A)m(CTION)44 b FD(:)59 b(Helio)s(cen)m(tric)40 -b(p)s(osition)e(and)h(v)m(elo)s(cit)m(y)h(of)g(a)g(planet,)i(asteroid)e -(or)g(comet,)j(starting)d(from)227 4414 y(orbital)29 -b(elemen)m(ts)i(in)e(the)i(\\univ)m(ersal)e(v)-5 b(ariables")29 -b(form.)0 4601 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_UE2PV)g -(\(DATE,)g(U,)h(PV,)g(JSTAT\))0 4999 y FB(GIVEN)e FD(:)277 -5145 y Fq(D)n(A)-7 b(TE)481 b FB(D)565 b FD(date)34 b(\(TT)e(Mo)s -(di\014ed)g(Julian)e(Date)35 b(=)d(JD)p Fo(\000)p FD(2400000.5\))0 -5693 y FB(GIVEN)i(and)h(RETURNED)46 b FD(:)p eop -%%Page: 165 167 -165 166 bop 0 52 a Fw(SUN/67.70)3206 b FD(165)277 339 -y Fq(U)668 b FB(D\(13\))379 b FD(univ)m(ersal)29 b(orbital)g(elemen)m -(ts)i(\(up)s(dated;)e(Note)j(1\))537 452 y(\(1\))1006 -b(com)m(bined)30 b(mass)g(\()p Fl(M)h FD(+)20 b Fl(m)p -FD(\))537 565 y(\(2\))1006 b(total)31 b(energy)g(of)g(the)f(orbit)g(\() -p Fl(\013)p FD(\))537 678 y(\(3\))1006 b(reference)31 -b(\(osculating\))f(ep)s(o)s(c)m(h)h(\()p Fl(t)2869 692 -y Fu(0)2908 678 y FD(\))499 791 y(\(4-6\))969 b(p)s(osition)29 -b(at)i(reference)g(ep)s(o)s(c)m(h)f(\()p FB(r)2836 805 -y Fu(0)2876 791 y FD(\))499 904 y(\(7-9\))969 b(v)m(elo)s(cit)m(y)31 -b(at)g(reference)g(ep)s(o)s(c)m(h)f(\()p FB(v)2837 918 -y Fu(0)2877 904 y FD(\))514 1016 y(\(10\))984 b(helio)s(cen)m(tric)29 -b(distance)h(at)h(reference)g(ep)s(o)s(c)m(h)514 1129 -y(\(11\))984 b FB(r)1701 1143 y Fu(0)1741 1129 y Fl(:)p -FB(v)1821 1143 y Fu(0)514 1242 y FD(\(12\))g(date)31 -b(\()p Fl(t)p FD(\))514 1355 y(\(13\))984 b(univ)m(ersal)29 -b(eccen)m(tric)i(anomaly)f(\()p Fl( )s FD(\))i(of)e(date,)i(appro)m(x)0 -1631 y FB(RETURNED)46 b FD(:)277 1777 y Fq(PV)606 b FB(D\(6\))431 -b FD(helio)s(cen)m(tric)29 b([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 -b FD(_)-43 b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 -b Fl(z)20 b FD(],)31 b(equatorial,)f(J2000)1825 1890 -y(\(A)m(U,)i(A)m(U/s;)f(Note)h(1\))277 2003 y Fq(JST)-7 -b(A)g(T)453 b FB(I)605 b FD(status:)1866 2116 y(0)30 -b(=)h(OK)1798 2229 y Fo(\000)p FD(1)f(=)g(radius)f(v)m(ector)i(zero) -1798 2342 y Fo(\000)p FD(2)f(=)g(failed)f(to)i(con)m(v)m(erge)0 -2618 y FB(NOTES)44 b FD(:)311 2795 y(1.)i(The)40 b(\\univ)m(ersal")f -(elemen)m(ts)h(are)g(those)h(whic)m(h)d(de\014ne)h(the)h(orbit)f(for)h -(the)g(purp)s(oses)e(of)i(the)427 2908 y(metho)s(d)32 -b(of)g(univ)m(ersal)e(v)-5 b(ariables)31 b(\(see)i(reference\).)47 -b(They)32 b(consist)f(of)i(the)f(com)m(bined)f(mass)h(of)427 -3021 y(the)h(t)m(w)m(o)h(b)s(o)s(dies,)e(an)g(ep)s(o)s(c)m(h,)h(and)f -(the)h(p)s(osition)e(and)h(v)m(elo)s(cit)m(y)h(v)m(ectors)h -(\(arbitrary)e(reference)427 3134 y(frame\))j(at)g(that)g(ep)s(o)s(c)m -(h.)53 b(The)34 b(parameter)h(set)g(used)f(here)g(includes)e(also)j(v) --5 b(arious)33 b(quan)m(tities)427 3247 y(that)i(can,)g(in)d(fact,)k(b) -s(e)d(deriv)m(ed)f(from)i(the)f(other)h(information.)49 -b(This)32 b(approac)m(h)i(is)f(tak)m(en)i(to)427 3359 -y(a)m(v)m(oiding)d(unnecessary)f(computation)h(and)g(loss)f(of)h -(accuracy)-8 b(.)48 b(The)31 b(supplemen)m(tary)g(quan)m(ti-)427 -3472 y(ties)22 b(are)h(\(i\))f Fl(\013)p FD(,)i(whic)m(h)d(is)g(prop)s -(ortional)f(to)j(the)g(total)g(energy)f(of)h(the)f(orbit,)h(\(ii\))e -(the)i(helio)s(cen)m(tric)427 3585 y(distance)35 b(at)g(ep)s(o)s(c)m -(h,)h(\(iii\))d(the)i(out)m(w)m(ards)g(comp)s(onen)m(t)g(of)g(the)g(v)m -(elo)s(cit)m(y)g(at)h(the)f(giv)m(en)f(ep)s(o)s(c)m(h,)427 -3698 y(\(iv\))29 b(an)f(estimate)h(of)g Fl( )s FD(,)h(the)e(\\univ)m -(ersal)g(eccen)m(tric)h(anomaly")g(at)g(a)g(giv)m(en)g(date)g(and)f -(\(v\))h(that)427 3811 y(date.)311 3974 y(2.)46 b(The)34 -b(companion)g(routine)f(is)h(sla)p Ft(_)p FD(EL2UE.)g(This)e(tak)m(es)k -(the)f(con)m(v)m(en)m(tional)g(orbital)e(elemen)m(ts)427 -4087 y(and)27 b(transforms)g(them)h(in)m(to)f(the)h(set)h(of)e(n)m(um)m -(b)s(ers)g(needed)g(b)m(y)h(the)f(presen)m(t)h(routine.)39 -b(A)28 b(single)427 4200 y(prediction)39 b(requires)f(one)j(one)f(call) -f(to)i(sla)p Ft(_)p FD(EL2UE)f(follo)m(w)m(ed)f(b)m(y)h(one)h(call)e -(to)i(the)f(presen)m(t)427 4313 y(routine;)48 b(for)43 -b(con)m(v)m(enience,)k(the)c(t)m(w)m(o)h(calls)e(are)h(pac)m(k)-5 -b(aged)45 b(as)e(the)f(routine)g(sla)p Ft(_)p FD(PLANEL.)427 -4425 y(Multiple)25 b(predictions)g(ma)m(y)i(b)s(e)g(made)f(b)m(y)h -(again)g(calling)e(sla)p Ft(_)p FD(EL2UE)i(once,)h(but)e(then)h -(calling)427 4538 y(the)c(presen)m(t)f(routine)f(m)m(ultiple)f(times,)k -(whic)m(h)d(is)g(faster)i(than)f(m)m(ultiple)e(calls)h(to)i(sla)p -Ft(_)p FD(PLANEL.)427 4690 y(It)g(is)f(not)h(obligatory)g(to)g(use)g -(sla)p Ft(_)p FD(EL2UE)f(to)h(obtain)g(the)g(parameters.)38 -b(Ho)m(w)m(ev)m(er,)27 b(it)22 b(should)f(b)s(e)427 4803 -y(noted)k(that)f(b)s(ecause)g(sla)p Ft(_)p FD(EL2UE)g(p)s(erforms)e -(its)i(o)m(wn)g(v)-5 b(alidation,)24 b(no)g(c)m(hec)m(ks)h(on)f(the)h -(con)m(ten)m(ts)427 4916 y(of)31 b(the)f(arra)m(y)h(U)g(are)g(made)f(b) -m(y)g(the)h(presen)m(t)f(routine.)311 5079 y(3.)46 b(D)m(A)-8 -b(TE)34 b(is)d(the)i(instan)m(t)f(for)g(whic)m(h)f(the)h(prediction)f -(is)g(required.)45 b(It)33 b(is)e(in)g(the)i(TT)e(time)h(scale)427 -5192 y(\(formerly)e(Ephemeris)e(Time,)i(ET\))g(and)g(is)f(a)i(Mo)s -(di\014ed)e(Julian)f(Date)k(\(JD)p Fo(\000)p FD(2400000.5\).)311 -5354 y(4.)46 b(The)32 b(univ)m(ersal)e(elemen)m(ts)i(supplied)c(in)j -(the)h(arra)m(y)g(U)g(are)g(in)f(canonical)g(units)f(\(solar)i(masses,) -427 5467 y(A)m(U)f(and)f(canonical)g(da)m(ys\).)41 b(The)30 -b(p)s(osition)e(and)i(v)m(elo)s(cit)m(y)h(are)g(not)f(sensitiv)m(e)g -(to)h(the)f(c)m(hoice)h(of)427 5580 y(reference)36 b(frame.)56 -b(The)35 b(sla)p Ft(_)p FD(EL2UE)g(routine)g(in)f(fact)j(pro)s(duces)d -(co)s(ordinates)h(with)f(resp)s(ect)427 5693 y(to)d(the)g(J2000)h -(equator)f(and)f(equino)m(x.)p eop -%%Page: 166 168 -166 167 bop 0 52 a FD(166)311 351 y(5.)46 b(The)36 b(algorithm)f(w)m -(as)h(originally)e(adapted)i(from)g(the)g(EPHSLA)f(program)h(of)g(D.)16 -b(H.)g(P)-8 b(.)16 b(Jones)427 464 y(\(priv)-5 b(ate)36 -b(comm)m(unication,)h(1996\).)59 b(The)35 b(metho)s(d)h(is)f(based)g -(on)h(Stump\013)7 b('s)35 b(Univ)m(ersal)f(V)-8 b(ari-)427 -577 y(ables.)0 973 y FB(REFERENCE)44 b FD(:)d(Ev)m(erhart,)31 -b(E.)f(&)g(Pitkin,)f(E.T.,)h(Am.)h(J.)f(Ph)m(ys.)g(51,)i(712,)g(1983.)p -0 1120 3780 8 v 0 1233 a Fx(SLA)p Fn(_)p Fx(UNPCD)404 -b Fm(Remo)m(v)m(e)36 b(Radial)i(Distortion)401 b Fx(SLA)p -Fn(_)p Fx(UNPCD)0 1583 y FB(A)m(CTION)44 b FD(:)c(Remo)m(v)m(e)30 -b(pincushion/barrel)25 b(distortion)j(from)g(a)i(distorted)e([)15 -b Fl(x;)g(y)j FD(])30 b(to)f(giv)m(e)h(tangen)m(t-plane)227 -1696 y([)15 b Fl(x;)g(y)k FD(].)0 1884 y FB(CALL)45 b -FD(:)77 b Ft(CALL)46 b(sla_UNPCD)g(\(DISCO,X,Y\))0 2254 -y FB(GIVEN)f FD(:)277 2400 y Fq(DISCO)446 b FB(D)565 -b FD(pincushion/barrel)26 b(distortion)j(co)s(e\016cien)m(t)277 -2513 y Fq(X,Y)572 b FB(D)565 b FD(distorted)30 b([)15 -b Fl(x;)g(y)k FD(])0 2901 y FB(RETURNED)46 b FD(:)277 -3072 y Fq(X,Y)572 b FB(D)565 b FD(tangen)m(t-plane)31 -b([)15 b Fl(x;)g(y)k FD(])0 3469 y FB(NOTES)44 b FD(:)311 -3670 y(1.)i(The)32 b(distortion)e(is)h(of)h(the)g(form)g -Fl(\032)c FD(=)f Fl(r)s FD(\(1)22 b(+)f Fl(cr)2099 3637 -y Fu(2)2138 3670 y FD(\),)33 b(where)e Fl(r)k FD(is)c(the)h(radial)e -(distance)i(from)f(the)427 3783 y(tangen)m(t)g(p)s(oin)m(t,)d -Fl(c)h FD(is)f(the)h(DISCO)f(argumen)m(t,)i(and)f Fl(\032)g -FD(is)f(the)h(radial)e(distance)i(in)e(the)i(presence)427 -3896 y(of)i(the)f(distortion.)311 4049 y(2.)46 b(F)-8 -b(or)31 b Fq(pincushion)39 b FD(distortion,)29 b(C)h(is)f(+v)m(e;)i -(for)g Fq(b)-5 b(arr)g(el)41 b FD(distortion,)29 b(C)h(is)g -Fo(\000)p FD(v)m(e.)311 4202 y(3.)46 b(F)-8 b(or)37 b(X,Y)g(in)e(units) -f(of)j(one)f(pro)5 b(jection)36 b(radius)e(\(in)h(the)i(case)g(of)f(a)h -(photographic)e(plate,)j(the)427 4315 y(fo)s(cal)30 b(length\),)h(the)f -(follo)m(wing)f(DISCO)h(v)-5 b(alues)29 b(apply:)p 912 -4447 1243 4 v 910 4560 4 113 v 962 4526 a(Geometry)p -1684 4560 V 423 w(DISCO)p 2153 4560 V 912 4563 1243 4 -v 912 4580 V 910 4693 4 113 v 962 4659 a(astrograph)p -1684 4693 V 475 w(0.0)p 2153 4693 V 912 4696 1243 4 v -910 4809 4 113 v 962 4775 a(Sc)m(hmidt)p 1684 4809 V -470 w Fo(\000)p FD(0.3333)p 2153 4809 V 912 4812 1243 -4 v 910 4925 4 113 v 962 4892 a(AA)-8 b(T)31 b(PF)f(doublet)p -1684 4925 V 99 w(+147.069)p 2153 4925 V 912 4929 1243 -4 v 910 5042 4 113 v 962 5008 a(AA)-8 b(T)31 b(PF)f(triplet)p -1684 5042 V 149 w(+178.585)p 2153 5042 V 912 5045 1243 -4 v 910 5158 4 113 v 962 5124 a(AA)-8 b(T)31 b(f/8)p -1684 5158 V 476 w(+21.20)p 2153 5158 V 912 5161 1243 -4 v 910 5274 4 113 v 962 5240 a(JKT)e(f/8)p 1684 5274 -V 511 w(+14.6)p 2153 5274 V 912 5277 1243 4 v 311 5467 -a(4.)46 b(The)40 b(presen)m(t)h(routine)e(is)h(a)h(rigorous)e(in)m(v)m -(erse)i(of)f(the)h(companion)f(routine)f(sla)p Ft(_)p -FD(PCD.)h(The)427 5580 y(expression)c(for)h Fl(\032)g -FD(in)f(Note)j(1)f(is)e(rewritten)g(in)g(the)h(form)g -Fl(x)2574 5547 y Fu(3)2638 5580 y FD(+)25 b Fl(ax)g FD(+)f -Fl(b)37 b FD(=)f(0)i(and)e(solv)m(ed)i(b)m(y)427 5693 -y(standard)30 b(tec)m(hniques.)p eop -%%Page: 167 169 -167 168 bop 0 52 a Fw(SUN/67.70)3206 b FD(167)311 351 -y(5.)46 b(Cases)29 b(where)e(the)i(cubic)e(has)h(m)m(ultiple)d(real)j -(ro)s(ots)g(can)h(sometimes)f(o)s(ccur,)h(corresp)s(onding)d(to)427 -464 y(extreme)31 b(instances)f(of)g(barrel)e(distortion)h(where)g(up)g -(to)i(three)f(di\013eren)m(t)f(undistorted)g([)15 b Fl(x;)g(y)j -FD(]s)427 577 y(all)25 b(pro)s(duce)f(the)i(same)g(distorted)f([)15 -b Fl(x;)g(y)k FD(].)39 b(Ho)m(w)m(ev)m(er,)29 b(only)c(one)h(solution)e -(is)h(returned,)g(the)h(one)427 690 y(that)31 b(pro)s(duces)e(the)i -(smallest)e(c)m(hange)j(in)d([)15 b Fl(x;)g(y)k FD(].)p -0 839 3780 8 v 0 952 a Fx(SLA)p Fn(_)p Fx(V2TP)304 b -Fm(Direction)37 b(Cosines)h(to)g(T)-10 b(angen)m(t)37 -b(Plane)305 b Fx(SLA)p Fn(_)p Fx(V2TP)0 1302 y FB(A)m(CTION)44 -b FD(:)39 b(Giv)m(en)27 b(the)g(direction)f(cosines)h(of)g(a)h(star)f -(and)g(of)g(the)h(tangen)m(t)g(p)s(oin)m(t,)f(determine)g(the)g(star's) -227 1415 y(tangen)m(t-plane)32 b(co)s(ordinates)e(\(single)f -(precision\).)0 1603 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_V2TP)g(\(V,)h(V0,)g(XI,)g(ETA,)f(J\))0 1970 y FB(GIVEN)f -FD(:)277 2116 y Fq(V)668 b FB(R\(3\))433 b FD(direction)29 -b(cosines)h(of)h(star)277 2229 y Fq(V0)622 b FB(R\(3\))433 -b FD(direction)29 b(cosines)h(of)h(tangen)m(t)h(p)s(oin)m(t)0 -2611 y FB(RETURNED)46 b FD(:)277 2757 y Fq(XI,ET)-7 b(A)417 -b FB(R)567 b FD(tangen)m(t)32 b(plane)d(co)s(ordinates)h(\(radians\)) -277 2870 y Fq(J)688 b FB(I)605 b FD(status:)1825 2983 -y(0)31 b(=)f(OK,)g(star)g(on)g(tangen)m(t)i(plane)1825 -3096 y(1)f(=)f(error,)g(star)g(to)s(o)h(far)g(from)f(axis)1825 -3209 y(2)h(=)f(error,)g(an)m(tistar)g(on)h(tangen)m(t)h(plane)1825 -3322 y(3)f(=)f(error,)g(an)m(tistar)g(to)s(o)i(far)e(from)g(axis)0 -3704 y FB(NOTES)44 b FD(:)311 3903 y(1.)i(If)32 b(v)m(ector)h(V0)f(is)f -(not)h(of)g(unit)e(length,)i(or)f(if)g(v)m(ector)i(V)f(is)f(of)h(zero)g -(length,)g(the)g(results)e(will)f(b)s(e)427 4016 y(wrong.)311 -4168 y(2.)46 b(If)35 b(V0)i(p)s(oin)m(ts)d(at)i(a)g(p)s(ole,)h(the)e -(returned)g Fl(\030)t(;)15 b(\021)39 b FD(will)33 b(b)s(e)i(based)g(on) -h(the)g(arbitrary)e(assumption)427 4281 y(that)d Fl(\013)26 -b FD(=)f(0)31 b(at)g(the)f(tangen)m(t)i(p)s(oin)m(t.)311 -4433 y(3.)46 b(The)24 b(pro)5 b(jection)25 b(is)f(called)f(the)i -Fq(gnomonic)31 b FD(pro)5 b(jection;)27 b(the)d(Cartesian)h(co)s -(ordinates)f([)15 b Fl(\030)t(;)g(\021)k FD(])25 b(are)427 -4546 y(called)30 b Fq(standar)-5 b(d)37 b(c)-5 b(o)g(or)g(dinates.)45 -b FD(The)30 b(latter)i(are)f(in)f(units)f(of)i(the)h(distance)e(from)h -(the)g(tangen)m(t)427 4659 y(plane)f(to)h(the)f(pro)5 -b(jection)30 b(p)s(oin)m(t,)g Fq(i.e.)g FD(radians)f(near)h(the)h -(origin.)311 4811 y(4.)46 b(This)29 b(routine)g(is)h(the)g(Cartesian)g -(equiv)-5 b(alen)m(t)30 b(of)g(the)h(routine)e(sla)p -Ft(_)p FD(S2TP)-8 b(.)p 0 4955 V 0 5068 a Fx(SLA)p Fn(_)p -Fx(VD)l(V)884 b Fm(Scalar)37 b(Pro)s(duct)884 b Fx(SLA)p -Fn(_)p Fx(VD)l(V)0 5418 y FB(A)m(CTION)44 b FD(:)c(Scalar)30 -b(pro)s(duct)g(of)g(t)m(w)m(o)i(3-v)m(ectors)g(\(single)e(precision\).) -0 5606 y FB(CALL)45 b FD(:)77 b Ft(R)47 b(=)h(sla_VDV)d(\(VA,)i(VB\))p -eop -%%Page: 168 170 -168 169 bop 0 52 a FD(168)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(V)-9 b(A)609 b FB(R\(3\))433 b FD(\014rst)30 -b(v)m(ector)277 610 y Fq(VB)604 b FB(R\(3\))433 b FD(second)31 -b(v)m(ector)0 880 y FB(RETURNED)46 b FD(:)277 1052 y -Fq(sla)p Ft(_)p Fq(VD)n(V)379 b FB(R)567 b FD(scalar)30 -b(pro)s(duct)g(V)-10 b(A.VB)p 0 1164 3780 8 v 0 1277 -a Fx(SLA)p Fn(_)p Fx(VN)919 b Fm(Normalize)35 b(V)-10 -b(ector)919 b Fx(SLA)p Fn(_)p Fx(VN)0 1628 y FB(A)m(CTION)44 -b FD(:)c(Normalize)31 b(a)f(3-v)m(ector,)j(also)e(giving)e(the)h(mo)s -(dulus)e(\(single)h(precision\).)0 1815 y FB(CALL)45 -b FD(:)77 b Ft(CALL)46 b(sla_VN)g(\(V,)h(UV,)g(VM\))0 -2117 y FB(GIVEN)e FD(:)277 2289 y Fq(V)668 b FB(R\(3\))433 -b FD(v)m(ector)0 2567 y FB(RETURNED)46 b FD(:)277 2713 -y Fq(UV)600 b FB(R\(3\))433 b FD(unit)29 b(v)m(ector)j(in)d(direction)g -(of)i(V)277 2826 y Fq(VM)586 b FB(R)567 b FD(mo)s(dulus)28 -b(of)i(V)0 3096 y FB(NOTE)44 b FD(:)d(If)30 b(the)g(mo)s(dulus)e(of)j -(V)f(is)f(zero,)j(UV)f(is)e(set)i(to)g(zero)g(as)g(w)m(ell.)p -0 3193 V 0 3306 a Fx(SLA)p Fn(_)p Fx(VXV)871 b Fm(V)-10 -b(ector)38 b(Pro)s(duct)872 b Fx(SLA)p Fn(_)p Fx(VXV)0 -3656 y FB(A)m(CTION)44 b FD(:)c(V)-8 b(ector)33 b(pro)s(duct)c(of)h(t)m -(w)m(o)i(3-v)m(ectors)h(\(single)c(precision\).)0 3844 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_VXV)g(\(VA,)h(VB,)g(VC\))0 -4146 y FB(GIVEN)e FD(:)277 4292 y Fq(V)-9 b(A)609 b FB(R\(3\))433 -b FD(\014rst)30 b(v)m(ector)277 4405 y Fq(VB)604 b FB(R\(3\))433 -b FD(second)31 b(v)m(ector)0 4674 y FB(RETURNED)46 b -FD(:)277 4846 y Fq(V)n(C)605 b FB(R\(3\))433 b FD(v)m(ector)32 -b(pro)s(duct)d(V)-10 b(A)p Fo(\002)p FD(VB)p 0 4959 V -0 5072 a Fx(SLA)p Fn(_)p Fx(W)-15 b(AIT)901 b Fm(Time)37 -b(Dela)m(y)903 b Fx(SLA)p Fn(_)p Fx(W)-15 b(AIT)0 5422 -y FB(A)m(CTION)44 b FD(:)c(W)-8 b(ait)32 b(for)e(a)h(sp)s(eci\014ed)d -(in)m(terv)-5 b(al.)0 5610 y FB(CALL)45 b FD(:)77 b Ft(CALL)46 -b(sla_WAIT)g(\(DELAY\))p eop -%%Page: 169 171 -169 170 bop 0 52 a Fw(SUN/67.70)3206 b FD(169)0 351 y -FB(GIVEN)45 b FD(:)277 523 y Fq(DELA)-7 b(Y)419 b FB(R)567 -b FD(dela)m(y)31 b(in)e(seconds)0 907 y FB(NOTES)44 b -FD(:)311 1104 y(1.)i(The)30 b(implemen)m(tation)f(is)h(mac)m(hine-sp)s -(eci\014c.)311 1254 y(2.)46 b(The)d(dela)m(y)h(actually)f(requested)h -(is)e(restricted)i(to)g(the)g(range)g(100ns-200s)h(in)e(the)g(presen)m -(t)427 1367 y(implemen)m(tation.)311 1518 y(3.)j(There)20 -b(is)g(no)g(guaran)m(tee)i(of)f(accuracy)-8 b(,)24 b(though)d(on)f -(almost)h(all)e(t)m(yp)s(es)i(of)f(computer)h(the)g(program)427 -1631 y(will)28 b(certainly)i(not)g(resume)g(execution)h -Fq(b)-5 b(efor)g(e)37 b FD(the)31 b(stated)g(in)m(terv)-5 -b(al)30 b(has)g(elapsed.)p 0 1772 3780 8 v 0 1885 a Fx(SLA)p -Fn(_)p Fx(XY2XY)262 b Fm(Apply)38 b(Linear)g(Mo)s(del)h(to)f(an)g([)20 -b Fg(x;)g(y)j Fm(])264 b Fx(SLA)p Fn(_)p Fx(XY2XY)0 2235 -y FB(A)m(CTION)44 b FD(:)50 b(T)-8 b(ransform)35 b(one)g([)15 -b Fl(x;)g(y)k FD(])35 b(in)m(to)h(another)f(using)f(a)i(linear)d(mo)s -(del)i(of)g(the)g(t)m(yp)s(e)h(pro)s(duced)e(b)m(y)227 -2348 y(the)d(sla)p Ft(_)p FD(FITXY)f(routine.)0 2536 -y FB(CALL)45 b FD(:)77 b Ft(CALL)46 b(sla_XY2XY)g(\(X1,)g(Y1,)h -(COEFFS,)f(X2,)h(Y2\))0 2899 y FB(GIVEN)e FD(:)277 3045 -y Fq(X1,Y1)480 b FB(D)565 b FD([)15 b Fl(x;)g(y)k FD(])30 -b(b)s(efore)g(transformation)277 3158 y Fq(COEFFS)370 -b FB(D\(6\))431 b FD(transformation)30 b(co)s(e\016cien)m(ts)h(\(see)g -(note\))0 3534 y FB(RETURNED)46 b FD(:)277 3705 y Fq(X2,Y2)480 -b FB(D)565 b FD([)15 b Fl(x;)g(y)k FD(])30 b(after)h(transformation)0 -4090 y FB(NOTES)44 b FD(:)311 4286 y(1.)i(The)30 b(mo)s(del)f(relates)h -(t)m(w)m(o)h(sets)g(of)f([)15 b Fl(x;)g(y)k FD(])30 b(co)s(ordinates)f -(as)i(follo)m(ws.)39 b(Naming)30 b(the)g(six)f(elemen)m(ts)427 -4399 y(of)i(COEFFS)f Fl(a;)15 b(b;)g(c;)g(d;)g(e)33 b -FD(&)d Fl(f)10 b FD(,)29 b(the)i(presen)m(t)f(routine)g(p)s(erforms)f -(the)h(transformation:)597 4550 y Fl(x)649 4564 y Fu(2)714 -4550 y FD(=)25 b Fl(a)20 b FD(+)g Fl(bx)1060 4564 y Fu(1)1120 -4550 y FD(+)g Fl(cy)1295 4564 y Fu(1)597 4663 y Fl(y)642 -4677 y Fu(2)707 4663 y FD(=)k Fl(d)d FD(+)f Fl(ex)1055 -4677 y Fu(1)1115 4663 y FD(+)g Fl(f)10 b(y)1306 4677 -y Fu(1)311 4813 y FD(2.)46 b(See)31 b(also)f(sla)p Ft(_)p -FD(FITXY,)g(sla)p Ft(_)p FD(PXY,)g(sla)p Ft(_)p FD(INVF,)h(sla)p -Ft(_)p FD(DCMPF.)p 0 4955 V 0 5068 a Fx(SLA)p Fn(_)p -Fx(ZD)800 b Fg(h;)20 b(\016)43 b Fm(to)38 b(Zenith)g(Distance)800 -b Fx(SLA)p Fn(_)p Fx(ZD)0 5418 y FB(A)m(CTION)44 b FD(:)c(Hour)31 -b(angle)f(and)g(declination)e(to)j(zenith)f(distance)g(\(double)f -(precision\).)0 5606 y FB(CALL)45 b FD(:)77 b Ft(D)47 -b(=)h(sla_ZD)e(\(HA,)g(DEC,)h(PHI\))p eop -%%Page: 170 172 -170 171 bop 0 52 a FD(170)0 351 y FB(GIVEN)45 b FD(:)277 -497 y Fq(HA)600 b FB(D)565 b FD(hour)30 b(angle)g(in)f(radians)277 -610 y Fq(DEC)540 b FB(D)565 b FD(declination)29 b(in)g(radians)277 -723 y Fq(PHI)571 b FB(D)565 b FD(latitude)30 b(in)f(radians)0 -1077 y FB(RETURNED)46 b FD(:)277 1248 y Fq(sla)p Ft(_)p -Fq(ZD)457 b FB(D)565 b FD(zenith)30 b(distance)g(\(radians,)f(0)5 -b Fo(\000)g Fl(\031)s FD(\))0 1610 y FB(NOTES)44 b FD(:)311 -1798 y(1.)i(The)32 b(latitude)f(m)m(ust)i(b)s(e)e(geo)s(detic.)48 -b(In)31 b(critical)h(applications,)f(corrections)i(for)f(p)s(olar)f -(motion)427 1911 y(should)e(b)s(e)g(applied)g(\(see)i(sla)p -Ft(_)p FD(POLMO\).)311 2057 y(2.)46 b(In)36 b(some)h(applications)e(it) -i(will)d(b)s(e)i(imp)s(ortan)m(t)g(to)h(sp)s(ecify)f(the)h(correct)h(t) -m(yp)s(e)f(of)g(hour)e(angle)427 2170 y(and)e(declination)f(in)h(order) -g(to)h(pro)s(duce)f(the)h(required)e(t)m(yp)s(e)h(of)h(zenith)f -(distance.)51 b(In)33 b(partic-)427 2283 y(ular,)h(it)g(ma)m(y)h(b)s(e) -e(imp)s(ortan)m(t)g(to)i(distinguish)30 b(b)s(et)m(w)m(een)35 -b(the)f(zenith)g(distance)g(as)g(a\013ected)i(b)m(y)427 -2396 y(refraction,)28 b(whic)m(h)e(w)m(ould)f(require)h(the)h -Fq(observe)-5 b(d)38 b FD([)15 b Fl(h;)g(\016)20 b FD(],)28 -b(and)e(the)i(zenith)e(distance)h Fq(in)i(vacuo)p FD(,)427 -2509 y(whic)m(h)e(w)m(ould)g(require)g(the)i Fq(top)-5 -b(o)g(c)g(entric)36 b FD([)15 b Fl(h;)g(\016)20 b FD(].)40 -b(If)28 b(the)h(e\013ects)g(of)g(diurnal)c(ab)s(erration)i(can)i(b)s(e) -427 2622 y(neglected,)j(the)e Fq(app)-5 b(ar)g(ent)42 -b FD([)15 b Fl(h;)g(\016)20 b FD(])31 b(ma)m(y)g(b)s(e)e(used)h -(instead)g(of)g(the)h Fq(top)-5 b(o)g(c)g(entric)38 b -FD([)15 b Fl(h;)g(\016)20 b FD(].)311 2768 y(3.)46 b(No)31 -b(range)g(c)m(hec)m(king)g(of)g(argumen)m(ts)f(is)g(done.)311 -2914 y(4.)46 b(In)33 b(applications)e(whic)m(h)h(in)m(v)m(olv)m(e)i -(man)m(y)f(zenith)g(distance)g(calculations,)g(rather)g(than)g(calling) -427 3027 y(the)44 b(presen)m(t)f(routine)f(it)g(will)f(b)s(e)h(more)h -(e\016cien)m(t)h(to)g(use)e(inline)e(co)s(de,)47 b(ha)m(ving)c -(previously)427 3140 y(computed)26 b(\014xed)f(terms)g(suc)m(h)g(as)h -(sine)f(and)g(cosine)g(of)h(latitude,)f(and)g(p)s(erhaps)f(sine)h(and)g -(cosine)427 3253 y(of)31 b(declination.)p eop -%%Page: 171 173 -171 172 bop 0 52 a Fw(SUN/67.70)3206 b FD(171)0 351 y -Fx(4)135 b(EXPLANA)-11 b(TION)43 b(AND)i(EXAMPLES)0 606 -y FD(T)-8 b(o)38 b(guide)f(the)h(writer)f(of)h(p)s(ositional-astronom)m -(y)e(applications)g(soft)m(w)m(are,)42 b(this)36 b(\014nal)h(c)m -(hapter)h(puts)f(the)0 719 y(SLALIB)22 b(routines)g(in)m(to)g(the)h -(con)m(text)i(of)d(astronomical)h(phenomena)f(and)g(tec)m(hniques,)i -(and)e(presen)m(ts)h(a)g(few)0 832 y(\\co)s(okb)s(o)s(ok")28 -b(examples)f(of)h(the)g(SLALIB)e(calls)h(in)f(action.)40 -b(The)27 b(astronomical)g(con)m(ten)m(t)i(of)f(the)f(c)m(hapter)h(is)0 -945 y(not,)g(of)f(course,)h(in)m(tended)e(to)i(b)s(e)e(a)h(substitute)f -(for)h(sp)s(ecialist)e(text-b)s(o)s(oks)i(on)g(p)s(ositional)e -(astronom)m(y)-8 b(,)29 b(but)0 1058 y(ma)m(y)37 b(help)e(bridge)g(the) -i(gap)g(b)s(et)m(w)m(een)g(suc)m(h)f(b)s(o)s(oks)g(and)f(the)i(SLALIB)f -(routines.)58 b(F)-8 b(or)37 b(further)e(reading,)0 1171 -y(the)c(follo)m(wing)d(co)m(v)m(er)33 b(a)d(wide)f(range)i(of)g -(material)e(and)h(st)m(yles:)136 1412 y Fo(\017)46 b -Fq(Explanatory)32 b(Supplement)d(to)h(the)f(Astr)-5 b(onomic)g(al)31 -b(A)n(lmanac)p FD(,)d(ed.)e(P)-8 b(.)16 b(Kenneth)25 -b(Seidelmann)f(\(1992\),)227 1525 y(Univ)m(ersit)m(y)30 -b(Science)g(Bo)s(oks.)136 1715 y Fo(\017)46 b Fq(V)-7 -b(e)i(ctorial)34 b(Astr)-5 b(ometry)p FD(,)32 b(C.)16 -b(A.)f(Murra)m(y)30 b(\(1983\),)j(Adam)e(Hilger.)136 -1906 y Fo(\017)46 b Fq(Spheric)-5 b(al)35 b(Astr)-5 b(onomy)p -FD(,)32 b(Robin)d(M.)16 b(Green)31 b(\(1985\),)i(Cam)m(bridge)c(Univ)m -(ersit)m(y)h(Press.)136 2096 y Fo(\017)46 b Fq(Sp)-5 -b(ac)g(e)g(cr)g(aft)36 b(A)n(ttitude)c(Determination)i(and)f(Contr)-5 -b(ol)p FD(,)33 b(ed.)d(James)h(R.)15 b(W)-8 b(ertz)32 -b(\(1986\),)h(Reidel.)136 2287 y Fo(\017)46 b Fq(Pr)-5 -b(actic)g(al)41 b(Astr)-5 b(onomy)41 b(with)f(your)g(Calculator)p -FD(,)i(P)m(eter)c(Du\013ett-Smith)g(\(1981\),)k(Cam)m(bridge)36 -b(Uni-)227 2400 y(v)m(ersit)m(y)31 b(Press.)0 2641 y(Also)f(of)h -(considerable)d(v)-5 b(alue,)31 b(though)f(out)g(of)h(date)g(in)e -(places,)h(are:)136 2882 y Fo(\017)46 b Fq(Explanatory)31 -b(Supplement)f(to)f(the)f(Astr)-5 b(onomic)g(al)31 b(Ephemeris)f(and)f -(the)g(A)n(meric)-5 b(an)28 b(Ephemeris)h(and)227 2995 -y(Nautic)-5 b(al)34 b(A)n(lmanac)p FD(,)d(R)m(GO/USNO)g(\(1974\),)i -(HMSO.)136 3185 y Fo(\017)46 b Fq(T)-7 b(extb)i(o)g(ok)34 -b(on)f(Spheric)-5 b(al)35 b(Astr)-5 b(onomy)p FD(,)33 -b(W.)15 b(M.)h(Smart)30 b(\(1977\),)j(Cam)m(bridge)d(Univ)m(ersit)m(y)f -(Press.)0 3426 y(Only)i(brief)h(details)g(of)h(individual)28 -b(SLALIB)33 b(routines)f(are)h(giv)m(en)g(here,)h(and)e(readers)h(will) -d(\014nd)i(it)g(useful)0 3539 y(to)i(refer)g(to)g(the)g(subprogram)e -(sp)s(eci\014cations)h(elsewhere)g(in)f(this)h(do)s(cumen)m(t.)50 -b(The)33 b(source)h(co)s(de)g(for)f(the)0 3652 y(SLALIB)22 -b(routines)g(\(a)m(v)-5 b(ailable)23 b(in)e(b)s(oth)h(F)-8 -b(ortran)24 b(and)e(C\))h(is)f(also)h(in)m(tended)e(to)j(b)s(e)e(used)g -(as)h(do)s(cumen)m(tation.)0 3950 y Fv(4.1)112 b(Spherical)37 -b(T)-9 b(rigonometry)0 4174 y FD(Celestial)41 b(phenomena)h(o)s(ccur)g -(at)h(suc)m(h)f(v)-5 b(ast)43 b(distances)f(from)g(the)g(observ)m(er)h -(that)g(for)f(most)h(practical)0 4287 y(purp)s(oses)35 -b(there)i(is)f(no)h(need)f(to)i(w)m(ork)f(in)e(3D;)j(only)e(the)h -(direction)e(of)i(a)g(source)g(matters,)j(not)d(ho)m(w)g(far)0 -4400 y(a)m(w)m(a)m(y)27 b(it)d(is.)38 b(Things)23 b(can)i(therefore)h -(b)s(e)e(view)m(ed)g(as)i(if)d(they)i(w)m(ere)h(happ)s(ening)c(on)j -(the)g(inside)e(of)i(sphere)f(with)0 4513 y(the)32 b(observ)m(er)g(at)h -(the)f(cen)m(tre)g({)h(the)f Fq(c)-5 b(elestial)34 b(spher)-5 -b(e)p FD(.)47 b(Problems)30 b(in)m(v)m(olving)h(p)s(ositions)e(and)j -(orien)m(tations)0 4626 y(in)g(the)i(sky)f(can)h(then)f(b)s(e)g(solv)m -(ed)g(b)m(y)h(using)e(the)i(form)m(ulae)f(of)g Fq(spheric)-5 -b(al)38 b(trigonometry)p FD(,)e(whic)m(h)d(apply)f(to)0 -4738 y Fq(spheric)-5 b(al)35 b(triangles)p FD(,)c(the)g(sides)e(of)h -(whic)m(h)f(are)i Fq(gr)-5 b(e)g(at)34 b(cir)-5 b(cles)p -FD(.)0 4903 y(P)m(ositions)29 b(on)h(the)g(celestial)g(sphere)f(ma)m(y) -i(b)s(e)e(sp)s(eci\014ed)f(b)m(y)i(using)f(a)h(spherical)e(p)s(olar)h -(co)s(ordinate)h(system,)0 5016 y(de\014ned)k(in)g(terms)i(of)g(some)f -(fundamen)m(tal)g(plane)f(and)h(a)h(line)e(in)g(that)i(plane)f(c)m -(hosen)h(to)g(represen)m(t)g(zero)0 5128 y(longitude.)54 -b(Mathematicians)35 b(usually)e(w)m(ork)i(with)f(the)h(co-latitude,)i -(with)d(zero)i(at)g(the)f(principal)d(p)s(ole,)0 5241 -y(whereas)g(most)g(astronomical)g(co)s(ordinate)f(systems)h(use)g -(latitude,)f(rec)m(k)m(oned)i(plus)d(and)i(min)m(us)e(from)h(the)0 -5354 y(equator.)81 b(Astronomical)43 b(co)s(ordinate)g(systems)h(ma)m -(y)g(b)s(e)f(either)g(righ)m(t-handed)f(\()p Fq(e.g.)i -FD(righ)m(t)f(ascension)0 5467 y(and)29 b(declination)f([)15 -b Fl(\013;)g(\016)20 b FD(],)30 b(Galactic)g(longitude)f(and)f -(latitude)h([)15 b Fl(l)2257 5434 y Ff(I)-7 b(I)2321 -5467 y Fl(;)15 b(b)2400 5434 y Ff(I)-7 b(I)2480 5467 -y FD(]\))30 b(or)f(left-handed)g(\()p Fq(e.g.)g FD(hour)f(angle)0 -5580 y(and)44 b(declination)g([)15 b Fl(h;)g(\016)20 -b FD(]\).)85 b(In)44 b(some)i(cases)g(di\013eren)m(t)e(con)m(v)m(en)m -(tions)i(ha)m(v)m(e)h(b)s(een)d(used)g(in)g(the)h(past,)k(a)0 -5693 y(fruitful)30 b(source)j(of)g(mistak)m(es.)49 b(Azim)m(uth)33 -b(and)f(geographical)h(longitude)f(are)i(examples;)g(azim)m(uth)e(is)g -(no)m(w)p eop -%%Page: 172 174 -172 173 bop 0 52 a FD(172)0 351 y(generally)36 b(rec)m(k)m(oned)j -(north)d(through)h(east)h(\(making)f(a)h(left-handed)e(system\);)41 -b(geographical)d(longitude)0 464 y(is)g(no)m(w)i(usually)d(tak)m(en)j -(to)g(increase)g(east)m(w)m(ards)g(\(a)g(righ)m(t-handed)e(system\))i -(but)f(astronomers)g(used)g(to)0 577 y(emplo)m(y)f(a)i(w)m(est-p)s -(ositiv)m(e)e(con)m(v)m(en)m(tion.)67 b(In)38 b(rep)s(orts)g(and)g -(program)h(commen)m(ts)g(it)g(is)e(wise)h(to)i(sp)s(ell)c(out)0 -690 y(what)30 b(con)m(v)m(en)m(tion)i(is)d(b)s(eing)g(used,)h(if)f -(there)i(is)e(an)m(y)i(p)s(ossibilit)m(y)c(of)j(confusion.)0 -843 y(When)e(applying)e(spherical)h(trigonometry)h(form)m(ulae,)h -(atten)m(tion)g(m)m(ust)f(b)s(e)g(paid)f(to)i(rounding)d(errors)h -(\(for)0 956 y(example)43 b(it)f(is)g(a)i(bad)e(idea)h(to)h(\014nd)d(a) -j(small)d(angle)i(through)g(its)f(cosine\))h(and)g(to)h(the)f(p)s -(ossibilit)m(y)c(of)0 1069 y(problems)30 b(close)i(to)g(p)s(oles.)43 -b(Also,)32 b(if)e(a)i(form)m(ulation)e(relies)g(on)i(insp)s(ection)d -(to)j(establish)e(the)i(quadran)m(t)f(of)0 1181 y(the)g(result,)e(it)h -(is)f(an)i(indication)d(that)j(a)g(v)m(ector-related)h(metho)s(d)e -(migh)m(t)g(b)s(e)g(preferable.)0 1334 y(As)c(w)m(ell)f(as)i(pro)m -(viding)d(man)m(y)i(routines)f(whic)m(h)g(w)m(ork)i(in)e(terms)h(of)g -(sp)s(eci\014c)f(spherical)f(co)s(ordinates)i(suc)m(h)g(as)0 -1447 y([)15 b Fl(\013;)g(\016)20 b FD(],)37 b(SLALIB)d(pro)m(vides)g(t) -m(w)m(o)i(routines)e(whic)m(h)g(op)s(erate)h(directly)f(on)h(generic)f -(spherical)f(co)s(ordinates:)0 1560 y(sla)p Ft(_)p FD(SEP)k(computes)i -(the)g(separation)f(b)s(et)m(w)m(een)h(t)m(w)m(o)h(p)s(oin)m(ts)e -(\(the)h(distance)f(along)h(a)g(great)h(circle\))e(and)0 -1673 y(sla)p Ft(_)p FD(BEAR)j(computes)h(the)g(b)s(earing)f(\(or)h -Fq(p)-5 b(osition)45 b(angle)p FD(\))e(of)f(one)g(p)s(oin)m(t)e(seen)i -(from)g(the)g(other.)75 b(The)0 1786 y(routines)21 b(sla)p -Ft(_)p FD(DSEP)h(and)f(sla)p Ft(_)p FD(DBEAR)i(are)g(double)e -(precision)f(equiv)-5 b(alen)m(ts.)38 b(As)22 b(a)h(simple)d -(demonstration)0 1899 y(of)29 b(SLALIB,)g(w)m(e)g(will)d(use)j(these)g -(facilities)e(to)j(estimate)g(the)f(distance)f(from)h(London)f(to)h -(Sydney)f(and)g(the)0 2012 y(initial)g(compass)i(heading:)573 -2234 y Ft(IMPLICIT)45 b(NONE)286 2460 y(*)96 b(Degrees)45 -b(to)j(radians)573 2573 y(REAL)e(D2R)573 2686 y(PARAMETER)f -(\(D2R=0.01745329252\))286 2912 y(*)96 b(Longitudes)45 -b(and)h(latitudes)g(\(radians\))f(for)i(London)f(and)h(Sydney)573 -3025 y(REAL)f(AL,BL,AS,BS)573 3137 y(PARAMETER)f -(\(AL=-0.2*D2R,BL=51.5*D2R)o(,AS=)o(151.)o(2*D)o(2R,B)o(S=-3)o(3.9)o -(*D2R)o(\))286 3363 y(*)96 b(Earth)46 b(radius)g(in)h(km)g(\(spherical) -e(approximation\))573 3476 y(REAL)h(RKM)573 3589 y(PARAMETER)f -(\(RKM=6375.0\))573 3815 y(REAL)h(sla_SEP,sla_BEAR)286 -4154 y(*)96 b(Distance)45 b(and)i(initial)f(heading)g(\(N=0,)g(E=90\)) -573 4267 y(WRITE)g(\(*,'\(1X,I5,'')e(km,'',I4,'')h(deg''\)'\))525 -4379 y(:)191 b(NINT\(sla_SEP\(AL,BL,AS,B)o(S\)*R)o(KM\))o(,NIN)o(T\(sl) -o(a_B)o(EAR\()o(AL,B)o(L,A)o(S,BS)o(\)/D2)o(R\))573 4605 -y(END)0 4828 y FD(\(The)30 b(result)g(is)f(17011)j(km,)f(61)1094 -4795 y Fp(\016)1134 4828 y FD(.\))0 4980 y(The)23 b(routines)f(sla)p -Ft(_)p FD(SEPV,)g(sla)p Ft(_)p FD(DSEPV,)h(sla)p Ft(_)p -FD(P)-8 b(A)e(V,)23 b(sla)p Ft(_)p FD(DP)-8 b(A)e(V)24 -b(are)f(equiv)-5 b(alen)m(ts)23 b(of)g(sla)p Ft(_)p FD(SEP)-8 -b(,)23 b(sla)p Ft(_)p FD(DSEP)-8 b(,)0 5093 y(sla)p Ft(_)p -FD(BEAR)30 b(and)g(sla)p Ft(_)p FD(DBEAR)g(but)g(starting)g(from)g(v)m -(ectors)i(instead)d(of)i(spherical)d(co)s(ordinates.)0 -5369 y FB(4.1.1)105 b(F)-9 b(ormatting)34 b(angles)0 -5580 y FD(SLALIB)28 b(has)g(routines)g(for)g(deco)s(ding)g(decimal)f(n) -m(um)m(b)s(ers)g(from)h(c)m(haracter)j(form)d(and)g(for)g(con)m(v)m -(erting)h(an-)0 5693 y(gles)e(to)h(and)e(from)g(sexagesimal)h(form)g -(\(hours,)g(min)m(utes,)g(seconds)g(or)g(degrees,)h(arcmin)m(utes,)f -(arcseconds\).)p eop -%%Page: 173 175 -173 174 bop 0 52 a Fw(SUN/67.70)3206 b FD(173)0 351 y(These)33 -b(apparen)m(tly)g(straigh)m(tforw)m(ard)h(op)s(erations)e(con)m(tain)i -(hidden)d(traps)j(whic)m(h)e(the)i(SLALIB)f(routines)0 -464 y(a)m(v)m(oid.)0 626 y(There)d(are)h(\014v)m(e)f(routines)f(for)h -(deco)s(ding)g(n)m(um)m(b)s(ers)f(from)g(a)i(c)m(haracter)h(string,)e -(suc)m(h)g(as)g(migh)m(t)g(b)s(e)g(en)m(tered)0 739 y(using)38 -b(a)i(k)m(eyb)s(oard.)67 b(They)39 b(all)f(w)m(ork)i(in)e(the)h(same)h -(st)m(yle,)i(and)d(successiv)m(e)g(calls)g(can)h(w)m(ork)f(their)f(w)m -(a)m(y)0 852 y(along)c(a)h(single)e(string)g(deco)s(ding)h(a)g -(sequence)h(of)g(n)m(um)m(b)s(ers)e(of)h(assorted)h(t)m(yp)s(es.)52 -b(Num)m(b)s(er)34 b(\014elds)e(can)j(b)s(e)0 965 y(separated)c(b)m(y)f -(spaces)h(or)f(commas,)i(and)d(can)i(b)s(e)f(defaulted)f(to)i(previous) -e(v)-5 b(alues)30 b(or)g(to)h(preset)g(defaults.)0 1126 -y(Three)23 b(of)g(the)h(routines)e(deco)s(de)h(single)f(n)m(um)m(b)s -(ers:)36 b(sla)p Ft(_)p FD(INTIN)22 b(\(in)m(teger\),)k(sla)p -Ft(_)p FD(FLOTIN)c(\(single)g(precision)0 1239 y(\015oating)35 -b(p)s(oin)m(t\))g(and)g(sla)p Ft(_)p FD(DFL)-8 b(TIN)35 -b(\(double)f(precision\).)54 b(A)36 b(min)m(us)d(sign)i(can)g(b)s(e)g -(detected)h(ev)m(en)g(when)0 1352 y(the)26 b(n)m(um)m(b)s(er)f(is)h -(zero;)i(this)d(a)m(v)m(oids)i(the)f(frequen)m(tly-encoun)m(tered)h -(\\min)m(us)d(zero")k(bug,)f(where)e(declinations)0 1465 -y Fq(etc.)j FD(in)f(the)h(range)h(0)719 1432 y Fp(\016)787 -1465 y FD(to)f Fo(\000)p FD(1)1011 1432 y Fp(\016)1079 -1465 y FD(m)m(ysteriously)f(migrate)h(to)h(the)g(range)f(0)2491 -1432 y Fp(\016)2559 1465 y FD(to)h(+1)2784 1432 y Fp(\016)2824 -1465 y FD(.)40 b(Here)28 b(is)f(an)i(example)e(\(in)0 -1578 y(F)-8 b(ortran\))30 b(where)f(w)m(e)h(wish)d(to)j(read)g(t)m(w)m -(o)g(n)m(um)m(b)s(ers,)f(an)g(in)m(teger)h Ft(IX)e FD(and)h(a)h(real,)f -Ft(Y)p FD(,)g(with)f Ft(IX)h FD(defaulting)f(to)0 1691 -y(zero)j(and)f Ft(Y)g FD(defaulting)f(to)i Ft(IX)p FD(:)573 -1949 y Ft(DOUBLE)46 b(PRECISION)f(Y)573 2062 y(CHARACTER*80)f(A)573 -2175 y(INTEGER)i(IX,I,J)286 2401 y(*)96 b(Input)46 b(the)h(string)f(to) -h(be)g(decoded)573 2514 y(READ)f(\(*,'\(A\)'\))g(A)286 -2740 y(*)96 b(Preset)46 b(IX)h(to)g(its)g(default)f(value)573 -2853 y(IX)h(=)g(0)286 3079 y(*)96 b(Point)46 b(to)h(the)g(start)f(of)i -(the)e(string)573 3191 y(I)h(=)h(1)286 3417 y(*)96 b(Decode)46 -b(an)h(integer)573 3530 y(CALL)f(sla_INTIN\(A,I,IX,J\))573 -3643 y(IF)h(\(J.GT.1\))e(GO)j(TO)f(...)g(\(bad)f(IX\))286 -3869 y(*)96 b(Preset)46 b(Y)h(to)g(its)g(default)f(value)573 -3982 y(Y)h(=)h(DBLE\(IX\))286 4208 y(*)96 b(Decode)46 -b(a)h(double)f(precision)f(number)573 4321 y(CALL)h -(sla_DFLTIN\(A,I,Y,J\))573 4434 y(IF)h(\(J.GT.1\))e(GO)j(TO)f(...)g -(\(bad)f(Y\))0 4692 y FD(Tw)m(o)34 b(additional)d(routines)i(deco)s(de) -h(a)g(3-\014eld)f(sexagesimal)h(n)m(um)m(b)s(er:)46 b(sla)p -Ft(_)p FD(AFIN)33 b(\(degrees,)j(arcmin)m(utes,)0 4805 -y(arcseconds)e(to)g(single)d(precision)h(radians\))g(and)h(sla)p -Ft(_)p FD(D)m(AFIN)g(\(the)h(same)g(but)e(double)g(precision\).)48 -b(They)0 4918 y(also)41 b(w)m(ork)g(using)e(other)i(units)e(suc)m(h)h -(as)h(hours)f Fq(etc)p FD(.)h(if)e(y)m(ou)i(m)m(ultiply)d(the)j(result) -f(b)m(y)h(the)f(appropriate)0 5031 y(factor.)i(An)30 -b(example)g(F)-8 b(ortran)31 b(program)f(whic)m(h)f(uses)h(sla)p -Ft(_)p FD(D)m(AFIN)h(w)m(as)g(giv)m(en)f(earlier,)g(in)f(section)h -(1.2.)0 5193 y(SLALIB)39 b(pro)m(vides)g(four)f(routines)h(for)g -(expressing)f(an)i(angle)f(in)g(radians)f(in)g(a)i(preferred)e(range.) -69 b(The)0 5305 y(function)30 b(sla)p Ft(_)p FD(RANGE)h(expresses)g(an) -g(angle)h(in)e(the)h(range)h Fo(\006)p Fl(\031)s FD(;)f(sla)p -Ft(_)p FD(RANORM)g(expresses)g(an)g(angle)h(in)0 5418 -y(the)26 b(range)g(0)11 b Fo(\000)g FD(2)p Fl(\031)s -FD(.)40 b(The)26 b(functions)e(sla)p Ft(_)p FD(DRANGE)i(and)f(sla)p -Ft(_)p FD(DRANRM)h(are)g(double)f(precision)f(v)m(ersions.)0 -5580 y(Sev)m(eral)41 b(routines)g(\(sla)p Ft(_)p FD(CTF2D,)h(sla)p -Ft(_)p FD(CR2AF)f Fq(etc.)p FD(\))73 b(are)42 b(pro)m(vided)e(to)j(con) -m(v)m(ert)g(angles)e(to)h(and)f(from)0 5693 y(sexagesimal)33 -b(form)g(\(hours,)h(min)m(ute,)f(seconds)h(or)f(degrees,)i(arcmin)m -(utes)e(and)g(arcseconds\).)50 b(They)33 b(a)m(v)m(oid)p -eop -%%Page: 174 176 -174 175 bop 0 52 a FD(174)0 351 y(the)37 b(common)f(\\con)m(v)m(erting) -i(from)e(in)m(teger)h(to)g(real)g(at)g(the)g(wrong)f(time")g(bug,)i -(whic)m(h)d(pro)s(duces)h(angles)0 464 y(lik)m(e)30 b(24)257 -431 y Fu(h)316 464 y FD(59)406 431 y Fu(m)485 464 y FD(59)575 -431 y Fu(s)580 464 y Fl(:)p FD(999.)43 b(Here)31 b(is)e(a)i(program)f -(whic)m(h)f(displa)m(ys)g(an)h(hour)f(angle)i(stored)f(in)f(radians:) -573 749 y Ft(DOUBLE)46 b(PRECISION)f(HA)573 862 y(CHARACTER)g(SIGN)573 -975 y(INTEGER)h(IHMSF\(4\))573 1088 y(:)573 1201 y(CALL)g -(sla_DR2TF\(3,HA,SIGN,IHMSF\))573 1314 y(WRITE)g -(\(*,'\(1X,A,3I3.2,''.'',I3.)o(3\)')o(\))c(SIGN,IHMSF)0 -1748 y Fv(4.2)112 b(V)-9 b(ectors)37 b(and)h(Matrices)0 -1980 y FD(As)33 b(an)h(alternativ)m(e)g(to)g(emplo)m(ying)e(a)i -(spherical)e(p)s(olar)g(co)s(ordinate)h(system,)i(the)e(direction)g(of) -g(an)h(ob)5 b(ject)0 2093 y(can)36 b(b)s(e)f(de\014ned)g(in)f(terms)i -(of)g(the)g(sum)f(of)h(an)m(y)g(three)g(v)m(ectors)i(as)e(long)f(as)h -(they)g(are)h(di\013eren)m(t)e(and)g(not)0 2206 y(coplanar.)73 -b(In)41 b(practice,)k(three)c(v)m(ectors)i(at)f(righ)m(t)f(angles)g -(are)h(usually)d(c)m(hosen,)45 b(forming)40 b(a)i(system)f(of)0 -2319 y Fq(Cartesian)k(c)-5 b(o)g(or)g(dinates)p FD(.)81 -b(The)42 b Fq(x)p FD(-)h(and)f Fq(y)p FD(-axes)i(lie)e(in)f(the)i -(fundamen)m(tal)e(plane)h(\()p Fq(e.g.)h FD(the)f(equator)i(in)0 -2432 y(the)f(case)g(of)g([)15 b Fl(\013;)g(\016)20 b -FD(]\),)46 b(with)41 b(the)i Fq(x)p FD(-axis)f(p)s(oin)m(ting)f(to)i -(zero)g(longitude.)75 b(The)42 b Fq(z)p FD(-axis)g(is)g(normal)f(to)i -(the)0 2545 y(fundamen)m(tal)28 b(plane)g(and)g(p)s(oin)m(ts)f(to)m(w)m -(ards)j(p)s(ositiv)m(e)e(latitudes.)39 b(The)28 b Fq(y)p -FD(-axis)h(can)g(lie)e(in)h(either)g(of)h(the)g(t)m(w)m(o)0 -2658 y(p)s(ossible)c(directions,)i(dep)s(ending)d(on)k(whether)e(the)i -(co)s(ordinate)f(system)h(is)e(righ)m(t-handed)g(or)h(left-handed.)0 -2771 y(The)i(three)g(axes)h(are)g(sometimes)f(called)f(a)i -Fq(triad)p FD(.)42 b(F)-8 b(or)30 b(most)f(applications)f(in)m(v)m -(olving)f(arbitrarily)g(distan)m(t)0 2884 y(ob)5 b(jects)38 -b(suc)m(h)e(as)h(stars,)i(the)e(v)m(ector)i(whic)m(h)c(de\014nes)h(the) -h(direction)f(concerned)h(is)f(constrained)g(to)h(ha)m(v)m(e)0 -2996 y(unit)d(length.)55 b(The)35 b Fq(x)p FD(-,)i Fq(y-)e -FD(and)g Fq(z-)p FD(comp)s(onen)m(ts)g(can)g(b)s(e)g(regarded)g(as)h -(the)f(scalar)h(\(dot\))g(pro)s(duct)e(of)i(this)0 3109 -y(v)m(ector)41 b(on)m(to)f(the)f(three)g(axes)h(of)f(the)g(triad)f(in)g -(turn.)65 b(Because)41 b(the)e(v)m(ector)h(is)e(a)i(unit)d(v)m(ector,) -43 b(eac)m(h)d(of)0 3222 y(the)c(three)g(dot-pro)s(ducts)f(is)g(simply) -e(the)j(cosine)g(of)g(the)g(angle)g(b)s(et)m(w)m(een)g(the)g(unit)e(v)m -(ector)k(and)d(the)h(axis)0 3335 y(concerned,)31 b(and)f(the)g -Fq(x)p FD(-,)h Fq(y-)f FD(and)g Fq(z-)p FD(comp)s(onen)m(ts)g(are)h -(sometimes)f(called)g Fq(dir)-5 b(e)g(ction)34 b(c)-5 -b(osines)p FD(.)0 3506 y(F)d(or)35 b(some)f(applications,)f(including)d -(those)k(in)m(v)m(olving)f(ob)5 b(jects)34 b(within)d(the)j(Solar)f -(System,)i(unit)d(v)m(ectors)0 3618 y(are)g(inappropriate,)d(and)i(it)g -(is)f(necessary)i(to)g(use)f(v)m(ectors)i(scaled)e(in)f(length-units)g -(suc)m(h)h(as)g(A)m(U,)i(km)e Fq(etc.)0 3731 y FD(In)25 -b(these)h(cases)h(the)f(origin)f(of)h(the)g(co)s(ordinate)f(system)h -(ma)m(y)h(not)f(b)s(e)f(the)h(observ)m(er,)h(but)e(instead)h(migh)m(t)f -(b)s(e)0 3844 y(the)f(Sun,)g(the)g(Solar-System)f(barycen)m(tre,)j(the) -e(cen)m(tre)h(of)f(the)h(Earth)e Fq(etc.)38 b FD(But)24 -b(whatev)m(er)h(the)f(application,)0 3957 y(the)31 b(\014nal)e -(direction)g(in)g(whic)m(h)g(the)h(observ)m(er)h(sees)g(the)f(ob)5 -b(ject)32 b(can)e(b)s(e)g(expressed)g(as)g(direction)f(cosines.)0 -4128 y(But)40 b(where)g(has)g(this)f(got)j(us?)69 b(Instead)40 -b(of)g(t)m(w)m(o)i(n)m(um)m(b)s(ers)d({)h(a)h(longitude)e(and)g(a)i -(latitude)e({)i(w)m(e)f(no)m(w)0 4240 y(ha)m(v)m(e)30 -b(three)f(n)m(um)m(b)s(ers)f(to)i(lo)s(ok)e(after)i({)f(the)g -Fq(x)p FD(-,)h Fq(y-)f FD(and)f Fq(z-)p FD(comp)s(onen)m(ts)h({)g -(whose)g(quadratic)g(sum)f(w)m(e)h(ha)m(v)m(e)0 4353 -y(someho)m(w)36 b(to)h(con)m(triv)m(e)f(to)h(b)s(e)e(unit)m(y)-8 -b(.)56 b(And,)36 b(in)f(addition)e(to)k(this)e(apparen)m(t)g -(redundancy)-8 b(,)36 b(most)g(p)s(eople)0 4466 y(\014nd)25 -b(it)h(harder)g(to)h(visualize)e(problems)g(in)h(terms)g(of)h([)15 -b Fl(x;)g(y)s(;)g(z)20 b FD(])27 b(than)g(in)e([)15 b -Fl(\022)s(;)g(\036)27 b FD(].)39 b(Despite)27 b(these)g(ob)5 -b(jections,)0 4579 y(the)38 b(v)m(ector)i(approac)m(h)e(turns)f(out)h -(to)h(ha)m(v)m(e)g(signi\014can)m(t)e(adv)-5 b(an)m(tages)40 -b(o)m(v)m(er)f(the)f(spherical)e(trigonometry)0 4692 -y(approac)m(h:)136 4949 y Fo(\017)46 b FD(V)-8 b(ector)33 -b(form)m(ulae)d(tend)g(to)i(b)s(e)e(m)m(uc)m(h)h(more)f(succinct;)h -(one)g(v)m(ector)h(op)s(eration)f(is)e(the)i(equiv)-5 -b(alen)m(t)30 b(of)227 5061 y(strings)f(of)i(sines)e(and)h(cosines.)136 -5264 y Fo(\017)46 b FD(The)30 b(form)m(ulae)g(are)h(as)g(a)f(rule)f -(rigorous,)h(ev)m(en)h(at)g(the)g(p)s(oles.)136 5467 -y Fo(\017)46 b FD(Accuracy)37 b(is)f(main)m(tained)f(all)g(o)m(v)m(er)i -(the)g(celestial)e(sphere.)58 b(When)36 b(one)g(Cartesian)g(comp)s -(onen)m(t)g(is)227 5580 y(nearly)30 b(unit)m(y)g(and)g(therefore)h -(insensitiv)m(e)d(to)k(direction,)d(the)i(others)g(b)s(ecome)g(small)e -(and)h(therefore)227 5693 y(more)h(precise.)p eop -%%Page: 175 177 -175 176 bop 0 52 a Fw(SUN/67.70)3206 b FD(175)136 351 -y Fo(\017)46 b FD(F)-8 b(orm)m(ulations)24 b(usually)e(deliv)m(er)h -(the)h(quadran)m(t)g(of)g(the)h(result)e(without)g(the)h(need)g(for)g -(an)m(y)h(insp)s(ection)227 464 y(\(except)32 b(within)c(the)i(library) -e(function)h(A)-8 b(T)g(AN2\).)0 731 y(A)35 b(n)m(um)m(b)s(er)f(of)i -(imp)s(ortan)m(t)e(transformations)h(in)f(p)s(ositional)f(astronom)m(y) -j(turn)e(out)h(to)h(b)s(e)f(nothing)f(more)0 844 y(than)h(c)m(hanges)i -(of)f(co)s(ordinate)f(system,)i(something)e(whic)m(h)g(is)f(esp)s -(ecially)g(con)m(v)m(enien)m(t)j(if)d(the)i(v)m(ector)h(ap-)0 -957 y(proac)m(h)30 b(is)f(used.)40 b(A)30 b(direction)f(with)g(resp)s -(ect)h(to)h(one)f(triad)f(can)h(b)s(e)g(expressed)f(relativ)m(e)h(to)h -(another)f(triad)0 1069 y(simply)j(b)m(y)i(m)m(ultiplying)d(the)j([)15 -b Fl(x;)g(y)s(;)g(z)21 b FD(])35 b(column)f(v)m(ector)j(b)m(y)f(the)f -(appropriate)f(3)24 b Fo(\002)g FD(3)35 b(orthogonal)h(matrix)0 -1182 y(\(a)f(tensor)f(of)h(Rank)f(2,)i(or)e Fq(dyadic)p -FD(\).)54 b(The)33 b(three)i(ro)m(ws)f(of)g(this)g Fq(r)-5 -b(otation)38 b(matrix)47 b FD(are)34 b(the)h(v)m(ectors)g(in)e(the)0 -1295 y(old)d(co)s(ordinate)i(system)f(of)h(the)f(three)h(new)e(axes,)j -(and)d(the)i(transformation)f(amoun)m(ts)g(to)h(obtaining)e(the)0 -1408 y(dot-pro)s(duct)d(of)g(the)g(direction-v)m(ector)h(with)e(eac)m -(h)i(of)g(the)f(three)h(new)e(axes.)41 b(Precession,)27 -b(n)m(utation,)h([)15 b Fl(h;)g(\016)20 b FD(])0 1521 -y(to)k([)15 b Fl(Az)t(;)g(E)5 b(l)27 b FD(],)e([)15 b -Fl(\013;)g(\016)20 b FD(])k(to)g([)15 b Fl(l)919 1488 -y Ff(I)-7 b(I)983 1521 y Fl(;)15 b(b)1062 1488 y Ff(I)-7 -b(I)1142 1521 y FD(])23 b(and)g(so)h(on)f(are)h(t)m(ypical)f(examples)g -(of)g(the)h(tec)m(hnique.)38 b(A)24 b(useful)d(prop)s(ert)m(y)0 -1634 y(of)31 b(the)f(rotation)h(matrices)f(is)g(that)h(they)f(can)h(b)s -(e)f(in)m(v)m(erted)g(simply)e(b)m(y)i(taking)g(the)h(transp)s(ose.)0 -1808 y(The)i(elemen)m(ts)h(of)g(these)g(v)m(ectors)h(and)e(matrices)h -(are)g(assorted)g(com)m(binations)f(of)g(the)h(sines)f(and)g(cosines)0 -1921 y(of)d(the)h(v)-5 b(arious)29 b(angles)h(in)m(v)m(olv)m(ed)g -(\(hour)g(angle,)g(declination)f(and)h(so)g(on,)h(dep)s(ending)c(on)k -(whic)m(h)e(transfor-)0 2034 y(mation)g(is)g(b)s(eing)e(applied\).)39 -b(If)29 b(y)m(ou)h(write)e(out)i(the)f(matrix)g(m)m(ultiplications)d -(in)i(full)g(y)m(ou)h(get)i(expressions)0 2147 y(whic)m(h)c(are)h -(essen)m(tially)f(the)h(same)g(as)g(the)h(equiv)-5 b(alen)m(t)27 -b(spherical)f(trigonometry)i(form)m(ulae.)40 b(Indeed,)27 -b(man)m(y)0 2260 y(of)38 b(the)h(standard)e(form)m(ulae)g(of)i -(spherical)d(trigonometry)i(are)h(most)f(easily)f(deriv)m(ed)g(b)m(y)h -(expressing)f(the)0 2373 y(problem)29 b(initially)e(in)i(terms)h(of)h -(v)m(ectors.)0 2702 y FB(4.2.1)105 b(Using)36 b(v)m(ectors)0 -2941 y FD(SLALIB)k(pro)m(vides)f(con)m(v)m(ersions)i(b)s(et)m(w)m(een)g -(spherical)d(and)i(v)m(ector)i(form)e(\(sla)p Ft(_)p -FD(CS2C,)f(sla)p Ft(_)p FD(CC2S)g Fq(etc.)p FD(\),)0 -3053 y(plus)28 b(an)i(assortmen)m(t)i(of)e(standard)f(v)m(ector)j(and)e -(matrix)f(op)s(erations)h(\(sla)p Ft(_)p FD(VD)m(V,)h(sla)p -Ft(_)p FD(MXV)f Fq(etc.)p FD(\).)41 b(There)0 3166 y(are)j(also)g -(routines)e(\(sla)p Ft(_)p FD(EULER)h Fq(etc.)p FD(\))81 -b(for)44 b(creating)g(a)g(rotation)g(matrix)f(from)g(three)h -Fq(Euler)h(angles)0 3279 y FD(\(successiv)m(e)29 b(rotations)f(ab)s -(out)g(sp)s(eci\014ed)e(Cartesian)i(axes\).)41 b(Instead)28 -b(of)g(Euler)f(angles,)h(a)h(rotation)f(matrix)0 3392 -y(can)j(b)s(e)f(expressed)g(as)h(an)g Fq(axial)i(ve)-5 -b(ctor)42 b FD(\(the)31 b(p)s(ole)f(of)g(the)h(rotation,)h(and)e(the)g -(amoun)m(t)i(of)e(rotation\),)i(and)0 3505 y(routines)d(are)i(pro)m -(vided)e(for)h(this)f(\(sla)p Ft(_)p FD(A)-10 b(V2M,)32 -b(sla)p Ft(_)p FD(M2A)-10 b(V)30 b Fq(etc.)p FD(\).)0 -3679 y(Here)f(is)f(an)g(example)g(where)g(spherical)f(co)s(ordinates)h -Ft(P1)g FD(and)g Ft(Q1)g FD(undergo)g(a)h(co)s(ordinate)f -(transformation)0 3792 y(and)20 b(b)s(ecome)i Ft(P2)e -FD(and)g Ft(Q2)p FD(;)k(the)d(transformation)g(consists)f(of)h(a)h -(rotation)f(of)g(the)g(co)s(ordinate)g(system)g(through)0 -3905 y(angles)30 b Ft(A)p FD(,)h Ft(B)f FD(and)f Ft(C)h -FD(ab)s(out)g(the)h Fq(z)p FD(,)g(new)f Fq(y)38 b FD(and)30 -b(new)g Fq(z)41 b FD(axes)31 b(resp)s(ectiv)m(ely:)573 -4203 y Ft(REAL)46 b(A,B,C,R\(3,3\),P1,Q1,V1\(3\),V)o(2\(3)o(\),P2)o -(,Q2)620 4315 y(:)286 4428 y(*)96 b(Create)46 b(rotation)f(matrix)573 -4541 y(CALL)h(sla_EULER\('ZYZ',A,B,C,R\))286 4767 y(*)96 -b(Transform)45 b(position)g(\(P1,Q1\))h(from)h(spherical)e(to)i -(Cartesian)573 4880 y(CALL)f(sla_CS2C\(P1,Q1,V1\))286 -5106 y(*)96 b(Apply)46 b(the)h(rotation)573 5219 y(CALL)f -(sla_MXV\(R,V1,V2\))286 5445 y(*)96 b(Back)46 b(to)h(spherical)573 -5557 y(CALL)f(sla_CC2S\(V2,P2,Q2\))p eop -%%Page: 176 178 -176 177 bop 0 52 a FD(176)0 351 y(Small)26 b(adjustmen)m(ts)i(to)g(the) -g(direction)f(of)h(a)g(p)s(osition)e(v)m(ector)k(are)e(often)g(most)h -(con)m(v)m(enien)m(tly)f(describ)s(ed)e(in)0 464 y(terms)c(of)h([)15 -b(\001)p Fl(x;)g FD(\001)p Fl(y)s(;)g FD(\001)p Fl(z)k -FD(].)39 b(Adding)20 b(the)j(correction)f(v)m(ector)i(needs)e(careful)g -(handling)e(if)h(the)h(p)s(osition)f(v)m(ector)0 577 -y(is)j(to)h(remain)f(of)h(length)f(unit)m(y)-8 b(,)26 -b(an)f(advisable)e(precaution)h(whic)m(h)g(ensures)g(that)h(the)g([)15 -b Fl(x;)g(y)s(;)g(z)20 b FD(])25 b(comp)s(onen)m(ts)0 -690 y(are)f(alw)m(a)m(ys)h(a)m(v)-5 b(ailable)23 b(to)i(mean)f(the)g -(cosines)g(of)g(the)g(angles)g(b)s(et)m(w)m(een)g(the)h(v)m(ector)g -(and)e(the)i(axis)e(concerned.)0 803 y(Tw)m(o)33 b(t)m(yp)s(es)g(of)h -(shifts)d(are)j(commonly)e(used,)i(the)f(\014rst)f(where)h(a)g(small)f -(v)m(ector)j(of)e(arbitrary)f(direction)f(is)0 916 y(added)24 -b(to)h(the)f(unit)f(v)m(ector,)k(and)d(the)g(second)h(where)e(there)i -(is)e(a)i(displacemen)m(t)e(in)g(the)h(latitude)g(co)s(ordinate)0 -1029 y(\(declination,)29 b(elev)-5 b(ation)31 b Fq(etc.)p -FD(\))40 b(alone.)0 1187 y(F)-8 b(or)27 b(a)g(shift)d(pro)s(duced)h(b)m -(y)h(adding)f(a)i(small)d([)15 b Fl(x;)g(y)s(;)g(z)21 -b FD(])26 b(v)m(ector)i FB(d)e FD(to)h(a)g(unit)d(v)m(ector)k -FB(v)2922 1201 y Fu(1)2962 1187 y FD(,)f(the)g(resulting)d(v)m(ector)0 -1300 y FB(v)55 1314 y Fu(2)122 1300 y FD(has)k(direction)e -Fl(<)f FB(v)809 1314 y Fu(1)864 1300 y FD(+)15 b FB(d)25 -b Fl(>)i FD(but)g(is)g(no)g(longer)h(of)g(unit)e(length.)39 -b(A)28 b(b)s(etter)g(appro)m(ximation)e(is)h(a)m(v)-5 -b(ailable)0 1413 y(if)27 b(the)h(result)f(is)g(m)m(ultiplied)e(b)m(y)i -(a)i(scaling)e(factor)i(of)f(\(1)16 b Fo(\000)g FB(d)f -Fo(\001)h FB(v)2209 1427 y Fu(1)2249 1413 y FD(\),)29 -b(where)e(the)h(dot)h(means)e(scalar)h(pro)s(duct.)0 -1526 y(In)i(F)-8 b(ortran:)573 1770 y Ft(F)47 b(=)h -(\(1D0-\(DX*V1X+DY*V1Y+DZ*)o(V1Z\))o(\))573 1883 y(V2X)f(=)g -(F*\(V1X+DX\))573 1996 y(V2Y)g(=)g(F*\(V1Y+DY\))573 2108 -y(V2Z)g(=)g(F*\(V1Z+DZ\))0 2353 y FD(The)30 b(correction)h(for)f -(diurnal)d(ab)s(erration)j(\(discussed)e(later\))j(is)f(an)g(example)g -(of)g(this)g(form)g(of)g(shift.)0 2511 y(As)39 b(an)f(example)g(of)h -(the)g(second)f(kind)f(of)i(displacemen)m(t)e(w)m(e)i(will)d(apply)i(a) -h(small)e(c)m(hange)i(in)f(elev)-5 b(ation)0 2624 y Fl(\016)s(E)37 -b FD(to)32 b(an)e([)15 b Fl(Az)t(;)g(E)5 b(l)35 b FD(])c(direction)e(v) -m(ector.)44 b(The)30 b(direction)g(of)h(the)g(result)f(can)h(b)s(e)f -(obtained)g(b)m(y)h(making)f(the)0 2737 y(allo)m(w)m(able)j(appro)m -(ximation)f(tan)15 b Fl(\016)s(E)32 b Fo(\031)25 b Fl(\016)s(E)39 -b FD(and)32 b(adding)g(a)i(adjustmen)m(t)f(v)m(ector)i(of)e(length)f -Fl(\016)s(E)40 b FD(normal)32 b(to)0 2850 y(the)i(direction)f(v)m -(ector)j(in)c(the)j(v)m(ertical)f(plane)f(con)m(taining)g(the)i -(direction)d(v)m(ector.)54 b(The)33 b Fl(z)t FD(-comp)s(onen)m(t)i(of)0 -2962 y(the)k(adjustmen)m(t)g(v)m(ector)h(is)e Fl(\016)s(E)21 -b FD(cos)16 b Fl(E)5 b FD(,)41 b(and)d(the)h(horizon)m(tal)g(comp)s -(onen)m(t)g(is)f Fl(\016)s(E)21 b FD(sin)14 b Fl(E)44 -b FD(whic)m(h)37 b(has)i(then)0 3075 y(to)34 b(b)s(e)f(resolv)m(ed)g -(in)m(to)h Fl(x)f FD(and)g Fl(y)j FD(in)c(prop)s(ortion)f(to)k(their)d -(curren)m(t)h(sizes.)50 b(T)-8 b(o)34 b(appro)m(ximate)f(a)h(unit)e(v)m -(ector)0 3188 y(more)f(closely)-8 b(,)32 b(a)g(correction)f(factor)i -(of)e(cos)16 b Fl(\016)s(E)37 b FD(can)32 b(then)f(b)s(e)f(applied,)g -(whic)m(h)g(is)g(nearly)h(\(1)21 b Fo(\000)g Fl(\016)s(E)3473 -3155 y Fu(2)3513 3188 y Fl(=)p FD(2\))33 b(for)0 3301 -y(small)g Fl(\016)s(E)5 b FD(.)54 b(Expressed)33 b(in)g(F)-8 -b(ortran,)36 b(for)e(initial)e(v)m(ector)k Ft(V1X,V1Y,V1Z)p -FD(,)31 b(c)m(hange)36 b(in)d(elev)-5 b(ation)34 b Ft(DEL)g -FD(\(+v)m(e)0 3414 y Fo(\021)c FD(up)m(w)m(ards\),)g(and)g(result)f(v)m -(ector)j Ft(V2X,V2Y,V2Z)p FD(:)573 3658 y Ft(COSDEL)46 -b(=)h(1D0-DEL*DEL/2D0)573 3771 y(R1)g(=)g(SQRT\(V1X*V1X+V1Y*V1Y\))573 -3884 y(F)g(=)h(COSDEL*\(R1-DEL*V1Z\)/R1)573 3997 y(V2X)f(=)g(F*V1X)573 -4110 y(V2Y)g(=)g(F*V1Y)573 4223 y(V2Z)g(=)g(COSDEL*\(V1Z+DEL*R1\))0 -4467 y FD(An)38 b(example)h(of)f(this)g(t)m(yp)s(e)h(of)f(shift)g(is)f -(the)i(correction)g(for)g(atmospheric)f(refraction)g(\(see)i(later\).) -65 b(De-)0 4580 y(p)s(ending)27 b(on)i(the)h(relationship)d(b)s(et)m(w) -m(een)j Fl(\016)s(E)36 b FD(and)28 b Fl(E)5 b FD(,)31 -b(sp)s(ecial)d(handling)e(at)31 b(the)e(p)s(ole)g(\(the)h(zenith)f(for) -g(our)0 4693 y(example\))h(ma)m(y)h(b)s(e)f(required.)0 -4851 y(SLALIB)20 b(includes)f(routines)g(for)i(the)g(case)h(where)e(b)s -(oth)g(a)h(p)s(osition)e(and)h(a)i(v)m(elo)s(cit)m(y)f(are)g(in)m(v)m -(olv)m(ed.)37 b(The)21 b(rou-)0 4964 y(tines)27 b(sla)p -Ft(_)p FD(CS2C6)g(and)g(sla)p Ft(_)p FD(CC62S)g(con)m(v)m(ert)i(from)e -([)p Fl(\022)s(;)15 b(\036;)2052 4940 y FD(_)2034 4964 -y Fl(\022)s(;)2143 4940 y FD(_)2120 4964 y Fl(\036)q -FD(])28 b(to)g([)15 b Fl(x;)g(y)s(;)g(z)t(;)33 b FD(_)-43 -b Fl(x)r(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 -b FD(])28 b(and)f(bac)m(k;)j(sla)p Ft(_)p FD(DS2C6)0 -5077 y(and)g(sla)p Ft(_)p FD(DC62S)g(are)h(double)e(precision)f(equiv) --5 b(alen)m(ts.)0 5363 y Fv(4.3)112 b(Celestial)36 b(Co)s(ordinate)h -(Systems)0 5580 y FD(SLALIB)22 b(has)f(routines)g(to)i(p)s(erform)e -(transformations)g(of)h(celestial)g(p)s(ositions)e(b)s(et)m(w)m(een)j -(di\013eren)m(t)e(spherical)0 5693 y(co)s(ordinate)30 -b(systems,)h(including)c(those)k(sho)m(wn)e(in)g(the)i(follo)m(wing)e -(table:)p eop -%%Page: 177 179 -177 178 bop 0 52 a Fw(SUN/67.70)3206 b FD(177)p 2 263 -3775 4 v 0 376 4 113 v 52 342 a Fq(system)p 619 376 V -399 w(symb)-5 b(ols)p 1109 376 V 150 w(longitude)p 1572 -376 V 131 w(latitude)p 2022 376 V 185 w(x-y)32 b(plane)p -2595 376 V 304 w(long.)h(zer)-5 b(o)p 3371 376 V 248 -w(RH/LH)p 3776 376 V 2 379 3775 4 v 2 396 V 0 509 4 113 -v 52 475 a FD(horizon)p 619 509 V 497 w({)p 1109 509 -V 293 w(azim)m(uth)p 1572 509 V 121 w(elev)g(ation)p -2022 509 V 138 w(horizon)m(tal)p 2595 509 V 367 w(north)p -3371 509 V 452 w(L)p 3776 509 V 2 512 3775 4 v 0 625 -4 113 v 52 591 a(equatorial)p 619 625 V 345 w Fl(\013;)15 -b(\016)p 1109 625 V 317 w FD(R.A.)p 1572 625 V 277 w(Dec.)p -2022 625 V 275 w(equator)p 2595 625 V 372 w(equino)m(x)p -3371 625 V 403 w(R)p 3776 625 V 2 629 3775 4 v 0 741 -4 113 v 52 708 a(lo)s(cal)30 b(equ.)p 619 741 V 366 w -Fl(h;)15 b(\016)p 1109 741 V 319 w FD(H.A.)p 1572 741 -V 277 w(Dec.)p 2022 741 V 275 w(equator)p 2595 741 V -350 w(meridian)p 3371 741 V 385 w(L)p 3776 741 V 2 745 -3775 4 v 0 858 4 113 v 52 824 a(ecliptic)p 619 858 V -454 w Fl(\025;)g(\014)p 1109 858 V 231 w FD(ecl.)31 b(long.)p -1572 858 V 133 w(ecl.)g(lat.)p 2022 858 V 224 w(ecliptic)p -2595 858 V 379 w(equino)m(x)p 3371 858 V 403 w(R)p 3776 -858 V 2 861 3775 4 v 0 974 4 113 v 52 940 a(galactic)p -619 974 V 393 w Fl(l)776 907 y Ff(I)-7 b(I)840 940 y -Fl(;)15 b(b)919 907 y Ff(I)-7 b(I)p 1109 974 V 1160 940 -a FD(gal.)31 b(long.)p 1572 974 V 123 w(gal.)g(lat.)p -2022 974 V 124 w(gal.)g(equator)p 2595 974 V 232 w(gal.)g(cen)m(tre)p -3371 974 V 352 w(R)p 3776 974 V 2 977 3775 4 v 0 1090 -4 113 v 52 1056 a(sup)s(ergalactic)p 619 1090 V 99 w(SGL,SGB)p -1109 1090 V 110 w(SG)f(long.)p 1572 1090 V 143 w(SG)g(lat.)p -2022 1090 V 144 w(SG)g(equator)p 2595 1090 V 110 w(no)s(de)g(w.)g(gal.) -h(equ.)p 3371 1090 V 218 w(R)p 3776 1090 V 2 1093 3775 -4 v 0 1443 a(T)-8 b(ransformations)23 b(b)s(et)m(w)m(een)h([)15 -b Fl(h;)g(\016)20 b FD(])k(and)f([)15 b Fl(Az)t(;)g(E)5 -b(l)27 b FD(])d(can)f(b)s(e)g(p)s(erformed)g(b)m(y)g(calling)f(sla)p -Ft(_)p FD(E2H)h(and)g(sla)p Ft(_)p FD(H2E,)0 1556 y(or,)36 -b(in)e(double)g(precision,)g(sla)p Ft(_)p FD(DE2H)h(and)g(sla)p -Ft(_)p FD(DH2E.)g(There)f(is)g(also)h(a)h(routine)e(for)g(obtaining)g -(zenith)0 1669 y(distance)28 b(alone)h(for)f(a)h(giv)m(en)f([)15 -b Fl(h;)g(\016)20 b FD(],)30 b(sla)p Ft(_)p FD(ZD,)e(and)g(one)g(for)h -(determining)d(the)j(parallactic)e(angle,)j(sla)p Ft(_)p -FD(P)-8 b(A.)0 1782 y(Three)31 b(routines)f(are)h(included)e(whic)m(h)h -(relate)h(to)h(altazim)m(uth)f(telescop)s(e)h(moun)m(tings.)42 -b(F)-8 b(or)32 b(a)g(giv)m(en)f([)15 b Fl(h;)g(\016)20 -b FD(])0 1895 y(and)37 b(latitude,)i(sla)p Ft(_)p FD(AL)-8 -b(T)g(AZ)38 b(returns)f(the)h(azim)m(uth,)h(elev)-5 b(ation)38 -b(and)g(parallactic)f(angle,)j(plus)c(v)m(elo)s(cities)0 -2007 y(and)i(accelerations)i(for)f(sidereal)e(trac)m(king.)67 -b(The)39 b(routines)f(sla)p Ft(_)p FD(PD)m(A2H)i(and)e(sla)p -Ft(_)p FD(PDQ2H)h(predict)f(at)0 2120 y(what)30 b(hour)g(angle)g(a)h -(giv)m(en)f(azim)m(uth)g(or)h(parallactic)e(angle)i(will)c(b)s(e)j -(reac)m(hed.)0 2324 y(The)37 b(routines)g(sla)p Ft(_)p -FD(EQECL)f(and)h(sla)p Ft(_)p FD(ECLEQ)e(transform)i(b)s(et)m(w)m(een)i -(ecliptic)d(co)s(ordinates)i(and)f([)15 b Fl(\013;)g(\016)20 -b FD(];)0 2437 y(there)30 b(is)g(also)g(a)h(routine)e(for)h(generating) -h(the)f(equatorial)g(to)h(ecliptic)e(rotation)i(matrix)f(for)g(a)g(giv) -m(en)h(date:)0 2550 y(sla)p Ft(_)p FD(ECMA)-8 b(T.)0 -2754 y(F)g(or)26 b(con)m(v)m(ersion)f(b)s(et)m(w)m(een)h(Galactic)g(co) -s(ordinates)e(and)h([)15 b Fl(\013;)g(\016)20 b FD(])25 -b(there)g(are)h(t)m(w)m(o)g(sets)g(of)f(routines,)g(dep)s(ending)0 -2867 y(on)f(whether)g(the)h([)15 b Fl(\013;)g(\016)20 -b FD(])k(is)g(old-st)m(yle,)i(B1950,)i(or)c(new-st)m(yle,)i(J2000;)i -(sla)p Ft(_)p FD(EG50)d(and)e(sla)p Ft(_)p FD(GE50)i(are)g([)15 -b Fl(\013;)g(\016)20 b FD(])0 2980 y(to)28 b([)15 b Fl(l)177 -2947 y Ff(I)-7 b(I)241 2980 y Fl(;)15 b(b)320 2947 y -Ff(I)-7 b(I)400 2980 y FD(])27 b(and)f Fq(vic)-5 b(e)30 -b(versa)k FD(for)27 b(the)h(B1950)h(case,)g(while)c(sla)p -Ft(_)p FD(EQGAL)h(and)h(sla)p Ft(_)p FD(GALEQ)f(are)i(the)f(J2000)0 -3093 y(equiv)-5 b(alen)m(ts.)0 3297 y(Finally)d(,)31 -b(the)i(routines)e(sla)p Ft(_)p FD(GALSUP)h(and)f(sla)p -Ft(_)p FD(SUPGAL)h(transform)f([)15 b Fl(l)2633 3264 -y Ff(I)-7 b(I)2698 3297 y Fl(;)15 b(b)2777 3264 y Ff(I)-7 -b(I)2856 3297 y FD(])33 b(to)g(de)f(V)-8 b(aucouleurs)32 -b(su-)0 3409 y(p)s(ergalactic)e(longitude)f(and)h(latitude)g(and)f -Fq(vic)-5 b(e)32 b(versa.)0 3613 y FD(It)23 b(should)e(b)s(e)h -(appreciated)g(that)i(the)f(table,)h(ab)s(o)m(v)m(e,)i(constitutes)d(a) -g(gross)g(o)m(v)m(ersimpli\014cation.)36 b(Apparen)m(tly)0 -3726 y(simple)20 b(concepts)k(suc)m(h)e(as)g(equator,)j(equino)m(x)d -Fq(etc.)g FD(are)h(apt)g(to)g(b)s(e)f(v)m(ery)g(hard)g(to)h(pin)d(do)m -(wn)i(precisely)f(\(p)s(olar)0 3839 y(motion,)38 b(orbital)d(p)s -(erturbations)f(.)15 b(.)g(.)h(\))58 b(and)35 b(some)i(ha)m(v)m(e)g -(sev)m(eral)g(in)m(terpretations,)g(all)e(subtly)g(di\013eren)m(t.)0 -3952 y(The)45 b(v)-5 b(arious)44 b(frames)i(mo)m(v)m(e)h(in)d -(complicated)h(w)m(a)m(ys)h(with)f(resp)s(ect)g(to)h(one)g(another)g -(or)f(to)i(the)e(stars)0 4065 y(\(themselv)m(es)36 b(in)e(motion\).)55 -b(And)34 b(in)g(some)i(instances)f(the)g(co)s(ordinate)g(system)h(is)e -(sligh)m(tly)f(distorted,)j(so)0 4178 y(that)31 b(the)g(ordinary)d -(rules)h(of)i(spherical)d(trigonometry)j(no)f(longer)g(strictly)f -(apply)-8 b(.)0 4382 y(These)25 b Fq(c)-5 b(ave)g(ats)34 -b FD(apply)23 b(particularly)g(to)j(the)f(b)s(ewildering)c(v)-5 -b(ariet)m(y)26 b(of)f(di\013eren)m(t)f([)15 b Fl(\013;)g(\016)21 -b FD(])k(systems)g(that)g(are)h(in)0 4495 y(use.)40 b(Figure)29 -b(1)h(sho)m(ws)g(ho)m(w)f(some)h(of)g(these)g(systems)g(are)g(related,) -g(to)g(one)g(another)g(and)f(to)h(the)g(direction)0 4608 -y(in)25 b(whic)m(h)g(a)h(celestial)g(source)g(actually)g(app)s(ears)g -(in)e(the)j(sky)-8 b(.)39 b(A)m(t)27 b(the)g(top)f(of)h(the)f(diagram)g -(are)g(the)g(v)-5 b(arious)0 4720 y(sorts)23 b(of)h Fq(me)-5 -b(an)27 b(plac)-5 b(e)31 b FD(found)22 b(in)g(star)i(catalogues)h(and)d -(pap)s(ers;)2180 4687 y Fu(2)2244 4720 y FD(at)j(the)e(b)s(ottom)h(is)e -(the)i Fq(observe)-5 b(d)33 b FD([)15 b Fl(Az)t(;)g(E)5 -b(l)27 b FD(],)0 4833 y(where)k(a)h(p)s(erfect)g(theo)s(dolite)f(w)m -(ould)f(b)s(e)h(p)s(oin)m(ted)g(to)h(see)g(the)g(source;)h(and)e(in)f -(the)i(b)s(o)s(dy)e(of)i(the)g(diagram)0 4946 y(are)26 -b(the)g(in)m(termediate)g(pro)s(cessing)e(steps)i(and)f(co)s(ordinate)g -(systems.)40 b(T)-8 b(o)26 b(help)e(understand)g(this)h(diagram,)0 -5059 y(and)j(the)g(SLALIB)f(routines)g(that)i(can)g(b)s(e)e(used)g(to)i -(carry)f(out)h(the)f(v)-5 b(arious)27 b(calculations,)h(w)m(e)h(will)c -(lo)s(ok)j(at)0 5172 y(the)j(co)s(ordinate)f(systems)g(in)m(v)m(olv)m -(ed,)g(and)g(the)h(astronomical)f(phenomena)g(that)h(a\013ect)h(them.)p -0 5334 1512 4 v 104 5387 a Fs(2)138 5419 y Fr(One)c(frame)h(not)g -(included)f(in)g(Figure)i(1)f(is)g(that)f(of)i(the)e(Hipparcos)h -(catalogue.)45 b(This)29 b(is)h(curren)n(tly)d(the)i(b)r(est)f(a)n(v)l -(ailable)0 5510 y(implemen)n(tation)f(in)i(the)f(optical)h(of)g(the)g -Fd(International)i(Celestial)f(R)l(efer)l(enc)l(e)i(System)j -Fr(\(ICRS\),)28 b(whic)n(h)h(is)g(based)f(on)h(extra-)0 -5602 y(galactic)34 b(radio)f(sources)g(observ)n(ed)f(b)n(y)f(VLBI.)h -(The)g(distinction)h(b)r(et)n(w)n(een)f(FK5)g(J2000)i(and)e(Hipparcos)g -(co)r(ordinates)i(only)0 5693 y(b)r(ecomes)26 b(imp)r(ortan)n(t)e(when) -i(accuracies)h(of)g(50)f(mas)f(or)h(b)r(etter)g(are)g(required.)34 -b(More)27 b(details)f(are)g(giv)n(en)g(in)g(Section)f(4.14.)p -eop -%%Page: 178 180 -178 179 bop 0 52 a FD(178)p 227 263 3326 4 v 225 376 -4 113 v 3551 376 V 225 489 V 3551 489 V 225 785 4 297 -v 367 492 830 4 v 367 782 4 290 v 420 607 a(mean)31 b([)15 -b Fl(\013;)g(\016)20 b FD(],)31 b(FK4,)528 720 y(an)m(y)f(equino)m(x)p -1193 782 V 367 785 830 4 v 1475 492 V 1475 782 4 290 -v 1529 607 a(mean)g([)15 b Fl(\013;)g(\016)20 b FD(],)31 -b(FK4,)1518 720 y(no)f Fl(\026)p FD(,)g(an)m(y)h(equino)m(x)p -2301 782 V 1475 785 830 4 v 2584 492 V 2584 782 4 290 -v 2637 607 a(mean)f([)15 b Fl(\013;)g(\016)21 b FD(],)30 -b(FK5,)2744 720 y(an)m(y)h(equino)m(x)p 3409 782 V 2584 -785 830 4 v 3551 785 4 297 v 225 898 4 113 v 780 898 -V 1888 898 V 2996 898 V 3551 898 V 225 1011 V 521 977 -a(space)g(motion)p 1888 1011 V 1696 w(space)g(motion)p -3551 1011 V 225 1124 V 586 1090 a({)g(E-terms)717 b({)31 -b(E-terms)p 2996 1124 V 3551 1124 V 225 1237 V 448 1203 -a(precess)f(to)i(B1950)443 b(precess)31 b(to)g(B1950)453 -b(precess)30 b(to)h(J2000)p 3551 1237 V 225 1350 V 573 -1316 a(+)f(E-terms)693 b(+)30 b(E-terms)p 2996 1350 V -3551 1350 V 225 1463 V 417 1429 a(FK4)h(to)g(FK5,)g(no)f -Fl(\026)379 b FD(FK4)31 b(to)g(FK5,)g(no)f Fl(\026)p -2996 1463 V 3551 1463 V 225 1576 V 621 1542 a FD(parallax)p -1888 1576 V 1895 w(parallax)p 3551 1576 V 225 1688 V -780 1688 V 1888 1688 V 2996 1688 V 3551 1688 V 781 1692 -2217 4 v 225 1801 4 113 v 1888 1801 V 3551 1801 V 225 -1980 4 179 v 1043 1805 1693 4 v 1043 1976 4 172 v 1117 -1914 a(FK5,)h(J2000,)h(curren)m(t)e(ep)s(o)s(c)m(h,)g(geo)s(cen)m(tric) -p 2733 1976 V 1043 1979 1693 4 v 3551 1980 4 179 v 225 -2092 4 113 v 1888 2092 V 3551 2092 V 225 2205 V 1596 -2172 a(ligh)m(t)f(de\015ection)p 3551 2205 V 225 2318 -V 1536 2284 a(ann)m(ual)g(ab)s(erration)p 3551 2318 V -225 2431 V 1507 2397 a(precession-n)m(utation)p 3551 -2431 V 225 2544 V 1888 2544 V 3551 2544 V 225 2691 4 -148 v 1548 2547 685 4 v 1548 2688 4 141 v 1576 2641 a(Apparen)m(t)h([) -15 b Fl(\013;)g(\016)20 b FD(])p 2229 2688 V 1548 2691 -685 4 v 3551 2691 4 148 v 225 2804 4 113 v 1888 2804 -V 3551 2804 V 225 2917 V 1601 2883 a(Earth)30 b(rotation)p -3551 2917 V 225 3030 V 1888 3030 V 3551 3030 V 225 3178 -4 148 v 1551 3034 679 4 v 1551 3174 4 141 v 1579 3127 -a(Apparen)m(t)g([)15 b Fl(h;)g(\016)20 b FD(])p 2226 -3174 V 1551 3177 679 4 v 3551 3178 4 148 v 225 3290 4 -113 v 1888 3290 V 3551 3290 V 225 3403 V 1527 3370 a(diurnal)27 -b(ab)s(erration)p 3551 3403 V 225 3516 V 1888 3516 V -3551 3516 V 225 3664 4 148 v 1503 3520 775 4 v 1503 3660 -4 141 v 1531 3613 a(T)-8 b(op)s(o)s(cen)m(tric)30 b([)15 -b Fl(h;)g(\016)20 b FD(])p 2274 3660 V 1503 3663 775 -4 v 3551 3664 4 148 v 225 3777 4 113 v 1888 3777 V 3551 -3777 V 225 3890 V 1534 3856 a([)15 b Fl(h;)g(\016)20 -b FD(])31 b(to)g([)15 b Fl(Az)t(;)g(E)5 b(l)34 b FD(])p -3551 3890 V 225 4002 V 1888 4002 V 3551 4002 V 225 4150 -4 148 v 1435 4006 909 4 v 1435 4146 4 141 v 1464 4099 -a(T)-8 b(op)s(o)s(cen)m(tric)30 b([)15 b Fl(Az)t(;)g(E)5 -b(l)34 b FD(])p 2341 4146 V 1435 4149 909 4 v 3551 4150 -4 148 v 225 4263 4 113 v 1888 4263 V 3551 4263 V 225 -4376 V 1699 4342 a(refraction)p 3551 4376 V 225 4489 -V 1888 4489 V 3551 4489 V 225 4636 4 148 v 1486 4492 -809 4 v 1486 4633 4 141 v 1514 4585 a(Observ)m(ed)c([)15 -b Fl(Az)t(;)g(E)5 b(l)33 b FD(])p 2291 4633 V 1486 4636 -809 4 v 3551 4636 4 148 v 225 4749 4 113 v 3551 4749 -V 225 4862 V 3551 4862 V 227 4865 3326 4 v 687 5100 a(Figure)d(1:)41 -b FB(Relationship)36 b(Bet)m(w)m(een)e(Celestial)g(Co)s(ordinates)0 -5212 y FD(Star)22 b(p)s(ositions)f(are)i(published)c(or)j(catalogued)i -(using)d(one)i(of)f(the)h(mean)g([)15 b Fl(\013;)g(\016)20 -b FD(])j(systems)f(sho)m(wn)g(at)h(the)g(top.)0 5325 -y(The)33 b(\\FK4")i(systems)f(w)m(ere)h(used)e(b)s(efore)g(ab)s(out)h -(1980)h(and)e(are)i(usually)c(equino)m(x)j(B1950.)53 -b(The)33 b(\\FK5")0 5438 y(system,)47 b(equino)m(x)c(J2000,)48 -b(is)42 b(no)m(w)i(preferred,)h(or)f(rather)f(its)f(mo)s(dern)g(equiv) --5 b(alen)m(t,)47 b(the)c(In)m(ternational)0 5551 y(Celestial)31 -b(Reference)h(F)-8 b(rame)33 b(\(in)d(the)i(optical,)g(the)g(Hipparcos) -f(catalogue\).)47 b(The)31 b(\014gure)g(relates)h(a)g(star's)0 -5664 y(mean)39 b([)15 b Fl(\013;)g(\016)20 b FD(])39 -b(to)h(the)f(actual)g(line-of-sigh)m(t)f(to)i(the)f(star.)66 -b(Note)41 b(that)e(for)g(the)g(con)m(v)m(en)m(tional)h(c)m(hoices)f(of) -0 5777 y(equino)m(x,)30 b(namely)g(B1950)i(or)f(J2000,)h(all)d(of)i -(the)f(precession)g(and)f(E-terms)i(corrections)f(are)h(sup)s -(er\015uous.)p eop -%%Page: 179 181 -179 180 bop 0 52 a Fw(SUN/67.70)3206 b FD(179)0 351 y -Fv(4.4)112 b(Precession)37 b(and)h(Nutation)0 571 y Fq(R)n(ight)46 -b(asc)-5 b(ension)47 b(and)g(de)-5 b(clination)p FD(,)50 -b(\([)15 b Fl(\013;)g(\016)21 b FD(]\),)49 b(are)c(the)g(names)f(of)h -(the)g(longitude)e(and)h(latitude)g(in)f(a)0 684 y(spherical)35 -b(p)s(olar)g(co)s(ordinate)i(system)g(based)g(on)f(the)h(Earth's)g -(axis)f(of)h(rotation.)60 b(The)37 b(zero)g(p)s(oin)m(t)f(of)h -Fl(\013)0 796 y FD(is)f(the)i(p)s(oin)m(t)e(of)i(in)m(tersection)f(of)g -(the)h Fq(c)-5 b(elestial)40 b(e)-5 b(quator)48 b FD(and)37 -b(the)g Fq(e)-5 b(cliptic)43 b FD(\(the)38 b(apparen)m(t)g(path)f(of)g -(the)0 909 y(Sun)29 b(through)h(the)h(y)m(ear\))g(where)f(the)h(Sun)e -(mo)m(v)m(es)j(in)m(to)f(the)f(northern)g(hemisphere.)39 -b(This)29 b(p)s(oin)m(t)h(is)f(called)0 1022 y(the)k -Fq(\014rst)j(p)-5 b(oint)37 b(of)e(A)n(ries)p FD(,)f(the)f -Fq(vernal)j(e)-5 b(quinox)45 b FD(\(with)32 b(ap)s(ologies)g(to)i -(southern-hemisphere)d(readers\))i(or)0 1135 y(simply)28 -b(the)i Fq(e)-5 b(quinox)p FD(.)767 1102 y Fu(3)0 1296 -y FD(This)28 b(simple)f(picture)i(is)f(unfortunately)g(complicated)i(b) -m(y)f(the)h(di\016cult)m(y)e(of)h(de\014ning)f(a)i(suitable)e(equator)0 -1409 y(and)43 b(equino)m(x.)78 b(One)43 b(problem)e(is)h(that)i(the)f -(Sun's)f(apparen)m(t)h(diurnal)d(and)j(ann)m(ual)f(motions)h(are)g(not) -0 1522 y(completely)30 b(regular,)g(due)f(to)i(the)f(ellipticit)m(y)e -(of)j(the)f(Earth's)g(orbit)f(and)h(its)f(con)m(tin)m(uous)h -(disturbance)f(b)m(y)0 1635 y(the)e(Mo)s(on)f(and)g(planets.)39 -b(This)24 b(is)i(dealt)g(with)f(b)m(y)i(separating)f(the)g(motion)g(in) -m(to)h(\(i\))f(a)h(smo)s(oth)f(and)g(steady)0 1747 y -Fq(me)-5 b(an)31 b(Sun)j FD(and)26 b(\(ii\))g(a)i(set)g(of)f(p)s(erio)s -(dic)d(corrections)k(and)e(p)s(erturbations;)h(only)f(the)h(former)g -(is)f(in)m(v)m(olv)m(ed)h(in)0 1860 y(establishing)c(reference)j -(systems)g(and)f(time)h(scales.)39 b(A)26 b(second,)h(far)e(larger)h -(problem,)f(is)g(that)h(the)g(celestial)0 1973 y(equator)i(and)e(the)h -(ecliptic)f(are)h(b)s(oth)g(mo)m(ving)f(with)g(resp)s(ect)h(to)h(the)f -(stars.)40 b(These)26 b(motions)h(arise)f(b)s(ecause)0 -2086 y(of)31 b(the)f(gra)m(vitational)h(in)m(teractions)f(b)s(et)m(w)m -(een)h(the)f(Earth)h(and)e(the)i(other)g(solar-system)f(b)s(o)s(dies.)0 -2247 y(By)25 b(far)f(the)h(largest)g(e\013ect)h(is)d(the)i(so-called)f -(\\precession)g(of)h(the)g(equino)m(xes",)h(where)e(the)h(Earth's)f -(rotation)0 2360 y(axis)32 b(sw)m(eeps)h(out)g(a)h(cone)f(cen)m(tred)h -(on)e(the)h(ecliptic)f(p)s(ole,)h(completing)f(one)h(rev)m(olution)f -(in)f(ab)s(out)i(26,000)0 2473 y(y)m(ears.)57 b(The)35 -b(cause)i(of)e(the)h(motion)g(is)e(the)i(torque)g(exerted)g(on)g(the)g -(distorted)f(and)g(spinning)d(Earth)k(b)m(y)0 2586 y(the)e(Sun)e(and)h -(the)h(Mo)s(on.)51 b(Consider)32 b(the)i(e\013ect)h(of)f(the)g(Sun)e -(alone,)j(at)g(or)e(near)h(the)g(northern)f(summer)0 -2699 y(solstice.)46 b(The)31 b(Sun)g(`sees')i(the)f(top)g(\(north)g(p)s -(ole\))f(of)i(the)f(Earth)g(tilted)f(to)m(w)m(ards)i(it)e(\(b)m(y)i(ab) -s(out)e(23)3516 2666 y Fp(\016)3522 2699 y Fl(:)r FD(5,)j(the)0 -2811 y Fq(obliquity)i(of)f(the)h(e)-5 b(cliptic)5 b FD(\),)35 -b(and)e(sees)h(the)f(nearer)h(part)f(of)h(the)f(Earth's)g(equatorial)g -(bulge)g(b)s(elo)m(w)f(cen)m(tre)0 2924 y(and)e(the)h(further)e(part)h -(ab)s(o)m(v)m(e)i(cen)m(tre.)42 b(Although)30 b(the)h(Earth)f(is)g(in)f -(free)h(fall,)g(the)h(gra)m(vitational)f(force)i(on)0 -3037 y(the)f(nearer)h(part)f(of)g(the)g(equatorial)g(bulge)g(is)f -(greater)i(than)f(that)h(on)f(the)g(further)f(part,)i(and)f(so)g(there) -g(is)0 3150 y(a)h(net)g(torque)g(acting)g(as)g(if)f(to)h(eliminate)e -(the)i(tilt.)44 b(Six)31 b(mon)m(ths)g(later)h(the)g(same)g(thing)f(is) -g(happ)s(ening)e(in)0 3263 y(rev)m(erse,)g(except)f(that)g(the)f -(torque)h(is)e(still)f(trying)i(to)h(eliminate)e(the)h(tilt.)39 -b(In)27 b(b)s(et)m(w)m(een)h(\(at)g(the)f(equino)m(xes\))0 -3376 y(the)i(torque)f(shrinks)e(to)j(zero.)41 b(A)29 -b(torque)f(acting)h(on)f(a)h(spinning)c(b)s(o)s(dy)i(is)h -(gyroscopically)f(translated)h(in)m(to)0 3489 y(a)39 -b(precessional)e(motion)g(of)i(the)f(spin)e(axis)i(at)h(righ)m -(t-angles)f(to)h(the)f(torque,)i(and)e(this)f(happ)s(ens)f(to)j(the)0 -3602 y(Earth.)51 b(The)33 b(motion)h(v)-5 b(aries)33 -b(during)f(the)i(y)m(ear,)i(going)d(through)h(t)m(w)m(o)h(maxima,)f -(but)f(alw)m(a)m(ys)i(acts)g(in)d(the)0 3715 y(same)37 -b(direction.)60 b(The)36 b(Mo)s(on)i(pro)s(duces)d(the)j(same)f -(e\013ect,)k(adding)35 b(a)j(con)m(tribution)d(to)j(the)f(precession)0 -3828 y(whic)m(h)22 b(p)s(eaks)h(t)m(wice)h(p)s(er)f(mon)m(th.)38 -b(The)23 b(Mo)s(on's)h(pro)m(ximit)m(y)e(to)i(the)g(Earth)f(more)h -(than)f(comp)s(ensates)h(for)f(its)0 3941 y(smaller)k(mass)h(and)f(gra) -m(vitational)h(attraction,)i(so)f(that)f(it)g(in)f(fact)i(con)m -(tributes)f(most)g(of)g(the)h(precessional)0 4053 y(e\013ect.)0 -4214 y(The)24 b(complex)f(in)m(teractions)h(b)s(et)m(w)m(een)h(the)f -(three)g(b)s(o)s(dies)e(pro)s(duce)h(a)h(precessional)f(motion)h(that)h -(is)e(w)m(obbly)0 4327 y(rather)32 b(than)h(completely)f(smo)s(oth.)47 -b(Ho)m(w)m(ev)m(er,)36 b(the)d(main)e(26,000-y)m(ear)37 -b(comp)s(onen)m(t)c(is)e(on)i(suc)m(h)f(a)h(grand)0 4440 -y(scale)40 b(that)g(it)f(dw)m(arfs)g(the)h(remaining)e(terms,)k(the)e -(biggest)f(of)h(whic)m(h)e(has)i(an)f(amplitude)f(of)i(only)e(11)3738 -4403 y Fk(0)m(0)0 4553 y FD(and)27 b(a)i(p)s(erio)s(d)d(of)i(ab)s(out)g -(18.6)i(y)m(ears.)40 b(This)26 b(di\013erence)i(of)g(scale)h(mak)m(es)g -(it)e(con)m(v)m(enien)m(t)j(to)e(treat)i(these)e(t)m(w)m(o)0 -4666 y(comp)s(onen)m(ts)d(of)g(the)g(motion)g(separately)-8 -b(.)39 b(The)25 b(main)e(26,000-y)m(ear)29 b(e\013ect)d(is)e(called)g -Fq(luni-solar)29 b(pr)-5 b(e)g(c)g(ession)p FD(;)0 4779 -y(the)31 b(smaller,)e(faster,)i(p)s(erio)s(dic)c(terms)k(are)g(called)e -(the)i Fq(nutation)p FD(.)0 4939 y(Note)22 b(that)f(precession)e(and)h -(n)m(utation)g(are)g(simply)e(di\013eren)m(t)i(frequency)g(comp)s(onen) -m(ts)g(of)h(the)f(same)h(ph)m(ysical)0 5052 y(e\013ect.)40 -b(It)25 b(is)e(a)i(common)g(misconception)e(that)i(precession)f(is)f -(caused)i(b)m(y)f(the)h(Sun)e(and)h(n)m(utation)g(is)f(caused)0 -5165 y(b)m(y)33 b(the)g(Mo)s(on.)50 b(In)32 b(fact)j(the)e(Mo)s(on)g -(is)g(resp)s(onsible)d(for)j(t)m(w)m(o-thirds)g(of)g(the)h(precession,) -f(and,)g(while)f(it)g(is)p 0 5242 1512 4 v 104 5296 a -Fs(3)138 5328 y Fr(With)20 b(the)g(in)n(tro)r(duction)g(of)i(the)d(In)n -(ternational)i(Celestial)i(Reference)d(System)f(\(ICRS\),)h(the)g -(connection)g(b)r(et)n(w)n(een)h(\(i\))f(star)0 5419 -y(co)r(ordinates)33 b(and)e(\(ii\))g(the)g(Earth's)h(orien)n(tation)g -(and)f(orbit)h(has)f(b)r(een)g(brok)n(en.)51 b(Ho)n(w)n(ev)n(er,)33 -b(the)e(orien)n(tation)h(of)g(the)f(In)n(ter-)0 5510 -y(national)38 b(Celestial)i(Reference)e(F)-6 b(rame)36 -b(\(ICRF\))h(axes)h(w)n(as,)k(for)c(con)n(v)n(enience,)i(c)n(hosen)e -(to)f(matc)n(h)f(J2000)k(FK5,)h(and)c(for)0 5602 y(most)29 -b(practical)h(purp)r(oses)g(ICRF)f(co)r(ordinates)i(\(for)f(example)e -(en)n(tries)i(in)f(the)g(Hipparcos)h(catalogue\))g(can)g(b)r(e)f -(regarded)h(as)0 5693 y(synon)n(ymous)24 b(with)i(J2000)h(FK5.)35 -b(See)26 b(Section)g(4.14)h(for)f(further)g(details.)p -eop -%%Page: 180 182 -180 181 bop 0 52 a FD(180)0 351 y(true)27 b(that)g(m)m(uc)m(h)g(of)g -(the)g(complex)g(detail)f(of)h(the)g(n)m(utation)f(is)g(a)h -(re\015ection)g(of)g(the)g(in)m(tricacies)f(of)h(the)g(lunar)0 -464 y(orbit,)j(there)g(are)h(nonetheless)f(imp)s(ortan)m(t)f(solar)h -(terms)h(in)e(the)h(n)m(utation.)0 650 y(In)37 b(addition)e(to)j(and)f -(quite)g(separate)h(from)f(the)g(precession-n)m(utation)g(e\013ect,)k -(the)c(orbit)f(of)i(the)f(Earth-)0 763 y(Mo)s(on)g(system)g(is)f(not)h -(\014xed)f(in)g(orien)m(tation,)i(a)g(result)d(of)i(the)g(attractions)h -(of)f(the)g(planets.)60 b(This)35 b(slo)m(w)0 876 y(\(ab)s(out)h(0)341 -839 y Fk(0)l(0)345 876 y Fl(:)p FD(5)g(p)s(er)e(y)m(ear\))j(secular)e -(rotation)h(of)f(the)h(ecliptic)e(ab)s(out)h(a)h(slo)m(wly-mo)m(ving)e -(diameter)i(is)e(called,)0 989 y(confusingly)-8 b(,)42 -b Fq(planetary)i(pr)-5 b(e)g(c)g(ession)49 b FD(and,)43 -b(along)e(with)e(the)i(luni-solar)d(precession)i(is)f(included)f(in)h -(the)0 1102 y Fq(gener)-5 b(al)38 b(pr)-5 b(e)g(c)g(ession)p -FD(.)56 b(The)35 b(equator)g(and)g(ecliptic)e(as)j(a\013ected)g(b)m(y)f -(general)g(precession)f(are)h(what)g(de\014ne)0 1215 -y(the)c(v)-5 b(arious)29 b(\\mean")i([)15 b Fl(\013;)g(\016)21 -b FD(])30 b(reference)h(frames.)0 1401 y(The)37 b(mo)s(dels)g(for)g -(precession)g(and)h(n)m(utation)f(come)i(from)e(a)i(com)m(bination)e -(of)h(observ)-5 b(ation)37 b(and)h(theory)-8 b(,)0 1514 -y(and)35 b(are)h(sub)5 b(ject)36 b(to)g(con)m(tin)m(uous)f(re\014nemen) -m(t.)57 b(Nutation)36 b(mo)s(dels)e(in)g(particular)g(ha)m(v)m(e)j -(reac)m(hed)g(a)f(high)0 1626 y(degree)h(of)f(sophistication,)h(taking) -f(in)m(to)g(accoun)m(t)i(suc)m(h)d(things)h(as)g(the)g(non-rigidit)m(y) -e(of)j(the)f(Earth)g(and)0 1739 y(the)e(e\013ects)i(of)f(the)f -(planets;)i(SLALIB's)e(n)m(utation)g(mo)s(del)f(\(SF2001\))j(in)m(v)m -(olv)m(es)f(194)g(terms)f(in)f(eac)m(h)j(of)e Fl( )0 -1852 y FD(\(longitude\))c(and)f Fl(\017)i FD(\(obliquit)m(y\),)e(some)i -(as)f(small)f(as)i(a)g(few)f(microarcseconds.)0 2220 -y FB(4.4.1)105 b(SLALIB)35 b(supp)s(ort)g(for)h(precession)g(and)e(n)m -(utation)0 2476 y FD(SLALIB)c(o\013ers)h(a)f(c)m(hoice)h(of)g(three)g -(precession)e(mo)s(dels:)136 2771 y Fo(\017)46 b FD(The)29 -b(old)f(Bessel-New)m(com)m(b,)k(pre)d(IA)m(U)h(1976,)h(\\FK4")g(mo)s -(del,)d(used)h(for)g(B1950)i(star)f(p)s(ositions)d(and)227 -2884 y(other)k(pre-1984.0)i(purp)s(oses)28 b(\(sla)p -Ft(_)p FD(PREBN\).)136 3118 y Fo(\017)46 b FD(The)35 -b(new)g(F)-8 b(ric)m(k)m(e,)39 b(IA)m(U)d(1976,)i(\\FK5")f(mo)s(del,)f -(used)f(for)g(J2000)i(star)f(p)s(ositions)d(and)i(other)h(p)s(ost-)227 -3231 y(1984.0)d(purp)s(oses)c(\(sla)p Ft(_)p FD(PREC\).)136 -3465 y Fo(\017)46 b FD(A)31 b(mo)s(del)e(published)e(b)m(y)j(Simon)f -Fq(et)j(al.)f FD(whic)m(h)e(is)h(more)g(accurate)i(than)e(the)h(IA)m(U) -g(1976)h(mo)s(del)d(and)227 3578 y(whic)m(h)g(is)h(suitable)f(for)h -(long)g(p)s(erio)s(ds)e(of)i(time)g(\(sla)p Ft(_)p FD(PRECL\).)0 -3874 y(In)37 b(eac)m(h)h(case,)j(the)d(named)f(SLALIB)g(routine)f -(generates)j(the)f(\(3)25 b Fo(\002)g FD(3\))38 b Fq(pr)-5 -b(e)g(c)g(ession)42 b(matrix)49 b FD(for)38 b(a)f(giv)m(en)0 -3986 y(start)32 b(and)f(\014nish)d(time.)43 b(F)-8 b(or)33 -b(example,)e(here)g(is)f(the)i(F)-8 b(ortran)32 b(co)s(de)f(for)g -(generating)h(the)f(rotation)h(matrix)0 4099 y(whic)m(h)d(describ)s(es) -g(the)h(precession)g(b)s(et)m(w)m(een)h(the)f(ep)s(o)s(c)m(hs)g(J2000)i -(and)e(J1985.372)j(\(IA)m(U)f(1976)g(mo)s(del\):)573 -4431 y Ft(DOUBLE)46 b(PRECISION)f(PMAT\(3,3\))620 4544 -y(:)573 4657 y(CALL)h(sla_PREC\(2000D0,1985.372D0)o(,PM)o(AT\))0 -4989 y FD(It)30 b(is)g(instructiv)m(e)f(to)i(examine)f(the)h(resulting) -d(matrix:)573 5321 y Ft(+0.9999936402)92 b(+0.0032709208)g -(+0.0014214694)573 5434 y(-0.0032709208)g(+0.9999946505)g -(-0.0000023247)573 5547 y(-0.0014214694)g(-0.0000023248)g -(+0.9999989897)p eop -%%Page: 181 183 -181 182 bop 0 52 a Fw(SUN/67.70)3206 b FD(181)0 351 y(Note)27 -b(that)f(the)g(diagonal)f(elemen)m(ts)h(are)g(close)g(to)h(unit)m(y)-8 -b(,)26 b(and)f(the)h(other)g(elemen)m(ts)g(are)g(small.)38 -b(This)24 b(sho)m(ws)0 464 y(that)36 b(o)m(v)m(er)g(an)f(in)m(terv)-5 -b(al)34 b(as)h(short)g(as)h(15)f(y)m(ears)h(the)f(precession)g(isn't)f -(going)h(to)h(mo)m(v)m(e)g(a)g(p)s(osition)d(v)m(ector)0 -577 y(v)m(ery)e(far)f(\(in)f(this)h(case)h(ab)s(out)f(0)1155 -544 y Fp(\016)1161 577 y Fl(:)r FD(2\).)0 738 y(F)-8 -b(or)42 b(con)m(v)m(enience,)j(a)c(direct)g([)15 b Fl(\013;)g(\016)20 -b FD(])41 b(to)h([)15 b Fl(\013;)g(\016)20 b FD(])42 -b(precession)e(routine)g(is)g(also)h(pro)m(vided)f(\(sla)p -Ft(_)p FD(PRECES\),)0 851 y(suitable)29 b(for)h(either)g(the)g(old)g -(or)g(the)h(new)f(system)g(\(but)g(not)h(a)g(mixture)e(of)h(the)h(t)m -(w)m(o\).)0 1013 y(SLALIB)37 b(pro)m(vides)f(t)m(w)m(o)j(n)m(utation)e -(mo)s(dels,)h(the)g(old)e(IA)m(U)i(1980)i(mo)s(del,)e(implemen)m(ted)e -(in)g(the)h(routine)0 1126 y(slaNutc80,)25 b(and)c(a)h(m)m(uc)m(h)g -(more)g(accurate)i(new)m(er)d(theory)-8 b(,)25 b(SF2001,)g(implemen)m -(ted)c(in)f(the)i(routine)f(slaNutc.)0 1239 y(Both)h(return)d(the)i -(comp)s(onen)m(ts)g(of)h(n)m(utation)e(in)g(longitude)f(and)i(latitude) -f(\(and)g(also)h(pro)m(vide)f(the)h(obliquit)m(y\))0 -1351 y(from)h(whic)m(h)e(a)j(n)m(utation)f(matrix)f(can)i(b)s(e)e -(generated)i(b)m(y)f(calling)f(slaDeuler)g(\(and)h(from)g(whic)m(h)e -(the)j Fq(e)-5 b(quation)0 1464 y(of)32 b(the)g(e)-5 -b(quinoxes)p FD(,)31 b(describ)s(ed)c(later,)j(can)g(b)s(e)f(found\).) -39 b(Alternativ)m(ely)-8 b(,)30 b(the)g(SF2001)h(n)m(utation)e(matrix)g -(can)0 1577 y(b)s(e)e(generated)j(in)c(a)j(single)e(call)g(b)m(y)h -(using)f(slaNut.)39 b(The)28 b(SF2001)h(n)m(utation)f(theory)h -(includes)c(comp)s(onen)m(ts)0 1690 y(that)d(correct)h(for)f(errors)f -(in)f(the)i(IA)m(U)h(1976)g(precession)e(and)g(also)h(for)f(the)h -Fo(\030)j FD(23)15 b(mas)23 b(displacemen)m(t)e(b)s(et)m(w)m(een)0 -1803 y(the)35 b(mean)h(J2000)g(and)f(ICRS)f(co)s(ordinate)h(systems,)i -(ac)m(hieving)e(a)h(\014nal)e(accuracy)i(w)m(ell)e(under)g(1)16 -b(mas)35 b(in)0 1916 y(the)c(presen)m(t)f(era.)0 2077 -y(A)k(rotation)g(matrix)f(for)h(applying)d(the)j(en)m(tire)g -(precession-n)m(utation)f(transformation)g(in)f(one)i(go)h(can)f(b)s(e) -0 2190 y(generated)d(b)m(y)g(calling)e(sla)p Ft(_)p FD(PRENUT.)0 -2481 y Fv(4.5)112 b(Mean)39 b(Places)0 2702 y FD(F)-8 -b(rom)35 b(a)g(classical)f(standp)s(oin)m(t,)g(the)h(main)e(e\013ect)j -(of)f(the)g(precession-n)m(utation)f(is)f(an)i(increase)f(of)h(ab)s -(out)0 2814 y(50)85 2778 y Fk(0)m(0)126 2814 y FD(/y)m(ear)d(in)e(the)h -(ecliptic)e(longitudes)h(of)h(the)g(stars.)42 b(It)31 -b(is)e(therefore)j(essen)m(tial,)f(when)e(rep)s(orting)h(the)h(p)s(o-)0 -2927 y(sition)26 b(of)h(an)h(astronomical)f(target,)i(to)f(qualify)e -(the)h(co)s(ordinates)g(with)f(a)i(date,)h(or)e Fq(ep)-5 -b(o)g(ch)p FD(.)41 b(Sp)s(ecifying)25 b(the)0 3040 y(ep)s(o)s(c)m(h)g -(ties)h(do)m(wn)f(the)g(equator)i(and)d(equino)m(x)h(whic)m(h)g -(de\014ne)f(the)i([)15 b Fl(\013;)g(\016)20 b FD(])26 -b(co)s(ordinate)g(system)f(that)h(is)f(b)s(eing)0 3153 -y(used.)241 3120 y Fu(4)319 3153 y FD(F)-8 b(or)25 b(simplicit)m(y)-8 -b(,)24 b(only)g(the)h(smo)s(oth)f(and)g(steady)h(\\precession")g(part)f -(of)h(the)g(complete)g(precession-)0 3266 y(n)m(utation)h(e\013ect)h -(is)e(included,)f(thereb)m(y)i(de\014ning)e(what)i(is)f(called)g(the)h -Fq(me)-5 b(an)34 b FD(equator)26 b(and)f(equino)m(x)h(for)f(the)0 -3379 y(ep)s(o)s(c)m(h)32 b(concerned.)48 b(W)-8 b(e)34 -b(sa)m(y)f(a)g(star)g(has)f(a)h(mean)g(place)f(of)h(\(for)g(example\))f -(12)2797 3346 y Fu(h)2857 3379 y FD(07)2947 3346 y Fu(m)3026 -3379 y FD(58)3116 3346 y Fu(s)3121 3379 y Fl(:)p FD(09)i -Fo(\000)p FD(19)3431 3346 y Fp(\016)3486 3379 y FD(44)3576 -3342 y Fk(0)3619 3379 y FD(37)3704 3342 y Fk(0)m(0)3708 -3379 y Fl(:)p FD(1)0 3492 y(\\with)25 b(resp)s(ect)i(to)g(the)f(mean)h -(equator)g(and)f(equino)m(x)f(of)i(ep)s(o)s(c)m(h)f(J2000".)41 -b(The)26 b(short)g(w)m(a)m(y)h(of)g(sa)m(ying)f(this)f(is)0 -3605 y(\\[)15 b Fl(\013;)g(\016)21 b FD(])29 b(equino)m(x)g(J2000")j -(\()p FB(not)d FD(\\[)15 b Fl(\013;)g(\016)21 b FD(])30 -b(ep)s(o)s(c)m(h)f(J2000",)j(whic)m(h)c(means)h(something)g(di\013eren) -m(t)g(to)h(do)g(with)0 3718 y(prop)s(er)f(motion\).)0 -4009 y Fv(4.6)112 b(Ep)s(o)s(c)m(h)0 4229 y FD(The)29 -b(w)m(ord)f(\\ep)s(o)s(c)m(h")i(just)f(means)g(a)g(signi\014can)m(t)f -(momen)m(t)i(in)e(time,)h(and)g(can)g(b)s(e)g(supplied)c(in)j(a)i(v)-5 -b(ariet)m(y)29 b(of)0 4342 y(forms,)h(using)f(di\013eren)m(t)h -(calendar)g(systems)g(and)g(time)g(scales.)0 4503 y(F)-8 -b(or)22 b(the)f(purp)s(ose)e(of)i(sp)s(ecifying)e(the)i(ep)s(o)s(c)m -(hs)f(asso)s(ciated)h(with)f(the)h(mean)g(place)g(of)g(a)g(star,)i(t)m -(w)m(o)f(con)m(v)m(en)m(tions)0 4616 y(exist.)37 b(Both)22 -b(sorts)e(of)h(ep)s(o)s(c)m(h)g(sup)s(er\014cially)c(resem)m(ble)j(y)m -(ears)i(AD)f(but)f(are)h(not)g(tied)g(to)g(the)g(civil)e(\(Gregorian\)) -0 4729 y(calendar;)43 b(to)c(distinguish)d(them)i(from)h(ordinary)e -(calendar-y)m(ears)i(there)h(is)d(often)j(a)f(\\.0")h(su\016x)e(\(as)i -(in)0 4842 y(\\1950.0"\),)34 b(although)c(an)m(y)h(other)f(fractional)g -(part)h(is)e(p)s(erfectly)g(legal)i(\()p Fq(e.g.)f FD(1987.5\).)0 -5003 y(The)39 b(older)g(system,)j Fq(Besselian)g(ep)-5 -b(o)g(ch)p FD(,)43 b(is)c(de\014ned)f(in)g(suc)m(h)i(a)g(w)m(a)m(y)g -(that)g(its)f(units)f(are)i(tropical)f(y)m(ears)0 5116 -y(of)g(ab)s(out)g(365.2422)j(da)m(ys)d(and)f(its)g(time)h(scale)g(is)f -(the)h(obsolete)g Fq(Ephemeris)i(Time)p FD(.)67 b(The)38 -b(start)h(of)g(the)0 5229 y(Besselian)28 b(y)m(ear)h(is)f(the)h(momen)m -(t)g(when)f(the)h(ecliptic)e(longitude)g(of)i(the)g(mean)g(Sun)e(is)h -(280)3183 5196 y Fp(\016)3223 5229 y FD(;)i(this)d(happ)s(ens)0 -5342 y(near)j(the)h(start)g(of)f(the)h(calendar)f(y)m(ear)h(\(whic)m(h) -e(is)h(wh)m(y)g(280)2112 5309 y Fp(\016)2183 5342 y FD(w)m(as)h(c)m -(hosen\).)p 0 5425 1512 4 v 104 5479 a Fs(4)138 5510 -y Fr(An)d(equino)n(x)g(is,)j(ho)n(w)n(ev)n(er,)f(not)f(required)f(for)i -(co)r(ordinates)g(in)f(the)f(In)n(ternational)h(Celestial)j(Reference)d -(System.)43 b(Suc)n(h)0 5602 y(co)r(ordinates)31 b(m)n(ust)e(b)r(e)h -(lab)r(elled)h(simply)e(\\ICRS",)h(or)g(the)g(sp)r(eci\014c)g -(catalogue)i(can)e(b)r(e)g(men)n(tioned,)g(suc)n(h)f(as)i -(\\Hipparcos";)0 5693 y(constructions)26 b(suc)n(h)g(as)g(\\Hipparcos,) -h(J2000")h(are)e(redundan)n(t)e(and)h(misleading.)p eop -%%Page: 182 184 -182 183 bop 0 52 a FD(182)0 351 y(The)38 b(new)h(system,)j -Fq(Julian)e(ep)-5 b(o)g(ch)p FD(,)43 b(w)m(as)d(adopted)f(as)g(part)g -(of)g(the)g(IA)m(U)h(1976)h(revisions)c(\(ab)s(out)i(whic)m(h)0 -464 y(more)34 b(will)d(b)s(e)j(said)f(in)f(due)i(course\))g(and)f(came) -i(formally)e(in)m(to)h(use)f(at)i(the)f(b)s(eginning)d(of)k(1984.)53 -b(It)34 b(uses)0 577 y(the)f(Julian)e(y)m(ear)j(of)g(exactly)g(365.25)h -(da)m(ys;)g(Julian)c(ep)s(o)s(c)m(h)i(2000)i(is)d(de\014ned)g(to)i(b)s -(e)f(2000)i(Jan)m(uary)d(1.5)j(in)0 690 y(the)c(TT)e(time)h(scale.)0 -851 y(F)-8 b(or)36 b(sp)s(ecifying)d(mean)j(places,)g(v)-5 -b(arious)34 b(standard)h(ep)s(o)s(c)m(hs)g(are)g(in)f(use,)j(the)e -(most)h(common)f(ones)h(b)s(eing)0 964 y(Besselian)41 -b(ep)s(o)s(c)m(h)h(1950.0)i(and)e(Julian)d(ep)s(o)s(c)m(h)j(2000.0.)78 -b(T)-8 b(o)42 b(distinguish)d(the)j(t)m(w)m(o)h(systems,)i(Besselian)0 -1077 y(ep)s(o)s(c)m(hs)24 b(are)h(no)m(w)g(pre\014xed)f(\\B")i(and)e -(Julian)e(ep)s(o)s(c)m(hs)j(are)g(pre\014xed)e(\\J".)j(Ep)s(o)s(c)m(hs) -e(without)g(an)g(initial)e(letter)0 1190 y(can)32 b(b)s(e)e(assumed)h -(to)h(b)s(e)f(Besselian)g(if)f(b)s(efore)h(1984.0,)k(otherwise)30 -b(Julian.)42 b(These)31 b(details)f(are)i(supp)s(orted)0 -1303 y(b)m(y)39 b(the)h(SLALIB)f(routines)f(sla)p Ft(_)p -FD(DBJIN)i(\(deco)s(des)f(n)m(um)m(b)s(ers)f(from)h(a)h(c)m(haracter)h -(string,)g(accepting)g(an)0 1416 y(optional)33 b(leading)g(B)i(or)f -(J\),)h(sla)p Ft(_)p FD(KBJ)e(\(decides)h(whether)g(B)g(or)h(J)f(dep)s -(ending)d(on)k(pre\014x)e(or)h(range\))h(and)0 1529 y(sla)p -Ft(_)p FD(EPCO)29 b(\(con)m(v)m(erts)j(one)f(ep)s(o)s(c)m(h)f(to)h -(matc)m(h)g(another\).)0 1690 y(SLALIB)23 b(has)f(four)h(routines)f -(for)g(con)m(v)m(erting)i(Besselian)f(and)f(Julian)f(ep)s(o)s(c)m(hs)h -(in)m(to)h(other)h(forms.)37 b(The)23 b(func-)0 1803 -y(tions)30 b(sla)p Ft(_)p FD(EPB2D)h(and)f(sla)p Ft(_)p -FD(EPJ2D)g(con)m(v)m(ert)i(Besselian)e(and)h(Julian)d(ep)s(o)s(c)m(hs)i -(in)m(to)h(MJD;)g(the)g(functions)0 1916 y(sla)p Ft(_)p -FD(EPB)f(and)f(sla)p Ft(_)p FD(EPJ)h(do)g(the)g(rev)m(erse.)42 -b(F)-8 b(or)31 b(example,)f(to)h(express)f(B1950)j(as)d(a)h(Julian)d -(ep)s(o)s(c)m(h:)573 2172 y Ft(DOUBLE)46 b(PRECISION)f -(sla_EPJ,sla_EPB2D)620 2285 y(:)573 2398 y(WRITE)h -(\(*,'\(1X,''J'',F10.5\)'\))c(sla_EPJ\(sla_EPB2D\(1950D0)o(\)\))0 -2655 y FD(\(The)30 b(answ)m(er)g(is)g(J1949.99979.\))0 -2946 y Fv(4.7)112 b(Prop)s(er)37 b(Motion)0 3166 y FD(Stars)29 -b(in)f(catalogues)i(usually)d(ha)m(v)m(e,)k(in)d(addition)f(to)j(the)f -([)15 b Fl(\013;)g(\016)21 b FD(])29 b(co)s(ordinates,)g(a)h -Fq(pr)-5 b(op)g(er)34 b(motion)c FD([)p Fl(\026)3546 -3180 y Ff(\013)3596 3166 y Fl(;)15 b(\026)3691 3181 y -Ff(\016)3729 3166 y FD(].)0 3279 y(This)37 b(is)h(an)h(in)m(trinsic)e -(motion)i(of)g(the)g(star)h(across)f(the)h(bac)m(kground.)66 -b(V)-8 b(ery)40 b(few)f(stars)g(ha)m(v)m(e)h(a)g(prop)s(er)0 -3392 y(motion)d(whic)m(h)g(exceeds)h(1)956 3355 y Fk(0)l(0)997 -3392 y FD(/y)m(ear,)j(and)c(most)g(are)h(far)g(b)s(elo)m(w)f(this)f -(lev)m(el.)62 b(A)38 b(star)f(observ)m(ed)h(as)g(part)f(of)0 -3504 y(normal)29 b(astronom)m(y)j(researc)m(h)f(will,)d(as)i(a)h(rule,) -e(ha)m(v)m(e)j(a)f(prop)s(er)d(motion)j(whic)m(h)e(is)g(unkno)m(wn.)0 -3666 y(Mean)23 b([)15 b Fl(\013;)g(\016)20 b FD(])j(and)f(rate)h(of)g -(c)m(hange)h(are)f(not)f(su\016cien)m(t)g(to)i(pin)c(do)m(wn)i(a)h -(star;)j(the)d(ep)s(o)s(c)m(h)f(at)h(whic)m(h)e(the)i([)15 -b Fl(\013;)g(\016)20 b FD(])0 3779 y(w)m(as)27 b(or)h(will)c(b)s(e)j -(correct)h(is)e(also)h(needed.)39 b(Note)29 b(the)e(distinction)e(b)s -(et)m(w)m(een)j(the)f(ep)s(o)s(c)m(h)g(whic)m(h)f(sp)s(eci\014es)f(the) -0 3892 y(co)s(ordinate)36 b(system)g(and)f(the)i(ep)s(o)s(c)m(h)e(at)i -(whic)m(h)e(the)h(star)g(passed)g(through)f(the)h(giv)m(en)g([)15 -b Fl(\013;)g(\016)20 b FD(].)58 b(The)36 b(full)0 4004 -y(sp)s(eci\014cation)28 b(for)h(a)h(star)g(is)e([)15 -b Fl(\013;)g(\016)20 b FD(],)30 b(prop)s(er)e(motions,)i(equino)m(x)e -(and)h(ep)s(o)s(c)m(h)g(\(plus)f(something)h(to)h(iden)m(tify)0 -4117 y(whic)m(h)24 b(set)h(of)g(mo)s(dels)f(for)h(the)g(precession)f -Fq(etc.)h FD(is)f(b)s(eing)f(used)i({)g(see)h(the)f(next)g(section\).) -39 b(F)-8 b(or)26 b(con)m(v)m(enience,)0 4230 y(co)s(ordinates)j(giv)m -(en)g(in)e(star)i(catalogues)i(are)e(almost)g(alw)m(a)m(ys)h(adjusted)e -(to)i(mak)m(e)g(the)f(equino)m(x)f(and)h(ep)s(o)s(c)m(h)0 -4343 y(the)i(same)f({)h(for)f(example)g(B1950)j(in)c(the)h(case)i(of)e -(the)h(SA)m(O)f(catalogue.)0 4504 y(SLALIB)36 b(pro)m(vides)f(one)h -(routine)g(to)g(handle)f(prop)s(er)g(motion)h(on)g(its)g(o)m(wn,)i(sla) -p Ft(_)p FD(PM.)d(Prop)s(er)h(motion)f(is)0 4617 y(also)29 -b(allo)m(w)m(ed)h(for)f(in)f(v)-5 b(arious)28 b(other)i(routines)e(as)i -(appropriate,)f(for)g(example)g(sla)p Ft(_)p FD(MAP)g(and)g(sla)p -Ft(_)p FD(FK425.)0 4730 y(Note)37 b(that)f(in)e(all)g(SLALIB)h -(routines)f(whic)m(h)g(in)m(v)m(olv)m(e)i(prop)s(er)e(motion)h(the)h -(units)d(are)j(radians)e(p)s(er)h(y)m(ear)0 4843 y(and)c(the)i -Fl(\013)f FD(comp)s(onen)m(t)g(is)f(in)g(the)h(form)51 -b(_)-44 b Fl(\013)32 b FD(\()p Fq(i.e.)g FD(big)f(n)m(um)m(b)s(ers)g -(near)h(the)g(p)s(oles\).)45 b(Some)32 b(star)g(catalogues)0 -4956 y(ha)m(v)m(e)e(prop)s(er)e(motion)h(p)s(er)f(cen)m(tury)-8 -b(,)31 b(and)d(in)g(some)i(catalogues)g(the)g Fl(\013)f -FD(comp)s(onen)m(t)h(is)e(in)g(the)h(form)48 b(_)-44 -b Fl(\013)16 b FD(cos)g Fl(\016)0 5069 y FD(\()p Fq(i.e.)30 -b FD(angle)g(on)h(the)f(sky\).)0 5360 y Fv(4.8)112 b(P)m(arallax)37 -b(and)h(Radial)f(V)-9 b(elo)s(cit)m(y)0 5580 y FD(F)h(or)32 -b(the)f(utmost)g(accuracy)h(and)e(the)h(nearest)g(stars,)h(allo)m(w)m -(ance)f(can)g(b)s(e)g(made)f(for)h Fq(annual)j(p)-5 b(ar)g(al)5 -b(lax)45 b FD(and)0 5693 y(for)30 b(the)h(e\013ects)g(of)g(p)s(ersp)s -(ectiv)m(e)f(on)g(the)g(prop)s(er)f(motion.)p eop -%%Page: 183 185 -183 184 bop 0 52 a Fw(SUN/67.70)3206 b FD(183)0 351 y(P)m(arallax)33 -b(is)g(appreciable)f(only)g(for)h(nearb)m(y)h(stars;)h(ev)m(en)f(the)f -(nearest,)i(Pro)m(xima)e(Cen)m(tauri,)h(is)e(displaced)0 -464 y(from)e(its)g(a)m(v)m(erage)j(p)s(osition)28 b(b)m(y)i(less)g -(than)g(an)g(arcsecond)h(as)g(the)g(Earth)f(rev)m(olv)m(es)h(in)e(its)h -(orbit.)0 633 y(F)-8 b(or)26 b(stars)g(with)f(a)h(kno)m(wn)f(parallax,) -h(kno)m(wledge)g(of)g(the)f(radial)g(v)m(elo)s(cit)m(y)h(allo)m(ws)f -(the)h(prop)s(er)e(motion)i(to)g(b)s(e)0 746 y(expressed)j(as)h(an)f -(actual)h(space)h(motion)e(in)f(3)i(dimensions.)38 b(The)29 -b(prop)s(er)f(motion)i(is,)f(in)f(fact,)j(a)f(snapshot)0 -859 y(of)36 b(the)h(transv)m(erse)f(comp)s(onen)m(t)h(of)f(the)g(space) -h(motion,)g(and)f(in)f(the)h(case)h(of)g(nearb)m(y)f(stars)g(will)d(c)m -(hange)0 972 y(with)c(time)h(due)g(to)h(p)s(ersp)s(ectiv)m(e.)0 -1141 y(SLALIB)i(do)s(es)g(not)h(pro)m(vide)f(facilities)f(for)h -(handling)f(parallax)g(and)h(radial-v)m(elo)s(cit)m(y)g(on)h(their)e(o) -m(wn,)j(but)0 1254 y(their)22 b(con)m(tribution)f(is)g(allo)m(w)m(ed)i -(for)f(in)f(suc)m(h)h(routines)g(as)h(sla)p Ft(_)p FD(PM,)f(sla)p -Ft(_)p FD(MAP)g(and)g(sla)p Ft(_)p FD(FK425.)39 b(Catalogue)0 -1367 y(mean)31 b(places)h(do)f(not)h(include)d(the)i(e\013ects)i(of)f -(parallax)e(and)h(are)g(therefore)h Fq(b)-5 b(aryc)g(entric)p -FD(;)34 b(when)c(p)s(oin)m(ting)0 1480 y(telescop)s(es)39 -b Fq(etc.)f FD(it)g(is)f(usually)f(most)j(e\016cien)m(t)g(to)g(apply)e -(the)h(slo)m(wly-c)m(hanging)g(parallax)f(correction)i(to)0 -1593 y(the)32 b(mean)h(place)f(of)g(the)h(target)g(early)f(on)g(and)g -(to)h(w)m(ork)f(with)f(the)i Fq(ge)-5 b(o)g(c)g(entric)38 -b FD(mean)32 b(place.)47 b(This)30 b(latter)0 1705 y(approac)m(h)h(is)e -(implied)e(in)i(Figure)h(1.)0 2020 y Fv(4.9)112 b(Ab)s(erration)0 -2250 y FD(The)32 b(\014nite)g(sp)s(eed)g(of)h(ligh)m(t)f(com)m(bined)f -(with)h(the)h(motion)f(of)h(the)g(observ)m(er)g(around)f(the)h(Sun)e -(during)f(the)0 2363 y(y)m(ear)g(causes)g(apparen)m(t)g(displacemen)m -(ts)e(of)i(the)f(p)s(ositions)f(of)h(the)h(stars.)41 -b(The)29 b(e\013ect)i(is)d(called)h(the)g Fq(annual)0 -2476 y(ab)-5 b(err)g(ation)40 b FD(\(or)e(\\stellar")f(ab)s -(erration\).)61 b(Its)38 b(maxim)m(um)e(size,)j(ab)s(out)f(20)2628 -2439 y Fk(0)l(0)2632 2476 y Fl(:)p FD(5,)i(o)s(ccurs)e(for)f(stars)g -(90)3517 2443 y Fp(\016)3595 2476 y FD(from)0 2589 y(the)g(p)s(oin)m(t) -f(to)m(w)m(ards)i(whic)m(h)d(the)i(Earth)g(is)f(headed)h(as)g(it)f -(orbits)g(the)h(Sun;)i(a)e(star)g(exactly)h(in)e(line)f(with)0 -2702 y(the)42 b(Earth's)f(motion)h(is)e(not)i(displaced.)73 -b(T)-8 b(o)42 b(receiv)m(e)g(the)g(ligh)m(t)f(of)h(a)g(star,)i(the)e -(telescop)s(e)g(has)g(to)g(b)s(e)0 2815 y(o\013set)g(sligh)m(tly)d(in)h -(the)h(direction)f(of)h(the)h(Earth's)e(motion.)73 b(A)41 -b(familiar)e(analogy)i(is)f(the)i(need)f(to)g(tilt)0 -2928 y(y)m(our)30 b(um)m(brella)e(forw)m(ard)h(when)g(on)h(the)g(mo)m -(v)m(e,)i(to)f(a)m(v)m(oid)f(getting)h(w)m(et.)41 b(This)28 -b(classical)i(mo)s(del)e(is,)i(in)e(fact,)0 3041 y(misleading)f(in)h -(the)h(con)m(text)i(of)f(ligh)m(t)e(as)i(opp)s(osed)e(to)i(rain,)f(but) -f(happ)s(ens)g(to)i(giv)m(e)f(the)h(same)f(answ)m(er)h(as)f(a)0 -3154 y(relativistic)g(treatmen)m(t)j(to)f(\014rst)e(order)h(\(b)s -(etter)h(than)f(1)h(milliarcsecond\).)0 3323 y(Before)e(the)f(IA)m(U)h -(1976)g(resolutions,)e(di\013eren)m(t)h(v)-5 b(alues)27 -b(for)h(the)g(appro)m(ximately)f(20)2916 3286 y Fk(0)m(0)2920 -3323 y Fl(:)p FD(5)j Fq(ab)-5 b(err)g(ation)33 b(c)-5 -b(onstant)0 3436 y FD(w)m(ere)33 b(emplo)m(y)m(ed)h(at)f(di\013eren)m -(t)g(times,)g(and)f(this)g(can)h(complicate)h(comparisons)e(b)s(et)m(w) -m(een)h(di\013eren)m(t)g(cata-)0 3548 y(logues.)53 b(Another)34 -b(complication)g(comes)h(from)f(the)h(so-called)f Fq(E-terms)j(of)f(ab) --5 b(err)g(ation)p FD(,)39 b(that)c(small)e(part)0 3661 -y(of)k(the)g(ann)m(ual)f(ab)s(erration)g(correction)h(that)g(is)f(a)h -(function)f(of)h(the)g(eccen)m(tricit)m(y)h(of)f(the)f(Earth's)h -(orbit.)0 3774 y(The)29 b(E-terms,)i(maxim)m(um)e(amplitude)f(ab)s(out) -h(0)1709 3737 y Fk(0)l(0)1713 3774 y Fl(:)p FD(3,)i(happ)s(en)e(to)h(b) -s(e)g(appro)m(ximately)f(constan)m(t)i(for)f(a)g(giv)m(en)0 -3887 y(star,)36 b(and)e(so)h(they)f(used)g(to)h(b)s(e)f(incorp)s -(orated)f(in)h(the)g(catalogue)i([)15 b Fl(\013;)g(\016)21 -b FD(])34 b(to)i(reduce)e(the)h(lab)s(our)d(of)j(con-)0 -4000 y(v)m(erting)h(to)g(and)f(from)g(apparen)m(t)h(place.)57 -b(The)35 b(E-terms)h(can)g(b)s(e)f(remo)m(v)m(ed)i(from)e(a)h -(catalogue)h([)15 b Fl(\013;)g(\016)21 b FD(])36 b(b)m(y)0 -4113 y(calling)28 b(sla)p Ft(_)p FD(SUBET)g(or)i(applied)d(\(for)j -(example)f(to)h(allo)m(w)f(a)h(pulsar)e(timing-p)s(osition)e(to)31 -b(b)s(e)d(plotted)i(on)f(a)0 4226 y(B1950)e(\014nding)c(c)m(hart\))k(b) -m(y)e(calling)e(sla)p Ft(_)p FD(ADDET;)j(the)f(E-terms)g(v)m(ector)i -(itself)d(can)i(b)s(e)e(obtained)h(b)m(y)g(calling)0 -4339 y(sla)p Ft(_)p FD(ETRMS.)g(Star)i(p)s(ositions)d(p)s(ost)i(IA)m(U) -h(1976)h(are)f(free)g(of)f(these)h(distortions,)f(and)g(to)h(apply)e -(corrections)0 4452 y(for)32 b(ann)m(ual)g(ab)s(erration)g(in)m(v)m -(olv)m(es)h(the)g(actual)g(barycen)m(tric)f(v)m(elo)s(cit)m(y)i(of)e -(the)h(Earth)g(rather)f(than)h(the)g(use)0 4565 y(of)e(canonical)f -(circular-orbit)e(mo)s(dels.)0 4734 y(The)40 b(ann)m(ual)f(ab)s -(erration)h(is)f(the)i(ab)s(erration)e(correction)i(for)f(an)g -(imaginary)f(observ)m(er)i(at)g(the)g(Earth's)0 4847 -y(cen)m(tre.)h(The)30 b(motion)g(of)h(a)g(real)f(observ)m(er)g(around)g -(the)g(Earth's)h(rotation)g(axis)e(in)h(the)g(course)h(of)f(the)h(da)m -(y)0 4959 y(mak)m(es)e(a)g(small)e(extra)i(con)m(tribution)e(to)i(the)g -(total)g(ab)s(erration)f(e\013ect)i(called)d(the)i Fq(diurnal)j(ab)-5 -b(err)g(ation)p FD(.)42 b(Its)0 5072 y(maxim)m(um)29 -b(amplitude)g(is)g(ab)s(out)h(0)1245 5036 y Fk(0)l(0)1249 -5072 y Fl(:)p FD(3.)0 5241 y(No)k(SLALIB)e(routine)h(is)f(pro)m(vided)g -(for)h(calculating)f(the)i(ab)s(erration)e(on)h(its)g(o)m(wn,)h(though) -f(the)g(required)0 5354 y(v)m(elo)s(cit)m(y)42 b(v)m(ectors)h(can)f(b)s -(e)g(generated)g(using)e(sla)p Ft(_)p FD(EVP)h(\(or)h(sla)p -Ft(_)p FD(EPV\))g(and)f(sla)p Ft(_)p FD(GEOC.)g(Ann)m(ual)f(and)0 -5467 y(diurnal)32 b(ab)s(erration)j(are)h(allo)m(w)m(ed)f(for)g(where)g -(required,)g(for)g(example)h(in)e(sla)p Ft(_)p FD(MAP)h -Fq(etc)p FD(.)g(and)g(sla)p Ft(_)p FD(A)m(OP)0 5580 y -Fq(etc)p FD(.)62 b(Note)39 b(that)f(this)e(sort)i(of)f(ab)s(erration)g -(is)g(di\013eren)m(t)f(from)h(the)h Fq(planetary)j(ab)-5 -b(err)g(ation)p FD(,)43 b(whic)m(h)36 b(is)g(the)0 5693 -y(apparen)m(t)43 b(displacemen)m(t)f(of)h(a)g(solar-system)g(b)s(o)s -(dy)-8 b(,)45 b(with)d(resp)s(ect)h(to)g(the)g(ephemeris)f(p)s -(osition,)i(as)f(a)p eop -%%Page: 184 186 -184 185 bop 0 52 a FD(184)0 351 y(consequence)41 b(of)g(the)g(motion)f -(of)g Fq(b)-5 b(oth)49 b FD(the)41 b(Earth)f(and)g(the)h(source.)71 -b(The)40 b(planetary)g(ab)s(erration)f(can)0 464 y(b)s(e)31 -b(computed)g(either)g(b)m(y)g(correcting)h(the)f(p)s(osition)f(of)i -(the)f(solar-system)h(b)s(o)s(dy)d(for)j(ligh)m(t-time,)f(follo)m(w)m -(ed)0 577 y(b)m(y)36 b(the)h(ordinary)e(stellar)g(ab)s(erration)h -(correction,)i(or)f(more)f(directly)f(b)m(y)i(expressing)e(the)i(p)s -(osition)d(and)0 690 y(v)m(elo)s(cit)m(y)d(of)f(the)h(source)f(in)g -(the)g(observ)m(er's)h(frame)f(and)g(correcting)h(for)f(ligh)m(t-time)f -(alone.)0 965 y Fv(4.10)112 b(Di\013eren)m(t)37 b(Sorts)g(of)h(Mean)g -(Place)0 1175 y FD(A)f(confusing)f(asp)s(ect)h(of)g(the)g(mean)g -(places)g(used)f(in)g(the)h(pre-ICRS)f(era)h(is)f(that)i(they)f(are)g -(sensitiv)m(e)g(to)0 1288 y(the)43 b(precise)g(w)m(a)m(y)h(they)f(w)m -(ere)g(determined.)78 b(A)43 b(mean)g(place)g(is)f(not)h(directly)f -(observ)-5 b(able,)46 b(ev)m(en)e(with)0 1401 y(fundamen)m(tal)25 -b(instrumen)m(ts)g(suc)m(h)h(as)g(transit)g(circles,)h(and)e(to)i(pro)s -(duce)e(one)i(will)d(in)m(v)m(olv)m(e)i(relying)f(on)h(some)0 -1514 y(existing)36 b(star)h(catalogue,)k(for)c(example)f(the)i -(fundamen)m(tal)d(catalogues)k(FK4)e(and)g(FK5,)i(and)e(applying)0 -1626 y(giv)m(en)h(mathematical)g(mo)s(dels)e(of)i(precession,)h(n)m -(utation,)h(ab)s(erration)d(and)g(so)h(on.)63 b(Note)39 -b(in)d(particular)0 1739 y(that)29 b(no)g(star)g(catalogue,)i(ev)m(en)e -(a)g(fundamen)m(tal)f(catalogue)j(suc)m(h)d(as)h(FK4)g(or)g(FK5,)h -(de\014nes)d(a)j(co)s(ordinate)0 1852 y(system,)43 b(strictly)c(sp)s -(eaking;)k(it)d(is)f(merely)g(a)h(list)f(of)h(star)g(p)s(ositions)e -(and)h(prop)s(er)f(motions.)69 b(Ho)m(w)m(ev)m(er,)0 -1965 y(once)42 b(the)g(stars)g(from)g(a)g(giv)m(en)f(catalogue)j(are)e -(used)f(as)h(p)s(osition)e(calibrators,)k Fq(e.g.)d FD(for)h -(transit-circle)0 2078 y(observ)-5 b(ations)44 b(or)h(for)g(plate)g -(reductions,)i(then)e(a)g(broader)f(sense)h(of)g(there)g(b)s(eing)f(a)h -(co)s(ordinate)g(grid)0 2191 y(naturally)28 b(arises,)i(and)f(suc)m(h)g -(phrases)g(as)h(\\in)f(the)h(system)g(of)g(the)f(FK4")i(can)f -(legitimately)f(b)s(e)g(emplo)m(y)m(ed.)0 2304 y(Ho)m(w)m(ev)m(er,)43 -b(there)d(is)e(no)h(formal)f(link)f(b)s(et)m(w)m(een)i(the)g(t)m(w)m(o) -i(concepts)f({)f(no)g(\\standard)f(least)i(squares)e(\014t")0 -2417 y(b)s(et)m(w)m(een)e(realit)m(y)g(and)f(the)h(inevitably)d(\015a)m -(w)m(ed)j(catalogues.)58 b(All)35 b(suc)m(h)g(catalogues)i(su\013er)e -(at)i(some)f(lev)m(el)0 2530 y(from)i(systematic,)k(zonal)c -(distortions)f(of)i(b)s(oth)f(the)h(star)g(p)s(ositions)e(and)h(of)g -(the)h(prop)s(er)f(motions,)i(and)0 2643 y(include)28 -b(measuremen)m(t)j(errors)f(p)s(eculiar)e(to)j(individual)26 -b(stars.)0 2793 y(Man)m(y)21 b(of)g(these)f(complications)g(are)g(of)h -(little)e(signi\014cance)h(except)h(to)g(sp)s(ecialists.)35 -b(Ho)m(w)m(ev)m(er,)25 b(observ)-5 b(ational)0 2906 y(astronomers)37 -b(cannot)g(escap)s(e)f(exp)s(osure)g(to)h(at)g(least)g(the)f(t)m(w)m(o) -i(main)d(v)-5 b(arieties)36 b(of)h(mean)f(place,)i(lo)s(osely)0 -3019 y(called)33 b(FK4)h(and)f(FK5,)i(and)e(should)e(b)s(e)i(a)m(w)m -(are)i(of)f(certain)f(pitfalls.)48 b(F)-8 b(or)34 b(most)g(practical)g -(purp)s(oses)d(the)0 3132 y(more)38 b(recen)m(t)h(system,)h(FK5,)h(is)c -(free)h(of)g(surprises)d(and)j(tolerates)h(naiv)m(e)f(use)f(w)m(ell.)63 -b(FK4,)40 b(in)d(con)m(trast,)0 3245 y(con)m(tains)31 -b(t)m(w)m(o)g(imp)s(ortan)m(t)f(traps:)136 3440 y Fo(\017)46 -b FD(The)40 b(FK4)h(system)g(rotates)h(at)g(ab)s(out)e(0)1698 -3403 y Fk(0)l(0)1702 3440 y Fl(:)p FD(5)h(p)s(er)f(cen)m(tury)h -(relativ)m(e)g(to)g(distan)m(t)f(galaxies.)72 b(This)38 -b(is)227 3553 y(manifested)26 b(as)h(a)h(systematic)f(distortion)f(in)f -(the)i(prop)s(er)f(motions)g(of)h(all)f(FK4-deriv)m(ed)h(catalogues,) -227 3666 y(whic)m(h)43 b(will)e(in)i(turn)g(p)s(ollute)f(an)m(y)i -(astrometry)h(done)e(using)g(those)h(catalogues.)83 b(F)-8 -b(or)45 b(example,)227 3779 y(FK4-based)35 b(astrometry)h(of)e(a)h(QSO) -f(using)f(plates)h(tak)m(en)i(decades)f(apart)g(will)d(rev)m(eal)j(a)g -(non-zero)227 3892 y Fq(\014ctitious)f(pr)-5 b(op)g(er)36 -b(motion)p FD(,)d(and)e(an)m(y)h(FK4)f(star)h(whic)m(h)e(happ)s(ens)g -(to)i(ha)m(v)m(e)g(zero)g(prop)s(er)e(motion)h(is,)227 -4005 y(in)e(fact,)j(slo)m(wly)d(mo)m(ving)h(against)h(the)f(distan)m(t) -g(bac)m(kground.)41 b(The)30 b(FK4)h(frame)f(rotates)i(b)s(ecause)e(it) -227 4118 y(w)m(as)e(established)d(b)s(efore)i(the)g(nature)g(of)g(the)h -(Milky)e(W)-8 b(a)m(y)g(,)30 b(and)c(hence)i(the)f(existence)h(of)f -(systematic)227 4231 y(motions)j(of)h(nearb)m(y)f(stars,)h(had)e(b)s -(een)h(recognized.)136 4406 y Fo(\017)46 b FD(Star)27 -b(p)s(ositions)f(in)g(the)h(FK4)h(system)g(are)f(part-corrected)i(for)e -(ann)m(ual)f(ab)s(erration)h(\(see)h(ab)s(o)m(v)m(e\))h(and)227 -4519 y(em)m(b)s(o)s(dy)h(the)g(so-called)g(E-terms)h(of)f(ab)s -(erration.)0 4714 y(The)i(c)m(hange)j(from)d(the)h(old)f(FK4-based)i -(system)f(to)h(FK5)f(o)s(ccurred)f(at)i(the)f(b)s(eginning)e(of)i(1984) -h(as)g(part)0 4827 y(of)f(a)h(pac)m(k)-5 b(age)35 b(of)f(resolutions)d -(made)i(b)m(y)h(the)f(IA)m(U)h(in)e(1976,)k(along)d(with)f(the)h -(adoption)g(of)g(J2000)i(as)e(the)0 4940 y(reference)i(ep)s(o)s(c)m(h.) -52 b(Star)34 b(p)s(ositions)f(in)g(the)h(new)m(er,)i(FK5,)g(system)e -(are)h(free)f(from)g(the)h(E-terms,)h(and)d(the)0 5053 -y(system)27 b(is)f(a)h(m)m(uc)m(h)g(b)s(etter)f(appro)m(ximation)g(to)h -(an)g(inertial)e(frame)h({)i(ab)s(out)e(\014v)m(e)h(times)f(b)s(etter)h -(\(and)g(ICRS)0 5166 y(is)i(h)m(undreds)g(of)h(times)g(b)s(etter)h -(still\).)0 5317 y(It)e(ma)m(y)h(o)s(ccasionally)e(b)s(e)h(con)m(v)m -(enien)m(t)h(to)g(sp)s(ecify)e(the)i(FK4)f(\014ctitious)f(prop)s(er)g -(motion)h(directly)-8 b(.)39 b(In)29 b(FK4,)0 5429 y(the)i(cen)m -(tennial)e(prop)s(er)g(motion)h(of)h(\(for)f(example\))h(a)g(QSO)e(is:) -0 5580 y Fl(\026)55 5594 y Ff(\013)130 5580 y FD(=)24 -b Fo(\000)p FD(0)341 5547 y Fu(s)346 5580 y Fl(:)p FD(015869+\(\(0)827 -5547 y Fu(s)832 5580 y Fl(:)p FD(029032)52 b(sin)14 b -Fl(\013)p FD(+0)1480 5547 y Fu(s)1485 5580 y Fl(:)p FD(000340)48 -b(cos)16 b Fl(\013)p FD(\))f(sin)g Fl(\016)s Fo(\000)p -FD(0)2360 5547 y Fu(s)2365 5580 y Fl(:)p FD(000105)49 -b(cos)16 b Fl(\013)p Fo(\000)p FD(0)3020 5547 y Fu(s)3025 -5580 y Fl(:)p FD(000083)48 b(sin)14 b Fl(\013)p FD(\))h(sec)i -Fl(\016)0 5693 y(\026)55 5708 y Ff(\016)133 5693 y FD(=)25 -b(+0)340 5656 y Fk(0)l(0)344 5693 y Fl(:)p FD(43549)48 -b(cos)16 b Fl(\013)p Fo(\000)p FD(0)948 5656 y Fk(0)l(0)952 -5693 y Fl(:)p FD(00510)48 b(sin)14 b Fl(\013)21 b FD(+)f(\(0)1622 -5656 y Fk(0)l(0)1626 5693 y Fl(:)p FD(00158)48 b(sin)14 -b Fl(\013)p Fo(\000)p FD(0)2220 5656 y Fk(0)m(0)2224 -5693 y Fl(:)p FD(00125)49 b(cos)16 b Fl(\013)p FD(\))f(sin)f -Fl(\016)s Fo(\000)p FD(0)3049 5656 y Fk(0)m(0)3053 5693 -y Fl(:)p FD(00066)49 b(cos)16 b Fl(\016)p eop -%%Page: 185 187 -185 186 bop 0 52 a Fw(SUN/67.70)3206 b FD(185)0 351 y -Fv(4.11)112 b(Mean)39 b(Place)d(T)-9 b(ransformations)0 -573 y FD(Figure)28 b(1)h(is)f(based)h(up)s(on)e(three)i(v)-5 -b(arieties)28 b(of)h(mean)g([)15 b Fl(\013;)g(\016)20 -b FD(])29 b(all)f(of)h(whic)m(h)e(are)j(of)f(practical)f -(signi\014cance)g(to)0 686 y(observing)h(astronomers)i(in)e(the)i -(presen)m(t)f(era:)136 925 y Fo(\017)46 b FD(Old)37 b(st)m(yle)i -(\(FK4\))h(with)d(kno)m(wn)h(prop)s(er)f(motion)h(in)f(the)i(FK4)g -(system,)i(and)c(with)h(parallax)f(and)227 1038 y(radial)29 -b(v)m(elo)s(cit)m(y)i(either)f(kno)m(wn)g(or)g(assumed)g(zero.)136 -1226 y Fo(\017)46 b FD(Old)34 b(st)m(yle)i(\(FK4\))h(with)e(zero)h -(prop)s(er)e(motion)i(in)e(FK5,)k(and)d(with)f(parallax)h(and)g(radial) -f(v)m(elo)s(cit)m(y)227 1339 y(assumed)c(zero.)136 1528 -y Fo(\017)46 b FD(New)29 b(st)m(yle)g(\(FK5)h(or,)f(lo)s(osely)-8 -b(,)29 b(ICRS\))e(with)h(prop)s(er)f(motion,)i(parallax)f(and)g(radial) -f(v)m(elo)s(cit)m(y)i(either)227 1640 y(kno)m(wn)h(or)h(assumed)e -(zero.)0 1879 y(The)35 b(\014gure)f(outlines)g(the)i(steps)f(required)e -(to)j(con)m(v)m(ert)h(p)s(ositions)c(in)h(an)m(y)i(of)f(these)h -(systems)f(to)h(a)g(J2000)0 1992 y([)15 b Fl(\013;)g(\016)20 -b FD(])34 b(for)g(the)g(curren)m(t)f(ep)s(o)s(c)m(h,)i(as)f(migh)m(t)f -(b)s(e)g(required)f(in)g(a)j(telescop)s(e-con)m(trol)g(program)e(for)h -(example.)0 2105 y(Most)26 b(of)f(the)h(steps)f(can)g(b)s(e)g(carried)f -(out)h(b)m(y)g(calling)f(a)h(single)f(SLALIB)h(routine;)h(there)f(are)h -(other)f(SLALIB)0 2218 y(routines)h(whic)m(h)h(o\013er)h(set-piece)g -(end-to-end)g(transformation)f(routines)f(for)i(common)g(cases.)40 -b(Note,)30 b(ho)m(w-)0 2331 y(ev)m(er,)38 b(that)d(SLALIB)g(do)s(es)g -(not)h(set)f(out)h(to)g(pro)m(vide)e(the)i(capabilit)m(y)e(for)h -(arbitrary)f(transformations)g(of)0 2443 y(star-catalogue)c(data)f(b)s -(et)m(w)m(een)g(all)e(p)s(ossible)f(systems)i(of)g(mean)h([)15 -b Fl(\013;)g(\016)20 b FD(].)40 b(Only)27 b(in)g(the)h(\(common\))h -(cases)g(of)0 2556 y(FK4,)36 b(equino)m(x)e(and)f(ep)s(o)s(c)m(h)h -(B1950,)k(to)d(FK5,)h(equino)m(x)e(and)f(ep)s(o)s(c)m(h)h(J2000,)j(and) -d Fq(vic)-5 b(e)36 b(versa)41 b FD(are)35 b(prop)s(er)0 -2669 y(motion,)29 b(parallax)e(and)h(radial)f(v)m(elo)s(cit)m(y)h -(transformed)g(along)g(with)f(the)i(star)g(p)s(osition)d(itself,)i(the) -g(fo)s(cus)g(of)0 2782 y(SLALIB)i(supp)s(ort.)0 2945 -y(As)25 b(an)g(example)f(of)h(using)f(SLALIB)g(to)i(transform)e(mean)h -(places,)h(here)f(is)f(F)-8 b(ortran)25 b(co)s(de)g(that)h(implemen)m -(ts)0 3058 y(the)35 b(top-left)g(path)f(of)h(Figure)f(1.)53 -b(An)34 b(FK4)h([)15 b Fl(\013;)g(\016)21 b FD(])34 b(of)h(arbitrary)f -(equino)m(x)g(and)f(ep)s(o)s(c)m(h)i(and)f(with)f(kno)m(wn)0 -3171 y(prop)s(er)40 b(motion)h(and)g(parallax)g(is)f(transformed)h(in)m -(to)h(an)f(FK5)h(J2000)h([)15 b Fl(\013;)g(\016)20 b -FD(])42 b(for)f(the)h(curren)m(t)f(ep)s(o)s(c)m(h.)0 -3284 y(As)c(a)g(test)g(star)g(w)m(e)g(will)d(use)i Fl(\013)g -FD(=16)1331 3251 y Fu(h)1390 3284 y FD(09)1480 3251 y -Fu(m)1559 3284 y FD(55)1649 3251 y Fu(s)1654 3284 y Fl(:)p -FD(13,)k Fl(\016)g FD(=)p Fo(\000)p FD(75)2146 3251 y -Fp(\016)2201 3284 y FD(59)2291 3247 y Fk(0)2333 3284 -y FD(27)2418 3247 y Fk(0)m(0)2422 3284 y Fl(:)p FD(2,)g(equino)m(x)c -(1900,)41 b(ep)s(o)s(c)m(h)36 b(1963.087,)0 3397 y Fl(\026)55 -3411 y Ff(\013)133 3397 y FD(=)p Fo(\000)p FD(0)320 3364 -y Fu(s)325 3397 y Fl(:)p FD(0312)p Fl(=y)s FD(,)f Fl(\026)738 -3412 y Ff(\016)805 3397 y FD(=+0)987 3360 y Fk(0)-5 b(0)991 -3397 y Fl(:)p FD(103)p Fl(=y)s FD(,)35 b(parallax)c(=)h(0)1800 -3360 y Fk(0)l(0)1804 3397 y Fl(:)p FD(062,)k(radial)30 -b(v)m(elo)s(cit)m(y)k(=)e Fo(\000)p FD(34)p Fl(:)p FD(22)i(km/s.)47 -b(The)32 b(date)h(of)0 3510 y(observ)-5 b(ation)30 b(is)f(1994.35.)573 -3774 y Ft(IMPLICIT)45 b(NONE)573 3886 y(DOUBLE)h(PRECISION)f(AS2R,S2R) -573 3999 y(PARAMETER)g(\(AS2R=4.8481368110953599)o(D-6,)o(S2R=)o(7.2)o -(7220)o(5216)o(643)o(0399)o(D-5\))573 4112 y(INTEGER)h(J,I)573 -4225 y(DOUBLE)g(PRECISION)f(R0,D0,EQ0,EP0,PR,PD,PX,RV)o(,EP)o(1,R1)o -(,D1,)o(R2,)o(D2,R)o(3,D3)o(,)525 4338 y(:)811 b -(R4,D4,R5,D5,R6,D6,EP1D,EP)o(1B,)o(W\(3\))o(,EB\()o(3\),)o(PXR,)o -(V\(3\))573 4451 y(DOUBLE)46 b(PRECISION)f(sla_EPB,sla_EPJ2D)286 -4677 y(*)96 b(RA,)46 b(Dec)h(etc)g(of)g(example)f(star)573 -4790 y(CALL)g(sla_DTF2R\(16,09,55.13D0,R0)o(,J\))573 -4903 y(CALL)g(sla_DAF2R\(75,59,27.2D0,D0,)o(J\))573 5016 -y(D0=-D0)573 5128 y(EQ0=1900D0)573 5241 y(EP0=1963.087D0)573 -5354 y(PR=-0.0312D0*S2R)573 5467 y(PD=+0.103D0*AS2R)573 -5580 y(PX=0.062D0)573 5693 y(RV=-34.22D0)p eop -%%Page: 186 188 -186 187 bop 0 52 a FD(186)573 351 y Ft(EP1=1994.35D0)286 -577 y(*)96 b(Epoch)46 b(of)h(observation)e(as)i(MJD)g(and)g(Besselian)e -(epoch)573 690 y(EP1D=sla_EPJ2D\(EP1\))573 803 y(EP1B=sla_EPB\(EP1D\)) -286 1029 y(*)96 b(Space)46 b(motion)g(to)h(the)g(current)f(epoch)573 -1142 y(CALL)g(sla_PM\(R0,D0,PR,PD,PX,RV,E)o(P0,)o(EP1B)o(,R1,)o(D1\)) -286 1367 y(*)96 b(Remove)46 b(E-terms)f(of)j(aberration)d(for)i(the)f -(original)g(equinox)573 1480 y(CALL)g(sla_SUBET\(R1,D1,EQ0,R2,D2\))286 -1706 y(*)96 b(Precess)45 b(to)j(B1950)573 1819 y(R3=R2)573 -1932 y(D3=D2)573 2045 y(CALL)e(sla_PRECES\('FK4',EQ0,1950D)o(0,R)o -(3,D3)o(\))286 2271 y(*)96 b(Add)46 b(E-terms)g(for)h(the)g(standard)f -(equinox)f(B1950)573 2384 y(CALL)h(sla_ADDET\(R3,D3,1950D0,R4,)o(D4\)) -286 2609 y(*)96 b(Transform)45 b(to)i(J2000,)f(no)h(proper)f(motion)573 -2722 y(CALL)g(sla_FK45Z\(R4,D4,EP1B,R5,D5)o(\))286 2948 -y(*)96 b(Parallax)573 3061 y(CALL)46 b(sla_EVP\(sla_EPJ2D\(EP1\),200)o -(0D0)o(,W,E)o(B,W,)o(W\))573 3174 y(PXR=PX*AS2R)573 3287 -y(CALL)g(sla_DCS2C\(R5,D5,V\))573 3400 y(DO)h(I=1,3)716 -3513 y(V\(I\)=V\(I\)-PXR*EB\(I\))573 3626 y(END)g(DO)573 -3739 y(CALL)f(sla_DCC2S\(V,R6,D6\))620 3851 y(:)0 4073 -y FD(It)30 b(is)g(in)m(teresting)g(to)h(lo)s(ok)f(at)h(ho)m(w)f(the)h -([)15 b Fl(\013;)g(\016)20 b FD(])31 b(c)m(hanges)g(during)d(the)j -(course)f(of)h(the)f(calculation:)702 4274 y Ft(16)47 -b(09)g(55.130)f(-75)h(59)h(27.20)113 b Fq(original)34 -b(e)-5 b(quinox)33 b(and)g(ep)-5 b(o)g(ch)702 4387 y -Ft(16)47 b(09)g(54.155)f(-75)h(59)h(23.98)113 b Fq(with)34 -b(sp)-5 b(ac)g(e)34 b(motion)702 4500 y Ft(16)47 b(09)g(54.229)f(-75)h -(59)h(24.18)113 b Fq(with)34 b(old)f(E-terms)g(r)-5 b(emove)g(d)702 -4613 y Ft(16)47 b(16)g(28.213)f(-76)h(06)h(54.57)113 -b Fq(pr)-5 b(e)g(c)g(esse)g(d)35 b(to)e(1950.0)702 4726 -y Ft(16)47 b(16)g(28.138)f(-76)h(06)h(54.37)113 b Fq(with)34 -b(new)e(E-terms)702 4839 y Ft(16)47 b(23)g(07.901)f(-76)h(13)h(58.87) -113 b Fq(J2000,)34 b(curr)-5 b(ent)33 b(ep)-5 b(o)g(ch)702 -4951 y Ft(16)47 b(23)g(07.907)f(-76)h(13)h(58.92)113 -b Fq(including)33 b(p)-5 b(ar)g(al)5 b(lax)0 5153 y FD(Other)30 -b(remarks)g(ab)s(out)g(the)h(ab)s(o)m(v)m(e)g(\(un)m(usually)d -(complicated\))i(example:)136 5354 y Fo(\017)46 b FD(If)29 -b(the)g(original)e(equino)m(x)h(and)g(ep)s(o)s(c)m(h)h(w)m(ere)g -(B1950,)i(as)f(is)d(quite)i(lik)m(ely)-8 b(,)28 b(then)h(it)f(w)m(ould) -f(b)s(e)i(unneces-)227 5467 y(sary)c(to)i(treat)f(space)g(motions)f -(and)g(E-terms)g(explicitly)-8 b(.)37 b(T)-8 b(ransformation)25 -b(to)h(FK5)g(J2000)h(could)d(b)s(e)227 5580 y(accomplished)30 -b(simply)e(b)m(y)i(calling)f(sla)p Ft(_)p FD(FK425,)j(after)f(whic)m(h) -e(a)i(call)f(to)h(sla)p Ft(_)p FD(PM)f(and)g(the)h(parallax)227 -5693 y(co)s(de)g(w)m(ould)e(complete)i(the)f(w)m(ork.)p -eop -%%Page: 187 189 -187 188 bop 0 52 a Fw(SUN/67.70)3206 b FD(187)136 351 -y Fo(\017)46 b FD(The)32 b(rigorous)g(treatmen)m(t)i(of)e(the)h -(E-terms)f(has)g(only)g(a)h(small)e(e\013ect)j(on)e(the)g(result.)46 -b(Suc)m(h)32 b(re\014ne-)227 464 y(men)m(ts)f(are,)h(nev)m(ertheless,)f -(w)m(orth)m(while)f(in)g(order)g(to)i(facilitate)f(comparisons)f(and)g -(to)i(increase)e(the)227 577 y(c)m(hances)i(that)f(star)f(p)s(ositions) -e(from)i(di\013eren)m(t)g(suppliers)d(are)k(compatible.)136 -764 y Fo(\017)46 b FD(The)40 b(FK4)h(to)g(FK5)f(transformations,)j(sla) -p Ft(_)p FD(FK425)e(and)e(sla)p Ft(_)p FD(FK45Z,)h(are)h(not)g(as)f(is) -f(sometimes)227 877 y(assumed)24 b(simply)e(50)k(y)m(ears)f(of)g -(precession,)g(though)f(this)g(indeed)f(accoun)m(ts)j(for)e(most)h(of)g -(the)g(c)m(hange.)227 990 y(The)30 b(transformations)f(also)h(include)e -(adjustmen)m(ts)i(to)h(the)f(equino)m(x,)g(a)g(revised)f(precession)g -(mo)s(del,)227 1102 y(elimination)22 b(of)i(the)h(E-terms,)h(a)f(c)m -(hange)g(to)g(the)g(prop)s(er-motion)e(time)h(unit)f(and)g(so)i(on.)38 -b(The)24 b(reason)227 1215 y(there)34 b(are)f(t)m(w)m(o)i(routines)d -(rather)h(than)g(just)f(one)i(is)e(that)i(the)f(FK4)g(frame)h(rotates)g -(relativ)m(e)f(to)h(the)227 1328 y(bac)m(kground,)c(whereas)f(the)h -(FK5)g(frame)f(is)f(a)i(m)m(uc)m(h)g(b)s(etter)f(appro)m(ximation)f(to) -j(an)e(inertial)e(frame,)227 1441 y(and)39 b(zero)i(prop)s(er)d(motion) -h(in)f(FK4)i(do)s(es)f(not,)k(therefore,)f(mean)e(zero)g(prop)s(er)e -(motion)i(in)e(FK5.)227 1554 y(SLALIB)i(also)g(pro)m(vides)f(t)m(w)m(o) -i(routines,)g(sla)p Ft(_)p FD(FK524)g(and)e(sla)p Ft(_)p -FD(FK54Z,)h(to)h(p)s(erform)d(the)j(in)m(v)m(erse)227 -1667 y(transformations.)136 1854 y Fo(\017)46 b FD(Some)21 -b(star)h(catalogues)g(\(FK4)g(itself)e(is)g(one\))i(w)m(ere)g -(constructed)f(using)f(sligh)m(tly)f(di\013eren)m(t)i(pro)s(cedures)227 -1967 y(for)34 b(the)h(p)s(olar)e(regions)h(compared)h(with)e -(elsewhere.)52 b(SLALIB)34 b(ignores)g(this)f(inhomogeneit)m(y)h(and) -227 2079 y(alw)m(a)m(ys)22 b(applies)e(the)h(standard)g -(transformations,)h(irresp)s(ectiv)m(e)f(of)g(lo)s(cation)g(on)g(the)h -(celestial)f(sphere.)0 2371 y Fv(4.12)112 b(Mean)39 b(Place)d(to)h -(Apparen)m(t)h(Place)0 2592 y FD(The)24 b Fq(ge)-5 b(o)g(c)g(entric)28 -b(app)-5 b(ar)g(ent)31 b(plac)-5 b(e)32 b FD(of)25 b(a)g(source,)h(or)f -Fq(app)-5 b(ar)g(ent)30 b(plac)-5 b(e)33 b FD(for)24 -b(short,)i(is)d(the)i([)15 b Fl(\013;)g(\016)20 b FD(])25 -b(if)f(view)m(ed)g(from)0 2705 y(the)32 b(cen)m(tre)i(of)e(the)h -(Earth,)g(with)e(resp)s(ect)h(to)h(the)f(true)g(equator)h(and)f(equino) -m(x)g(of)g(date.)47 b(T)-8 b(ransformation)0 2817 y(of)32 -b(an)g(FK5)h(mean)f([)15 b Fl(\013;)g(\016)20 b FD(],)33 -b(equino)m(x)e(J2000,)j(curren)m(t)e(ep)s(o)s(c)m(h,)h(to)g(apparen)m -(t)f(place)g(in)m(v)m(olv)m(es)g(the)g(follo)m(wing)0 -2930 y(e\013ects:)136 3189 y Fo(\017)46 b FD(Ligh)m(t)30 -b(de\015ection)h({)f(the)h(gra)m(vitational)f(lens)g(e\013ect)i(of)e -(the)h(sun.)136 3375 y Fo(\017)46 b FD(Ann)m(ual)29 b(ab)s(erration.) -136 3562 y Fo(\017)46 b FD(Precession-n)m(utation.)0 -3820 y(The)30 b Fq(light)k(de\015e)-5 b(ction)39 b FD(is)31 -b(seldom)f(signi\014can)m(t.)41 b(Its)31 b(v)-5 b(alue)31 -b(at)g(the)h(lim)m(b)d(of)i(the)g(Sun)f(is)g(ab)s(out)g(1)3351 -3784 y Fk(0)m(0)3355 3820 y Fl(:)p FD(74;)j(it)e(falls)0 -3933 y(o\013)g(rapidly)d(with)h(distance)h(from)g(the)g(Sun)f(and)h -(has)g(shrunk)e(to)j(ab)s(out)f(0)2605 3896 y Fk(0)m(0)2609 -3933 y Fl(:)p FD(02)i(at)f(an)g(elongation)f(of)h(20)3627 -3900 y Fp(\016)3667 3933 y FD(.)0 4095 y(As)g(already)f(describ)s(ed,)f -(the)h Fq(annual)k(ab)-5 b(err)g(ation)40 b FD(is)30 -b(a)h(function)e(of)i(the)g(Earth's)f(v)m(elo)s(cit)m(y)h(relativ)m(e)g -(to)g(the)0 4208 y(solar)37 b(system)h(barycen)m(tre)g(\(a)m(v)-5 -b(ailable)38 b(through)f(the)g(SLALIB)h(routines)e(sla)p -Ft(_)p FD(EVP)h(and)g(sla)p Ft(_)p FD(EPV\))g(and)0 4321 -y(pro)s(duces)29 b(shifts)g(of)i(up)e(to)i(ab)s(out)f(20)1314 -4284 y Fk(0)m(0)1318 4321 y Fl(:)p FD(5.)0 4483 y(The)39 -b Fq(pr)-5 b(e)g(c)g(ession-nutation)p FD(,)44 b(from)39 -b(J2000)h(to)g(the)f(curren)m(t)g(ep)s(o)s(c)m(h,)i(is)e(expressed)f(b) -m(y)h(a)h(rotation)f(matrix)0 4595 y(whic)m(h)29 b(is)h(a)m(v)-5 -b(ailable)29 b(through)h(the)h(SLALIB)e(routine)h(sla)p -Ft(_)p FD(PRENUT.)0 4757 y(The)i(whole)f(mean-to-apparen)m(t)j -(transformation)d(can)i(b)s(e)e(done)h(using)f(the)h(SLALIB)g(routine)f -(sla)p Ft(_)p FD(MAP)-8 b(.)0 4870 y(As)28 b(a)h(demonstration,)f(here) -g(is)f(a)i(program)f(whic)m(h)f(lists)f(the)j Fq(North)i(Polar)h -(Distanc)-5 b(e)36 b FD(\(90)3156 4837 y Fp(\016)3212 -4870 y Fo(\000)16 b Fl(\016)s FD(\))29 b(of)f(P)m(olaris)0 -4983 y(for)i(the)h(decade)g(of)f(closest)h(approac)m(h)g(to)g(the)f(P)m -(ole:)573 5241 y Ft(IMPLICIT)45 b(NONE)573 5354 y(DOUBLE)h(PRECISION)f -(PI,PIBY2,D2R,S2R,AS2R)573 5467 y(PARAMETER)g -(\(PI=3.141592653589793238)o(4626)o(43D0)o(\))573 5580 -y(PARAMETER)g(\(D2R=PI/180D0,)525 5693 y(:)525 b(PIBY2=PI/2D0,)p -eop -%%Page: 188 190 -188 189 bop 0 52 a FD(188)525 351 y Ft(:)525 b(S2R=PI/\(12D0*3600D0\),) -525 464 y(:)g(AS2R=PI/\(180D0*3600D0\)\))573 577 y(DOUBLE)46 -b(PRECISION)f(RM,DM,PR,PD,DATE,RA,DA)573 690 y(INTEGER)h -(J,IDS,IDE,ID,IYMDF\(4\),I)573 916 y(CALL)g -(sla_DTF2R\(02,31,49.8131D0,)o(RM,)o(J\))573 1029 y(CALL)g -(sla_DAF2R\(89,15,50.661D0,D)o(M,J)o(\))573 1142 y -(PR=+21.7272D0*S2R/100D0)573 1255 y(PD=-1.571D0*AS2R/100D0)573 -1367 y(WRITE)g(\(*,'\(1X,'//)525 1480 y(:)572 b('''Polaris)45 -b(north)i(polar)f(distance)g(\(deg\))g(2096-2105''/\)'\))573 -1593 y(WRITE)g(\(*,'\(4X,''Date'',7X''NPD')o('/\))o('\))573 -1706 y(CALL)g(sla_CLDJ\(2096,1,1,DATE,J\))573 1819 y(IDS=NINT\(DATE\)) -573 1932 y(CALL)g(sla_CLDJ\(2105,12,31,DATE,J)o(\))573 -2045 y(IDE=NINT\(DATE\))573 2158 y(DO)h(ID=IDS,IDE,10)716 -2271 y(DATE=DBLE\(ID\))716 2384 y(CALL)g(sla_DJCAL\(0,DATE,IYMDF,)o -(J\))716 2497 y(CALL)g(sla_MAP\(RM,DM,PR,PD,0D0)o(,0D)o(0,20)o(00D0)o -(,DA)o(TE,R)o(A,DA)o(\))716 2609 y(WRITE)f -(\(*,'\(1X,I4,2I3.2,F9.5\)'\))41 b(\(IYMDF\(I\),I=1,3\),\(PIBY2-DA)o -(\)/D2)o(R)573 2722 y(END)47 b(DO)573 2948 y(END)0 3200 -y FD(F)-8 b(or)32 b(cases)g(where)f(the)g(transformation)g(has)g(to)h -(b)s(e)e(rep)s(eated)h(for)g(di\013eren)m(t)g(times)g(or)g(for)g(more)g -(than)g(one)0 3313 y(star,)39 b(the)f(straigh)m(tforw)m(ard)e(sla)p -Ft(_)p FD(MAP)h(approac)m(h)h(is)e(apt)h(to)h(b)s(e)e(w)m(asteful)h(as) -g(b)s(oth)g(the)g(Earth)g(v)m(elo)s(cit)m(y)0 3426 y(and)25 -b(the)h(precession-n)m(utation)e(matrix)h(can)h(b)s(e)f(re-calculated)h -(relativ)m(ely)f(infrequen)m(tly)e(without)h(ill)g(e\013ect.)0 -3539 y(A)29 b(more)f(e\016cien)m(t)h(metho)s(d)f(is)g(to)h(p)s(erform)e -(the)i(target-indep)s(enden)m(t)f(calculations)g(only)g(when)f -(necessary)-8 b(,)0 3652 y(b)m(y)35 b(calling)f(sla)p -Ft(_)p FD(MAPP)-8 b(A,)35 b(and)g(then)g(to)h(use)f(either)g(sla)p -Ft(_)p FD(MAPQKZ,)f(when)g(only)g(the)i([)15 b Fl(\013;)g(\016)20 -b FD(])35 b(is)g(kno)m(wn,)0 3765 y(or)41 b(sla)p Ft(_)p -FD(MAPQK,)f(when)g(full)f(catalogue)j(p)s(ositions,)g(including)c(prop) -s(er)h(motion,)44 b(parallax)c(and)g(radial)0 3878 y(v)m(elo)s(cit)m(y) --8 b(,)32 b(are)f(a)m(v)-5 b(ailable.)40 b(Ho)m(w)31 -b(frequen)m(tly)f(to)h(call)f(sla)p Ft(_)p FD(MAPP)-8 -b(A)31 b(dep)s(ends)e(on)h(the)h(accuracy)g(ob)5 b(jectiv)m(es;)0 -3991 y(once)31 b(p)s(er)e(nigh)m(t)h(will)e(deliv)m(er)h(sub-arcsecond) -h(accuracy)i(for)e(example.)0 4151 y(The)40 b(routines)f(sla)p -Ft(_)p FD(AMP)h(and)g(sla)p Ft(_)p FD(AMPQK)f(allo)m(w)h(the)g(rev)m -(erse)h(transformation,)h(from)e(apparen)m(t)h(to)0 4264 -y(mean)30 b(place.)0 4554 y Fv(4.13)112 b(Apparen)m(t)38 -b(Place)e(to)h(Observ)m(ed)i(Place)0 4772 y FD(The)24 -b Fq(observe)-5 b(d)28 b(plac)-5 b(e)33 b FD(of)24 b(a)h(source)g(is)f -(its)g(p)s(osition)e(as)j(seen)g(b)m(y)f(a)h(p)s(erfect)f(theo)s -(dolite)g(at)i(the)e(lo)s(cation)h(of)f(the)0 4885 y(observ)m(er.)41 -b(T)-8 b(ransformation)29 b(of)i(an)f(apparen)m(t)h([)15 -b Fl(\013;)g(\016)20 b FD(])31 b(to)g(observ)m(ed)f(place)h(in)m(v)m -(olv)m(es)f(the)g(follo)m(wing)f(e\013ects:)136 5138 -y Fo(\017)46 b FD([)15 b Fl(\013;)g(\016)21 b FD(])30 -b(to)h([)15 b Fl(h;)g(\016)20 b FD(].)136 5323 y Fo(\017)46 -b FD(Diurnal)29 b(ab)s(erration.)136 5508 y Fo(\017)46 -b FD([)15 b Fl(h;)g(\016)20 b FD(])31 b(to)g([)15 b Fl(Az)t(;)g(E)5 -b(l)34 b FD(].)136 5693 y Fo(\017)46 b FD(Refraction.)p -eop -%%Page: 189 191 -189 190 bop 0 52 a Fw(SUN/67.70)3206 b FD(189)0 351 y(The)29 -b(transformation)f(from)h(apparen)m(t)g([)15 b Fl(\013;)g(\016)20 -b FD(])29 b(to)h(apparen)m(t)f([)15 b Fl(h;)g(\016)21 -b FD(])29 b(is)f(made)h(b)m(y)g(allo)m(wing)f(for)h Fq(Earth)j(r)-5 -b(ota-)0 464 y(tion)38 b FD(through)30 b(the)g Fq(sider)-5 -b(e)g(al)35 b(time)p FD(,)30 b Fl(\022)s FD(:)1696 579 -y Fl(h)25 b FD(=)g Fl(\022)e Fo(\000)c Fl(\013)0 747 -y FD(F)-8 b(or)33 b(this)e(equation)h(to)h(w)m(ork,)g -Fl(\013)f FD(m)m(ust)g(b)s(e)g(the)g(apparen)m(t)h(righ)m(t)e -(ascension)h(for)g(the)g(time)g(of)g(observ)-5 b(ation,)0 -860 y(and)30 b Fl(\022)i FD(m)m(ust)f(b)s(e)e(the)i Fq(lo)-5 -b(c)g(al)34 b(app)-5 b(ar)g(ent)36 b(sider)-5 b(e)g(al)34 -b(time)p FD(.)41 b(The)30 b(latter)h(is)e(obtained)h(as)g(follo)m(ws:) -111 1100 y(1.)46 b(from)30 b(civil)f(time)h(obtain)g(the)g(co)s -(ordinated)g(univ)m(ersal)e(time,)j(UTC)f(\(more)g(later)h(on)f -(this\);)111 1290 y(2.)46 b(add)30 b(the)h(UT1)p Fo(\000)p -FD(UTC)e(\(t)m(ypically)h(a)h(few)f(ten)m(ths)h(of)f(a)h(second\))g(to) -g(giv)m(e)g(the)f(UT;)111 1480 y(3.)46 b(from)30 b(the)h(UT)f(compute)h -(the)f(Green)m(wic)m(h)g(mean)h(sidereal)e(time)h(\(using)f(sla)p -Ft(_)p FD(GMST\);)111 1670 y(4.)46 b(add)30 b(the)h(observ)m(er's)f -(\(east\))i(longitude,)e(giving)f(the)h(lo)s(cal)g(mean)g(sidereal)g -(time;)111 1859 y(5.)46 b(add)30 b(the)h(equation)f(of)g(the)h(equino)m -(xes)f(\(using)f(sla)p Ft(_)p FD(EQEQX\).)0 2099 y(The)39 -b Fq(e)-5 b(quation)41 b(of)g(the)g(e)-5 b(quinoxes)47 -b FD(\(=)39 b(\001)p Fl( )19 b FD(cos)d Fl(\017)38 b -FD(plus)g(small)f(terms\))i(is)f(the)i(e\013ect)g(of)g(n)m(utation)e -(on)h(the)0 2212 y(sidereal)32 b(time.)48 b(Its)33 b(v)-5 -b(alue)33 b(is)f(t)m(ypically)g(a)i(second)f(or)g(less.)48 -b(It)33 b(is)f(in)m(teresting)h(to)h(note)g(that)f(if)f(the)i(ob)5 -b(ject)0 2325 y(of)33 b(the)f(exercise)h(is)e(to)i(transform)f(a)h -(mean)f(place)h(all)e(the)h(w)m(a)m(y)i(in)m(to)e(an)g(observ)m(ed)h -(place)f(\(v)m(ery)h(often)g(the)0 2438 y(case\),)e(then)d(the)i -(equation)e(of)h(the)g(equino)m(xes)g(and)f(the)h(longitude)f(comp)s -(onen)m(t)h(of)g(n)m(utation)g(can)g(b)s(oth)f(b)s(e)0 -2551 y(omitted,)c(remo)m(ving)f(a)f(great)i(deal)e(of)h(computation.)38 -b(Ho)m(w)m(ev)m(er,)26 b(SLALIB)c(follo)m(ws)f(the)i(normal)e(con)m(v)m -(en)m(tion)0 2664 y(and)30 b(w)m(orks)g Fq(via)38 b FD(the)30 -b(apparen)m(t)h(place.)0 2828 y(Note)k(that)g(for)f(v)m(ery)g(precise)f -(w)m(ork)h(the)h(observ)m(er's)f(longitude)f(should)f(b)s(e)h -(corrected)i(for)f Fq(p)-5 b(olar)38 b(motion)p FD(.)0 -2941 y(This)d(can)j(b)s(e)f(done)g(with)f(sla)p Ft(_)p -FD(POLMO.)g(The)h(corrections)g(are)h(alw)m(a)m(ys)g(less)e(than)h(ab)s -(out)g(0)3335 2904 y Fk(0)l(0)3339 2941 y Fl(:)p FD(3,)j(and)d(are)0 -3054 y(futile)29 b(unless)g(the)h(p)s(osition)f(of)h(the)h(observ)m -(er's)f(telescop)s(e)h(is)f(kno)m(wn)g(to)h(b)s(etter)f(than)g(a)h(few) -f(metres.)0 3217 y(T)-8 b(ables)33 b(of)h(observ)m(ed)g(and)f -(predicted)g(UT1)p Fo(\000)p FD(UTC)g(corrections)h(and)f(p)s(olar)g -(motion)h(data)g(are)g(published)0 3330 y(ev)m(ery)d(few)f(w)m(eeks)h -(b)m(y)g(the)f(In)m(ternational)g(Earth)g(Rotation)h(Service.)0 -3494 y(The)37 b(transformation)h(from)f(apparen)m(t)h([)15 -b Fl(h;)g(\016)20 b FD(])38 b(to)h Fq(top)-5 b(o)g(c)g(entric)45 -b FD([)15 b Fl(h;)g(\016)21 b FD(])38 b(consists)f(of)h(allo)m(wing)f -(for)g Fq(diurnal)0 3607 y(ab)-5 b(err)g(ation)p FD(.)72 -b(This)39 b(e\013ect,)44 b(maxim)m(um)39 b(amplitude)f(0)1902 -3570 y Fk(0)l(0)1906 3607 y Fl(:)p FD(2,)44 b(w)m(as)c(describ)s(ed)e -(earlier.)69 b(There)40 b(is)f(no)h(sp)s(eci\014c)0 3720 -y(SLALIB)24 b(routine)f(for)h(computing)g(the)g(diurnal)d(ab)s -(erration,)k(though)f(the)h(routines)e(sla)p Ft(_)p FD(A)m(OP)h -Fq(etc.)g FD(include)0 3833 y(it,)30 b(and)g(the)g(required)f(v)m(elo)s -(cit)m(y)i(v)m(ector)h(can)f(b)s(e)e(determined)g(b)m(y)i(calling)d -(sla)p Ft(_)p FD(GEOC.)0 3997 y(The)38 b(next)g(stage)i(is)e(the)g(ma)5 -b(jor)39 b(co)s(ordinate)f(rotation)h(from)f(lo)s(cal)g(equatorial)g -(co)s(ordinates)g([)15 b Fl(h;)g(\016)20 b FD(])38 b(in)m(to)0 -4109 y(horizon)25 b(co)s(ordinates.)39 b(The)25 b(SLALIB)g(routines)g -(sla)p Ft(_)p FD(E2H)g Fq(etc.)g FD(can)h(b)s(e)f(used)g(for)h(this.)38 -b(F)-8 b(or)26 b(high-precision)0 4222 y(applications)j(the)h(mean)h -(geo)s(detic)g(latitude)e(should)f(b)s(e)i(corrected)i(for)e(p)s(olar)f -(motion.)0 4516 y FB(4.13.1)106 b(Refraction)0 4739 y -FD(The)35 b(\014nal)g(correction)h(is)f(for)h(atmospheric)f -(refraction.)57 b(This)34 b(e\013ect,)39 b(whic)m(h)c(dep)s(ends)f(on)i -(lo)s(cal)f(meteo-)0 4852 y(rological)h(conditions)f(and)g(the)i -(e\013ectiv)m(e)h(colour)e(of)g(the)h(source/detector)h(com)m -(bination,)f(increases)f(the)0 4965 y(observ)m(ed)e(elev)-5 -b(ation)35 b(of)f(the)h(source)f(b)m(y)h(a)f(signi\014can)m(t)g -(e\013ect)h(ev)m(en)g(at)h(mo)s(derate)e(zenith)g(distances,)h(and)0 -5078 y(near)26 b(the)h(horizon)f(b)m(y)g(o)m(v)m(er)i(0)1029 -5045 y Fp(\016)1035 5078 y Fl(:)r FD(5.)40 b(The)26 b(amoun)m(t)h(of)g -(refraction)f(can)h(b)m(y)f(computed)h(b)m(y)f(calling)f(the)i(SLALIB)0 -5190 y(routine)f(sla)p Ft(_)p FD(REFR)m(O;)g(ho)m(w)m(ev)m(er,)j(this)d -(requires)f(as)i(input)e(the)i(observ)m(ed)g(zenith)f(distance,)h(whic) -m(h)f(is)g(what)0 5303 y(w)m(e)e(are)g(trying)e(to)i(predict.)38 -b(F)-8 b(or)24 b(high)e(precision)g(it)g(is)h(therefore)h(necessary)g -(to)g(iterate,)i(using)21 b(the)j(top)s(o)s(cen-)0 5416 -y(tric)30 b(zenith)g(distance)g(as)g(the)h(initial)c(estimate)32 -b(of)e(the)h(observ)m(ed)f(zenith)g(distance.)0 5580 -y(The)e(full)e(sla)p Ft(_)p FD(REFR)m(O)i(refraction)g(calculation)f -(is)g(onerous,)i(and)f(for)g(zenith)g(distances)f(of)i(less)e(than,)i -(sa)m(y)-8 b(,)0 5693 y(75)90 5660 y Fp(\016)161 5693 -y FD(the)30 b(follo)m(wing)f(mo)s(del)g(can)i(b)s(e)f(used)f(instead:)p -eop -%%Page: 190 192 -190 191 bop 0 52 a FD(190)1180 507 y Fl(\020)1220 521 -y Ff(v)r(ac)1354 507 y Fo(\031)25 b Fl(\020)1490 522 -y Ff(obs)1611 507 y FD(+)20 b Fl(A)15 b FD(tan)h Fl(\020)1972 -522 y Ff(obs)2093 507 y FD(+)k Fl(B)g FD(tan)2404 469 -y Fu(3)2458 507 y Fl(\020)2498 522 y Ff(obs)0 663 y FD(where)29 -b Fl(\020)302 677 y Ff(v)r(ac)440 663 y FD(is)f(the)i(top)s(o)s(cen)m -(tric)g(zenith)e(distance)h(\(i.e.)h Fq(in)i(vacuo)p -FD(\),)e Fl(\020)2434 678 y Ff(obs)2564 663 y FD(is)f(the)h(observ)m -(ed)f(zenith)g(distance)0 776 y(\(i.e.)h(a\013ected)i(b)m(y)d -(refraction\),)i(and)e Fl(A)h FD(and)f Fl(B)35 b FD(are)30 -b(constan)m(ts,)h(ab)s(out)f(60)2592 739 y Fk(0)m(0)2663 -776 y FD(and)f Fo(\000)p FD(0)2950 739 y Fk(0)l(0)2954 -776 y Fl(:)p FD(06)i(resp)s(ectiv)m(ely)e(for)h(a)0 888 -y(sea-lev)m(el)f(site.)39 b(The)28 b(t)m(w)m(o)h(constan)m(ts)g(can)f -(b)s(e)g(calculated)g(for)f(a)i(giv)m(en)f(set)g(of)g(conditions)f(b)m -(y)h(calling)e(either)0 1001 y(sla)p Ft(_)p FD(REF)m(CO)k(or)g(sla)p -Ft(_)p FD(REF)m(COQ.)0 1148 y(sla)p Ft(_)p FD(REF)m(CO)24 -b(w)m(orks)g(b)m(y)g(calling)f(sla)p Ft(_)p FD(REFR)m(O)h(for)g(t)m(w)m -(o)h(zenith)f(distances)g(and)g(\014tting)f Fl(A)i FD(and)e -Fl(B)29 b FD(to)c(matc)m(h.)0 1261 y(The)i(calculation)g(is)f(onerous,) -i(but)f(deliv)m(ers)f(accurate)j(results)d(whatev)m(er)j(the)e -(conditions.)39 b(sla)p Ft(_)p FD(REF)m(COQ)0 1374 y(uses)46 -b(a)h(direct)e(form)m(ulation)g(of)i Fl(A)f FD(and)g -Fl(B)51 b FD(and)46 b(is)f(m)m(uc)m(h)h(faster;)55 b(it)46 -b(is)g(sligh)m(tly)e(less)i(accurate)i(than)0 1487 y(sla)p -Ft(_)p FD(REF)m(CO)30 b(but)f(more)i(than)f(adequate)h(for)f(most)h -(practical)f(purp)s(oses.)0 1633 y(Lik)m(e)36 b(the)g(full)d -(refraction)j(mo)s(del,)g(the)g(t)m(w)m(o-term)i(form)m(ulation)d(w)m -(orks)h(in)e(the)i(wrong)g(direction)e(for)i(our)0 1746 -y(purp)s(oses,)f(predicting)e(the)i Fq(in)i(vacuo)k FD(\(top)s(o)s(cen) -m(tric\))36 b(zenith)e(distance)h(giv)m(en)g(the)g(refracted)h -(\(observ)m(ed\))0 1859 y(zenith)h(distance,)j(rather)e(than)g -Fq(vic)-5 b(e)39 b(versa)p FD(.)64 b(The)38 b(ob)m(vious)f(approac)m(h) -i(of)f(in)m(terc)m(hanging)g Fl(\020)3308 1873 y Ff(v)r(ac)3454 -1859 y FD(and)g Fl(\020)3679 1874 y Ff(obs)0 1972 y FD(and)i(rev)m -(ersing)h(the)g(signs,)i(though)e(appro)m(ximately)f(correct,)45 -b(giv)m(es)c(a)m(v)m(oidable)g(errors)g(whic)m(h)f(are)h(just)0 -2085 y(signi\014can)m(t)33 b(in)h(some)g(applications;)h(for)f(example) -h(ab)s(out)f(0)2123 2048 y Fk(0)l(0)2127 2085 y Fl(:)p -FD(2)h(at)g(70)2437 2052 y Fp(\016)2512 2085 y FD(zenith)f(distance.)52 -b(A)35 b(m)m(uc)m(h)f(b)s(etter)0 2198 y(result)29 b(can)i(easily)e(b)s -(e)h(obtained,)g(b)m(y)g(using)f(one)i(Newton-Raphson)f(iteration)g(as) -h(follo)m(ws:)1014 2437 y Fl(\020)1054 2452 y Ff(obs)1180 -2437 y Fo(\031)25 b Fl(\020)1316 2451 y Ff(v)r(ac)1445 -2437 y Fo(\000)1694 2376 y Fl(A)15 b FD(tan)h Fl(\020)1964 -2390 y Ff(v)r(ac)2093 2376 y FD(+)k Fl(B)g FD(tan)2404 -2343 y Fu(3)2458 2376 y Fl(\020)2498 2390 y Ff(v)r(ac)p -1545 2416 1211 4 v 1545 2500 a FD(1)h(+)f(\()p Fl(A)h -FD(+)f(3)p Fl(B)g FD(tan)2182 2470 y Fu(2)2237 2500 y -Fl(\020)2277 2514 y Ff(v)r(ac)2385 2500 y FD(\))15 b(sec)2553 -2474 y Fu(2)2607 2500 y Fl(\020)2647 2514 y Ff(v)r(ac)0 -2670 y FD(The)27 b(e\013ect)i(of)f(refraction)f(can)h(b)s(e)f(applied)e -(to)k(an)e(unrefracted)g(zenith)g(distance)g(b)m(y)h(calling)e(sla)p -Ft(_)p FD(REFZ)g(or)0 2783 y(to)i(an)g(unrefracted)f([)15 -b Fl(x;)g(y)s(;)g(z)20 b FD(])28 b(b)m(y)f(calling)f(sla)p -Ft(_)p FD(REFV.)h(Ov)m(er)h(most)g(of)g(the)f(sky)g(these)h(t)m(w)m(o)h -(routines)e(deliv)m(er)0 2896 y(almost)j(iden)m(tical)e(results,)h(but) -g(b)s(ey)m(ond)g Fl(\020)i FD(=)25 b(83)1710 2863 y Fp(\016)1780 -2896 y FD(sla)p Ft(_)p FD(REFV)k(b)s(ecomes)h(unacceptably)g -(inaccurate)f(while)0 3009 y(sla)p Ft(_)p FD(REFZ)g(remains)h(usable.) -40 b(\(Ho)m(w)m(ev)m(er)33 b(sla)p Ft(_)p FD(REFV)d(is)g(signi\014can)m -(tly)f(faster,)i(whic)m(h)e(ma)m(y)i(b)s(e)f(imp)s(ortan)m(t)0 -3122 y(in)f(some)h(applications.\))39 b(SLALIB)30 b(also)g(pro)m(vides) -f(a)i(routine)e(for)g(computing)h(the)g(airmass,)f(the)i(function)0 -3235 y(sla)p Ft(_)p FD(AIRMAS.)0 3381 y(The)h(refraction)h(\\constan)m -(ts")i(returned)d(b)m(y)h(sla)p Ft(_)p FD(REF)m(CO)f(and)h(sla)p -Ft(_)p FD(REF)m(COQ)e(are)j(sligh)m(tly)d(a\013ected)k(b)m(y)0 -3494 y(colour,)30 b(esp)s(ecially)e(at)j(the)g(blue)d(end)i(of)g(the)g -(sp)s(ectrum.)40 b(Where)30 b(v)-5 b(alues)30 b(for)g(more)g(than)g -(one)g(w)m(a)m(v)m(elength)0 3607 y(are)f(needed,)g(rather)g(than)f -(calling)g(sla)p Ft(_)p FD(REF)m(CO)g(sev)m(eral)h(times)f(it)h(is)e -(more)i(e\016cien)m(t)h(to)f(call)f(sla)p Ft(_)p FD(REF)m(CO)0 -3720 y(just)j(once,)h(for)f(a)h(selected)g(\\base")g(w)m(a)m(v)m -(elength,)h(and)e(then)g(to)h(call)f(sla)p Ft(_)p FD(A)-8 -b(TMDSP)31 b(once)h(for)f(eac)m(h)h(w)m(a)m(v)m(e-)0 -3833 y(length)e(of)g(in)m(terest.)0 3980 y(All)h(the)h(SLALIB)f -(refraction)h(routines)f(w)m(ork)h(for)g(radio)f(w)m(a)m(v)m(elengths)j -(as)e(w)m(ell)f(as)h(the)g(optical/IR)g(band.)0 4093 -y(The)k(radio)f(refraction)h(is)f(v)m(ery)i(dep)s(enden)m(t)e(on)h(h)m -(umidit)m(y)-8 b(,)36 b(and)g(an)g(accurate)h(v)-5 b(alue)36 -b(m)m(ust)g(b)s(e)f(supplied.)0 4205 y(There)k(is)g(no)h(w)m(a)m(v)m -(elength)h(dep)s(endence,)h(ho)m(w)m(ev)m(er.)71 b(The)39 -b(c)m(hoice)i(of)f(optical/IR)g(or)g(radio)f(is)g(made)h(b)m(y)0 -4318 y(sp)s(ecifying)28 b(a)j(w)m(a)m(v)m(elength)h(greater)f(than)f -(100)p Fl(\026)p FD(m)i(for)e(the)g(radio)g(case.)0 4584 -y FB(4.13.2)106 b(E\016ciency)36 b(considerations)0 4790 -y FD(The)j(complete)h(apparen)m(t)f(place)h(to)g(observ)m(ed)g(place)f -(transformation)g(can)h(b)s(e)e(carried)h(out)h(b)m(y)f(calling)0 -4903 y(sla)p Ft(_)p FD(A)m(OP)-8 b(.)21 b(F)-8 b(or)22 -b(impro)m(v)m(ed)e(e\016ciency)h(in)e(cases)j(of)f(more)g(than)g(one)g -(star)g(or)g(a)h(sequence)f(of)g(times,)i(the)e(target-)0 -5016 y(indep)s(enden)m(t)28 b(calculations)i(can)h(b)s(e)f(done)g(once) -i(b)m(y)e(calling)f(sla)p Ft(_)p FD(A)m(OPP)-8 b(A,)31 -b(the)g(time)f(can)h(b)s(e)f(up)s(dated)g(b)m(y)0 5128 -y(calling)j(sla)p Ft(_)p FD(A)m(OPP)-8 b(A)g(T,)35 b(and)g(sla)p -Ft(_)p FD(A)m(OPQK)e(can)i(then)g(b)s(e)f(used)g(to)h(p)s(erform)f(the) -h(apparen)m(t-to-observ)m(ed)0 5241 y(transformation.)74 -b(The)42 b(rev)m(erse)g(transformation)g(is)e(a)m(v)-5 -b(ailable)42 b(through)f(sla)p Ft(_)p FD(O)m(AP)g(and)g(sla)p -Ft(_)p FD(O)m(APQK.)0 5354 y(\()p Fq(n.b.)24 b FD(These)g(routines)f -(use)h(accurate)h(but)f(computationally-exp)s(ensiv)m(e)e(refraction)i -(algorithms)f(for)h(zenith)0 5467 y(distances)32 b(b)s(ey)m(ond)g(ab)s -(out)g(76)1062 5434 y Fp(\016)1103 5467 y FD(.)47 b(F)-8 -b(or)33 b(man)m(y)g(purp)s(oses,)e(in-line)f(co)s(de)j(tailored)f(to)h -(the)g(accuracy)g(require-)0 5580 y(men)m(ts)28 b(of)h(the)f -(application)f(will)e(b)s(e)j(preferable,)f(for)h(example)g(ignoring)f -(p)s(olar)f(motion,)j(omitting)e(diurnal)0 5693 y(ab)s(erration)i(and)h -(using)f(sla)p Ft(_)p FD(REFZ)g(to)i(apply)e(the)i(refraction.\))p -eop -%%Page: 191 193 -191 192 bop 0 52 a Fw(SUN/67.70)3206 b FD(191)0 351 y -Fv(4.14)112 b(The)38 b(Hipparcos)f(Catalogue)h(and)g(the)f(ICRS)0 -570 y FD(With)26 b(e\013ect)h(from)f(the)g(b)s(eginning)e(of)i(1998,)j -(the)d(IA)m(U)h(adopted)f(a)h(new)e(reference)i(system)f(to)h(replace)f -(FK5)0 683 y(J2000.)75 b(The)40 b(new)h(system,)j(called)d(the)g(In)m -(ternational)g(Celestial)f(Reference)i(System)f(\(ICRS\),)g(di\013ers)0 -796 y(profoundly)33 b(from)i(all)f(predecessors)i(in)e(that)i(the)g -(link)d(with)h(solar-system)i(dynamics)e(w)m(as)i(brok)m(en;)i(the)0 -909 y(ICRS)28 b(axes)h(are)g(de\014ned)f(in)f(terms)i(of)g(the)g(co)s -(ordinates)f(of)h(a)g(set)g(of)g(extragalactic)i(sources,)e(not)g(in)f -(terms)0 1022 y(of)41 b(the)g(mean)f(equator)i(and)e(equino)m(x)g(at)h -(a)h(giv)m(en)e(reference)h(ep)s(o)s(c)m(h.)72 b(Although)40 -b(the)g(ICRS)g(and)g(FK5)0 1135 y(co)s(ordinates)i(of)h(an)m(y)g(giv)m -(en)g(ob)5 b(ject)44 b(are)f(almost)g(the)f(same,)47 -b(the)c(orien)m(tation)f(of)h(the)g(new)f(frame)h(w)m(as)0 -1247 y(essen)m(tially)d(arbitrary)-8 b(,)43 b(and)e(the)g(close)h(matc) -m(h)g(to)g(FK5)f(J2000)i(w)m(as)e(con)m(triv)m(ed)h(purely)d(for)i -(reasons)g(of)0 1360 y(con)m(tin)m(uit)m(y)30 b(and)g(con)m(v)m -(enience.)0 1520 y(A)d(distinction)e(is)h(made)h(b)s(et)m(w)m(een)g -(the)g(reference)h Fq(system)35 b FD(\(the)27 b(ICRS\))f(and)h -Fq(fr)-5 b(ame)35 b FD(\(ICRF\).)27 b(The)g(ICRS)e(is)0 -1633 y(the)32 b(set)h(of)g(prescriptions)c(and)j(con)m(v)m(en)m(tions)h -(together)h(with)d(the)h(mo)s(delling)e(required)g(to)j(de\014ne,)f(at) -h(an)m(y)0 1746 y(time,)e(a)f(triad)g(of)h(axes.)42 b(The)30 -b(ICRF)g(is)f(a)i(practical)g(realization,)f(and)g(curren)m(tly)f -(consists)h(of)h(a)g(catalogue)0 1859 y(of)g(equatorial)f(co)s -(ordinates)g(for)g(608)h(extragalactic)i(radio)c(sources)i(observ)m(ed) -f(b)m(y)g(VLBI.)0 2019 y(The)37 b(b)s(est)g(optical)g(realization)g(of) -g(the)h(ICRF)f(curren)m(tly)f(a)m(v)-5 b(ailable)37 b(is)f(the)i -(Hipparcos)f(catalogue.)63 b(The)0 2132 y(extragalactic)43 -b(sources)e(w)m(ere)g(not)h(directly)d(observ)-5 b(able)41 -b(b)m(y)g(the)g(Hipparcos)f(satellite)h(and)f(so)h(the)h(link)0 -2245 y(from)37 b(Hipparcos)f(to)i(ICRF)e(w)m(as)i(established)d -(through)i(a)g(v)-5 b(ariet)m(y)38 b(of)f(indirect)e(tec)m(hniques:)54 -b(VLBI)37 b(and)0 2358 y(con)m(v)m(en)m(tional)c(in)m(terferometry)g -(of)f(radio)g(stars,)h(photographic)f(astrometry)h(and)f(so)h(on.)46 -b(The)32 b(Hipparcos)0 2471 y(frame)e(is)g(aligned)f(to)i(the)g(ICRF)f -(to)h(within)d(ab)s(out)i(0.5)h(mas)f(and)g(0.5)i(mas/y)m(ear)f(\(at)h -(ep)s(o)s(c)m(h)e(1991.25\).)0 2631 y(The)k(Hipparcos)f(catalogue)j -(includes)c(all)h(of)h(the)h(FK5)g(stars,)g(whic)m(h)e(has)h(enabled)f -(the)i(orien)m(tation)f(and)0 2744 y(spin)22 b(of)h(the)h(latter)g(to)g -(b)s(e)f(studied.)37 b(A)m(t)25 b(ep)s(o)s(c)m(h)e(J2000,)k(the)c -(misalignmen)m(t)f(of)i(the)g(FK5)g(frame)f(with)f(resp)s(ect)0 -2857 y(to)34 b(Hipparcos)f(\(and)g(hence)h(ICRS\))f(are)h(ab)s(out)f -(32)h(mas)g(and)f(1)h(mas/y)m(ear)h(resp)s(ectiv)m(ely)-8 -b(.)50 b(Consequen)m(tly)-8 b(,)0 2969 y(for)35 b(man)m(y)g(practical)f -(purp)s(oses,)g(including)e(p)s(oin)m(ting)h(telescop)s(es,)j(the)g(IA) -m(U)f(1976-1982)k(con)m(v)m(en)m(tions)d(on)0 3082 y(reference)30 -b(frames)f(and)f(Earth)h(orien)m(tation)g(remain)g(adequate)h(and)e -(there)i(is)e(no)h(need)g(to)h(c)m(hange)g(to)g(Hip-)0 -3195 y(parcos)h(co)s(ordinates,)g(new)f(precession-n)m(utation)h(mo)s -(dels)e(and)h(so)h(on.)43 b(Ho)m(w)m(ev)m(er,)33 b(for)d(the)i(most)f -(exacting)0 3308 y(astrometric)f(applications,)e(SLALIB)g(pro)m(vides)g -(some)i(supp)s(ort)d(for)i(Hipparcos)g(co)s(ordinates)g(in)f(the)h -(form)0 3421 y(of)35 b(four)g(new)f(routines:)49 b(sla)p -Ft(_)p FD(FK52H)36 b(and)e(sla)p Ft(_)p FD(H2FK5,)j(whic)m(h)d -(transform)g(FK5)h(p)s(ositions)e(and)i(prop)s(er)0 3534 -y(motions)40 b(to)g(the)h(Hipparcos)e(frame)h(and)f Fq(vic)-5 -b(e)42 b(versa,)g FD(and)e(sla)p Ft(_)p FD(FK5HZ)f(and)h(sla)p -Ft(_)p FD(HFK5Z,)g(where)f(the)0 3647 y(transformations)30 -b(are)g(for)g(stars)h(whose)f(Hipparcos)g(prop)s(er)f(motion)h(is)f -(zero.)0 3807 y(F)-8 b(urther)44 b(information)e(on)i(the)g(ICRS)f(can) -h(b)s(e)g(found)f(in)f(the)j(pap)s(er)e(b)m(y)g(M.)16 -b(F)-8 b(eissel)44 b(and)f(F.)16 b(Mignard,)0 3920 y(Astron.)f(Astroph) -m(ys.)41 b(331,)32 b(L33-L36)g(\(1988\).)0 4209 y Fv(4.15)112 -b(Time)36 b(Scales)0 4428 y FD(SLALIB)28 b(pro)m(vides)f(for)g -(transformation)h(b)s(et)m(w)m(een)g(sev)m(eral)h(time)e(scales,)i(and) -f(in)m(v)m(olv)m(es)g(use)g(of)g(one)g(or)g(t)m(w)m(o)0 -4541 y(others.)41 b(The)30 b(full)e(list)h(is)g(as)i(follo)m(ws:)136 -4769 y Fo(\017)46 b FD(T)-8 b(AI:)31 b(In)m(ternational)f(A)m(tomic)h -(Time)136 4953 y Fo(\017)46 b FD(UTC:)30 b(Co)s(ordinated)f(Univ)m -(ersal)h(Time)136 5138 y Fo(\017)46 b FD(TT:)30 b(T)-8 -b(errestrial)29 b(Time)136 5323 y Fo(\017)46 b FD(TDB:)31 -b(Barycen)m(tric)g(Dynamical)f(Time.)136 5508 y Fo(\017)46 -b FD(UT:)31 b(Univ)m(ersal)e(Time)136 5693 y Fo(\017)46 -b FD(GMST:)31 b(Green)m(wic)m(h)f(mean)g(sidereal)f(time)p -eop -%%Page: 192 194 -192 193 bop 0 52 a FD(192)136 351 y Fo(\017)46 b FD(GAST)30 -b(\(or)h(GST\):)f(Green)m(wic)m(h)h(apparen)m(t)f(sidereal)f(time.)136 -547 y Fo(\017)46 b FD(LAST:)30 b(lo)s(cal)g(apparen)m(t)g(sidereal)f -(time)0 795 y(Strictly)e(sp)s(eaking,)i(UT)f(and)g(the)h(sidereal)e -(times)i(are)g(not)g Fq(times)36 b FD(in)28 b(the)g(ph)m(ysics)g -(sense,)h(but)f Fq(angles)37 b FD(that)0 908 y(describ)s(e)29 -b(Earth)h(rotation.)0 1075 y(Three)g(obsolete)h(time)f(scales)g(should) -f(b)s(e)h(men)m(tioned)g(here)g(to)h(a)m(v)m(oid)g(confusion.)136 -1323 y Fo(\017)46 b FD(GMT:)31 b(Green)m(wic)m(h)f(Mean)h(Time)f({)h -(can)f(mean)h(either)f(UTC)f(or)i(UT.)136 1519 y Fo(\017)46 -b FD(ET:)30 b(Ephemeris)f(Time)g({)i(more)f(or)h(less)f(the)g(same)h -(as)f(either)g(TT)g(or)g(TDB.)136 1715 y Fo(\017)46 b -FD(TDT:)31 b(T)-8 b(errestrial)29 b(Dynamical)h(Time)f({)i(former)f -(name)g(of)h(TT.)0 1963 y(time)f(scales)h(that)g(ha)m(v)m(e)g(no)f -(SLALIB)g(supp)s(ort)f(at)i(presen)m(t:)136 2211 y Fo(\017)46 -b FD(An)m(y)31 b(form)f(of)g(lo)s(cal)g(civil)e(time)i(\(BST,)h(PDT)f -Fq(etc.)p FD(\))136 2407 y Fo(\017)46 b FD(TCG:)30 b(geo)s(cen)m(tric)i -(co)s(ordinate)e(time.)136 2603 y Fo(\017)46 b FD(TCB:)31 -b(barycen)m(tric)f(co)s(ordinate)g(time.)0 2906 y FB(4.15.1)106 -b(A)m(tomic)34 b(Time:)46 b(T)-9 b(AI)0 3134 y Fq(International)47 -b(A)n(tomic)d(Time,)j FD(T)-8 b(AI,)43 b(is)g(a)h(\\lab)s(oratory")f -(time)g(scale)h(with)e(no)h(link)f(to)i(astronomical)0 -3247 y(observ)-5 b(ations)24 b(except)i(in)d(an)h(historical)f(sense.) -39 b(Its)24 b(unit)f(is)h(the)h(SI)f(second,)i(whic)m(h)d(is)g -(de\014ned)h(in)f(terms)h(of)h(a)0 3360 y(sp)s(eci\014c)e(n)m(um)m(b)s -(er)g(of)i(w)m(a)m(v)m(elengths)g(of)g(the)f(radiation)f(pro)s(duced)g -(b)m(y)h(a)h(certain)f(electronic)g(transition)f(in)g(the)0 -3473 y(caesium)30 b(133)i(atom.)42 b(It)30 b(is)g(realized)g(through)f -(a)i(c)m(hanging)g(p)s(opulation)d(of)i(high-precision)e(atomic)j(clo)s -(c)m(ks)0 3586 y(held)k(at)j(standards)d(institutes)g(in)h(v)-5 -b(arious)35 b(coun)m(tries.)60 b(There)36 b(is)f(an)i(elab)s(orate)g -(pro)s(cess)f(of)h(con)m(tin)m(uous)0 3699 y(in)m(tercomparison,)29 -b(leading)h(to)h(a)f(w)m(eigh)m(ted)h(a)m(v)m(erage)i(of)e(all)e(the)i -(clo)s(c)m(ks)f(in)m(v)m(olv)m(ed.)0 3865 y(Though)21 -b(T)-8 b(AI)22 b(shares)g(the)g(same)g(second)g(as)g(the)h(more)f -(familiar)e(UTC,)h(the)h(t)m(w)m(o)i(time)d(scales)i(are)f(noticeably)0 -3978 y(separated)33 b(in)e(ep)s(o)s(c)m(h)h(b)s(ecause)g(of)h(the)g -(build-up)28 b(of)33 b(leap)f(seconds)g(\(see)h(the)g(next)g -(section\).)47 b(A)m(t)33 b(the)g(time)0 4091 y(of)e(writing,)d(UTC)i -(lags)g(o)m(v)m(er)i(half)d(a)i(min)m(ute)f(b)s(ehind)d(T)-8 -b(AI.)0 4258 y(F)g(or)34 b(an)m(y)f(giv)m(en)g(date,)h(the)g -(di\013erence)e(T)-8 b(AI)p Fo(\000)p FD(UTC)32 b(can)h(b)s(e)g -(obtained)f(b)m(y)h(calling)e(the)i(SLALIB)g(function)0 -4371 y(sla)p Ft(_)p FD(D)m(A)-8 b(T.)25 b(Note,)i(ho)m(w)m(ev)m(er,)g -(that)d(an)g(up-to-date)i(cop)m(y)e(of)h(the)f(function)f(m)m(ust)h(b)s -(e)f(used)h(if)f(the)h(most)g(recen)m(t)0 4484 y(leap)45 -b(seconds)g(are)h(required.)83 b(F)-8 b(or)46 b(applications)e(where)h -(this)f(is)g(critical,)k(mec)m(hanisms)d(indep)s(enden)m(t)0 -4597 y(of)40 b(SLALIB)f(and)g(under)f(lo)s(cal)i(con)m(trol)g(m)m(ust)f -(b)s(e)g(set)i(up;)i(in)c(suc)m(h)g(cases)i(sla)p Ft(_)p -FD(D)m(A)-8 b(T)40 b(can)g(b)s(e)f(useful)f(as)0 4710 -y(an)44 b(indep)s(enden)m(t)f(c)m(hec)m(k,)50 b(for)44 -b(test)i(dates)f(within)d(the)j(range)f(of)h(the)g(a)m(v)-5 -b(ailable)44 b(v)m(ersion.)83 b(Up-to-date)0 4823 y(information)29 -b(on)h(T)-8 b(AI)p Fo(\000)p FD(UTC)30 b(is)f(a)m(v)-5 -b(ailable)30 b(from)g Ft(ftp://maia.usno.navy.mi)o(l/s)o(er7/)o(tai-)o -(utc)o(.dat)o FD(.)0 5127 y FB(4.15.2)106 b(Univ)m(ersal)35 -b(Time:)46 b(UT,)35 b(UTC)0 5354 y Fq(Universal)42 b(Time,)h -FD(UT,)d(or)g(more)g(sp)s(eci\014cally)e(UT1,)44 b(is)39 -b(in)g(e\013ect)j(mean)e(solar)g(time)g(and)f(is)g(really)h(an)0 -5467 y(expression)c(of)i(Earth)f(rotation)h(rather)f(than)g(a)h -(measure)f(of)h(time.)62 b(Originally)34 b(de\014ned)i(in)g(terms)h(of) -h(a)0 5580 y(p)s(oin)m(t)e(in)f(the)i(sky)f(called)g(\\the)h -(\014ctitious)e(mean)i(Sun",)g(UT)g(is)e(no)m(w)i(de\014ned)e(through)h -(its)g(relationship)0 5693 y(with)28 b(Earth)g(rotation)h(angle)g -(\(formerly)f(sidereal)f(time\).)41 b(Because)30 b(the)f(Earth's)g -(rotation)g(rate)g(is)f(sligh)m(tly)p eop -%%Page: 193 195 -193 194 bop 0 52 a Fw(SUN/67.70)3206 b FD(193)0 351 y(irregular)32 -b(and)h(gradually)g(decreasing,)1394 318 y Fu(5)1468 -351 y FD(the)h(UT)g(second)g(is)f(not)i(precisely)d(matc)m(hed)j(to)g -(the)f(SI)f(second.)0 464 y(This)c(mak)m(es)i(UT)f(itself)f(unsuitable) -f(for)i(use)g(as)h(a)g(time)f(scale.)0 625 y(That)37 -b(role)f(is)g(instead)g(tak)m(en)h(b)m(y)g Fq(Co)-5 b(or)g(dinate)g(d) -42 b(Universal)d(Time,)f FD(UTC,)e(whic)m(h)g(is)f(clo)s(c)m(k-based)i -(and)f(is)0 738 y(the)i(foundation)e(of)h(civil)f(timek)m(eeping.)62 -b(Most)38 b(time)f(zones)h(di\013er)e(from)h(UTC)g(b)m(y)h(an)f(in)m -(teger)h(n)m(um)m(b)s(er)0 851 y(of)d(hours,)f(though)g(a)h(few)f(\()p -Fq(e.g.)g FD(parts)g(of)h(Canada)f(and)g(Australia\))g(di\013er)f(b)m -(y)h Fl(n)23 b FD(+)f(0)p Fl(:)p FD(5)36 b(hours.)52 -b(Since)33 b(its)0 963 y(in)m(tro)s(duction,)28 b(UTC)h(has)h(b)s(een)f -(k)m(ept)h(roughly)e(in)h(step)g(with)g(UT)g(b)m(y)h(a)g(v)-5 -b(ariet)m(y)30 b(of)f(adjustmen)m(ts)h(that)g(are)0 1076 -y(agreed)24 b(in)d(adv)-5 b(ance)24 b(and)e(then)h(carried)f(out)h(in)f -(a)h(co)s(ordinated)g(manner)f(b)m(y)h(the)g(timek)m(eeping)g(comm)m -(unities)0 1189 y(of)h(di\013eren)m(t)f(coun)m(tries|hence)h(the)f -(name.)39 b(Though)23 b(rate)h(c)m(hanges)h(w)m(ere)f(used)f(in)f(the)i -(past,)i(no)m(w)m(ada)m(ys)f(all)0 1302 y(suc)m(h)j(adjustmen)m(ts)h -(are)g(made)f(b)m(y)h(o)s(ccasionally)f(inserting)e(a)j(whole)f -(second.)40 b(This)27 b(pro)s(cedure)h(is)f(called)h(a)0 -1415 y Fq(le)-5 b(ap)32 b(se)-5 b(c)g(ond)p FD(.)42 b(Because)30 -b(the)g(da)m(y)f(length)f(is)g(no)m(w)h(sligh)m(tly)e(longer)i(than)f -(86400)j(SI)d(seconds,)i(a)f(leap)f(second)0 1528 y(amoun)m(ts)j(to)g -(stopping)e(the)i(UTC)e(clo)s(c)m(k)i(for)f(a)h(second)f(to)i(let)e -(the)g(Earth)h(catc)m(h)g(up.)0 1689 y(Y)-8 b(ou)46 b(need)f(UT1)h(in)e -(order)h(to)h(p)s(oin)m(t)f(a)h(telescop)s(e)g(or)f(an)m(tenna)h(at)h -(a)f(clestial)e(target.)88 b(T)-8 b(o)46 b(obtain)f(it)0 -1801 y(starting)25 b(from)g(UTC,)g(y)m(ou)h(ha)m(v)m(e)g(to)g(lo)s(ok)f -(up)f(the)i(v)-5 b(alue)25 b(of)g(UT1)p Fo(\000)p FD(UTC)g(for)g(the)g -(date)h(concerned)g(in)e(tables)0 1914 y(published)h(b)m(y)k(the)h(In)m -(ternational)e(Earth)h(Rotation)h(and)f(reference)g(frames)g(Service;)g -(this)f(quan)m(tit)m(y)-8 b(,)31 b(k)m(ept)0 2027 y(in)22 -b(the)h(range)h Fo(\006)p FD(0)605 1994 y Fu(s)610 2027 -y Fl(:)p FD(9)f(b)m(y)g(means)g(of)h(leap)e(seconds,)j(is)d(then)h -(added)g(to)h(the)f(UTC.)g(The)f(quan)m(tit)m(y)i(UT1)p -Fo(\000)p FD(UTC,)0 2140 y(whic)m(h)32 b(t)m(ypically)g(c)m(hanges)i(b) -m(y)g(of)f(order)g(1)g(ms)g(p)s(er)g(da)m(y)-8 b(,)35 -b(can)e(b)s(e)g(obtained)f(only)h(b)m(y)g(observ)-5 b(ation)33 -b(\(VLBI)0 2253 y(using)27 b(extragalactic)j(radio)e(sources\),)i -(though)e(seasonal)g(trends)g(are)h(w)m(ell)f(kno)m(wn)g(and)f(the)i -(IERS)f(listings)0 2366 y(are)j(able)f(to)h(predict)e(some)i(w)m(a)m(y) -g(in)m(to)g(the)f(future)g(with)f(adequate)i(accuracy)h(for)e(p)s(oin)m -(ting)e(telescop)s(es.)0 2527 y(UTC)d(leap)g(seconds)g(are)h(in)m(tro)s -(duced)e(as)h(necessary)-8 b(,)28 b(usually)23 b(at)j(the)g(end)f(of)g -(Decem)m(b)s(er)i(or)e(June.)38 b(Because)0 2640 y(on)29 -b(the)h(a)m(v)m(erage)h(the)f(solar)f(da)m(y)g(is)g(sligh)m(tly)e -(longer)i(than)g(the)g(nominal)f(86,400)k(SI)c(seconds,)i(leap)f -(seconds)0 2752 y(are)g(alw)m(a)m(ys)f(p)s(ositiv)m(e;)g(ho)m(w)m(ev)m -(er,)j(pro)m(vision)26 b(exists)i(for)g(negativ)m(e)h(leap)f(seconds)g -(if)f(needed.)39 b(The)28 b(form)g(of)g(a)0 2865 y(leap)i(second)g(can) -h(b)s(e)f(seen)g(from)g(the)h(follo)m(wing)e(description)f(of)i(the)h -(end)f(of)g(June)g(1994:)1180 3131 y(UTC)166 b(UT1)p -Fo(\000)p FD(UTC)256 b(UT1)353 3357 y(1994)101 b(June)e(30)i(23)31 -b(59)g(58)186 b Fo(\000)p FD(0)p Fl(:)p FD(218)i(23)31 -b(59)g(57.782)1113 3470 y(23)g(59)g(59)186 b Fo(\000)p -FD(0)p Fl(:)p FD(218)i(23)31 b(59)g(58.782)1113 3583 -y(23)g(59)g(60)186 b Fo(\000)p FD(0)p Fl(:)p FD(218)i(23)31 -b(59)g(59.782)634 3695 y(July)162 b(1)100 b(00)31 b(00)g(00)186 -b(+0)p Fl(:)p FD(782)i(00)31 b(00)g(00.782)1113 3808 -y(00)g(00)g(01)186 b(+0)p Fl(:)p FD(782)i(00)31 b(00)g(01.782)0 -3966 y(Note)h(that)f(UTC)f(has)h(to)g(b)s(e)f(expressed)g(as)h(hours,)f -(min)m(utes)g(and)g(seconds)g(\(or)h(at)h(least)f(in)e(seconds)i(for)f -(a)0 4079 y(giv)m(en)k(date\))h(if)d(leap)i(seconds)f(are)h(to)h(b)s(e) -e(tak)m(en)i(in)m(to)f(accoun)m(t)h(in)d(the)i(correct)h(manner.)50 -b(It)34 b(is)f(improp)s(er)0 4192 y(to)40 b(express)e(a)i(UTC)e(as)h(a) -h(Julian)c(Date,)43 b(for)c(example,)i(b)s(ecause)e(there)h(will)c(b)s -(e)i(an)h(am)m(biguit)m(y)g(during)0 4305 y(a)c(leap)f(second)h(\(in)e -(the)i(ab)s(o)m(v)m(e)h(example,)g(1994)g(June)e(30)h(23)2183 -4272 y Fu(h)2243 4305 y FD(59)2333 4272 y Fu(m)2412 4305 -y FD(60)2502 4272 y Fu(s)2507 4305 y Fl(:)p FD(0)g(and)f(1994)j(July)c -(1)i(00)3385 4272 y Fu(h)3444 4305 y FD(00)3534 4272 -y Fu(m)3613 4305 y FD(00)3703 4272 y Fu(s)3708 4305 y -Fl(:)p FD(0)0 4418 y(w)m(ould)d Fq(b)-5 b(oth)41 b FD(come)34 -b(out)g(as)f(MJD)g(49534.00000\).)54 b(Although)33 b(in)e(the)j(v)-5 -b(ast)33 b(ma)5 b(jorit)m(y)34 b(of)f(cases)h(this)e(w)m(on't)0 -4531 y(matter,)45 b(there)d(are)f(p)s(oten)m(tial)g(problems)f(in)g -(on-line)g(data)i(acquisition)d(systems)j(and)e(in)g(applications)0 -4644 y(in)m(v)m(olving)33 b(taking)h(the)g(di\013erence)g(b)s(et)m(w)m -(een)h(t)m(w)m(o)h(times.)52 b(Note)35 b(that)g(although)f(the)g -(functions)f(sla)p Ft(_)p FD(D)m(A)-8 b(T)0 4757 y(and)33 -b(sla)p Ft(_)p FD(DTT)f(exp)s(ect)h(UTC)g(in)f(the)h(form)g(of)g(an)g -(MJD,)h(the)f(meaning)g(here)f(is)h(really)f(a)h(whole-n)m(um)m(b)s(er) -0 4870 y Fq(date)46 b FD(rather)39 b(than)f(a)h(time.)66 -b(Though)37 b(the)i(functions)e(will)f(accept)41 b(a)e(fractional)f -(part)g(and)g(will)e(almost)0 4983 y(alw)m(a)m(ys)i(function)d -(correctly)-8 b(,)40 b(on)d(a)g(da)m(y)h(whic)m(h)e(ends)g(with)f(a)j -(leap)e(second)i(incorrect)e(results)g(w)m(ould)g(b)s(e)p -0 5060 1512 4 v 104 5113 a Fs(5)138 5145 y Fr(The)f(Earth)f(is)h(slo)n -(wing)h(do)n(wn)e(b)r(ecause)h(of)g(tidal)f(e\013ects.)61 -b(The)34 b(SI)g(second)g(re\015ects)g(the)g(length-of-da)n(y)g(in)g -(the)g(mid-)0 5236 y(19th)28 b(cen)n(tury)-6 b(,)27 b(when)g(the)g -(astronomical)i(observ)l(ations)f(that)f(established)h(mo)r(dern)f -(timek)n(eeping)f(w)n(ere)j(b)r(eing)e(made.)40 b(Since)0 -5328 y(then,)e(the)e(a)n(v)n(erage)g(length-of-da)n(y)g(has)g -(increased)h(b)n(y)e(roughly)g(2)i(ms.)64 b(Sup)r(erimp)r(osed)35 -b(in)h(this)g(gradual)h(slo)n(wdo)n(wn)g(are)0 5419 y(v)l(ariations)30 -b(\(seasonal)g(and)f(decadal\))g(that)g(are)g(geoph)n(ysical)h(in)f -(origin,)i(notably)d(due)h(to)g(large)h(scale)g(mo)n(v)n(emen)n(ts)c -(of)k(w)n(ater)0 5510 y(and)21 b(atmosphere.)33 b(Because)23 -b(of)f(conserv)l(ation)g(of)h(angular)f(momen)n(tum,)e(as)i(the)f -(Earth's)i(rotation-rate)f(decreases,)i(the)e(Mo)r(on)0 -5602 y(mo)n(v)n(es)k(farther)i(a)n(w)n(a)n(y)-6 b(.)39 -b(In)26 b(50)i(billion)g(y)n(ears)g(the)f(distance)g(of)h(the)f(Mo)r -(on)h(will)h(b)r(e)e(at)g(a)g(maxim)n(um,)e(44\045)j(greater)g(than)f -(no)n(w,)0 5693 y(at)f(whic)n(h)g(stage)g(da)n(y)f(and)h(mon)n(th)e -(will)j(b)r(oth)e(equal)h(47)g(presen)n(t)f(da)n(ys.)p -eop -%%Page: 194 196 -194 195 bop 0 52 a FD(194)0 351 y(obtained)25 b(during)e(the)j(leap)f -(second)h(itself)f(b)s(ecause)g(b)m(y)h(then)f(the)h(MJD)g(w)m(ould)e -(ha)m(v)m(e)j(mo)m(v)m(ed)g(in)m(to)e(the)h(next)0 464 -y(da)m(y)-8 b(.)0 748 y FB(4.15.3)106 b(Sidereal)35 b(Time:)45 -b(GMST,)35 b(LAST)g Fq(etc.)0 965 y FD(Sidereal)j(time)h(is)f(lik)m(e)g -(the)i(time)f(of)g(da)m(y)h(but)e(relativ)m(e)i(to)g(the)f(stars)h -(rather)f(than)g(to)h(the)f(Sun.)66 b(After)0 1078 y(one)38 -b(sidereal)e(da)m(y)h(the)h(stars)f(come)i(bac)m(k)f(to)g(the)f(same)h -(place)f(in)f(the)i(sky)-8 b(,)39 b(apart)f(from)f(sub-arcsecond)0 -1191 y(precession)29 b(e\013ects.)41 b(Because)31 b(the)f(Earth)f -(rotates)i(faster)f(relativ)m(e)f(to)i(the)e(stars)h(than)f(to)h(the)g -(Sun)e(b)m(y)h(one)0 1304 y(da)m(y)i(p)s(er)e(y)m(ear,)j(the)e -(sidereal)f(second)i(is)e(shorter)h(than)g(the)h(solar)f(second;)g(the) -h(ratio)f(is)g(ab)s(out)g(0.9973.)0 1463 y(The)41 b Fq(Gr)-5 -b(e)g(enwich)45 b(me)-5 b(an)44 b(sider)-5 b(e)g(al)45 -b(time,)g FD(GMST,)d(is)f(link)m(ed)f(to)i(UT1)g(b)m(y)g(a)g(n)m -(umerical)f(form)m(ula)g(whic)m(h)0 1576 y(is)31 b(implemen)m(ted)f(in) -h(the)h(SLALIB)f(functions)f(sla)p Ft(_)p FD(GMST)h(and)g(sla)p -Ft(_)p FD(GMST)-8 b(A.)32 b(There)f(are,)i(of)f(course,)h(no)0 -1689 y(leap)25 b(seconds)g(in)f(GMST,)h(but)g(the)g(sidereal)f(second)h -(\(measured)h(in)d(SI)i(seconds\))h(c)m(hanges)g(in)e(length)g(along)0 -1802 y(with)32 b(the)h(UT1)g(second,)g(and)g(also)g(v)-5 -b(aries)32 b(o)m(v)m(er)i(long)e(p)s(erio)s(ds)f(of)i(time)g(b)s -(ecause)f(of)h(slo)m(w)g(c)m(hanges)h(in)d(the)0 1914 -y(Earth's)25 b(orbit.)37 b(This)23 b(mak)m(es)j(sidereal)d(time)i -(unsuitable)d(for)i(ev)m(erything)h(except)h(predicting)c(the)j -(apparen)m(t)0 2027 y(directions)k(of)h(celestial)g(sources,)h(in)e -(other)i(w)m(ords)f(as)g(an)g(angle)h(rather)f(than)g(a)h(time.)0 -2186 y(The)j Fq(lo)-5 b(c)g(al)39 b(app)-5 b(ar)g(ent)40 -b(sider)-5 b(e)g(al)38 b(time,)f FD(LAST,)d(is)g(the)h(apparen)m(t)g -(righ)m(t)g(ascension)f(of)h(the)g(lo)s(cal)g(meridian,)0 -2299 y(from)g(whic)m(h)g(the)h(hour)f(angle)h(of)g(an)m(y)g(star)g(can) -g(b)s(e)f(determined)g(kno)m(wing)g(its)g(righ)m(t)h(ascension.)56 -b(LAST)0 2412 y(can)37 b(b)s(e)e(obtained)h(from)f(the)i(GMST)f(b)m(y)g -(adding)f(the)h(east)h(longitude)e(\(corrected)j(for)e(p)s(olar)f -(motion)h(in)0 2525 y(precise)22 b(w)m(ork\))i(and)e(the)i -Fq(e)-5 b(quation)26 b(of)h(the)f(e)-5 b(quinoxes)p FD(.)38 -b(The)23 b(latter,)i(already)e(describ)s(ed,)f(is)h(an)g(asp)s(ect)g -(of)g(the)0 2638 y(n)m(utation)28 b(e\013ect)h(and)e(can)h(b)s(e)f -(predicted)g(b)m(y)h(calling)e(the)i(SLALIB)f(function)g(sla)p -Ft(_)p FD(EQEQX)f(or,)j(neglecting)0 2751 y(certain)h(v)m(ery)h(small)e -(terms,)h(b)m(y)h(calling)e(sla)p Ft(_)p FD(NUTC)g(and)h(using)f(the)h -(expression)f(\001)p Fl( )19 b FD(cos)c Fl(\017)p FD(.)0 -2909 y(GAST,)30 b(or)h(plain)d(GST,)i(is)f(GMST)h(plus)f(the)h -(equation)h(of)f(the)h(equino)m(xes.)0 3193 y FB(4.15.4)106 -b(Dynamical)34 b(Time:)46 b(TT,)34 b(TDB)0 3411 y FD(Dynamical)20 -b(time)h(\(formerly)f(Ephemeris)f(Time,)j(ET\))f(is)f(the)h(indep)s -(enden)m(t)e(v)-5 b(ariable)19 b(in)h(the)h(theories)g(whic)m(h)0 -3523 y(describ)s(e)35 b(the)h(motions)g(of)g(b)s(o)s(dies)e(in)h(the)h -(solar)g(system.)58 b(When)36 b(using)e(published)f(form)m(ulae)j(or)g -(tables)0 3636 y(that)e(mo)s(del)f(the)h(p)s(osition)d(of)j(the)g -(Earth)g(in)e(its)h(orbit,)h(for)f(example,)i(or)f(lo)s(ok)f(up)f(the)i -(Mo)s(on's)g(p)s(osition)0 3749 y(in)29 b(a)j(precomputed)e(ephemeris,) -g(the)g(date)i(and)e(time)h(m)m(ust)f(b)s(e)g(in)g(terms)h(of)f(one)i -(of)f(the)f(dynamical)g(time)0 3862 y(scales.)39 b(It)24 -b(is)f(a)h(common)g(but)g(understandable)d(mistak)m(e)k(to)g(use)e(UTC) -h(directly)-8 b(,)24 b(in)f(whic)m(h)g(case)i(the)f(results)0 -3975 y(will)k(b)s(e)h(o)m(v)m(er)j(a)f(min)m(ute)e(out)i(\(at)h(the)e -(time)g(of)h(writing\).)0 4134 y(It)42 b(is)e(not)i(hard)e(to)i(see)g -(wh)m(y)f(suc)m(h)g(time)g(scales)h(are)g(necessary)-8 -b(.)74 b(UTC)41 b(w)m(ould)f(clearly)h(b)s(e)g(unsuitable)0 -4247 y(as)34 b(the)h(argumen)m(t)g(of)f(an)g(ephemeris)f(b)s(ecause)h -(of)g(leap)g(seconds.)52 b(A)35 b(solar-system)f(ephemeris)f(based)h -(on)0 4360 y(UT1)26 b(or)h(sidereal)d(time)i(w)m(ould)f(someho)m(w)i -(ha)m(v)m(e)h(to)e(include)e(the)j(unpredictable)d(v)-5 -b(ariations)25 b(of)h(the)h(Earth's)0 4472 y(rotation.)61 -b(T)-8 b(AI)37 b(w)m(ould)f(w)m(ork,)j(but)d(in)g(principle)d(the)38 -b(ephemeris)d(and)i(the)g(ensem)m(ble)f(of)i(atomic)f(clo)s(c)m(ks)0 -4585 y(w)m(ould)e(ev)m(en)m(tually)h(drift)f(apart.)59 -b(In)35 b(e\013ect,)40 b(the)c(ephemeris)f Fq(is)43 b -FD(a)37 b(clo)s(c)m(k,)h(with)d(the)i(b)s(o)s(dies)d(of)i(the)h(solar)0 -4698 y(system)31 b(the)f(hands)f(from)h(whic)m(h)f(the)i(ephemeris)e -(time)h(is)f(read.)0 4857 y(Only)23 b(t)m(w)m(o)j(of)e(the)h(dynamical) -e(time)h(scales)g(are)h(of)g(an)m(y)g(great)g(imp)s(ortance)f(to)h -(observ)-5 b(ational)24 b(astronomers,)0 4970 y(TT)30 -b(and)f(TDB.)0 5128 y Fq(T)-7 b(err)i(estrial)37 b(Time,)c -FD(TT,)f(is)g(the)h(theoretical)g(time)g(scale)g(of)g(apparen)m(t)g -(geo)s(cen)m(tric)h(ephemerides)d(of)i(solar)0 5241 y(system)h(b)s(o)s -(dies.)47 b(It)34 b(applies)d(to)j(clo)s(c)m(ks)g(at)g(sea-lev)m(el,)h -(and)e(for)g(practical)g(purp)s(oses)e(it)i(is)g(tied)g(to)h(A)m(tomic) -0 5354 y(Time)28 b(T)-8 b(AI)30 b(through)e(the)i(form)m(ula)e(TT)h(=)f -(T)-8 b(AI)30 b(+)f(32)1894 5321 y Fu(s)1899 5354 y Fl(:)p -FD(184.)42 b(In)29 b(practice,)h(therefore,)g(the)f(units)f(of)i(TT)e -(are)0 5467 y(ordinary)d(SI)h(seconds,)h(and)f(the)h(o\013set)g(of)g -(32)1576 5434 y Fu(s)1581 5467 y Fl(:)p FD(184)i(with)c(resp)s(ect)i -(to)g(T)-8 b(AI)26 b(is)g(\014xed.)39 b(The)26 b(SLALIB)g(function)0 -5580 y(sla)p Ft(_)p FD(DTT)i(returns)f(TT)p Fo(\000)p -FD(UTC)g(for)i(a)g(giv)m(en)g(UTC)f(\()p Fq(n.b.)h FD(sla)p -Ft(_)p FD(DTT)e(calls)h(sla)p Ft(_)p FD(DTT,)g(and)h(the)f(latter)i(m)m -(ust)0 5693 y(b)s(e)g(an)g(up-to-date)h(v)m(ersion)f(if)g(recen)m(t)h -(leap)f(seconds)g(are)h(to)g(b)s(e)f(tak)m(en)h(in)m(to)g(accoun)m -(t\).)p eop -%%Page: 195 197 -195 196 bop 0 52 a Fw(SUN/67.70)3206 b FD(195)0 351 y -Fq(Baryc)-5 b(entric)36 b(Dynamic)-5 b(al)37 b(Time,)d -FD(TDB,)g(is)e(a)i Fq(c)-5 b(o)g(or)g(dinate)38 b(time,)c -FD(suitable)e(for)h(lab)s(elling)d(ev)m(en)m(ts)k(that)g(are)0 -464 y(most)40 b(simply)d(describ)s(ed)g(in)h(a)i(con)m(text)h(where)e -(the)h(b)s(o)s(dies)d(of)i(the)h(solar)f(system)g(are)h(absen)m(t.)69 -b(Appli-)0 577 y(cations)43 b(include)d(the)j(emission)e(of)i(pulsar)e -(radiation)h(and)g(the)h(motions)f(of)h(the)g(solar-system)f(b)s(o)s -(dies)0 690 y(themselv)m(es.)h(When)31 b(the)g(readings)g(of)g(the)g -(observ)m(er's)h(TT)e(clo)s(c)m(k)i(are)f(lab)s(elled)e(using)g(suc)m -(h)i(a)h(co)s(ordinate)0 803 y(time,)27 b(di\013erences)g(are)g(seen)g -(b)s(ecause)f(the)h(clo)s(c)m(k)h(is)d(a\013ected)k(b)m(y)d(its)h(sp)s -(eed)e(in)h(the)h(barycen)m(tric)g(co)s(ordinate)0 916 -y(system)37 b(and)g(the)g(gra)m(vitational)g(p)s(oten)m(tial)g(in)e -(whic)m(h)h(it)h(is)f(immersed.)59 b(Equiv)-5 b(alen)m(tly)d(,)38 -b(observ)-5 b(ations)36 b(of)0 1029 y(pulsars)21 b(expressed)h(in)g(TT) -g(w)m(ould)g(displa)m(y)f(similar)f(v)-5 b(ariations)22 -b(\(quite)h(apart)g(from)f(the)i(familiar)c(ligh)m(t-time)0 -1142 y(e\013ects\).)0 1356 y(TDB)38 b(is)f(de\014ned)g(in)g(suc)m(h)g -(a)h(w)m(a)m(y)h(that)g(it)e(k)m(eeps)i(close)f(to)h(TT)e(on)h(the)g(a) -m(v)m(erage,)k(with)37 b(the)h(relativistic)0 1469 y(e\013ects)27 -b(emerging)f(as)h(quasi-p)s(erio)s(dic)22 b(di\013erences)k(of)g(maxim) -m(um)f(amplitude)f(rather)i(less)f(than)h(2)15 b(ms.)39 -b(This)0 1582 y(is)30 b(negligible)g(for)h(man)m(y)g(purp)s(oses,)f(so) -i(that)g(TT)f(can)h(act)g(as)g(a)g(p)s(erfectly)e(adequate)j(surrogate) -f(for)f(TDB)0 1695 y(in)k(most)h(cases,)j(but)c(unless)f(tak)m(en)j(in) -m(to)f(accoun)m(t)i(w)m(ould)c(sw)m(amp)i(long-term)g(analysis)e(of)j -(pulse)d(arriv)-5 b(al)0 1808 y(times)30 b(from)g(the)g(millisecond)e -(pulsars.)0 2023 y(Most)j(of)f(the)g(v)-5 b(ariation)29 -b(b)s(et)m(w)m(een)h(TDB)g(and)f(TT)g(comes)i(from)e(the)h(ellipticit)m -(y)d(of)j(the)g(Earth's)g(orbit;)f(the)0 2136 y(TT)g(clo)s(c)m(k's)i -(sp)s(eed)e(and)h(gra)m(vitational)g(p)s(oten)m(tial)f(v)-5 -b(ary)30 b(sligh)m(tly)f(during)f(the)i(course)g(of)g(the)h(y)m(ear,)g -(and)e(as)0 2248 y(a)k(consequence)f(its)g(rate)h(as)f(seen)h(from)e -(an)h(outside)g(observ)m(er)g(v)-5 b(aries)32 b(due)f(to)i(transv)m -(erse)g(Doppler)e(e\013ect)0 2361 y(and)i(gra)m(vitational)g(redshift.) -47 b(The)33 b(main)f(comp)s(onen)m(t)i(is)e(a)i(sin)m(usoidal)c(v)-5 -b(ariation)33 b(of)g(amplitude)e(0)3542 2328 y Fu(s)3547 -2361 y Fl(:)p FD(0017;)0 2474 y(higher)j(harmonics,)h(and)g(terms)g -(caused)h(b)m(y)f(Mo)s(on)g(and)g(planets,)h(lie)e(t)m(w)m(o)j(orders)d -(of)i(magnitude)e(b)s(elo)m(w)0 2587 y(this)29 b(dominan)m(t)h(ann)m -(ual)f(term.)41 b(Diurnal)28 b(\(top)s(o)s(cen)m(tric\))k(terms,)e(a)h -(function)e(of)i(UT,)f(are)h(2)15 b Fl(\026)p FD(s)30 -b(or)h(less.)0 2802 y(The)f(IA)m(U)h(1976)h(resolution)d(de\014ned)g -(TDB)i(b)m(y)f(stipulating)e(that)j(TDB)p Fo(\000)p FD(TT)f(consists)g -(of)h(p)s(erio)s(dic)d(terms)0 2915 y(only)-8 b(.)37 -b(This)20 b(pro)m(vided)g(a)i(go)s(o)s(d)f(qualitativ)m(e)h -(description,)f(but)g(turned)f(out)i(to)g(con)m(tain)g(hidden)d -(assumptions)0 3028 y(ab)s(out)45 b(the)g(form)f(of)h(the)g -(solar-system)g(ephemeris)f(and)g(hence)h(lac)m(k)m(ed)h(dynamical)d -(rigour.)83 b(A)45 b(later)0 3141 y(resolution,)28 b(in)g(1991,)j(in)m -(tro)s(duced)c(new)i(co)s(ordinate)g(time)f(scales,)i(TCG)e(and)h(TCB,) -g(and)f(iden)m(ti\014ed)f(TDB)0 3254 y(as)37 b(a)f(linear)f -(transformation)g(of)i(one)f(of)h(them)f(\(TCB\))h(with)e(a)h(rate)h(c) -m(hosen)g(not)g(to)g(drift)d(from)i(TT)g(on)0 3366 y(the)43 -b(a)m(v)m(erage.)82 b(Unfortunately)42 b(ev)m(en)i(this)e(impro)m(v)m -(ed)h(de\014nition)e(has)h(pro)m(v)m(ed)i(to)g(con)m(tin)f(am)m -(biguities.)0 3479 y(The)35 b(SLALIB)g(sla)p Ft(_)p FD(R)m(CC)f -(function)g(implemen)m(ts)g(TDB)i(in)e(the)h(w)m(a)m(y)h(that)g(is)f -(most)h(consisten)m(t)f(with)f(the)0 3592 y(1976)g(de\014nition)d(and)h -(with)g(existing)f(practice.)48 b(It)33 b(pro)m(vides)f(a)h(mo)s(del)f -(of)h(TDB)p Fo(\000)p FD(TT)f(accurate)i(to)g(a)f(few)0 -3705 y(nanoseconds.)0 3920 y(Unlik)m(e)g(TDB,)h(the)h(IA)m(U)f(1991)i -(co)s(ordinate)e(time)f(scales)h(TCG)g(and)f(TCB)h(\(not)g(supp)s -(orted)e(b)m(y)i(SLALIB)0 4033 y(functions)25 b(at)j(presen)m(t\))g(do) -e(not)i(ha)m(v)m(e)g(their)e(rates)h(adjusted)g(to)g(trac)m(k)h(TT)f -(and)f(consequen)m(tly)h(gain)f(on)h(TT)0 4146 y(and)j(TDB,)h(b)m(y)f -(ab)s(out)g(0)863 4113 y Fu(s)868 4146 y Fl(:)p FD(02/y)m(ear)j(and)d -(0)1449 4113 y Fu(s)1454 4146 y Fl(:)p FD(5/y)m(ear)j(resp)s(ectiv)m -(ely)-8 b(.)0 4360 y(As)30 b(already)h(p)s(oin)m(ted)e(out,)i(the)g -(distinction)d(b)s(et)m(w)m(een)j(TT)f(and)f(TDB)i(is)f(of)h(no)f -(practical)g(imp)s(ortance)g(for)0 4473 y(most)j(purp)s(oses.)44 -b(F)-8 b(or)33 b(example)f(when)f(calling)f(sla)p Ft(_)p -FD(PRENUT)h(to)i(generate)h(a)f(precession-n)m(utation)e(ma-)0 -4586 y(trix,)d(or)h(when)e(calling)g(sla)p Ft(_)p FD(EVP)h(or)g(sla)p -Ft(_)p FD(EPV)g(to)h(predict)f(the)g(Earth's)h(p)s(osition)d(and)i(v)m -(elo)s(cit)m(y)-8 b(,)30 b(the)f(time)0 4699 y(argumen)m(t)h(is)f -(strictly)g(TDB,)h(but)f(TT)g(is)g(en)m(tirely)f(adequate)j(and)e(will) -e(require)i(m)m(uc)m(h)g(less)g(computation.)0 4914 y(The)i(time)g -(scale)h(used)f(b)m(y)g(the)h(JPL)e(solar-system)i(ephemerides)e(is)g -(called)h Fl(T)2747 4929 y Ff(eph)2892 4914 y FD(and)g(is)f(n)m -(umerically)f(the)0 5027 y(same)i(as)f(TDB.)0 5241 y(Predictions)20 -b(of)i(top)s(o)s(cen)m(tric)f(solar-system)h(phenomena)f(suc)m(h)g(as)h -(o)s(ccultations)f(and)g(eclipses)g(require)f(solar)0 -5354 y(time)35 b(UT)g(as)g(w)m(ell)f(as)i(dynamical)d(time.)55 -b(TT/TDB/ET)35 b(is)f(all)h(that)g(is)f(required)g(in)g(order)g(to)i -(compute)0 5467 y(the)28 b(geo)s(cen)m(tric)h(circumstances,)f(but)g -(if)e(horizon)h(co)s(ordinates)h(or)g(geo)s(cen)m(tric)h(parallax)e -(are)h(to)g(b)s(e)g(tac)m(kled)0 5580 y(UT)34 b(is)f(also)g(needed.)51 -b(A)34 b(rough)g(estimate)g(of)g(\001T)d(=)g(ET)22 b -Fo(\000)g FD(UT)34 b(is)f(a)m(v)-5 b(ailable)33 b(via)g(the)h(function) -f(sla)p Ft(_)p FD(DT.)0 5693 y(F)-8 b(or)31 b(a)g(giv)m(en)f(ep)s(o)s -(c)m(h)g(\()p Fq(e.g.)g FD(1650\))j(this)c(returns)g(an)i(appro)m -(ximation)e(to)i(\001T)f(in)f(seconds.)p eop -%%Page: 196 198 -196 197 bop 0 52 a FD(196)0 351 y Fv(4.16)112 b(Calendars)0 -565 y FD(The)30 b(ordinary)f Fq(Gr)-5 b(e)g(gorian)35 -b(Calendar)f(Date)p FD(,)d(together)h(with)d(a)i(time)g(of)f(da)m(y)-8 -b(,)32 b(can)f(b)s(e)f(used)f(to)i(express)g(an)0 678 -y(ep)s(o)s(c)m(h)38 b(in)e(an)m(y)j(desired)d(time)i(scale.)63 -b(F)-8 b(or)39 b(man)m(y)f(purp)s(oses,)g(ho)m(w)m(ev)m(er,)k(a)c(con)m -(tin)m(uous)g(coun)m(t)g(of)g(da)m(ys)g(is)0 791 y(more)32 -b(con)m(v)m(enien)m(t,)h(and)e(for)g(this)g(purp)s(ose)f(the)h(system)h -(of)g Fq(Julian)i(Day)f(Numb)-5 b(er)42 b FD(can)32 b(b)s(e)f(used.)43 -b(JD)32 b(zero)0 904 y(is)f(lo)s(cated)h(ab)s(out)f(7000)i(y)m(ears)g -(ago,)g(w)m(ell)e(b)s(efore)g(the)h(historical)e(era,)i(and)f(is)g -(formally)f(de\014ned)g(in)h(terms)0 1017 y(of)k(Green)m(wic)m(h)h(no)s -(on;)h(for)e(example)g(Julian)e(Da)m(y)j(Num)m(b)s(er)f(2449444)j(b)s -(egan)d(at)h(no)s(on)f(on)g(1994)i(April)c(1.)0 1130 -y Fq(Julian)d(Date)k FD(is)26 b(the)h(same)g(system)g(but)g(with)f(a)h -(fractional)f(part)h(app)s(ended;)g(Julian)e(Date)j(2449443.5)j(w)m(as) -0 1242 y(the)i(midnigh)m(t)d(on)i(whic)m(h)f(1994)j(April)d(1)h -(commenced.)48 b(Because)33 b(of)g(the)f(un)m(wieldy)e(size)i(of)h -(Julian)d(Dates)0 1355 y(and)36 b(the)g(a)m(wkw)m(ardness)h(of)f(the)h -(half-da)m(y)f(o\013set,)j(it)d(is)g(accepted)h(practice)g(to)g(remo)m -(v)m(e)h(the)f(leading)e(`24')0 1468 y(and)27 b(the)h(trailing)e(`.5',) -j(pro)s(ducing)c(what)j(is)f(called)f(the)i Fq(Mo)-5 -b(di\014e)g(d)32 b(Julian)e(Date)p FD(:)39 b(MJD)28 b(=)g(JD)p -Fo(\000)p FD(2400000)p Fl(:)p FD(5.)0 1581 y(SLALIB)38 -b(routines)f(use)h(MJD,)h(as)g(opp)s(osed)f(to)h(JD,)g(throughout,)h -(largely)e(to)h(a)m(v)m(oid)g(loss)e(of)i(precision.)0 -1694 y(1994)32 b(April)c(1)j(commenced)g(at)g(MJD)g(49443.0.)0 -1849 y(Despite)26 b(JD)g(\(and)f(hence)h(MJD\))h(b)s(eing)d(de\014ned)h -(in)f(terms)i(of)g(\(in)e(e\013ect\))k(UT,)e(the)g(system)g(can)g(b)s -(e)f(used)g(in)0 1962 y(conjunction)30 b(with)g(other)i(time)f(scales)g -(suc)m(h)g(as)h(T)-8 b(AI,)31 b(TT)g(and)g(TDB)g(\(and)g(ev)m(en)h -(sidereal)e(time)h(through)0 2075 y(the)g(concept)g(of)f -Fq(Gr)-5 b(e)g(enwich)35 b(Sider)-5 b(e)g(al)34 b(Date)p -FD(\).)41 b(Ho)m(w)m(ev)m(er,)33 b(it)d(is)f(improp)s(er)f(to)j -(express)f(a)h(UTC)f(as)g(a)h(JD)f(or)0 2188 y(MJD)h(b)s(ecause)f(of)h -(leap)f(seconds.)0 2343 y(SLALIB)43 b(has)f(six)g(routines)g(for)h(con) -m(v)m(erting)h(to)g(and)e(from)h(dates)h(in)d(the)j(Gregorian)f -(calendar.)78 b(The)0 2456 y(routines)43 b(sla)p Ft(_)p -FD(CLDJ)g(and)g(sla)p Ft(_)p FD(CALDJ)h(b)s(oth)f(con)m(v)m(ert)j(a)e -(calendar)g(date)h(in)m(to)f(an)g(MJD,)h(the)f(former)0 -2569 y(in)m(terpreting)38 b(y)m(ears)j(b)s(et)m(w)m(een)g(0)f(and)f(99) -i(as)f(1st)g(cen)m(tury)g(and)g(the)g(latter)g(as)g(late)g(20th)h(or)f -(early)f(21st)0 2682 y(cen)m(tury)-8 b(.)76 b(The)42 -b(routines)f(sla)p Ft(_)p FD(DJCL)g(and)g(sla)p Ft(_)p -FD(DJCAL)g(b)s(oth)h(con)m(v)m(ert)h(an)f(MJD)h(in)m(to)f(calendar)f(y) -m(ear,)0 2795 y(mon)m(th,)24 b(da)m(y)e(and)g(fraction)g(of)g(a)h(da)m -(y;)i(the)d(latter)h(p)s(erforms)d(rounding)g(to)j(a)g(sp)s(eci\014ed)d -(precision,)i(imp)s(ortan)m(t)0 2907 y(to)35 b(a)m(v)m(oid)f(dates)g -(lik)m(e)g(`)p Ft(2005)47 b(04)g(01.***)p FD(')32 b(app)s(earing)h(in)f -(messages.)53 b(Some)34 b(of)g(SLALIB's)f(lo)m(w-precision)0 -3020 y(ephemeris)g(routines)h(\(sla)p Ft(_)p FD(EAR)-8 -b(TH,)34 b(sla)p Ft(_)p FD(MOON)g(and)g(sla)p Ft(_)p -FD(ECOR\))f(w)m(ork)i(in)e(terms)i(of)g(y)m(ear)g(plus)e(da)m(y-)0 -3133 y(in-y)m(ear)38 b(\(where)f(da)m(y)h(1)g(=)f(Jan)m(uary)g(1st,)k -(at)d(least)g(for)f(the)h(mo)s(dern)e(era\).)63 b(This)36 -b(form)h(of)h(date)g(can)g(b)s(e)0 3246 y(generated)25 -b(b)m(y)f(calling)e(sla)p Ft(_)p FD(CAL)-8 b(YD)24 b(\(whic)m(h)e -(defaults)h(y)m(ears)i(0-99)g(in)m(to)f(1950-2049\))k(or)c(sla)p -Ft(_)p FD(CL)-8 b(YD)23 b(\(whic)m(h)0 3359 y(co)m(v)m(ers)32 -b(the)f(full)d(range)i(from)g(prehistoric)f(times\).)0 -3641 y Fv(4.17)112 b(Geo)s(cen)m(tric)36 b(Co)s(ordinates)0 -3855 y FD(The)27 b(lo)s(cation)g(of)h(the)g(observ)m(er)g(on)g(the)g -(Earth)f(is)g(signi\014can)m(t)f(in)h(a)h(n)m(um)m(b)s(er)e(of)i(w)m(a) -m(ys.)41 b(The)27 b(most)h(ob)m(vious,)0 3968 y(of)f(course,)g(is)f -(the)g(e\013ect)i(of)f(longitude)e(and)h(latitude)f(on)h(the)h(observ)m -(ed)f([)15 b Fl(Az)t(;)g(E)5 b(l)30 b FD(])d(of)f(a)h(star.)40 -b(Less)26 b(ob)m(vious)0 4081 y(is)k(the)h(need)g(to)h(allo)m(w)e(for)h -(geo)s(cen)m(tric)h(parallax)e(when)g(\014nding)f(the)i(Mo)s(on)g(with) -f(a)h(telescop)s(e)h(\(and)e(when)0 4193 y(doing)c(high-precision)e(w)m -(ork)j(in)m(v)m(olving)f(the)h(Sun)e(or)i(planets\),)h(and)e(the)h -(need)g(to)h(correct)g(observ)m(ed)f(radial)0 4306 y(v)m(elo)s(cities)j -(and)g(apparen)m(t)g(pulsar)f(p)s(erio)s(ds)f(for)i(the)g(e\013ects)i -(of)f(the)f(Earth's)g(rotation.)0 4461 y(The)38 b(SLALIB)g(routine)g -(sla)p Ft(_)p FD(OBS)f(supplies)f(details)h(of)i(groundbased)e(observ) --5 b(atories)39 b(from)f(an)h(in)m(ternal)0 4574 y(list.)g(This)27 -b(is)g(useful)g(when)h(writing)f(applications)g(that)i(apply)e(to)j -(more)f(than)f(one)h(observ)-5 b(atory;)30 b(the)f(user)0 -4687 y(can)h(en)m(ter)g(a)g(brief)e(name,)i(or)f(bro)m(wse)h(through)e -(a)i(list,)f(and)g(b)s(e)f(spared)h(the)h(trouble)e(of)i(t)m(yping)f -(in)f(the)i(full)0 4800 y(latitude,)c(longitude)e Fq(etc)p -FD(.)39 b(The)26 b(follo)m(wing)e(F)-8 b(ortran)27 b(co)s(de)f(returns) -e(the)i(full)e(name,)j(longitude)d(and)h(latitude)0 4913 -y(of)31 b(a)f(sp)s(eci\014ed)f(observ)-5 b(atory:)573 -5145 y Ft(CHARACTER)45 b(IDENT*10,NAME*40)573 5258 y(DOUBLE)h -(PRECISION)f(W,P,H)620 5370 y(:)573 5483 y(CALL)h -(sla_OBS\(0,IDENT,NAME,W,P,H)o(\))573 5596 y(IF)h(\(NAME.EQ.'?'\))d -(...)620 b(\(not)46 b(recognized\))p eop -%%Page: 197 199 -197 198 bop 0 52 a Fw(SUN/67.70)3206 b FD(197)0 351 y(\(Bew)m(are)24 -b(of)e(the)g(longitude)f(sign)g(con)m(v)m(en)m(tion,)k(whic)m(h)c(is)g -(w)m(est)h(+v)m(e)h(for)f(historical)e(reasons.\))38 -b(The)22 b(follo)m(wing)0 464 y(lists)29 b(all)g(the)i(supp)s(orted)d -(observ)-5 b(atories:)620 732 y Ft(:)573 845 y(INTEGER)46 -b(N)620 958 y(:)573 1071 y(N=1)573 1184 y(NAME=')g(')573 -1297 y(DO)h(WHILE)f(\(NAME.NE.'?'\))716 1410 y(CALL)h -(sla_OBS\(N,IDENT,NAME,W,)o(P,H)o(\))716 1523 y(IF)g(\(NAME.NE.'?'\))d -(THEN)859 1636 y(WRITE)i(\(*,'\(1X,I3,4X,A,4X,A\)'\))c(N,IDENT,NAME)859 -1749 y(N=N+1)716 1861 y(END)47 b(IF)573 1974 y(END)g(DO)0 -2243 y FD(The)c(routine)f(sla)p Ft(_)p FD(GEOC)h(con)m(v)m(erts)i(a)f -Fq(ge)-5 b(o)g(detic)45 b(latitude)51 b FD(\(one)45 b(referred)d(to)i -(the)g(lo)s(cal)f(horizon\))g(to)h(a)0 2356 y(geo)s(cen)m(tric)39 -b(p)s(osition,)e(taking)h(in)m(to)g(accoun)m(t)h(the)e(Earth's)h -(oblateness)f(and)g(also)h(the)g(heigh)m(t)f(ab)s(o)m(v)m(e)i(sea)0 -2468 y(lev)m(el)c(of)h(the)g(observ)m(er.)56 b(The)35 -b(results)g(are)h(expressed)f(in)f(v)m(ector)j(form,)g(namely)e(as)h -(the)f(distance)h(of)f(the)0 2581 y(observ)m(er)43 b(from)f(the)h(spin) -e(axis)h(and)g(equator)h(resp)s(ectiv)m(ely)-8 b(.)78 -b(The)42 b Fq(ge)-5 b(o)g(c)g(entric)45 b(latitude)51 -b FD(can)43 b(b)s(e)f(found)0 2694 y(b)s(e)37 b(ev)-5 -b(aluating)38 b(A)-8 b(T)g(AN2)39 b(of)f(the)h(t)m(w)m(o)g(n)m(um)m(b)s -(ers.)62 b(A)38 b(full)e(3-D)j(v)m(ector)h(description)c(of)i(the)g(p)s -(osition)e(and)0 2807 y(v)m(elo)s(cit)m(y)i(of)f(the)h(observ)m(er)g -(is)e(a)m(v)-5 b(ailable)37 b(through)f(the)i(routine)e(sla)p -Ft(_)p FD(PV)m(OBS.)h(F)-8 b(or)38 b(a)g(sp)s(eci\014ed)e(geo)s(detic)0 -2920 y(latitude,)24 b(heigh)m(t)g(ab)s(o)m(v)m(e)h(sea)f(lev)m(el,)i -(and)d(lo)s(cal)g(sidereal)f(time,)j(sla)p Ft(_)p FD(PV)m(OBS)e -(generates)j(a)e(6-elemen)m(t)h(v)m(ector)0 3033 y(con)m(taining)32 -b(the)h(p)s(osition)e(and)h(v)m(elo)s(cit)m(y)h(with)e(resp)s(ect)i(to) -g(the)g(true)f(equator)i(and)e(equino)m(x)g(of)g(date)i(\()p -Fq(i.e.)0 3146 y FD(compatible)k(with)f(apparen)m(t)h([)15 -b Fl(\013;)g(\016)20 b FD(]\).)66 b(F)-8 b(or)39 b(some)f(applications) -f(it)h(will)e(b)s(e)h(necessary)i(to)g(con)m(v)m(ert)h(to)f(a)0 -3259 y(mean)31 b([)15 b Fl(\013;)g(\016)20 b FD(])30 -b(frame)h(\(notably)f(FK5,)h(J2000\))i(b)m(y)d(m)m(ultiplying)d(elemen) -m(ts)k(1-3)g(and)f(4-6)i(resp)s(ectiv)m(ely)e(with)0 -3372 y(the)i(appropriate)e(precession)h(matrix.)44 b(\(In)31 -b(theory)h(an)f(additional)f(correction)i(to)g(the)g(v)m(elo)s(cit)m(y) -g(v)m(ector)h(is)0 3485 y(needed)d(to)h(allo)m(w)f(for)g(di\013eren)m -(tial)f(precession,)h(but)f(this)h(correction)g(is)g(alw)m(a)m(ys)h -(negligible.\))0 3649 y(See)g(also)f(the)h(discussion)c(of)k(the)f -(routine)g(sla)p Ft(_)p FD(R)-10 b(VER)m(OT,)29 b(later.)0 -3949 y Fv(4.18)112 b(Ephemerides)0 4173 y FD(SLALIB)34 -b(includes)f(routines)h(for)g(generating)i(p)s(ositions)d(and)h(v)m -(elo)s(cities)g(of)h(Solar-System)g(b)s(o)s(dies.)52 -b(The)0 4286 y(accuracy)43 b(ob)5 b(jectiv)m(es)43 b(are)f(mo)s(dest,)j -(and)c(the)h(SLALIB)g(facilities)e(do)h(not)i(attempt)g(to)f(comp)s -(ete)h(with)0 4399 y(precomputed)28 b(ephemerides)f(suc)m(h)h(as)g -(those)h(pro)m(vided)e(b)m(y)h(JPL,)g(or)h(with)e(mo)s(dels)g(con)m -(taining)h(thousands)0 4512 y(of)23 b(terms.)38 b(It)23 -b(is)f(also)h(w)m(orth)f(noting)h(that)g(SLALIB's)f(v)m(ery)i(accurate) -g(star)f(co)s(ordinate)f(con)m(v)m(ersion)i(routines)0 -4625 y(are)37 b(not)g(strictly)f(applicable)f(to)i(solar-system)g -(cases,)j(though)c(they)h(are)g(adequate)h(for)f(most)g(practical)0 -4738 y(purp)s(oses.)0 4903 y(Earth/Sun)j(ephemerides)f(can)i(b)s(e)f -(generated)i(using)e(the)h(routines)f(sla)p Ft(_)p FD(EVP)g(and)g(sla)p -Ft(_)p FD(EPV,)g(eac)m(h)i(of)0 5016 y(whic)m(h)g(predict)g(Earth)h(p)s -(osition)e(and)i(v)m(elo)s(cit)m(y)g(with)f(resp)s(ect)h(to)h(b)s(oth)e -(the)i(solar-system)f(barycen)m(tre)0 5128 y(and)33 b(the)g(Sun.)48 -b(The)32 b(t)m(w)m(o)j(routines)d(o\013er)i(di\013eren)m(t)e -(trade-o\013s)i(b)s(et)m(w)m(een)g(accuracy)h(and)d(execution)i(time.)0 -5241 y(F)-8 b(or)38 b(most)f(purp)s(oses,)g(sla)p Ft(_)p -FD(EVP)f(is)g(adequate:)55 b(maxim)m(um)36 b(v)m(elo)s(cit)m(y)h(error) -g(is)f(0.42)i(metres)f(p)s(er)f(second;)0 5354 y(maxim)m(um)25 -b(helio)s(cen)m(tric)g(p)s(osition)f(error)h(is)g(1600)j(km)e(\(equiv) --5 b(alen)m(t)25 b(to)i(ab)s(out)f(2)2771 5317 y Fk(0)l(0)2837 -5354 y FD(at)h(1)f(A)m(U\),)i(with)c(barycen-)0 5467 -y(tric)39 b(p)s(osition)f(errors)i(ab)s(out)f(4)i(times)e(w)m(orse.)70 -b(The)39 b(larger)g(and)h(slo)m(w)m(er)g(sla)p Ft(_)p -FD(EPV)f(deliv)m(ers)f(3)p Fl(\033)44 b FD(results)0 -5580 y(of)36 b(0.005)i(metres)f(p)s(er)d(second)j(in)d(v)m(elo)s(cit)m -(y)j(and)e(15)i(km)f(in)e(p)s(osition,)i(and)g(is)f(particularly)e -(useful)h(when)0 5693 y(predicting)22 b(apparen)m(t)i(directions)f(of)h -(near-Earth)g(ob)5 b(jects.)39 b(\(The)24 b(Sun's)f(p)s(osition)f(as)i -(seen)g(from)g(the)g(Earth)p eop -%%Page: 198 200 -198 199 bop 0 52 a FD(198)0 351 y(can,)39 b(of)e(course,)i(b)s(e)d -(obtained)g(simply)f(b)m(y)i(rev)m(ersing)f(the)h(signs)f(of)h(the)g -(Cartesian)f(comp)s(onen)m(ts)h(of)g(the)0 464 y(Earth)15 -b(:)g(Sun)29 b(v)m(ector.\))0 630 y(Geo)s(cen)m(tric)34 -b(Mo)s(on)f(ephemerides)f(are)h(a)m(v)-5 b(ailable)33 -b(from)f(sla)p Ft(_)p FD(DMOON,)h(whic)m(h)f(predicts)g(the)h(Mo)s -(on's)h(p)s(o-)0 743 y(sition)27 b(and)h(v)m(elo)s(cit)m(y)i(with)d -(resp)s(ect)i(to)g(the)g(Earth's)f(cen)m(tre.)42 b(Direction)28 -b(accuracy)i(is)e(usually)e(b)s(etter)j(than)0 856 y(10)i(km)f(\(5)350 -819 y Fk(0)m(0)391 856 y FD(\))h(and)f(distance)g(accuracy)h(a)g -(little)e(w)m(orse.)0 1023 y(Lo)m(w)m(er-precision)23 -b(but)h(faster)g(predictions)e(for)i(the)g(Sun)f(and)g(Mo)s(on)i(can)f -(b)s(e)f(made)h(b)m(y)g(calling)f(sla)p Ft(_)p FD(EAR)-8 -b(TH)0 1135 y(and)28 b(sla)p Ft(_)p FD(MOON.)f(Both)i(are)f(single)f -(precision)g(and)g(accept)j(dates)e(in)f(the)i(form)e(of)i(y)m(ear,)g -(da)m(y-in-y)m(ear)g(and)0 1248 y(fraction)40 b(of)f(da)m(y)i -(\(starting)e(from)h(a)g(calendar)f(date)i(y)m(ou)f(need)f(to)i(call)e -(sla)p Ft(_)p FD(CL)-8 b(YD)39 b(or)h(sla)p Ft(_)p FD(CAL)-8 -b(YD)40 b(to)0 1361 y(get)34 b(the)g(required)d(y)m(ear)j(and)f(da)m -(y\).)49 b(The)33 b(sla)p Ft(_)p FD(EAR)-8 b(TH)33 b(routine)f(returns) -g(the)h(helio)s(cen)m(tric)f(p)s(osition)f(and)0 1474 -y(v)m(elo)s(cit)m(y)e(of)g(the)g(Earth's)g(cen)m(tre)h(for)e(the)h -(mean)g(equator)g(and)f(equino)m(x)h(of)g(date.)40 b(The)29 -b(accuracy)h(is)d(b)s(etter)0 1587 y(than)37 b(20,000)j(km)c(in)g(p)s -(osition)g(and)g(10)i(metres)g(p)s(er)e(second)h(in)f(sp)s(eed.)60 -b(The)37 b(p)s(osition)e(and)i(v)m(elo)s(cit)m(y)g(of)0 -1700 y(the)d(Mo)s(on)h(with)d(resp)s(ect)j(to)f(the)h(Earth's)f(cen)m -(tre)h(for)f(the)g(mean)g(equator)h(and)f(ecliptic)f(of)h(date)h(can)f -(b)s(e)0 1813 y(obtained)41 b(b)m(y)h(calling)e(sla)p -Ft(_)p FD(MOON.)h(The)g(p)s(ositional)e(accuracy)k(is)e(b)s(etter)g -(than)h(30)3043 1776 y Fk(0)l(0)3125 1813 y FD(in)f(direction)f(and)0 -1926 y(1000)32 b(km)e(in)f(distance.)0 2092 y(Appro)m(ximate)35 -b(ephemerides)f(for)h(all)f(the)i(ma)5 b(jor)35 b(planets)f(can)i(b)s -(e)e(generated)j(b)m(y)e(calling)f(sla)p Ft(_)p FD(PLANET)0 -2205 y(or)k(sla)p Ft(_)p FD(RDPLAN.)f(These)g(routines)g(o\013er)h -(arcmin)m(ute)f(accuracy)i(\(m)m(uc)m(h)f(b)s(etter)f(for)h(the)f -(inner)f(planets)0 2318 y(and)f(for)h(Pluto\))g(o)m(v)m(er)h(a)f(span)f -(of)h(sev)m(eral)h(millennia)32 b(\(but)k(only)f Fo(\006)p -FD(100)i(y)m(ears)f(for)g(Pluto\).)57 b(The)35 b(routine)0 -2431 y(sla)p Ft(_)p FD(PLANET)20 b(pro)s(duces)h(helio)s(cen)m(tric)f -(p)s(osition)g(and)h(v)m(elo)s(cit)m(y)h(in)e(the)i(form)f(of)g -(equatorial)h([)15 b Fl(x;)g(y)s(;)g(z)t(;)32 b FD(_)-42 -b Fl(x)q(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 -b FD(])0 2544 y(for)26 b(the)h(mean)g(equator)g(and)f(equino)m(x)g(of)h -(J2000.)41 b(The)26 b(v)m(ectors)i(pro)s(duced)d(b)m(y)i(sla)p -Ft(_)p FD(PLANET)e(can)i(b)s(e)f(used)0 2657 y(in)35 -b(a)i(v)-5 b(ariet)m(y)36 b(of)h(w)m(a)m(ys)g(according)f(to)h(the)g -(requiremen)m(ts)e(of)i(the)f(application)f(concerned.)59 -b(The)35 b(routine)0 2770 y(sla)p Ft(_)p FD(RDPLAN)30 -b(uses)f(sla)p Ft(_)p FD(PLANET)g(and)g(sla)p Ft(_)p -FD(DMOON)g(to)i(deal)e(with)g(the)h(common)g(case)h(of)f(predicting)0 -2883 y(a)h(planet's)f(apparen)m(t)g([)15 b Fl(\013;)g(\016)21 -b FD(])30 b(and)g(angular)f(size)i(as)f(seen)h(b)m(y)f(a)h(terrestrial) -e(observ)m(er.)0 3049 y(Note)f(that)f(in)e(predicting)g(the)i(p)s -(osition)d(in)i(the)g(sky)h(of)f(a)h(solar-system)g(b)s(o)s(dy)e(it)h -(is)f(necessary)i(to)h(allo)m(w)e(for)0 3162 y(geo)s(cen)m(tric)35 -b(parallax.)50 b(This)32 b(correction)i(is)f Fq(essential)44 -b FD(in)32 b(the)i(case)h(of)f(the)g(Mo)s(on,)h(where)e(the)h(observ)m -(er's)0 3275 y(p)s(osition)41 b(on)i(the)g(Earth)g(can)g(a\013ect)h -(the)f(Mo)s(on's)h([)15 b Fl(\013;)g(\016)20 b FD(])43 -b(b)m(y)g(up)f(to)h(1)2593 3242 y Fp(\016)2633 3275 y -FD(.)78 b(The)43 b(calculation)f(can)h(most)0 3388 y(con)m(v)m(enien)m -(tly)28 b(b)s(e)e(done)h(b)m(y)g(calling)f(sla)p Ft(_)p -FD(PV)m(OBS)h(and)f(subtracting)h(the)g(resulting)e(6-v)m(ector)30 -b(from)d(the)g(one)0 3500 y(pro)s(duced)i(b)m(y)h(sla)p -Ft(_)p FD(DMOON,)g(as)h(is)e(demonstrated)i(b)m(y)f(the)h(follo)m(wing) -d(example:)286 3774 y Ft(*)96 b(Demonstrate)44 b(the)j(size)g(of)g(the) -g(geocentric)e(parallax)g(correction)286 3886 y(*)96 -b(in)47 b(the)g(case)f(of)h(the)g(Moon.)94 b(The)47 b(test)g(example)f -(is)h(for)g(the)g(AAT,)286 3999 y(*)96 b(before)46 b(midnight,)f(in)i -(summer,)f(near)h(first)f(quarter.)573 4225 y(IMPLICIT)f(NONE)573 -4338 y(CHARACTER)g(NAME*40,SH,SD)573 4451 y(INTEGER)h -(J,I,IHMSF\(4\),IDMSF\(4\))573 4564 y(DOUBLE)g(PRECISION)f -(SLONGW,SLAT,H,DJUTC,FDUTC)o(,DJ)o(UT1,)o(DJTT)o(,ST)o(L,)525 -4677 y(:)811 b(RMATN\(3,3\),PMM\(6\),PMT\(6\),)o(RM,)o(DM,P)o(VO\(6)o -(\),T)o(L)573 4790 y(DOUBLE)46 b(PRECISION)f(sla_DTT,sla_GMST,sla_EQEQ) -o(X,s)o(la_D)o(RANR)o(M)286 5016 y(*)96 b(Get)46 b(AAT)h(longitude)f -(and)h(latitude)e(in)i(radians)f(and)h(height)f(in)h(metres)573 -5128 y(CALL)f(sla_OBS\(0,'AAT',NAME,SLONG)o(W,S)o(LAT,)o(H\))286 -5354 y(*)96 b(UTC)46 b(\(1992)h(January)f(13,)h(11)g(13)g(59\))g(to)g -(MJD)573 5467 y(CALL)f(sla_CLDJ\(1992,1,13,DJUTC,J)o(\))573 -5580 y(CALL)g(sla_DTF2D\(11,13,59.0D0,FDU)o(TC,)o(J\))573 -5693 y(DJUTC=DJUTC+FDUTC)p eop -%%Page: 199 201 -199 200 bop 0 52 a Fw(SUN/67.70)3206 b FD(199)286 464 -y Ft(*)96 b(UT1)46 b(\(UT1-UTC)g(value)g(of)i(-0.152)e(sec)h(is)g(from) -f(IERS)h(Bulletin)f(B\))573 577 y(DJUT1=DJUTC+\(-0.152D0\)/)o(8640)o -(0D0)286 803 y(*)96 b(TT)573 916 y(DJTT=DJUTC+sla_DTT\(DJUT)o(C\)/8)o -(6400)o(D0)286 1142 y(*)g(Local)46 b(apparent)f(sidereal)h(time)573 -1255 y(STL=sla_GMST\(DJUT1\)-SLO)o(NGW+)o(sla_)o(EQE)o(QX\(D)o(JTT\)) -286 1480 y(*)96 b(Geocentric)45 b(position/velocity)e(of)k(Moon)f -(\(mean)h(of)g(date\))573 1593 y(CALL)f(sla_DMOON\(DJTT,PMM\))286 -1819 y(*)96 b(Nutation)45 b(to)i(true)g(equinox)f(of)h(date)573 -1932 y(CALL)f(sla_NUT\(DJTT,RMATN\))573 2045 y(CALL)g -(sla_DMXV\(RMATN,PMM,PMT\))573 2158 y(CALL)g -(sla_DMXV\(RMATN,PMM\(4\),PMT\()o(4\)\))286 2384 y(*)96 -b(Report)46 b(geocentric)f(HA,Dec)573 2497 y(CALL)h -(sla_DCC2S\(PMT,RM,DM\))573 2609 y(CALL)g(sla_DR2TF\(2,sla_DRANRM\(STL) -o(-RM)o(\),SH)o(,IHM)o(SF\))573 2722 y(CALL)g -(sla_DR2AF\(1,DM,SD,IDMSF\))573 2835 y(WRITE)g(\(*,'\(1X,'')f -(geocentric:'',2X,A,I2.2,2)o(I3.)o(2,'')o(.'',)o(I2.)o(2,'/)o(/)525 -2948 y(:)1432 b('1X,A,I2.2,2I3.2,''.'',)o(I1\))o('\))525 -3061 y(:)2291 b(SH,IHMSF,SD,IDMSF)286 3287 y(*)96 b(Geocentric)45 -b(position)g(of)i(observer)f(\(true)g(equator)g(and)h(equinox)f(of)h -(date\))573 3400 y(CALL)f(sla_PVOBS\(SLAT,H,STL,PVO\))286 -3626 y(*)96 b(Place)46 b(origin)g(at)h(observer)573 3739 -y(DO)g(I=1,6)716 3851 y(PMT\(I\)=PMT\(I\)-PVO\(I\))573 -3964 y(END)g(DO)286 4190 y(*)96 b(Allow)46 b(for)h(planetary)e -(aberration)573 4303 y(TL=499.004782D0*SQRT\(PM)o(T\(1\))o(**2+)o(PMT)o -(\(2\)*)o(*2+P)o(MT\()o(3\)**)o(2\))573 4416 y(DO)i(I=1,3)716 -4529 y(PMT\(I\)=PMT\(I\)-TL*PMT\(I+3)o(\))573 4642 y(END)g(DO)286 -4868 y(*)96 b(Report)46 b(topocentric)e(HA,Dec)573 4981 -y(CALL)i(sla_DCC2S\(PMT,RM,DM\))573 5093 y(CALL)g -(sla_DR2TF\(2,sla_DRANRM\(STL)o(-RM)o(\),SH)o(,IHM)o(SF\))573 -5206 y(CALL)g(sla_DR2AF\(1,DM,SD,IDMSF\))573 5319 y(WRITE)g -(\(*,'\(1X,''topocentric:'',)o(2X,)o(A,I2)o(.2,2)o(I3.)o(2,'')o(.'',)o -(I2.)o(2,'/)o(/)525 5432 y(:)1432 b('1X,A,I2.2,2I3.2,''.'',)o(I1\))o -('\))525 5545 y(:)2291 b(SH,IHMSF,SD,IDMSF)573 5658 y(END)p -eop -%%Page: 200 202 -200 201 bop 0 52 a FD(200)0 351 y(The)30 b(output)g(pro)s(duced)f(is)g -(as)i(follo)m(ws:)334 610 y Ft(geocentric:)93 b(+03)46 -b(06)i(55.55)e(+15)h(03)g(38.8)286 723 y(topocentric:)93 -b(+03)46 b(09)i(23.76)e(+15)h(40)g(51.4)0 982 y FD(\(An)26 -b(easier)g(but)g(less)g(instructiv)m(e)f(metho)s(d)g(of)i(estimating)f -(the)g(top)s(o)s(cen)m(tric)h(apparen)m(t)f(place)g(of)h(the)f(Mo)s(on) -0 1095 y(is)j(to)j(call)d(the)i(routine)e(sla)p Ft(_)p -FD(RDPLAN.\))0 1257 y(As)24 b(an)h(example)f(of)g(using)f(sla)p -Ft(_)p FD(PLANET,)h(the)g(follo)m(wing)f(program)h(estimates)h(the)g -(geo)s(cen)m(tric)h(separation)0 1369 y(b)s(et)m(w)m(een)39 -b(V)-8 b(en)m(us)39 b(and)g(Jupiter)e(during)f(a)j(close)g(conjunction) -f(in)f(2)16 b(BC,)39 b(whic)m(h)f(is)f(a)i(star-of-Bethlehem)0 -1482 y(candidate:)286 1741 y Ft(*)96 b(Compute)45 b(time)i(and)g -(minimum)f(geocentric)f(apparent)g(separation)286 1854 -y(*)96 b(between)45 b(Venus)i(and)g(Jupiter)e(during)i(the)f(close)h -(conjunction)e(of)i(2)g(BC.)573 2080 y(IMPLICIT)e(NONE)573 -2306 y(DOUBLE)h(PRECISION)f(SEPMIN,DJD0,FD,DJD,DJDM,P)o(V\(6)o(\),RM)o -(ATP\()o(3,3)o(\),)525 2419 y(:)811 b(PVM\(6\),PVE\(6\),TL,RV,DV,RJ)o -(,DJ)o(,SEP)573 2532 y(INTEGER)46 b(IHOUR,IMIN,J,I,IHMIN,IM)o(MIN)573 -2644 y(DOUBLE)g(PRECISION)f(sla_EPJ,sla_DSEP)286 2983 -y(*)96 b(Search)46 b(for)h(closest)e(approach)h(on)h(the)g(given)f(day) -573 3096 y(DJD0=1720859.5D0)573 3209 y(SEPMIN=1D10)573 -3322 y(DO)h(IHOUR=20,22)716 3435 y(DO)g(IMIN=0,59)859 -3548 y(CALL)g(sla_DTF2D\(IHOUR,IMIN,0D)o(0,FD)o(,J\))286 -3774 y(*)382 b(Julian)46 b(date)h(and)g(MJD)859 3886 -y(DJD=DJD0+FD)859 3999 y(DJDM=DJD-2400000.5D0)286 4225 -y(*)382 b(Earth)46 b(to)h(Moon)g(\(mean)f(of)i(date\))859 -4338 y(CALL)f(sla_DMOON\(DJDM,PV\))286 4564 y(*)382 b(Precess)46 -b(Moon)g(position)g(to)h(J2000)859 4677 y(CALL)g -(sla_PRECL\(sla_EPJ\(DJDM\))o(,200)o(0D0,)o(RMA)o(TP\))859 -4790 y(CALL)g(sla_DMXV\(RMATP,PV,PVM\))286 5016 y(*)382 -b(Sun)47 b(to)g(Earth-Moon)e(Barycentre)g(\(mean)h(J2000\))859 -5128 y(CALL)h(sla_PLANET\(DJDM,3,PVE,J)o(\))286 5354 -y(*)382 b(Correct)46 b(from)g(EMB)h(to)g(Earth)859 5467 -y(DO)g(I=1,3)1002 5580 y(PVE\(I\)=PVE\(I\)-0.012150581)o(D0*P)o(VM\(I)o -(\))859 5693 y(END)g(DO)p eop -%%Page: 201 203 -201 202 bop 0 52 a Fw(SUN/67.70)3206 b FD(201)286 464 -y Ft(*)382 b(Sun)47 b(to)g(Venus)859 577 y(CALL)g -(sla_PLANET\(DJDM,2,PV,J\))286 803 y(*)382 b(Earth)46 -b(to)h(Venus)859 916 y(DO)g(I=1,6)1002 1029 y(PV\(I\)=PV\(I\)-PVE\(I\)) -859 1142 y(END)g(DO)286 1367 y(*)382 b(Light)46 b(time)h(to)g(Venus)f -(\(sec\))859 1480 y(TL=499.004782D0*SQRT\(\(PV\()o(1\)-)o(PVE\()o -(1\)\)*)o(*2+)525 1593 y(:)1288 b(\(PV\(2\)-PVE\(2\)\)**2+)525 -1706 y(:)g(\(PV\(3\)-PVE\(3\)\)**2\))286 1932 y(*)382 -b(Extrapolate)45 b(backwards)g(in)i(time)g(by)g(that)g(much)859 -2045 y(DO)g(I=1,3)1002 2158 y(PV\(I\)=PV\(I\)-TL*PV\(I+3\))859 -2271 y(END)g(DO)286 2497 y(*)382 b(To)47 b(RA,Dec)859 -2609 y(CALL)g(sla_DCC2S\(PV,RV,DV\))286 2835 y(*)382 -b(Same)47 b(for)f(Jupiter)859 2948 y(CALL)h(sla_PLANET\(DJDM,5,PV,J\)) -859 3061 y(DO)g(I=1,6)1002 3174 y(PV\(I\)=PV\(I\)-PVE\(I\))859 -3287 y(END)g(DO)859 3400 y(TL=499.004782D0*SQRT\(\(PV\()o(1\)-)o(PVE\() -o(1\)\)*)o(*2+)525 3513 y(:)1288 b(\(PV\(2\)-PVE\(2\)\)**2+)525 -3626 y(:)g(\(PV\(3\)-PVE\(3\)\)**2\))859 3739 y(DO)47 -b(I=1,3)1002 3851 y(PV\(I\)=PV\(I\)-TL*PV\(I+3\))859 -3964 y(END)g(DO)859 4077 y(CALL)g(sla_DCC2S\(PV,RJ,DJ\))286 -4303 y(*)382 b(Separation)45 b(\(arcsec\))859 4416 y -(SEP=sla_DSEP\(RV,DV,RJ,DJ\))286 4642 y(*)382 b(Keep)47 -b(if)g(smallest)e(so)i(far)859 4755 y(IF)g(\(SEP.LT.SEPMIN\))d(THEN) -1002 4868 y(IHMIN=IHOUR)1002 4981 y(IMMIN=IMIN)1002 5093 -y(SEPMIN=SEP)859 5206 y(END)j(IF)716 5319 y(END)g(DO)573 -5432 y(END)g(DO)286 5658 y(*)96 b(Report)p eop -%%Page: 202 204 -202 203 bop 0 52 a FD(202)573 351 y Ft(WRITE)46 b -(\(*,'\(1X,I2.2,'':'',I2.2,F)o(6.1)o(\)'\))41 b(IHMIN,IMMIN,)525 -464 y(:)1813 b(206264.8062D0*SEPMIN)573 690 y(END)0 947 -y FD(The)29 b(output)g(pro)s(duced)f(\(the)h(Ephemeris)f(Time)g(on)i -(the)f(da)m(y)h(in)e(question,)h(and)g(the)g(closest)h(approac)m(h)g -(in)0 1060 y(arcseconds\))h(is)f(as)g(follo)m(ws:)286 -1316 y Ft(21:16)94 b(33.3)0 1573 y FD(F)-8 b(or)40 b(comparison,)h -(accurate)g(JPL)e(predictions)e(giv)m(e)j(a)g(separation)f(8)2511 -1536 y Fk(0)l(0)2591 1573 y FD(less)f(than)h(the)h(ab)s(o)m(v)m(e)g -(estimate,)0 1686 y(o)s(ccurring)29 b(30)492 1653 y Fu(m)586 -1686 y FD(earlier)g(\(see)j Fq(Sky)g(and)i(T)-7 b(elesc)i(op)g(e,)32 -b FD(April)c(1987,)k(p)15 b(357\).)0 1847 y(The)30 b(follo)m(wing)f -(program)h(demonstrates)h(sla)p Ft(_)p FD(RDPLAN.)286 -2080 y Ft(*)96 b(For)46 b(a)i(given)e(date,)h(time)f(and)h -(geographical)e(location,)g(output)286 2193 y(*)96 b(a)47 -b(table)f(of)i(planetary)d(positions)g(and)i(diameters.)573 -2419 y(IMPLICIT)e(NONE)573 2532 y(CHARACTER)g(PNAMES\(0:9\)*7,B*80,S) -573 2644 y(INTEGER)h(I,NP,IY,J,IM,ID,IHMSF\(4)o(\),I)o(DMSF)o(\(4\))573 -2757 y(DOUBLE)g(PRECISION)f(D15B2P,R2AS,FD,DJM,ELONG,)o(PHI)o(,RA,)o -(DEC,)o(DIA)o(M)573 2870 y(PARAMETER)g(\(D15B2P=2.38732414637843)o -(0036)o(5D0,)525 2983 y(:)525 b(R2AS=206264.80625D0\))573 -3096 y(DATA)46 b(PNAMES)g(/)i('Sun','Mercury','Venus',)o('Moo)o(n',)o -('Mar)o(s',')o(Jup)o(iter)o(',)525 3209 y(:)668 b -('Saturn','Uranus','Neptu)o(ne',)41 b('Pluto')46 b(/)286 -3548 y(*)96 b(Loop)46 b(until)h('end')f(typed)573 3661 -y(B=')h(')573 3774 y(DO)g(WHILE)f(\(B.NE.'END'.AND.B.NE.'end)o('\))286 -3999 y(*)239 b(Get)47 b(date,)f(time)h(and)g(observer's)e(location)716 -4112 y(PRINT)h(*,'Date?)g(\(Y,M,D,)g(Gregorian\)')716 -4225 y(READ)h(\(*,'\(A\)'\))e(B)716 4338 y(IF)i -(\(B.NE.'END'.AND.B.NE.'end)o('\))41 b(THEN)859 4451 -y(I=1)859 4564 y(CALL)47 b(sla_INTIN\(B,I,IY,J\))859 -4677 y(CALL)g(sla_INTIN\(B,I,IM,J\))859 4790 y(CALL)g -(sla_INTIN\(B,I,ID,J\))859 4903 y(PRINT)f(*,'Time?)g(\(H,M,S,)g -(dynamical\)')859 5016 y(READ)h(\(*,'\(A\)'\))e(B)859 -5128 y(I=1)859 5241 y(CALL)i(sla_DAFIN\(B,I,FD,J\))859 -5354 y(FD=FD*D15B2P)859 5467 y(CALL)g(sla_CLDJ\(IY,IM,ID,DJM,J)o(\))859 -5580 y(DJM=DJM+FD)859 5693 y(PRINT)f(*,'Longitude?)f(\(D,M,S,)g(east)i -(+ve\)')p eop -%%Page: 203 205 -203 204 bop 0 52 a Fw(SUN/67.70)3206 b FD(203)859 351 -y Ft(READ)47 b(\(*,'\(A\)'\))e(B)859 464 y(I=1)859 577 -y(CALL)i(sla_DAFIN\(B,I,ELONG,J\))859 690 y(PRINT)f(*,'Latitude?)f -(\(D,M,S,)h(geodetic\)')859 803 y(READ)h(\(*,'\(A\)'\))e(B)859 -916 y(I=1)859 1029 y(CALL)i(sla_DAFIN\(B,I,PHI,J\))286 -1255 y(*)382 b(Loop)47 b(planet)f(by)h(planet)859 1367 -y(DO)g(NP=0,9)286 1593 y(*)525 b(Get)47 b(RA,Dec)f(and)h(diameter)1002 -1706 y(CALL)g(sla_RDPLAN\(DJM,NP,ELONG,)o(PHI,)o(RA,)o(DEC,)o(DIAM)o -(\))286 1932 y(*)525 b(One)47 b(line)g(of)g(report)1002 -2045 y(CALL)g(sla_DR2TF\(2,RA,S,IHMSF\))1002 2158 y(CALL)g -(sla_DR2AF\(1,DEC,S,IDMSF\))1002 2271 y(WRITE)g(\(*,)525 -2384 y(:)g('\(1X,A,2X,3I3.2,''.'',I2.2)o(,2X,)o(A,I)o(2.2,)o(2I3.)o -(2,')o('.'')o(,I1,)o(F8.)o(1\)'\))525 2497 y(:)1241 b -(PNAMES\(NP\),IHMSF,S,IDMS)o(F,R2)o(AS*)o(DIAM)286 2722 -y(*)525 b(Next)47 b(planet)859 2835 y(END)g(DO)859 2948 -y(PRINT)f(*,')h(')716 3061 y(END)g(IF)286 3287 y(*)239 -b(Next)46 b(case)573 3400 y(END)h(DO)573 3626 y(END)0 -3860 y FD(En)m(tering)30 b(the)g(follo)m(wing)f(data)i(\(for)g(1927)h -(June)d(29)i(at)h(5)2003 3827 y Fu(h)2062 3860 y FD(25)2152 -3827 y Fu(m)2246 3860 y FD(ET)e(and)f(the)i(p)s(osition)d(of)j -(Preston,)f(UK\):)286 4095 y Ft(1927)47 b(6)g(29)286 -4208 y(5)h(25)286 4321 y(-2)g(42)286 4434 y(53)g(46)0 -4668 y FD(pro)s(duces)29 b(the)i(follo)m(wing)d(rep)s(ort:)286 -4903 y Ft(Sun)334 b(06)47 b(28)g(14.03)94 b(+23)47 b(17)g(17.3)95 -b(1887.8)286 5016 y(Mercury)142 b(08)47 b(08)g(58.60)94 -b(+19)47 b(20)g(57.1)238 b(9.3)286 5128 y(Venus)g(09)47 -b(38)g(53.61)94 b(+15)47 b(35)g(32.8)190 b(22.8)286 5241 -y(Moon)286 b(06)47 b(28)g(15.95)94 b(+23)47 b(17)g(21.3)95 -b(1902.3)286 5354 y(Mars)286 b(09)47 b(06)g(49.33)94 -b(+17)47 b(52)g(26.6)238 b(4.0)286 5467 y(Jupiter)142 -b(00)47 b(11)g(12.08)94 b(-00)47 b(10)g(57.5)190 b(41.1)286 -5580 y(Saturn)g(16)47 b(01)g(43.35)94 b(-18)47 b(36)g(55.9)190 -b(18.2)286 5693 y(Uranus)g(00)47 b(13)g(33.54)94 b(+00)47 -b(39)g(36.1)238 b(3.5)p eop -%%Page: 204 206 -204 205 bop 0 52 a FD(204)286 351 y Ft(Neptune)142 b(09)47 -b(49)g(35.76)94 b(+13)47 b(38)g(40.8)238 b(2.2)286 464 -y(Pluto)g(07)47 b(05)g(29.51)94 b(+21)47 b(25)g(04.2)238 -b(0.1)0 692 y FD(Insp)s(ection)29 b(of)h(the)h(Sun)e(and)h(Mo)s(on)g -(data)h(rev)m(eals)g(that)g(a)g(total)g(solar)f(eclipse)f(is)h(in)f -(progress.)0 851 y(SLALIB)23 b(also)h(pro)m(vides)e(for)i(the)g(case)g -(where)g(orbital)e(elemen)m(ts)i(\(with)f(resp)s(ect)g(to)i(the)f -(J2000)h(equino)m(x)e(and)0 964 y(ecliptic\))31 b(are)h(a)m(v)-5 -b(ailable.)45 b(This)30 b(allo)m(ws)h(predictions)f(to)i(b)s(e)g(made)g -(for)f(minor-planets)f(and)h(\(if)h(y)m(ou)g(ignore)0 -1077 y(non-gra)m(vitational)i(e\013ects\))h(comets.)51 -b(F)-8 b(urthermore,)35 b(if)d(ma)5 b(jor-planet)34 b(elemen)m(ts)g -(for)f(an)h(ep)s(o)s(c)m(h)f(close)h(to)0 1190 y(the)g(date)h(in)e -(question)g(are)i(a)m(v)-5 b(ailable,)35 b(more)f(accurate)h -(predictions)e(can)h(b)s(e)g(made)g(than)g(are)g(o\013ered)h(b)m(y)0 -1303 y(sla)p Ft(_)p FD(RDPLAN)30 b(and)g(sla)p Ft(_)p -FD(PLANET.)0 1463 y(The)37 b(SLALIB)f(planetary-prediction)f(routines)h -(that)i(w)m(ork)f(with)f(orbital)g(elemen)m(ts)h(are)h(sla)p -Ft(_)p FD(PLANTE)0 1576 y(\(the)h(orbital-elemen)m(ts)g(equiv)-5 -b(alen)m(t)38 b(of)h(sla)p Ft(_)p FD(RDPLAN\),)g(whic)m(h)f(predicts)f -(the)i(top)s(o)s(cen)m(tric)g([)15 b Fl(\013;)g(\016)21 -b FD(],)41 b(and)0 1689 y(sla)p Ft(_)p FD(PLANEL)e(\(the)i -(orbital-elemen)m(ts)f(equiv)-5 b(alen)m(t)40 b(of)g(sla)p -Ft(_)p FD(PLANET\),)g(whic)m(h)f(predicts)g(the)i(helio)s(cen-)0 -1802 y(tric)f([)15 b Fl(x;)g(y)s(;)g(z)t(;)32 b FD(_)-42 -b Fl(x)q(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 -b FD(])40 b(with)f(resp)s(ect)h(to)h(the)f(J2000)h(equino)m(x)f(and)f -(equator.)70 b(In)39 b(addition,)i(the)f(routine)0 1914 -y(sla)p Ft(_)p FD(PV2EL)35 b(do)s(es)h(the)g(in)m(v)m(erse)g(of)g(sla)p -Ft(_)p FD(PLANEL,)f(transforming)g([)15 b Fl(x;)g(y)s(;)g(z)t(;)32 -b FD(_)-42 b Fl(x)q(;)32 b FD(_)-42 b Fl(y)t(;)31 b FD(_)-41 -b Fl(z)19 b FD(])37 b(in)m(to)f Fq(osculating)i(ele-)0 -2027 y(ments.)0 2187 y FD(Osculating)f(elemen)m(ts)h(describ)s(e)e(the) -i(unp)s(erturb)s(ed)d(2-b)s(o)s(dy)i(orbit.)62 b(Dep)s(ending)37 -b(on)g(accuracy)i(require-)0 2300 y(men)m(ts,)30 b(this)e(unp)s(erturb) -s(ed)e(orbit)i(is)g(an)h(adequate)i(appro)m(ximation)d(to)i(the)f -(actual)h(orbit)e(for)h(a)h(few)f(w)m(eeks)0 2413 y(either)36 -b(side)g(of)g(the)h(sp)s(eci\014ed)e(ep)s(o)s(c)m(h,)j(outside)e(whic)m -(h)f(p)s(erturbations)f(due)i(to)i(the)e(other)h(b)s(o)s(dies)e(of)h -(the)0 2526 y(Solar)29 b(System)g(lead)g(to)h(increasing)e(errors.)40 -b(Giv)m(en)30 b(a)g(minor)e(planet's)h(osculating)g(elemen)m(ts)g(for)h -(a)g(partic-)0 2639 y(ular)d(date,)i(predictions)d(for)i(a)h(date)f -(only)g(100)h(da)m(ys)f(earlier)f(or)h(later)g(are)h(lik)m(ely)d(to)j -(b)s(e)f(in)e(error)i(b)m(y)g(sev)m(eral)0 2752 y(arcseconds.)54 -b(These)34 b(errors)g(can)h(b)s(e)f(reduced)g(if)g(new)g(elemen)m(ts)h -(are)g(generated)h(whic)m(h)d(tak)m(e)j(accoun)m(t)g(of)0 -2865 y(the)e(p)s(erturbations)d(of)j(the)g(ma)5 b(jor)33 -b(planets,)h(and)f(this)g(is)f(what)i(the)g(routine)e(sla)p -Ft(_)p FD(PER)-8 b(TEL)32 b(do)s(es.)51 b(Once)0 2978 -y(sla)p Ft(_)p FD(PER)-8 b(TEL)39 b(has)h(b)s(een)g(called,)j(to)e(pro) -m(vide)e(osculating)h(elemen)m(ts)h(close)g(to)g(the)g(required)d -(date,)44 b(the)0 3090 y(elemen)m(ts)d(can)f(b)s(e)g(passed)f(to)i(sla) -p Ft(_)p FD(PLANEL)e(or)i(sla)p Ft(_)p FD(PLANTE)e(in)g(the)h(normal)f -(w)m(a)m(y)-8 b(.)72 b(Predictions)38 b(of)0 3203 y(arcsecond)31 -b(accuracy)g(o)m(v)m(er)h(a)f(span)e(of)i(a)g(decade)g(or)f(more)h(are) -f(a)m(v)-5 b(ailable)30 b(using)f(this)g(tec)m(hnique.)0 -3363 y(Three)21 b(di\013eren)m(t)g(com)m(binations)f(of)i(orbital)e -(elemen)m(ts)i(are)g(pro)m(vided)e(for,)j(matc)m(hing)f(the)f(usual)f -(con)m(v)m(en)m(tions)0 3476 y(for)43 b(ma)5 b(jor)43 -b(planets,)j(minor)c(planets)g(and)h(comets)h(resp)s(ectiv)m(ely)-8 -b(.)79 b(The)42 b(c)m(hoice)i(is)f(made)g(through)f(the)0 -3589 y(argumen)m(t)31 b Ft(JFORM)p FD(:)p 303 3704 1302 -4 v 301 3817 4 113 v 353 3783 a Ft(JFORM=1)p 735 3817 -V 98 w(JFORM=2)p 1169 3817 V 97 w(JFORM=3)p 1603 3817 -V 303 3821 1302 4 v 303 3837 V 301 3950 4 113 v 484 3916 -a Fl(t)517 3930 y Fu(0)p 735 3950 V 917 3916 a Fl(t)950 -3930 y Fu(0)p 1169 3950 V 1354 3916 a Fl(T)p 1603 3950 -V 303 3953 1302 4 v 301 4066 4 113 v 504 4033 a(i)p 735 -4066 V 403 w(i)p 1169 4066 V 403 w(i)p 1603 4066 V 303 -4070 1302 4 v 301 4183 4 113 v 487 4149 a FD(\012)p 735 -4183 V 368 w(\012)p 1169 4183 V 367 w(\012)p 1603 4183 -V 303 4186 1302 4 v 301 4299 4 113 v 481 4265 a Fl($)p -735 4299 V 368 w(!)p 1169 4299 V 376 w(!)p 1603 4299 -V 303 4302 1302 4 v 301 4415 4 113 v 496 4381 a(a)p 735 -4415 V 386 w(a)p 1169 4415 V 387 w(q)p 1603 4415 V 303 -4418 1302 4 v 301 4531 4 113 v 499 4497 a(e)p 735 4531 -V 391 w(e)p 1169 4531 V 392 w(e)p 1603 4531 V 303 4535 -1302 4 v 301 4648 4 113 v 489 4614 a(L)p 735 4648 V 354 -w(M)p 1169 4648 V 1603 4648 V 303 4651 1302 4 v 301 4764 -4 113 v 493 4730 a(n)p 735 4764 V 1169 4764 V 1603 4764 -V 303 4767 1302 4 v 0 4917 a FD(The)f(sym)m(b)s(ols)f(ha)m(v)m(e)i(the) -g(follo)m(wing)e(meanings:)366 5128 y Fl(t)399 5142 y -Fu(0)588 5128 y FD(ep)s(o)s(c)m(h)h(of)h(osculation)366 -5241 y Fl(T)169 b FD(ep)s(o)s(c)m(h)30 b(of)h(p)s(erihelion)c(passage) -366 5354 y Fl(i)191 b FD(inclination)28 b(of)i(the)h(orbit)366 -5467 y(\012)156 b(longitude)29 b(of)i(the)f(ascending)g(no)s(de)366 -5580 y Fl($)147 b FD(longitude)29 b(of)i(p)s(erihelion)c(\()p -Fl($)h FD(=)d(\012)20 b(+)g Fl(!)s FD(\))366 5693 y Fl(!)165 -b FD(argumen)m(t)31 b(of)g(p)s(erihelion)p eop -%%Page: 205 207 -205 206 bop 0 52 a Fw(SUN/67.70)3206 b FD(205)366 351 -y Fl(a)174 b FD(semi-ma)5 b(jor)30 b(axis)g(of)h(the)f(orbital)f -(ellipse)366 464 y Fl(q)181 b FD(p)s(erihelion)27 b(distance)366 -577 y Fl(e)180 b FD(orbital)30 b(eccen)m(tricit)m(y)366 -690 y Fl(L)160 b FD(mean)31 b(longitude)e(\()p Fl(L)c -FD(=)g Fl($)e FD(+)d Fl(M)10 b FD(\))366 803 y Fl(M)134 -b FD(mean)31 b(anomaly)366 916 y Fl(n)167 b FD(mean)31 -b(motion)0 1283 y(The)g(mean)g(motion,)h Fl(n)p FD(,)f(tells)g(sla)p -Ft(_)p FD(PLANEL)f(the)i(mass)f(of)h(the)f(planet.)43 -b(If)31 b(it)g(is)g(not)g(a)m(v)-5 b(ailable,)32 b(it)e(should)0 -1396 y(b)s(e)d(calculated)h(from)g Fl(n)816 1363 y Fu(2)855 -1396 y Fl(a)903 1363 y Fu(3)967 1396 y FD(=)d Fl(k)1113 -1363 y Fu(2)1153 1396 y FD(\(1)16 b(+)f Fl(m)p FD(\),)29 -b(where)f Fl(k)g FD(=)d(0)p Fl(:)p FD(01720209895)34 -b(and)27 b(m)h(is)f(the)h(mass)g(of)g(the)g(planet)0 -1509 y(\()p Fl(M)123 1523 y Fp(\014)208 1509 y FD(=)d(1\);)31 -b Fl(a)g FD(is)e(in)g(A)m(U.)0 1670 y(Note)h(that)g(for)f(an)m(y)h(giv) -m(en)f(problem)e(there)j(are)f(up)f(to)i(three)f(di\013eren)m(t)g(ep)s -(o)s(c)m(hs)g(in)e(pla)m(y)-8 b(,)30 b(and)f(it)f(is)g(vital)h(to)0 -1783 y(distinguish)e(clearly)i(b)s(et)m(w)m(een)i(them:)136 -2013 y Fo(\017)46 b FD(The)29 b(ep)s(o)s(c)m(h)f(of)h(observ)-5 -b(ation:)40 b(the)29 b(momen)m(t)g(in)f(time)g(for)h(whic)m(h)e(the)i -(p)s(osition)e(of)i(the)g(b)s(o)s(dy)f(is)g(to)h(b)s(e)227 -2126 y(predicted.)136 2312 y Fo(\017)46 b FD(The)27 b(ep)s(o)s(c)m(h)g -(de\014ning)e(the)i(p)s(osition)e(of)j(the)f(b)s(o)s(dy:)38 -b(the)27 b(momen)m(t)h(in)d(time)i(at)h(whic)m(h,)f(in)f(the)h(absence) -227 2424 y(of)g(purturbations,)e(the)i(sp)s(eci\014ed)e(p)s -(osition|mean)g(longitude,)h(mean)g(anomaly)-8 b(,)28 -b(or)f(p)s(erihelion|is)227 2537 y(reac)m(hed.)136 2723 -y Fo(\017)46 b FD(The)25 b(ep)s(o)s(c)m(h)h(of)g(osculation:)37 -b(the)26 b(momen)m(t)h(in)d(time)h(at)i(whic)m(h)d(the)i(giv)m(en)g -(elemen)m(ts)g(precisely)e(sp)s(ecify)227 2836 y(the)31 -b(b)s(o)s(dy's)e(p)s(osition)f(and)i(v)m(elo)s(cit)m(y)-8 -b(.)0 3066 y(F)g(or)42 b(the)g(ma)5 b(jor-planet)41 b(and)f -(minor-planet)g(cases)i(it)f(is)f(usual)g(to)i(mak)m(e)g(the)g(ep)s(o)s -(c)m(h)f(that)h(de\014nes)e(the)0 3179 y(p)s(osition)29 -b(of)i(the)g(b)s(o)s(dy)e(the)i(same)g(as)g(the)g(ep)s(o)s(c)m(h)g(of)g -(osculation.)41 b(Th)m(us,)31 b(for)f(planets)g(\(ma)5 -b(jor)31 b(and)g(minor\))0 3292 y(only)e(t)m(w)m(o)h(di\013eren)m(t)f -(ep)s(o)s(c)m(hs)g(are)h(in)m(v)m(olv)m(ed:)40 b(the)30 -b(ep)s(o)s(c)m(h)f(of)h(the)f(elemen)m(ts)h(and)f(the)h(ep)s(o)s(c)m(h) -f(of)g(observ)-5 b(ation.)0 3405 y(F)d(or)40 b(comets,)k(the)c(ep)s(o)s -(c)m(h)f(of)h(p)s(erihelion)c(\014xes)k(the)g(p)s(osition)e(in)g(the)i -(orbit)f(and)g(in)f(general)i(a)g(di\013eren)m(t)0 3518 -y(ep)s(o)s(c)m(h)29 b(of)g(osculation)g(will)e(b)s(e)h(c)m(hosen.)41 -b(Th)m(us,)29 b(for)g(comets)h(all)e(three)i(t)m(yp)s(es)f(of)g(ep)s(o) -s(c)m(h)g(are)h(in)m(v)m(olv)m(ed.)40 b(Ho)m(w)0 3631 -y(man)m(y)27 b(of)g(the)g(three)g(elemen)m(ts)g(are)h(presen)m(t)f(in)e -(a)i(giv)m(en)g(SLALIB)g(argumen)m(t)g(list)f(dep)s(ends)f(on)h(the)h -(routine)0 3744 y(concerned.)0 3904 y(Tw)m(o)48 b(imp)s(ortan)m(t)e -(sources)i(for)f(orbital)f(elemen)m(ts)i(are)f(the)h -Fq(Horizons)56 b FD(service,)c(op)s(erated)47 b(b)m(y)g(the)h(Jet)0 -4017 y(Propulsion)37 b(Lab)s(oratory)-8 b(,)43 b(P)m(asadena,)h(and)39 -b(the)h(Minor)g(Planet)f(Cen)m(ter,)k(op)s(erated)d(b)m(y)g(the)g(Cen)m -(ter)h(for)0 4130 y(Astroph)m(ysics,)32 b(Harv)-5 b(ard.)45 -b(The)32 b(JPL)f(elemen)m(ts)i(\(helio)s(cen)m(tric,)f(J2000)h -(ecliptic)e(and)g(equino)m(x\))h(and)g(MPC)0 4243 y(elemen)m(ts)24 -b(corresp)s(ond)e(to)i(SLALIB)f(argumen)m(ts)g(as)h(sho)m(wn)f(in)f -(the)h(follo)m(wing)f(table,)j(where)e(\\\(rad\)")i(means)0 -4356 y(con)m(v)m(ersion)31 b(from)f(degrees)h(to)g(radians,)e(and)h -(\\\(MJD\)")i(means)e(\\subtract)h Ft(2400000.5D0)p FD(":)p -0 4517 3745 4 v -2 4616 4 100 v 232 4586 a Fc(SLALIB)p -795 4616 V 812 4616 V 1068 w(JPL)p 2543 4616 V 2560 4616 -V 1303 w(MPC)p 3743 4616 V -2 4716 V 226 4686 a Fb(argumen)n(t)p -795 4716 V 812 4716 V 317 w(ma)5 b(jor)26 b(planet)p -1429 4716 V 124 w(minor)h(planet)p 1994 4716 V 216 w(comet)p -2543 4716 V 2560 4716 V 245 w(minor)g(planet)p 3151 4716 -V 251 w(comet)p 3743 4716 V 0 4719 3745 4 v 0 4736 V --2 4835 4 100 v 289 4806 a Fa(JFORM)p 795 4835 V 812 -4835 V 591 w(1)p 1429 4835 V 547 w(2)p 1994 4835 V 513 -w(3)p 2543 4835 V 2560 4835 V 543 w(2)p 3151 4835 V 548 -w(3)p 3743 4835 V -2 4935 V 289 4905 a(EPOCH)p 795 4935 -V 812 4935 V 388 w(JDCT)f Fb(\(MJD\))p 1429 4935 V 144 -w Fa(JDCT)g Fb(\(MJD\))p 1994 4935 V 152 w Fa(Tp)h Fb(\(MJD\))p -2543 4935 V 2560 4935 V 161 w Fa(Epoch)e Fb(\(MJD\))p -3151 4935 V 188 w Fa(T)i Fb(\(MJD\))p 3743 4935 V -2 -5035 V 268 5005 a Fa(ORBINC)p 795 5035 V 812 5035 V 440 -w(IN)g Fb(\(rad\))p 1429 5035 V 291 w Fa(IN)g Fb(\(rad\))p -1994 5035 V 257 w Fa(IN)g Fb(\(rad\))p 2543 5035 V 2560 -5035 V 217 w Fa(Incl.)35 b Fb(\(rad\))p 3151 5035 V 152 -w Fa(Incl.)g Fb(\(rad\))p 3743 5035 V -2 5134 V 289 5104 -a Fa(ANODE)p 795 5134 V 812 5134 V 463 w(OM)27 b Fb(\(rad\))p -1429 5134 V 291 w Fa(OM)g Fb(\(rad\))p 1994 5134 V 257 -w Fa(OM)g Fb(\(rad\))p 2543 5134 V 2560 5134 V 244 w -Fa(Node)f Fb(\(rad\))p 3151 5134 V 178 w Fa(Node.)35 -b Fb(\(rad\))p 3743 5134 V -2 5234 V 289 5204 a Fa(PERIH)p -795 5234 V 812 5234 V 419 w(OM+W)26 b Fb(\(rad\))p 1429 -5234 V 270 w Fa(W)h Fb(\(rad\))p 1994 5234 V 301 w Fa(W)g -Fb(\(rad\))p 2543 5234 V 2560 5234 V 217 w Fa(Perih.)35 -b Fb(\(rad\))p 3151 5234 V 108 w Fa(Perih.)g Fb(\(rad\))p -3743 5234 V -2 5334 V 311 5304 a Fa(AORQ)p 795 5334 V -812 5334 V 613 w(A)p 1429 5334 V 547 w(A)p 1994 5334 -V 492 w(QR)p 2543 5334 V 2560 5334 V 520 w(a)p 3151 5334 -V 548 w(q)p 3743 5334 V -2 5433 V 376 5403 a(E)p 795 -5433 V 812 5433 V 658 w(EC)p 1429 5433 V 504 w(EC)p 1994 -5433 V 469 w(EC)p 2543 5433 V 2560 5433 V 520 w(e)p 3151 -5433 V 548 w(e)p 3743 5433 V -2 5533 V 311 5503 a(AORL)p -795 5533 V 812 5533 V 376 w(MA+OM+W)25 b Fb(\(rad\))p -1429 5533 V 182 w Fa(MA)i Fb(\(rad\))p 1994 5533 V 2543 -5533 V 2560 5533 V 866 w Fa(M)g Fb(\(rad\))p 3151 5533 -V 3743 5533 V -2 5632 V 355 5603 a Fa(DM)p 795 5632 V -812 5632 V 551 w(N)g Fb(\(rad\))p 1429 5632 V 1994 5632 -V 2543 5632 V 2560 5632 V 3151 5632 V 3743 5632 V 0 5636 -3745 4 v -2 5735 4 100 v 50 5705 a(ep)r(o)r(c)n(h)g(of)h(osculation)p -795 5735 V 812 5735 V 149 w Fa(JDCT)e Fb(\(MJD\))p 1429 -5735 V 144 w Fa(JDCT)g Fb(\(MJD\))p 1994 5735 V 109 w -Fa(JDCT)g Fb(\(MJD\))p 2543 5735 V 2560 5735 V 117 w -Fa(Epoch)f Fb(\(MJD\))p 3151 5735 V 101 w Fa(Epoch)g -Fb(\(MJD\))p 3743 5735 V 0 5739 3745 4 v eop -%%Page: 206 208 -206 207 bop 0 52 a FD(206)0 520 y(Con)m(v)m(en)m(tional)38 -b(elemen)m(ts)g(are)g(not)g(the)g(only)e(w)m(a)m(y)j(of)f(sp)s -(ecifying)d(an)j(orbit.)61 b(The)38 b([)15 b Fl(x;)g(y)s(;)g(z)t(;)32 -b FD(_)-42 b Fl(x)q(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 -b Fl(z)20 b FD(])38 b(state)0 633 y(v)m(ector)g(is)d(an)h(equally)g(v) --5 b(alid)34 b(sp)s(eci\014cation,)j(and)f(the)g(so-called)g -Fq(metho)-5 b(d)40 b(of)f(universal)f(variables)45 b -FD(allo)m(ws)0 746 y(orbital)d(calculations)f(to)j(b)s(e)e(made)h -(directly)-8 b(,)45 b(b)m(ypassing)d(angular)g(quan)m(tities)g(and)g(a) -m(v)m(oiding)h(Kepler's)0 859 y(Equation.)51 b(The)33 -b(univ)m(ersal-v)-5 b(ariables)31 b(approac)m(h)j(has)g(v)-5 -b(arious)33 b(adv)-5 b(an)m(tages,)37 b(including)30 -b(b)s(etter)k(handling)0 972 y(of)h(near-parab)s(olic)e(cases)i(and)f -(greater)i(e\016ciency)-8 b(.)54 b(SLALIB)34 b(uses)g(univ)m(ersal)e(v) --5 b(ariables)34 b(for)g(its)g(in)m(ternal)0 1085 y(calculations)29 -b(and)h(also)h(o\013ers)f(a)h(n)m(um)m(b)s(er)e(of)i(routines)e(whic)m -(h)g(applications)f(can)j(call.)0 1254 y(The)k(univ)m(ersal)f(elemen)m -(ts)h(are)h(the)g([)15 b Fl(x;)g(y)s(;)g(z)t(;)32 b FD(_)-42 -b Fl(x)q(;)32 b FD(_)-42 b Fl(y)t(;)31 b FD(_)-41 b Fl(z)20 -b FD(])35 b(and)g(its)g(ep)s(o)s(c)m(h,)i(plus)c(the)j(mass)f(of)h(the) -f(b)s(o)s(dy)-8 b(.)55 b(The)0 1367 y(SLALIB)38 b(routines)g(supplemen) -m(t)f(these)i(elemen)m(ts)g(with)f(certain)g(redundan)m(t)g(v)-5 -b(alues)38 b(in)f(order)h(to)i(a)m(v)m(oid)0 1480 y(unnecessary)30 -b(recomputation)g(when)f(the)i(elemen)m(ts)g(are)g(next)f(used.)0 -1649 y(The)40 b(routines)f(sla)p Ft(_)p FD(EL2UE)h(and)f(sla)p -Ft(_)p FD(UE2EL)h(transform)g(con)m(v)m(en)m(tional)h(elemen)m(ts)f(in) -m(to)h(the)f(univ)m(ersal)0 1762 y(form)h(and)g Fq(vic)-5 -b(e)43 b(versa.)74 b FD(The)41 b(routine)g(sla)p Ft(_)p -FD(PV2UE)g(tak)m(es)i(an)f([)15 b Fl(x;)g(y)s(;)g(z)t(;)32 -b FD(_)-42 b Fl(x)r(;)31 b FD(_)-41 b Fl(y)s(;)31 b FD(_)-41 -b Fl(z)20 b FD(])41 b(and)g(forms)g(the)h(set)g(of)0 -1875 y(univ)m(ersal)24 b(elemen)m(ts;)k(sla)p Ft(_)p -FD(UE2PV)d(tak)m(es)i(a)f(set)g(of)g(univ)m(ersal)e(elemen)m(ts)i(and)f -(predicts)g(the)h([)15 b Fl(x;)g(y)s(;)g(z)t(;)32 b FD(_)-42 -b Fl(x)q(;)32 b FD(_)-42 b Fl(y)s(;)31 b FD(_)-41 b Fl(z)20 -b FD(])0 1988 y(for)37 b(a)h(sp)s(eci\014ed)d(ep)s(o)s(c)m(h.)62 -b(The)36 b(routine)h(sla)p Ft(_)p FD(PER)-8 b(TUE)36 -b(pro)m(vides)g(up)s(dated)g(univ)m(ersal)g(elemen)m(ts,)k(taking)0 -2101 y(in)m(to)23 b(accoun)m(t)i(p)s(erturbations)c(from)i(the)h(ma)5 -b(jor)23 b(planets.)38 b(Starting)23 b(with)f(univ)m(ersal)f(elemen)m -(ts,)26 b(the)d(routine)0 2214 y(sla)p Ft(_)p FD(PLANTU)29 -b(\(the)i(univ)m(ersal)e(elemen)m(ts)i(equiv)-5 b(alen)m(t)30 -b(of)g(sla)p Ft(_)p FD(PLANTE\))g(predicts)f(top)s(o)s(cen)m(tric)h([) -15 b Fl(\013;)g(\016)21 b FD(].)0 2528 y Fv(4.19)112 -b(Radial)37 b(V)-9 b(elo)s(cit)m(y)34 b(and)39 b(Ligh)m(t-Time)c -(Corrections)0 2759 y FD(When)25 b(publishing)20 b(high-resolution)j -(sp)s(ectral)h(observ)-5 b(ations)25 b(it)f(is)g(necessary)i(to)f -(refer)g(them)g(to)h(a)f(sp)s(eci\014ed)0 2872 y(standard)38 -b(of)h(rest.)67 b(This)37 b(in)m(v)m(olv)m(es)i(kno)m(wing)f(the)h -(comp)s(onen)m(t)g(in)e(the)i(direction)f(of)h(the)g(source)g(of)g(the) -0 2985 y(v)m(elo)s(cit)m(y)44 b(of)g(the)f(observ)m(er.)81 -b(SLALIB)43 b(pro)m(vides)f(a)i(n)m(um)m(b)s(er)f(of)g(routines)g(for)g -(this)f(purp)s(ose,)k(allo)m(wing)0 3098 y(observ)-5 -b(ations)40 b(to)g(b)s(e)g(referred)f(to)i(the)f(Earth's)g(cen)m(tre,)k -(the)c(Sun,)i(a)e(Lo)s(cal)g(Standard)f(of)h(Rest)h(\(either)0 -3211 y(dynamical)29 b(or)h(kinematical\),)f(the)i(cen)m(tre)g(of)f(the) -g(Galaxy)-8 b(,)32 b(and)d(the)h(mean)h(motion)e(of)i(the)f(Lo)s(cal)g -(Group.)0 3380 y(The)j(routine)f(sla)p Ft(_)p FD(R)-10 -b(VER)m(OT)32 b(corrects)i(for)f(the)g(diurnal)d(rotation)j(of)h(the)f -(observ)m(er)g(around)f(the)i(Earth's)0 3493 y(axis.)40 -b(This)29 b(is)g(alw)m(a)m(ys)i(less)f(than)g(0.5)h(km/s.)0 -3662 y(No)k(sp)s(eci\014c)e(routine)g(is)g(pro)m(vided)g(to)i(correct)g -(a)g(radial)d(v)m(elo)s(cit)m(y)j(from)f(geo)s(cen)m(tric)h(to)g(helio) -s(cen)m(tric,)f(but)0 3775 y(this)29 b(can)i(easily)e(b)s(e)h(done)g(b) -m(y)h(calling)d(sla)p Ft(_)p FD(EVP)i(as)h(follo)m(ws)e(\(arra)m(y)i -(declarations)f Fq(etc)p FD(.)h(omitted\):)620 4057 y -Ft(:)286 4169 y(*)96 b(Star)46 b(vector,)g(J2000)573 -4282 y(CALL)g(sla_DCS2C\(RM,DM,V\))286 4508 y(*)96 b(Earth/Sun)45 -b(velocity)g(and)i(position,)f(J2000)573 4621 y(CALL)g -(sla_EVP\(TDB,2000D0,DVB,DPB)o(,DV)o(H,DP)o(H\))286 4847 -y(*)96 b(Radial)46 b(velocity)f(correction)g(due)i(to)g(Earth)g(orbit)f -(\(km/s\))573 4960 y(VCORB)g(=)i(-sla_DVDV\(V,DVH\)*149.59)o(787)o(0D6) -620 5073 y(:)0 5354 y FD(The)29 b(maxim)m(um)g(v)-5 b(alue)29 -b(of)h(this)e(correction)i(is)f(the)h(Earth's)f(orbital)g(sp)s(eed)g -(of)g(ab)s(out)h(30)g(km/s.)41 b(A)30 b(related)0 5467 -y(routine,)23 b(sla)p Ft(_)p FD(ECOR,)e(computes)i(the)f(ligh)m(t-time) -g(correction)h(with)e(resp)s(ect)h(to)i(the)e(Sun.)37 -b(It)22 b(w)m(ould)f(b)s(e)h(used)0 5580 y(when)31 b(reducing)f(observ) --5 b(ations)32 b(of)g(a)g(rapid)e(v)-5 b(ariable-star)32 -b(for)f(instance.)45 b(F)-8 b(or)33 b(pulsar)d(w)m(ork)i(the)g(sla)p -Ft(_)p FD(EVP)0 5693 y(routine)38 b(is)f(not)i(su\016cien)m(tly)e -(accurate)j(for)e(phase)g(predictions,)h(b)s(eing)e(limited)g(to)i(ab)s -(out)f(25)h(ms.)65 b(The)p eop -%%Page: 207 209 -207 208 bop 0 52 a Fw(SUN/67.70)3206 b FD(207)0 351 y(alternativ)m(e)26 -b(sla)p Ft(_)p FD(EPV)f(routine)f(will)f(deliv)m(er)h(pulse)g(arriv)-5 -b(al)24 b(times)h(accurate)i(to)f(50)h Fl(\026)p FD(s,)f(but)f(is)f -(signi\014can)m(tly)0 464 y(slo)m(w)m(er.)0 640 y(T)-8 -b(o)31 b(remo)m(v)m(e)i(the)e(in)m(trinsic)d Fo(\030)e -FD(20)32 b(km/s)f(motion)f(of)i(the)f(Sun)e(relativ)m(e)i(to)h(other)f -(stars)g(in)e(the)j(solar)e(neigh-)0 752 y(b)s(ourho)s(o)s(d,)g(a)i(v)m -(elo)s(cit)m(y)g(correction)g(to)g(a)g Fq(lo)-5 b(c)g(al)36 -b(standar)-5 b(d)37 b(of)d(r)-5 b(est)41 b FD(\(LSR\))31 -b(is)g(required.)43 b(There)31 b(are)h(opp)s(or-)0 865 -y(tunities)25 b(for)h(mistak)m(es)h(here.)40 b(There)26 -b(are)h(t)m(w)m(o)h(sorts)f(of)f(LSR,)h Fq(dynamic)-5 -b(al)38 b FD(and)26 b Fq(kinematic)-5 b(al)p FD(,)29 -b(and)d(m)m(ultiple)0 978 y(de\014nitions)e(exist)j(for)g(the)g -(latter.)40 b(The)26 b(dynamical)g(LSR)g(is)g(a)h(p)s(oin)m(t)f(near)h -(the)g(Sun)e(whic)m(h)h(is)g(in)g(a)h(circular)0 1091 -y(orbit)38 b(around)f(the)i(Galactic)g(cen)m(tre;)44 -b(the)39 b(Sun)e(has)h(a)h(\\p)s(eculiar")e(motion)h(relativ)m(e)h(to)g -(the)g(dynamical)0 1204 y(LSR.)i(A)g(kinematical)f(LSR)g(is)g(the)i -(mean)f(standard)f(of)h(rest)h(of)f(sp)s(eci\014ed)e(star)j(catalogues) -g(or)f(stellar)0 1317 y(p)s(opulations,)c(and)g(its)f(precise)h -(de\014nition)e(dep)s(ends)h(on)h(whic)m(h)f(catalogues)j(or)e(p)s -(opulations)e(w)m(ere)j(used)0 1430 y(and)g(ho)m(w)g(the)h(analysis)d -(w)m(as)j(carried)f(out.)64 b(The)38 b(Sun's)f(motion)h(with)f(resp)s -(ect)h(to)h(a)g(kinematical)e(LSR)0 1543 y(is)h(called)g(the)h -(\\standard")g(solar)f(motion.)66 b(Radial)37 b(v)m(elo)s(cit)m(y)i -(corrections)g(to)h(the)f(dynamical)e(LSR)h(are)0 1656 -y(pro)s(duced)d(b)m(y)h(the)h(routine)e(sla)p Ft(_)p -FD(R)-10 b(VLSRD)36 b(and)f(to)j(the)e(adopted)h(kinematical)e(LSR)h(b) -m(y)g(sla)p Ft(_)p FD(R)-10 b(VLSRK.)0 1769 y(See)32 -b(the)f(individual)c(sp)s(eci\014cations)j(for)h(these)h(routines)f -(for)g(the)g(precise)g(de\014nition)e(of)j(the)g(LSR)e(in)g(eac)m(h)0 -1882 y(case.)0 2057 y(F)-8 b(or)28 b(extragalactic)g(sources,)g(the)f -(cen)m(tre)h(of)f(the)g(Galaxy)g(can)g(b)s(e)f(used)g(as)h(a)g -(standard)f(of)h(rest.)40 b(The)26 b(radial)0 2170 y(v)m(elo)s(cit)m(y) -35 b(correction)g(from)g(the)f(dynamical)g(LSR)g(to)h(the)g(Galactic)g -(cen)m(tre)h(can)f(b)s(e)f(obtained)g(b)m(y)h(calling)0 -2283 y(sla)p Ft(_)p FD(R)-10 b(V)m(GALC.)30 b(Its)h(maxim)m(um)e(v)-5 -b(alue)30 b(is)f(220)j(km/s.)0 2458 y(F)-8 b(or)42 b(v)m(ery)f(distan)m -(t)g(sources)g(it)g(is)f(appropriate)g(to)i(w)m(ork)g(relativ)m(e)f(to) -h(the)f(mean)g(motion)g(of)g(the)h(Lo)s(cal)0 2571 y(Group.)d(The)29 -b(routine)e(for)i(computing)e(the)i(radial)e(v)m(elo)s(cit)m(y)j -(correction)f(in)e(this)g(case)j(is)e(sla)p Ft(_)p FD(R)-10 -b(VLG.)28 b(Note)0 2684 y(that)g(in)e(this)h(case)h(the)g(correction)g -(is)f(with)f(resp)s(ect)i(to)g(the)g(dynamical)e(LSR,)h(not)g(the)h -(Galactic)h(cen)m(tre)f(as)0 2797 y(migh)m(t)33 b(b)s(e)f(exp)s(ected.) -49 b(This)32 b(conforms)h(to)g(the)h(IA)m(U)f(de\014nition,)f(and)g -(confers)h(imm)m(unit)m(y)f(from)g(revisions)0 2910 y(of)f(the)f -(Galactic)h(rotation)g(sp)s(eed.)0 3245 y Fv(4.20)112 -b(F)-9 b(o)s(cal-Plane)37 b(Astrometry)0 3485 y FD(The)k(relationship)f -(b)s(et)m(w)m(een)i(the)g(p)s(osition)e(of)i(a)g(star)g(image)g(in)f -(the)h(fo)s(cal)g(plane)e(of)i(a)h(telescop)s(e)f(and)0 -3598 y(the)35 b(star's)g(celestial)g(co)s(ordinates)g(is)f(usually)e -(describ)s(ed)h(in)h(terms)h(of)g(the)g Fq(tangent)j(plane)43 -b FD(or)35 b Fq(gnomonic)0 3711 y FD(pro)5 b(jection.)38 -b(This)23 b(is)g(the)h(pro)5 b(jection)24 b(pro)s(duced)e(b)m(y)j(a)f -(pin-hole)e(camera)j(and)f(is)f(a)i(go)s(o)s(d)f(appro)m(ximation)f(to) -0 3824 y(the)k(pro)5 b(jection)27 b(geometry)i(of)f(a)f(traditional)f -(large)h Fq(f)19 b FD(-ratio)28 b(astrographic)f(refractor.)40 -b(SLALIB)27 b(includes)e(a)0 3937 y(group)31 b(of)h(routines)f(whic)m -(h)f(transform)i(star)g(p)s(ositions)d(b)s(et)m(w)m(een)k(their)e -(observ)m(ed)h(places)f(on)h(the)g(celestial)0 4050 y(sphere)e(and)g -(their)g([)15 b Fl(x;)g(y)k FD(])31 b(co)s(ordinates)f(in)g(the)h -(tangen)m(t)h(plane.)41 b(The)30 b(spherical)f(co)s(ordinate)i(system)g -(do)s(es)0 4163 y(not)c(ha)m(v)m(e)h(to)f(b)s(e)f([)15 -b Fl(\013;)g(\016)21 b FD(])26 b(but)g(usually)f(is.)38 -b(The)26 b(so-called)h Fq(standar)-5 b(d)32 b(c)-5 b(o)g(or)g(dinates) -37 b FD(of)27 b(a)g(star)g(are)g(the)g(tangen)m(t)0 4276 -y(plane)h([)15 b Fl(x;)g(y)k FD(],)30 b(in)e(radians,)g(with)g(resp)s -(ect)h(to)g(an)g(origin)f(at)i(the)f(tangen)m(t)i(p)s(oin)m(t,)d(with)g -(the)i Fl(y)s FD(-axis)e(p)s(oin)m(ting)0 4389 y(north)36 -b(and)h(the)g Fl(x)p FD(-axis)g(p)s(oin)m(ting)e(east)j(\(in)e(the)h -(direction)f(of)h(increasing)f Fl(\013)p FD(\).)61 b(The)37 -b(factor)h(relating)e(the)0 4501 y(standard)k(co)s(ordinates)g(to)i -(the)f(actual)g([)15 b Fl(x;)g(y)k FD(])40 b(co)s(ordinates)h(in,)h(sa) -m(y)-8 b(,)45 b(millimetres)38 b(is)h(simply)g(the)i(fo)s(cal)0 -4614 y(length)30 b(of)g(the)h(telescop)s(e.)0 4790 y(Giv)m(en)e(the)g -([)15 b Fl(\013;)g(\016)20 b FD(])30 b(of)f(the)g Fq(plate)k(c)-5 -b(entr)g(e)36 b FD(\(the)30 b(tangen)m(t)g(p)s(oin)m(t\))f(and)f(the)h -([)15 b Fl(\013;)g(\016)21 b FD(])29 b(of)g(a)h(star)f(within)d(the)k -(\014eld,)0 4903 y(the)23 b(standard)f(co)s(ordinates)h(can)g(b)s(e)f -(determined)g(b)m(y)h(calling)e(sla)p Ft(_)p FD(S2TP)h(\(single)g -(precision\))f(or)i(sla)p Ft(_)p FD(DS2TP)0 5016 y(\(double)31 -b(precision\).)46 b(The)32 b(rev)m(erse)h(transformation,)g(where)f -(the)g([)15 b Fl(x;)g(y)k FD(])33 b(is)e(kno)m(wn)h(and)g(w)m(e)h(wish) -e(to)i(\014nd)0 5128 y(the)38 b([)15 b Fl(\013;)g(\016)21 -b FD(],)40 b(is)d(carried)h(out)g(b)m(y)g(calling)f(sla)p -Ft(_)p FD(TP2S)f(or)j(sla)p Ft(_)p FD(DTP2S.)e(Occasionally)g(w)m(e)i -(kno)m(w)f(the)g(b)s(oth)0 5241 y(the)33 b([)15 b Fl(x;)g(y)j -FD(])33 b(and)f(the)h([)15 b Fl(\013;)g(\016)20 b FD(])33 -b(of)g(a)f(star)h(and)f(need)g(to)i(deduce)e(the)h([)15 -b Fl(\013;)g(\016)20 b FD(])33 b(of)f(the)h(tangen)m(t)h(p)s(oin)m(t;)f -(this)e(can)0 5354 y(b)s(e)g(done)h(b)m(y)g(calling)e(sla)p -Ft(_)p FD(TPS2C)h(or)h(sla)p Ft(_)p FD(DTPS2C.)f(\(All)g(of)h(these)g -(transformations)f(apply)g(not)h(just)g(to)0 5467 y([)15 -b Fl(\013;)g(\016)20 b FD(])38 b(but)e(to)i(other)g(spherical)d(co)s -(ordinate)i(systems,)i(of)f(course.\))62 b(Equiv)-5 b(alen)m(t)36 -b(\(and)h(faster\))h(routines)0 5580 y(are)h(pro)m(vided)e(whic)m(h)h -(w)m(ork)h(directly)e(in)h([)15 b Fl(x;)g(y)s(;)g(z)20 -b FD(])39 b(instead)f(of)h(spherical)e(co)s(ordinates:)57 -b(sla)p Ft(_)p FD(V2TP)38 b(and)0 5693 y(sla)p Ft(_)p -FD(D)m(V2TP)-8 b(,)31 b(sla)p Ft(_)p FD(TP2V)f(and)g(sla)p -Ft(_)p FD(DTP2V,)g(sla)p Ft(_)p FD(TPV2C)g(and)g(sla)p -Ft(_)p FD(DTPV2C.)p eop -%%Page: 208 210 -208 209 bop 0 52 a FD(208)0 351 y(Ev)m(en)42 b(at)h(the)f(b)s(est)f(of) -h(times,)j(the)d(tangen)m(t)h(plane)e(pro)5 b(jection)42 -b(is)f(merely)g(an)h(appro)m(ximation.)74 b(Some)0 464 -y(telescop)s(es)40 b(and)e(cameras)i(exhibit)d(considerable)h -(pincushion)e(or)j(barrel)f(distortion)g(and)g(some)i(ha)m(v)m(e)g(a)0 -577 y(curv)m(ed)h(fo)s(cal)g(surface.)72 b(F)-8 b(or)42 -b(example,)i(neither)c(Sc)m(hmidt)f(cameras)j(nor)f(\(esp)s(ecially\))f -(large)h(re\015ecting)0 690 y(telescop)s(es)32 b(with)f(wide-\014eld)f -(corrector)j(lenses)e(are)i(adequately)f(mo)s(delled)e(b)m(y)i(tangen)m -(t-plane)g(geometry)-8 b(.)0 803 y(In)38 b(suc)m(h)h(cases,)k(ho)m(w)m -(ev)m(er,)g(it)c(is)f(still)f(p)s(ossible)g(to)j(do)f(most)g(of)h(the)f -(w)m(ork)g(using)f(the)i(\(mathematically)0 916 y(con)m(v)m(enien)m -(t\))f(tangen)m(t-plane)g(pro)5 b(jection)37 b(b)m(y)g(inserting)f(an)i -(extra)g(step)g(whic)m(h)e(applies)g(or)h(remo)m(v)m(es)i(the)0 -1029 y(distortion)32 b(p)s(eculiar)f(to)k(the)e(system)h(concerned.)50 -b(A)34 b(simple)e Fl(r)2245 1043 y Fu(1)2314 1029 y FD(=)f -Fl(r)2457 1043 y Fu(0)2496 1029 y FD(\(1)23 b(+)f Fl(K)7 -b(r)2820 996 y Fu(2)2817 1052 y(0)2859 1029 y FD(\))34 -b(la)m(w)f(w)m(orks)h(w)m(ell)e(in)g(the)0 1142 y(ma)5 -b(jorit)m(y)34 b(of)g(cases;)j Fl(r)782 1156 y Fu(0)856 -1142 y FD(is)c(the)h(radial)e(distance)i(in)e(the)j(tangen)m(t)g -(plane,)f Fl(r)2647 1156 y Fu(1)2721 1142 y FD(is)f(the)h(radial)e -(distance)i(after)0 1255 y(adding)23 b(the)i(distortion,)g(and)e -Fl(K)32 b FD(is)23 b(a)i(constan)m(t)h(whic)m(h)e(dep)s(ends)e(on)j -(the)g(telescop)s(e)g(\()p Fl(\022)i FD(is)c(una\013ected\).)40 -b(The)0 1367 y(routine)33 b(sla)p Ft(_)p FD(PCD)h(applies)e(the)j -(distortion)e(to)i(an)f([)15 b Fl(x;)g(y)k FD(])34 b(and)g(sla)p -Ft(_)p FD(UNPCD)g(remo)m(v)m(es)h(it.)52 b(F)-8 b(or)36 -b([)15 b Fl(x;)g(y)j FD(])35 b(in)0 1480 y(radians,)25 -b Fl(K)32 b FD(v)-5 b(alues)25 b(range)h(from)f Fo(\000)p -FD(1)p Fl(=)p FD(3)h(for)g(the)f(tin)m(y)g(amoun)m(t)h(of)g(barrel)e -(distortion)g(in)g(Sc)m(hmidt)g(geometry)0 1593 y(to)29 -b(sev)m(eral)f(h)m(undred)e(for)i(the)g(serious)f(pincushion)d -(distortion)j(pro)s(duced)f(b)m(y)i(wide-\014eld)e(correctors)j(in)d -(big)0 1706 y(re\015ecting)k(telescop)s(es)h(\(the)g(AA)-8 -b(T)31 b(prime)d(fo)s(cus)i(triplet)f(corrector)j(is)d(ab)s(out)h -Fl(K)i FD(=)25 b(+178)p Fl(:)p FD(6\).)0 1869 y(SLALIB)e(includes)f(a)i -(group)g(of)g(routines)f(whic)m(h)g(can)h(b)s(e)f(put)h(together)h(to)g -(build)c(a)j(simple)e(plate-reduction)0 1982 y(program.)48 -b(The)32 b(heart)h(of)g(the)g(group)f(is)f(sla)p Ft(_)p -FD(FITXY,)i(whic)m(h)e(\014ts)i(a)g(linear)e(mo)s(del)h(to)h(relate)g -(t)m(w)m(o)h(sets)f(of)0 2095 y([)15 b Fl(x;)g(y)k FD(])37 -b(co)s(ordinates,)h(in)d(the)i(case)h(of)f(a)g(plate)f(reduction)g(the) -h(measured)f(p)s(ositions)f(of)i(the)f(images)h(of)g(a)0 -2208 y(set)32 b(of)f(reference)g(stars)g(and)f(the)i(standard)e(co)s -(ordinates)g(deriv)m(ed)g(from)h(their)f(catalogue)j(p)s(ositions.)40 -b(The)0 2321 y(mo)s(del)29 b(is)h(of)g(the)h(form:)1494 -2434 y Fl(x)1546 2448 y Ff(p)1611 2434 y FD(=)25 b Fl(a)20 -b FD(+)g Fl(bx)1957 2448 y Ff(m)2044 2434 y FD(+)g Fl(cy)2219 -2448 y Ff(m)1489 2602 y Fl(y)1534 2616 y Ff(p)1599 2602 -y FD(=)25 b Fl(d)20 b FD(+)g Fl(ex)1947 2616 y Ff(m)2034 -2602 y FD(+)g Fl(f)10 b(y)2225 2616 y Ff(m)0 2819 y FD(where)26 -b(the)g Fq(p)33 b FD(subscript)24 b(indicates)h(\\predicted")h(co)s -(ordinates)g(\(the)h(mo)s(del's)e(appro)m(ximation)g(to)i(the)g(ideal)0 -2932 y(\\exp)s(ected")32 b(co)s(ordinates\))e(and)g(the)h -Fq(m)38 b FD(subscript)28 b(indicates)h(\\measured)i(co)s(ordinates".) -41 b(The)30 b(six)g(co)s(e\016-)0 3045 y(cien)m(ts)f -Fq(a{f)48 b FD(can)29 b(optionally)e(b)s(e)h(constrained)g(to)h -(represen)m(t)g(a)g(\\solid)e(b)s(o)s(dy)g(rotation")j(free)f(of)f(an)m -(y)h(squash)0 3158 y(or)42 b(shear)g(distortions.)74 -b(Without)42 b(this)f(constrain)m(t)h(the)g(mo)s(del)f(can,)46 -b(to)c(some)h(exten)m(t,)k(accommo)s(date)0 3271 y(e\013ects)28 -b(lik)m(e)e(refraction,)i(allo)m(wing)d(mean)i(places)g(to)h(b)s(e)e -(used)g(directly)f(and)i(a)m(v)m(oiding)f(the)h(extra)h(complica-)0 -3383 y(tions)g(of)g(a)g(full)e(mean-apparen)m(t-observ)m(ed)k -(transformation)d(for)h(eac)m(h)h(star.)41 b(Ha)m(ving)28 -b(obtained)g(the)g(linear)0 3496 y(mo)s(del,)c(sla)p -Ft(_)p FD(PXY)g(can)g(b)s(e)g(used)f(to)i(pro)s(cess)e(the)i(set)f(of)h -(measured)e(and)h(exp)s(ected)g(co)s(ordinates,)h(giving)e(the)0 -3609 y(predicted)29 b(co)s(ordinates)i(and)f(determining)e(the)j(RMS)g -(residuals)d(in)h Fq(x)42 b FD(and)30 b Fq(y)p FD(.)41 -b(The)30 b(routine)g(sla)p Ft(_)p FD(XY2XY)0 3722 y(transforms)i(one)h -([)15 b Fl(x;)g(y)k FD(])33 b(in)m(to)g(another)g(using)f(the)h(linear) -e(mo)s(del.)47 b(A)33 b(mo)s(del)f(can)h(b)s(e)f(in)m(v)m(erted)h(b)m -(y)g(calling)0 3835 y(sla)p Ft(_)p FD(INVF,)27 b(and)f(decomp)s(osed)h -(in)m(to)g(zero)g(p)s(oin)m(ts,)g(scales,)h Fl(x=y)i -FD(nonp)s(erp)s(endicularit)m(y)22 b(and)27 b(orien)m(tation)g(b)m(y)0 -3948 y(calling)i(sla)p Ft(_)p FD(DCMPF.)0 4242 y Fv(4.21)112 -b(Numerical)35 b(Metho)s(ds)0 4464 y FD(SLALIB)27 b(con)m(tains)i(a)f -(small)f(n)m(um)m(b)s(er)f(of)j(simple,)d(general-purp)s(ose)h(n)m -(umerical-metho)s(ds)f(routines.)39 b(They)0 4577 y(ha)m(v)m(e)30 -b(no)f(sp)s(eci\014c)e(connection)i(with)e(p)s(ositional)g(astronom)m -(y)i(but)f(ha)m(v)m(e)i(pro)m(v)m(ed)f(useful)e(in)h(applications)f(to) -0 4690 y(do)j(with)f(sim)m(ulation)g(and)h(\014tting.)0 -4853 y(A)m(t)g(the)g(heart)f(of)g(man)m(y)h(sim)m(ulation)d(programs)i -(is)f(the)h(generation)h(of)f(pseudo-random)f(n)m(um)m(b)s(ers,)h(ev)m -(enly)0 4966 y(distributed)39 b(in)i(a)i(giv)m(en)f(range:)64 -b(sla)p Ft(_)p FD(RANDOM)43 b(do)s(es)e(this.)76 b(Pseudo-random)41 -b(normal)g(deviates,)k(or)0 5078 y(\\Gaussian)26 b(residuals",)g(are)h -(often)g(required)d(to)k(sim)m(ulate)d(noise)h(and)g(can)h(b)s(e)f -(generated)i(b)m(y)e(means)h(of)f(the)0 5191 y(function)35 -b(sla)p Ft(_)p FD(GRESID.)h(Neither)h(routine)f(will)e(pass)i(sup)s -(er-sophisticated)e(statistical)j(tests,)i(but)d(they)0 -5304 y(w)m(ork)i(adequately)g(for)g(most)g(practical)g(purp)s(oses)e -(and)i(a)m(v)m(oid)g(the)g(need)g(to)h(call)e(non-standard)g(library)0 -5417 y(routines)29 b(p)s(eculiar)f(to)k(one)e(sort)h(of)f(computer.)0 -5580 y(Applications)39 b(whic)m(h)g(p)s(erform)h(a)h(least-squares)g -(\014t)g(using)f(a)h(traditional)e(normal-equations)h(metho)s(ds)0 -5693 y(can)c(accomplish)e(the)i(required)d(matrix-in)m(v)m(ersion)h(b)m -(y)h(calling)f(either)h(sla)p Ft(_)p FD(SMA)-8 b(T)35 -b(\(single)f(precision\))g(or)p eop -%%Page: 209 211 -209 210 bop 0 52 a Fw(SUN/67.70)3206 b FD(209)0 351 y(sla)p -Ft(_)p FD(DMA)-8 b(T)27 b(\(double\).)38 b(A)27 b(generally)f(b)s -(etter)g(w)m(a)m(y)h(to)h(p)s(erform)d(suc)m(h)h(\014ts)g(is)f(to)i -(use)g(singular)d(v)-5 b(alue)26 b(decom-)0 464 y(p)s(osition.)38 -b(SLALIB)29 b(pro)m(vides)f(a)i(routine)e(to)i(do)f(the)g(decomp)s -(osition)f(itself,)h(sla)p Ft(_)p FD(SVD,)f(and)h(t)m(w)m(o)i(routines) -0 577 y(to)g(use)f(the)h(results:)40 b(sla)p Ft(_)p FD(SVDSOL)28 -b(generates)k(the)f(solution,)e(and)h(sla)p Ft(_)p FD(SVDCO)m(V)g(pro)s -(duces)f(the)i(co)m(v)-5 b(ari-)0 690 y(ance)29 b(matrix.)39 -b(A)28 b(simple)e(demonstration)h(of)h(the)g(use)f(of)h(the)h(SLALIB)e -(SVD)h(routines)e(is)h(giv)m(en)h(b)s(elo)m(w.)39 b(It)0 -803 y(generates)29 b(500)g(sim)m(ulated)e(data)h(p)s(oin)m(ts)f(and)g -(\014ts)g(them)h(to)g(a)h(mo)s(del)d(whic)m(h)h(has)g(4)h(unkno)m(wn)e -(co)s(e\016cien)m(ts.)0 916 y(\(The)h(arra)m(ys)h(in)e(the)h(example)g -(are)g(sized)g(to)h(accept)h(up)d(to)i(1000)h(p)s(oin)m(ts)d(and)g(20)j -(unkno)m(wns.\))38 b(The)27 b(mo)s(del)0 1029 y(is:)1225 -1155 y Fl(y)h FD(=)d Fl(C)1459 1169 y Fu(1)1518 1155 -y FD(+)20 b Fl(C)1674 1169 y Fu(2)1714 1155 y Fl(x)g -FD(+)g Fl(C)1942 1169 y Fu(3)1981 1155 y Fl(sinx)g FD(+)g -Fl(C)2338 1169 y Fu(4)2377 1155 y Fl(cosx)0 1338 y FD(The)31 -b(test)i(v)-5 b(alues)31 b(for)h(the)g(four)f(co)s(e\016cien)m(ts)i -(are)f Fl(C)1809 1352 y Fu(1)1861 1338 y FD(=)13 b(+50)p -Fl(:)p FD(0,)33 b Fl(C)2299 1352 y Fu(2)2351 1338 y FD(=)13 -b Fo(\000)p FD(2)p Fl(:)p FD(0,)33 b Fl(C)2744 1352 y -Fu(3)2796 1338 y FD(=)13 b Fo(\000)p FD(10)p Fl(:)p FD(0)32 -b(and)g Fl(C)3387 1352 y Fu(4)3439 1338 y FD(=)13 b(+25)p -Fl(:)p FD(0.)0 1451 y(Gaussian)30 b(noise,)g Fl(\033)e -FD(=)d(5)p Fl(:)p FD(0,)32 b(is)d(added)h(to)h(eac)m(h)g(\\observ)-5 -b(ation".)573 1741 y Ft(IMPLICIT)45 b(NONE)286 1967 y(*)96 -b(Sizes)46 b(of)h(arrays,)f(physical)f(and)i(logical)573 -2080 y(INTEGER)f(MP,NP,NC,M,N)573 2193 y(PARAMETER)f -(\(MP=1000,NP=10,NC=20,M=5)o(00,N)o(=4\))286 2419 y(*)96 -b(The)46 b(unknowns)g(we)h(are)g(going)f(to)i(solve)e(for)573 -2532 y(DOUBLE)g(PRECISION)f(C1,C2,C3,C4)573 2644 y(PARAMETER)g -(\(C1=50D0,C2=-2D0,C3=-10D)o(0,C4)o(=25D)o(0\))286 2870 -y(*)96 b(Arrays)573 2983 y(DOUBLE)46 b(PRECISION)f -(A\(MP,NP\),W\(NP\),V\(NP,NP\),)525 3096 y(:)811 b -(WORK\(NP\),B\(MP\),X\(NP\),CVM\()o(NC,)o(NC\))573 3322 -y(DOUBLE)46 b(PRECISION)f(VAL,BF1,BF2,BF3,BF4,SD2,D)o(,VA)o(R)573 -3435 y(REAL)h(sla_GRESID)573 3548 y(INTEGER)g(I,J)286 -3774 y(*)96 b(Fill)46 b(the)h(design)f(matrix)573 3886 -y(DO)h(I=1,M)286 4112 y(*)239 b(Dummy)46 b(independent)f(variable)716 -4225 y(VAL=DBLE\(I\)/10D0)286 4451 y(*)239 b(The)47 b(basis)f -(functions)716 4564 y(BF1=1D0)716 4677 y(BF2=VAL)716 -4790 y(BF3=SIN\(VAL\))716 4903 y(BF4=COS\(VAL\))286 5128 -y(*)239 b(The)47 b(observed)e(value,)h(including)g(deliberate)f -(Gaussian)g(noise)716 5241 y(B\(I\)=C1*BF1+C2*BF2+C3*BF)o(3+C4)o(*BF)o -(4+DB)o(LE\(s)o(la_)o(GRES)o(ID\(5)o(.0\))o(\))286 5467 -y(*)239 b(Fill)46 b(one)h(row)g(of)g(the)g(design)f(matrix)716 -5580 y(A\(I,1\)=BF1)716 5693 y(A\(I,2\)=BF2)p eop -%%Page: 210 212 -210 211 bop 0 52 a FD(210)716 351 y Ft(A\(I,3\)=BF3)716 -464 y(A\(I,4\)=BF4)573 577 y(END)47 b(DO)286 803 y(*)96 -b(Factorize)45 b(the)i(design)f(matrix,)g(solve)g(and)h(generate)e -(covariance)g(matrix)573 916 y(CALL)h(sla_SVD\(M,N,MP,NP,A,W,V,WO)o -(RK,)o(J\))573 1029 y(CALL)g(sla_SVDSOL\(M,N,MP,NP,B,A,W)o(,V,)o(WORK)o -(,X\))573 1142 y(CALL)g(sla_SVDCOV\(N,NP,NC,W,V,WOR)o(K,C)o(VM\))286 -1367 y(*)96 b(Compute)45 b(the)i(variance)573 1480 y(SD2=0D0)573 -1593 y(DO)g(I=1,M)716 1706 y(VAL=DBLE\(I\)/10D0)716 1819 -y(BF1=1D0)716 1932 y(BF2=VAL)716 2045 y(BF3=SIN\(VAL\))716 -2158 y(BF4=COS\(VAL\))716 2271 y(D=B\(I\)-\(X\(1\)*BF1+X\(2\)*BF)o -(2+X\()o(3\)*)o(BF3+)o(X\(4\))o(*BF)o(4\))716 2384 y(SD2=SD2+D*D)573 -2497 y(END)g(DO)573 2609 y(VAR=SD2/DBLE\(M\))286 2835 -y(*)96 b(Report)46 b(the)h(RMS)f(and)h(the)g(solution)573 -2948 y(WRITE)f(\(*,'\(1X,''RMS)e(='',F5.2/\)'\))h(SQRT\(VAR\))573 -3061 y(DO)i(I=1,N)716 3174 y(WRITE)f(\(*,'\(1X,''C'',I1,'')d -(='',F7.3,'')i(+/-'',F6.3\)'\))525 3287 y(:)1957 b -(I,X\(I\),SQRT\(VAR*CVM\(I,I)o(\)\))573 3400 y(END)47 -b(DO)573 3513 y(END)0 3788 y FD(The)30 b(program)g(pro)s(duces)f -(output)h(lik)m(e)g(the)g(follo)m(wing:)573 4063 y Ft(RMS)47 -b(=)g(4.88)573 4289 y(C1)g(=)g(50.192)f(+/-)h(0.439)573 -4402 y(C2)g(=)g(-2.002)f(+/-)h(0.015)573 4515 y(C3)g(=)g(-9.771)f(+/-)h -(0.310)573 4628 y(C4)g(=)g(25.275)f(+/-)h(0.310)0 4903 -y FD(In)42 b(this)g(ab)s(o)m(v)m(e)i(example,)i(essen)m(tially)c(iden)m -(tical)f(results)h(w)m(ould)g(b)s(e)g(obtained)g(if)g(the)h(more)g -(common-)0 5016 y(place)31 b(normal-equations)f(metho)s(d)h(had)f(b)s -(een)g(used,)h(and)f(the)i(large)f(1000)22 b Fo(\002)f -FD(20)32 b(arra)m(y)f(w)m(ould)f(ha)m(v)m(e)i(b)s(een)0 -5128 y(a)m(v)m(oided.)50 b(Ho)m(w)m(ev)m(er,)36 b(the)d(SVD)h(metho)s -(d)e(comes)i(in)m(to)f(its)g(o)m(wn)g(when)f(the)i(opp)s(ortunit)m(y)d -(is)i(tak)m(en)h(to)g(edit)0 5241 y(the)29 b(W-matrix)g(\(the)g -(so-called)f(\\singular)f(v)-5 b(alues"\))29 b(in)e(order)h(to)i(con)m -(trol)f(p)s(ossible)d(ill-conditioning.)36 b(The)0 5354 -y(pro)s(cedure)e(in)m(v)m(olv)m(es)i(replacing)e(with)g(zero)s(es)i(an) -m(y)g(W-elemen)m(ts)g(smaller)e(than)h(a)h(nominated)e(v)-5 -b(alue,)37 b(for)0 5467 y(example)32 b(0.001)j(times)d(the)g(largest)h -(W-elemen)m(t.)48 b(Small)31 b(W-elemen)m(ts)i(indicate)f -(ill-conditioning,)d(whic)m(h)0 5580 y(in)f(the)h(case)h(of)f(the)h -(normal-equations)e(metho)s(d)g(w)m(ould)g(pro)s(duce)g(spurious)f -(large)i(co)s(e\016cien)m(t)h(v)-5 b(alues)28 b(and)0 -5693 y(p)s(ossible)23 b(arithmetic)i(o)m(v)m(er\015o)m(ws.)41 -b(Using)24 b(SVD,)i(the)g(e\013ect)h(on)f(the)g(solution)e(of)i -(setting)g(suspiciously)c(small)p eop -%%Page: 211 213 -211 212 bop 0 52 a Fw(SUN/67.70)3206 b FD(211)0 351 y(W-elemen)m(ts)31 -b(to)g(zero)g(is)e(to)i(restrain)e(the)h(o\013ending)f(co)s(e\016cien)m -(ts)i(from)f(mo)m(ving)f(v)m(ery)i(far.)40 b(The)30 b(fact)h(that)0 -464 y(action)i(w)m(as)g(tak)m(en)h(can)f(b)s(e)f(rep)s(orted)g(to)i -(sho)m(w)f(the)f(program)h(user)f(that)h(something)g(is)e(amiss.)47 -b(F)-8 b(urther-)0 577 y(more,)32 b(if)e(elemen)m(t)i(W\(J\))g(w)m(as)f -(set)h(to)g(zero,)h(the)e(ro)m(w)g(n)m(um)m(b)s(ers)f(of)i(the)f(t)m(w) -m(o)i(biggest)e(elemen)m(ts)h(in)e(the)h(Jth)0 690 y(column)e(of)i(the) -f(V-matrix)g(iden)m(tify)f(the)i(pair)e(of)i(solution)d(co)s(e\016cien) -m(ts)k(that)f(are)f(dep)s(enden)m(t.)0 853 y(A)f(more)g(detailed)f -(description)f(of)i(SVD)g(and)f(its)g(use)h(in)e(least-squares)i -(problems)f(w)m(ould)f(b)s(e)h(out)h(of)h(place)0 966 -y(here,)40 b(and)d(the)g(reader)h(is)e(urged)h(to)i(refer)e(to)i(the)e -(relev)-5 b(an)m(t)38 b(sections)g(of)g(the)f(b)s(o)s(ok)g -Fq(Numeric)-5 b(al)40 b(R)-5 b(e)g(cip)g(es)0 1079 y -FD(\(Press)30 b Fq(et)j(al.)p FD(,)e(Cam)m(bridge)e(Univ)m(ersit)m(y)h -(Press,)g(1987\).)0 1241 y(The)21 b(routines)g(sla)p -Ft(_)p FD(COMBN)h(and)f(sla)p Ft(_)p FD(PERMUT)g(are)h(useful)f(for)g -(problems)f(whic)m(h)h(in)m(v)m(olv)m(e)h(com)m(binations)0 -1354 y(\(di\013eren)m(t)35 b(subsets\))f(and)g(p)s(erm)m(utations)g -(\(di\013eren)m(t)h(orders\).)53 b(Both)36 b(return)d(the)i(next)g(in)f -(a)h(sequence)g(of)0 1467 y(results,)29 b(cycling)h(through)g(all)f -(the)h(p)s(ossible)e(results)i(as)g(the)h(routine)e(is)h(called)f(rep)s -(eatedly)-8 b(.)p eop -%%Page: 212 214 -212 213 bop 0 52 a FD(212)0 351 y Fx(5)135 b(SUMMAR)-11 -b(Y)43 b(OF)h(CALLS)0 604 y FD(The)20 b(basic)g(trigonometrical)g(and)h -(n)m(umerical)e(facilities)g(are)i(supplied)c(in)j(b)s(oth)g(single)f -(and)h(double)f(precision)0 717 y(v)m(ersions.)46 b(Most)34 -b(of)e(the)h(more)f(esoteric)i(p)s(osition)c(and)i(time)g(routines)f -(use)i(double)e(precision)f(argumen)m(ts)0 829 y(only)-8 -b(,)45 b(ev)m(en)f(in)d(cases)i(where)f(single)f(precision)g(w)m(ould)g -(normally)g(b)s(e)h(adequate)i(in)d(practice.)77 b(Certain)0 -942 y(routines)32 b(with)h(mo)s(dest)g(accuracy)i(ob)5 -b(jectiv)m(es)34 b(are)g(supplied)c(in)i(single)g(precision)g(v)m -(ersions)h(only)-8 b(.)49 b(In)33 b(the)0 1055 y(calling)38 -b(sequences)h(whic)m(h)f(follo)m(w,)i(no)f(attempt)h(has)f(b)s(een)g -(made)g(to)g(distinguish)d(b)s(et)m(w)m(een)j(single)f(and)0 -1168 y(double)30 b(precision)f(argumen)m(t)j(names,)g(and)e(frequen)m -(tly)h(the)g(same)h(name)g(is)e(used)g(on)i(di\013eren)m(t)e(o)s -(ccasions)0 1281 y(to)39 b(mean)f(di\013eren)m(t)g(things.)63 -b(Ho)m(w)m(ev)m(er,)42 b(none)c(of)g(the)h(routines)e(uses)h(a)g -(mixture)f(of)h(single)f(and)h(double)0 1394 y(precision)29 -b(argumen)m(ts;)h(eac)m(h)i(routine)d(is)h(either)g(wholly)e(single)h -(precision)g(or)h(wholly)e(double)h(precision.)0 1556 -y(In)h(the)i(classi\014ed)d(list,)i(b)s(elo)m(w,)f Fq(subr)-5 -b(outine)39 b FD(subprograms)30 b(are)h(those)h(whose)f(names)g(and)f -(argumen)m(t)i(lists)0 1669 y(are)39 b(preceded)g(b)m(y)f(`CALL',)h -(whereas)g Fq(function)46 b FD(subprograms)37 b(are)j(those)f(b)s -(eginning)d(`R=')j(\(when)f(the)0 1782 y(result)29 b(is)h(REAL\))g(or)h -(`D=')f(\(when)g(the)h(result)e(is)g(DOUBLE)i(PRECISION\).)0 -1944 y(The)e(list)f(is,)i(of)f(course,)i(merely)e(for)g(quic)m(k)g -(reference;)i(inexp)s(erienced)c(users)i FB(m)m(ust)g -FD(refer)g(to)i(the)e(detailed)0 2057 y(sp)s(eci\014cations)34 -b(giv)m(en)h(later.)55 b(In)34 b(particular,)h FB(don't)40 -b(guess)c FD(whether)e(argumen)m(ts)i(are)f(single)f(or)h(double)0 -2170 y(precision;)29 b(the)i(result)e(could)h(b)s(e)g(a)h(program)f -(that)h(happ)s(ens)e(to)i(w)m(orks)g(on)f(one)h(sort)f(of)h(mac)m(hine) -f(but)g(not)0 2283 y(on)g(another.)0 2544 y Fv(String)36 -b(Deco)s(ding)236 2780 y FD(CALL)30 b(sla)p Ft(_)p FD(INTIN)f -(\(STRING,)i(NSTR)-8 b(T,)30 b(IRESL)-8 b(T,)29 b(JFLA)m(G\))472 -2893 y(Con)m(v)m(ert)j(free-format)f(string)e(in)m(to)i(in)m(teger)236 -3068 y(CALL)f(sla)p Ft(_)p FD(FLOTIN)f(\(STRING,)h(NSTR)-8 -b(T,)30 b(RESL)-8 b(T,)30 b(JFLA)m(G\))236 3181 y(CALL)g(sla)p -Ft(_)p FD(DFL)-8 b(TIN)30 b(\(STRING,)h(NSTR)-8 b(T,)30 -b(DRESL)-8 b(T,)30 b(JFLA)m(G\))472 3294 y(Con)m(v)m(ert)i(free-format) -f(string)e(in)m(to)i(\015oating-p)s(oin)m(t)e(n)m(um)m(b)s(er)236 -3469 y(CALL)h(sla)p Ft(_)p FD(AFIN)g(\(STRING,)g(NSTR)-8 -b(T,)30 b(RESL)-8 b(T,)30 b(JFLA)m(G\))236 3582 y(CALL)g(sla)p -Ft(_)p FD(D)m(AFIN)h(\(STRING,)f(NSTR)-8 b(T,)30 b(DRESL)-8 -b(T,)30 b(JFLA)m(G\))472 3694 y(Con)m(v)m(ert)i(free-format)f(string)e -(from)h(deg,arcmin,arcsec)h(to)g(radians)0 4029 y Fv(Sexagesimal)37 -b(Con)m(v)m(ersions)236 4265 y FD(CALL)30 b(sla)p Ft(_)p -FD(CTF2D)g(\(IHOUR,)h(IMIN,)g(SEC,)e(D)m(A)-8 b(YS,)32 -b(J\))236 4378 y(CALL)e(sla)p Ft(_)p FD(DTF2D)h(\(IHOUR,)g(IMIN,)f -(SEC,)g(D)m(A)-8 b(YS,)32 b(J\))472 4491 y(Hours,)f(min)m(utes,)e -(seconds)i(to)g(da)m(ys)236 4666 y(CALL)f(sla)p Ft(_)p -FD(CD2TF)g(\(NDP)-8 b(,)32 b(D)m(A)-8 b(YS,)32 b(SIGN,)e(IHMSF\))236 -4779 y(CALL)g(sla)p Ft(_)p FD(DD2TF)h(\(NDP)-8 b(,)32 -b(D)m(A)-8 b(YS,)32 b(SIGN,)e(IHMSF\))472 4892 y(Da)m(ys)i(to)f(hours,) -f(min)m(utes,)f(seconds)236 5067 y(CALL)h(sla)p Ft(_)p -FD(CTF2R)g(\(IHOUR,)g(IMIN,)h(SEC,)f(RAD,)h(J\))236 5180 -y(CALL)f(sla)p Ft(_)p FD(DTF2R)g(\(IHOUR,)h(IMIN,)g(SEC,)e(RAD,)j(J\)) -472 5292 y(Hours,)f(min)m(utes,)e(seconds)i(to)g(radians)236 -5467 y(CALL)f(sla)p Ft(_)p FD(CR2TF)g(\(NDP)-8 b(,)31 -b(ANGLE,)g(SIGN,)g(IHMSF\))236 5580 y(CALL)f(sla)p Ft(_)p -FD(DR2TF)g(\(NDP)-8 b(,)32 b(ANGLE,)f(SIGN,)g(IHMSF\))472 -5693 y(Radians)f(to)h(hours,)e(min)m(utes,)h(seconds)p -eop -%%Page: 213 215 -213 214 bop 0 52 a Fw(SUN/67.70)3206 b FD(213)236 351 -y(CALL)30 b(sla)p Ft(_)p FD(CAF2R)g(\(IDEG,)i(IAMIN,)e(ASEC,)g(RAD,)h -(J\))236 464 y(CALL)f(sla)p Ft(_)p FD(D)m(AF2R)h(\(IDEG,)h(IAMIN,)f -(ASEC,)e(RAD,)j(J\))472 577 y(Degrees,)h(arcmin)m(utes,)d(arcseconds)g -(to)i(radians)236 747 y(CALL)e(sla)p Ft(_)p FD(CR2AF)g(\(NDP)-8 -b(,)32 b(ANGLE,)f(SIGN,)f(IDMSF\))236 860 y(CALL)g(sla)p -Ft(_)p FD(DR2AF)h(\(NDP)-8 b(,)32 b(ANGLE,)f(SIGN,)f(IDMSF\))472 -973 y(Radians)g(to)h(degrees,)g(arcmin)m(utes,)f(arcseconds)0 -1284 y Fv(Angles,)37 b(V)-9 b(ectors)36 b(and)j(Rotation)d(Matrices)236 -1505 y FD(R)30 b(=)g(sla)p Ft(_)p FD(RANGE)h(\(ANGLE\))236 -1618 y(D)g(=)f(sla)p Ft(_)p FD(DRANGE)h(\(ANGLE\))472 -1731 y(Normalize)g(angle)f(in)m(to)g(range)h Fo(\006)p -Fl(\031)236 1901 y FD(R)f(=)g(sla)p Ft(_)p FD(RANORM)g(\(ANGLE\))236 -2014 y(D)h(=)f(sla)p Ft(_)p FD(DRANRM)h(\(ANGLE\))472 -2127 y(Normalize)g(angle)f(in)m(to)g(range)h(0)5 b Fo(\000)g -FD(2)p Fl(\031)236 2297 y FD(CALL)30 b(sla)p Ft(_)p FD(CS2C)f(\(A,)i -(B,)g(V\))236 2410 y(CALL)f(sla)p Ft(_)p FD(DCS2C)f(\(A,)i(B,)g(V\))472 -2523 y(Spherical)e(co)s(ordinates)h(to)h([)15 b Fl(x;)g(y)s(;)g(z)20 -b FD(])236 2694 y(CALL)30 b(sla)p Ft(_)p FD(CC2S)f(\(V,)i(A,)g(B\))236 -2807 y(CALL)f(sla)p Ft(_)p FD(DCC2S)f(\(V,)i(A,)g(B\))472 -2919 y([)15 b Fl(x;)g(y)s(;)g(z)21 b FD(])30 b(to)i(spherical)c(co)s -(ordinates)236 3090 y(R)i(=)g(sla)p Ft(_)p FD(VD)m(V)h(\(V)-10 -b(A,)32 b(VB\))236 3203 y(D)f(=)f(sla)p Ft(_)p FD(D)m(VD)m(V)i(\(V)-10 -b(A,)31 b(VB\))472 3316 y(Scalar)f(pro)s(duct)g(of)g(t)m(w)m(o)i(3-v)m -(ectors)236 3486 y(CALL)e(sla)p Ft(_)p FD(VXV)g(\(V)-10 -b(A,)31 b(VB,)g(V)m(C\))236 3599 y(CALL)f(sla)p Ft(_)p -FD(D)m(VXV)h(\(V)-10 b(A,)31 b(VB,)g(V)m(C\))472 3712 -y(V)-8 b(ector)33 b(pro)s(duct)c(of)h(t)m(w)m(o)i(3-v)m(ectors)236 -3882 y(CALL)e(sla)p Ft(_)p FD(VN)g(\(V,)h(UV,)g(VM\))236 -3995 y(CALL)f(sla)p Ft(_)p FD(D)m(VN)h(\(V,)g(UV,)g(VM\))472 -4108 y(Normalize)g(a)f(3-v)m(ector)j(also)d(giving)g(the)g(mo)s(dulus) -236 4279 y(R)g(=)g(sla)p Ft(_)p FD(SEP)f(\(A1,)j(B1,)f(A2,)g(B2\))236 -4391 y(D)g(=)f(sla)p Ft(_)p FD(DSEP)f(\(A1,)j(B1,)f(A2,)g(B2\))472 -4504 y(Angle)g(b)s(et)m(w)m(een)g(t)m(w)m(o)g(p)s(oin)m(ts)f(on)g(a)h -(sphere)236 4675 y(R)f(=)g(sla)p Ft(_)p FD(SEPV)f(\(V1,)j(V2\))236 -4788 y(D)f(=)f(sla)p Ft(_)p FD(DSEPV)f(\(V1,)j(V2\))472 -4901 y(Angle)f(b)s(et)m(w)m(een)g(t)m(w)m(o)g([)15 b -Fl(x;)g(y)s(;)g(z)21 b FD(])30 b(v)m(ectors)236 5071 -y(R)g(=)g(sla)p Ft(_)p FD(BEAR)g(\(A1,)i(B1,)f(A2,)h(B2\))236 -5184 y(D)f(=)f(sla)p Ft(_)p FD(DBEAR)g(\(A1,)i(B1,)f(A2,)h(B2\))472 -5297 y(Direction)e(of)h(one)g(p)s(oin)m(t)e(on)h(a)h(sphere)f(seen)g -(from)g(another)236 5467 y(R)g(=)g(sla)p Ft(_)p FD(P)-8 -b(A)e(V)31 b(\(V1,)g(V2\))236 5580 y(D)g(=)f(sla)p Ft(_)p -FD(DP)-8 b(A)e(V)31 b(\(V1,)g(V2\))472 5693 y(P)m(osition-angle)g(of)f -(one)h([)15 b Fl(x;)g(y)s(;)g(z)20 b FD(])31 b(with)e(resp)s(ect)h(to)h -(another)p eop -%%Page: 214 216 -214 215 bop 0 52 a FD(214)236 351 y(CALL)30 b(sla)p Ft(_)p -FD(EULER)f(\(ORDER,)i(PHI,)f(THET)-8 b(A,)31 b(PSI,)f(RMA)-8 -b(T\))236 464 y(CALL)30 b(sla)p Ft(_)p FD(DEULER)g(\(ORDER,)g(PHI,)h -(THET)-8 b(A,)30 b(PSI,)g(RMA)-8 b(T\))472 577 y(F)g(orm)31 -b(rotation)g(matrix)f(from)g(three)g(Euler)f(angles)236 -756 y(CALL)h(sla)p Ft(_)p FD(A)-10 b(V2M)31 b(\(AXVEC,)g(RMA)-8 -b(T\))236 869 y(CALL)30 b(sla)p Ft(_)p FD(D)m(A)-10 b(V2M)32 -b(\(AXVEC,)f(RMA)-8 b(T\))472 982 y(F)g(orm)31 b(rotation)g(matrix)f -(from)g(axial)f(v)m(ector)236 1161 y(CALL)h(sla)p Ft(_)p -FD(M2A)-10 b(V)31 b(\(RMA)-8 b(T,)31 b(AXVEC\))236 1274 -y(CALL)f(sla)p Ft(_)p FD(DM2A)-10 b(V)31 b(\(RMA)-8 b(T,)32 -b(AXVEC\))472 1387 y(Determine)f(axial)f(v)m(ector)i(from)d(rotation)i -(matrix)236 1567 y(CALL)f(sla)p Ft(_)p FD(MXV)g(\(RM,)h(V)-10 -b(A,)31 b(VB\))236 1679 y(CALL)f(sla)p Ft(_)p FD(DMXV)h(\(DM,)g(V)-10 -b(A,)31 b(VB\))472 1792 y(Rotate)i(v)m(ector)f(forw)m(ards)236 -1972 y(CALL)e(sla)p Ft(_)p FD(IMXV)g(\(RM,)h(V)-10 b(A,)31 -b(VB\))236 2085 y(CALL)f(sla)p Ft(_)p FD(DIMXV)h(\(DM,)g(V)-10 -b(A,)31 b(VB\))472 2197 y(Rotate)i(v)m(ector)f(bac)m(kw)m(ards)236 -2377 y(CALL)e(sla)p Ft(_)p FD(MXM)g(\(A,)i(B,)e(C\))236 -2490 y(CALL)g(sla)p Ft(_)p FD(DMXM)h(\(A,)g(B,)g(C\))472 -2603 y(Pro)s(duct)f(of)h(t)m(w)m(o)g(3x3)g(matrices)236 -2782 y(CALL)f(sla)p Ft(_)p FD(CS2C6)f(\(A,)i(B,)g(R,)g(AD,)g(BD,)g(RD,) -g(V\))236 2895 y(CALL)f(sla)p Ft(_)p FD(DS2C6)g(\(A,)h(B,)g(R,)g(AD,)g -(BD,)g(RD,)g(V\))472 3008 y(Con)m(v)m(ersion)24 b(of)g(p)s(osition)e -(and)h(v)m(elo)s(cit)m(y)h(in)f(spherical)e(co)s(ordinates)j(to)g -(Cartesian)g(co)s(ordinates)236 3187 y(CALL)30 b(sla)p -Ft(_)p FD(CC62S)f(\(V,)i(A,)g(B,)g(R,)g(AD,)g(BD,)g(RD\))236 -3300 y(CALL)f(sla)p Ft(_)p FD(DC62S)g(\(V,)h(A,)g(B,)g(R,)f(AD,)i(BD,)f -(RD\))472 3413 y(Con)m(v)m(ersion)24 b(of)g(p)s(osition)e(and)h(v)m -(elo)s(cit)m(y)h(in)f(Cartesian)g(co)s(ordinates)g(to)i(spherical)d(co) -s(ordinates)0 3762 y Fv(Calendars)236 4006 y FD(CALL)30 -b(sla)p Ft(_)p FD(CLDJ)f(\(IY,)i(IM,)g(ID,)g(DJM,)g(J\))472 -4119 y(Gregorian)g(Calendar)e(to)i(Mo)s(di\014ed)e(Julian)f(Date)236 -4298 y(CALL)i(sla)p Ft(_)p FD(CALDJ)f(\(IY,)i(IM,)g(ID,)g(DJM,)g(J\)) -472 4411 y(Gregorian)g(Calendar)e(to)i(Mo)s(di\014ed)e(Julian)f(Date,)k -(p)s(ermitting)c(cen)m(tury)j(default)236 4591 y(CALL)f(sla)p -Ft(_)p FD(DJCAL)f(\(NDP)-8 b(,)32 b(DJM,)f(IYMDF,)h(J\))472 -4704 y(Mo)s(di\014ed)39 b(Julian)e(Date)k(to)g(Gregorian)f(Calendar,)h -(in)d(a)i(form)f(con)m(v)m(enien)m(t)i(for)f(formatted)472 -4816 y(output)236 4996 y(CALL)30 b(sla)p Ft(_)p FD(DJCL)f(\(DJM,)j(IY,) -e(IM,)h(ID,)g(FD,)g(J\))472 5109 y(Mo)s(di\014ed)e(Julian)f(Date)k(to)f -(Gregorian)g(Y)-8 b(ear,)31 b(Mon)m(th,)g(Da)m(y)-8 b(,)33 -b(F)-8 b(raction)236 5288 y(CALL)30 b(sla)p Ft(_)p FD(CAL)-8 -b(YD)30 b(\(IY,)h(IM,)g(ID,)g(NY,)g(ND,)g(J\))472 5401 -y(Calendar)f(to)h(y)m(ear)g(and)f(da)m(y)g(in)f(y)m(ear,)j(p)s -(ermitting)c(cen)m(tury)j(default)236 5580 y(CALL)f(sla)p -Ft(_)p FD(CL)-8 b(YD)30 b(\(IY,)h(IM,)g(ID,)g(NY,)g(ND,)g(J\))472 -5693 y(Calendar)f(to)h(y)m(ear)g(and)f(da)m(y)g(in)f(y)m(ear)p -eop -%%Page: 215 217 -215 216 bop 0 52 a Fw(SUN/67.70)3206 b FD(215)236 351 -y(D)31 b(=)f(sla)p Ft(_)p FD(EPB)g(\(D)m(A)-8 b(TE\))472 -464 y(Mo)s(di\014ed)29 b(Julian)f(Date)k(to)f(Besselian)f(Ep)s(o)s(c)m -(h)236 644 y(D)h(=)f(sla)p Ft(_)p FD(EPB2D)h(\(EPB\))472 -757 y(Besselian)f(Ep)s(o)s(c)m(h)g(to)h(Mo)s(di\014ed)e(Julian)f(Date) -236 937 y(D)j(=)f(sla)p Ft(_)p FD(EPJ)f(\(D)m(A)-8 b(TE\))472 -1050 y(Mo)s(di\014ed)29 b(Julian)f(Date)k(to)f(Julian)d(Ep)s(o)s(c)m(h) -236 1230 y(D)j(=)f(sla)p Ft(_)p FD(EPJ2D)g(\(EPJ\))472 -1343 y(Julian)e(Ep)s(o)s(c)m(h)i(to)h(Mo)s(di\014ed)e(Julian)f(Date)0 -1695 y Fv(Time)36 b(Scales)236 1940 y FD(D)31 b(=)f(sla)p -Ft(_)p FD(GMST)f(\(UT1\))472 2053 y(Con)m(v)m(ersion)h(from)g(Univ)m -(ersal)g(Time)f(to)i(sidereal)e(time)236 2233 y(D)i(=)f(sla)p -Ft(_)p FD(GMST)-8 b(A)30 b(\(D)m(A)-8 b(TE,)32 b(UT1\))472 -2346 y(Con)m(v)m(ersion)e(from)g(Univ)m(ersal)g(Time)f(to)i(sidereal)e -(time,)h(rounding)e(errors)i(minimized)236 2526 y(D)h(=)f(sla)p -Ft(_)p FD(EQEQX)f(\(D)m(A)-8 b(TE\))472 2639 y(Equation)30 -b(of)h(the)f(equino)m(xes)236 2819 y(D)h(=)f(sla)p Ft(_)p -FD(D)m(A)-8 b(T)31 b(\(DJU\))472 2932 y(O\013set)g(of)g(A)m(tomic)g -(Time)e(from)h(Co)s(ordinated)f(Univ)m(ersal)g(Time:)40 -b(T)-8 b(AI)p Fo(\000)p FD(UTC)236 3112 y(D)31 b(=)f(sla)p -Ft(_)p FD(DT)g(\(EPOCH\))472 3225 y(Appro)m(ximate)h(o\013set)g(b)s(et) -m(w)m(een)g(dynamical)e(time)h(and)g(univ)m(ersal)e(time)236 -3405 y(D)j(=)f(sla)p Ft(_)p FD(DTT)f(\(DJU\))472 3518 -y(O\013set)i(of)g(T)-8 b(errestrial)29 b(Time)g(from)h(Co)s(ordinated)f -(Univ)m(ersal)g(Time:)40 b(TT)p Fo(\000)p FD(UTC)236 -3698 y(D)31 b(=)f(sla)p Ft(_)p FD(R)m(CC)f(\(TDB,)j(UT1,)f(WL,)f(U,)h -(V\))472 3811 y(Relativistic)e(clo)s(c)m(k)i(correction:)41 -b(TDB)p Fo(\000)p FD(TT)0 4163 y Fv(Precession)c(and)h(Nutation)236 -4408 y FD(CALL)30 b(sla)p Ft(_)p FD(NUT)g(\(D)m(A)-8 -b(TE,)32 b(RMA)-8 b(TN\))472 4521 y(Nutation)31 b(matrix)236 -4701 y(CALL)f(sla)p Ft(_)p FD(NUTC)f(\(D)m(A)-8 b(TE,)32 -b(DPSI,)e(DEPS,)h(EPS0\))472 4814 y(Longitude)f(and)g(obliquit)m(y)e -(comp)s(onen)m(ts)j(of)f(n)m(utation,)h(and)e(mean)i(obliquit)m(y)236 -4994 y(CALL)f(sla)p Ft(_)p FD(NUTC80)g(\(D)m(A)-8 b(TE,)32 -b(DPSI,)e(DEPS,)h(EPS0\))472 5107 y(Longitude)f(and)g(obliquit)m(y)e -(comp)s(onen)m(ts)j(of)f(n)m(utation,)h(and)e(mean)i(obliquit)m(y)-8 -b(,)29 b(IA)m(U)i(1980)236 5287 y(CALL)f(sla)p Ft(_)p -FD(PREC)f(\(EP0,)i(EP1,)g(RMA)-8 b(TP\))472 5400 y(Precession)30 -b(matrix)g(\(IA)m(U\))236 5580 y(CALL)g(sla)p Ft(_)p -FD(PRECL)f(\(EP0,)i(EP1,)g(RMA)-8 b(TP\))472 5693 y(Precession)30 -b(matrix)g(\(suitable)f(for)h(long)g(p)s(erio)s(ds\))p -eop -%%Page: 216 218 -216 217 bop 0 52 a FD(216)236 351 y(CALL)30 b(sla)p Ft(_)p -FD(PRENUT)f(\(EPOCH,)h(D)m(A)-8 b(TE,)32 b(RMA)-8 b(TPN\))472 -464 y(Com)m(bined)29 b(precession-n)m(utation)h(matrix)236 -636 y(CALL)g(sla)p Ft(_)p FD(PREBN)g(\(BEP0,)h(BEP1,)g(RMA)-8 -b(TP\))472 749 y(Precession)30 b(matrix,)g(old)g(system)236 -921 y(CALL)g(sla)p Ft(_)p FD(PRECES)e(\(SYSTEM,)i(EP0,)h(EP1,)g(RA,)f -(DC\))472 1034 y(Precession,)h(in)e(either)h(the)g(old)g(or)g(the)h -(new)e(system)0 1352 y Fv(Prop)s(er)37 b(Motion)236 1578 -y FD(CALL)30 b(sla)p Ft(_)p FD(PM)g(\(R0,)h(D0,)h(PR,)e(PD,)h(PX,)f(R) --10 b(V,)31 b(EP0,)g(EP1,)f(R1,)h(D1\))472 1691 y(Adjust)f(for)g(prop)s -(er)f(motion)0 2009 y Fv(FK4/FK5/Hipparcos)38 b(Con)m(v)m(ersions)236 -2235 y FD(CALL)30 b(sla)p Ft(_)p FD(FK425)h(\(R1950,)i(D1950,)f -(DR1950,)h(DD1950,)g(P1950,)g(V1950,)1000 2348 y(R2000,)g(D2000,)f -(DR2000,)h(DD2000,)g(P2000,)g(V2000\))472 2442 y(Con)m(v)m(ert)f -(B1950.0)h(FK4)e(star)f(data)h(to)g(J2000.0)i(FK5)236 -2614 y(CALL)d(sla)p Ft(_)p FD(FK45Z)g(\(R1950,)j(D1950,)g(EPOCH,)c -(R2000,)k(D2000\))472 2727 y(Con)m(v)m(ert)j(B1950.0)j(FK4)c(p)s -(osition)f(to)h(J2000.0)j(FK5)e(assuming)d(zero)j(FK5)g(prop)s(er)e -(motion)472 2840 y(and)c(no)g(parallax)236 3011 y(CALL)g(sla)p -Ft(_)p FD(FK524)h(\(R2000,)i(D2000,)f(DR2000,)h(DD2000,)g(P2000,)g -(V2000,)1000 3124 y(R1950,)g(D1950,)f(DR1950,)h(DD1950,)g(P1950,)g -(V1950\))472 3218 y(Con)m(v)m(ert)f(J2000.0)g(FK5)f(star)g(data)g(to)g -(B1950.0)i(FK4)236 3390 y(CALL)d(sla)p Ft(_)p FD(FK54Z)g(\(R2000,)j -(D2000,)g(BEPOCH,)d(R1950,)i(D1950,)h(DR1950,)g(DD1950\))472 -3503 y(Con)m(v)m(ert)j(J2000.0)i(FK5)e(p)s(osition)d(to)j(B1950.0)i -(FK4)e(assuming)d(zero)j(FK5)g(prop)s(er)e(motion)472 -3616 y(and)c(no)g(parallax)236 3788 y(CALL)g(sla)p Ft(_)p -FD(FK52H)h(\(R5,)g(D5,)g(DR5,)h(DD5,)g(RH,)e(DH,)i(DRH,)f(DDH\))472 -3901 y(Con)m(v)m(ert)h(J2000.0)g(FK5)f(star)g(data)g(to)g(Hipparcos)236 -4073 y(CALL)f(sla)p Ft(_)p FD(FK5HZ)g(\(R5,)h(D5,)h(EPOCH,)d(RH,)i(DH)g -(\))472 4185 y(Con)m(v)m(ert)c(J2000.0)i(FK5)d(p)s(osition)e(to)j -(Hipparcos)e(assuming)g(zero)i(Hipparcos)e(prop)s(er)g(motion)236 -4357 y(CALL)30 b(sla)p Ft(_)p FD(H2FK5)h(\(RH,)g(DH,)g(DRH,)g(DDH,)h -(R5,)f(D5,)g(DR5,)g(DD5\))472 4470 y(Con)m(v)m(ert)h(Hipparcos)d(star)i -(data)g(to)g(J2000.0)h(FK5)236 4642 y(CALL)e(sla)p Ft(_)p -FD(HFK5Z)g(\(RH,)h(DH,)g(EPOCH,)f(R5,)h(D5,)g(DR5,)h(DD5\))472 -4755 y(Con)m(v)m(ert)27 b(Hipparcos)f(p)s(osition)e(to)j(J2000.0)h(FK5) -e(assuming)f(zero)i(Hipparcos)e(prop)s(er)g(motion)236 -4927 y(CALL)30 b(sla)p Ft(_)p FD(DBJIN)g(\(STRING,)g(NSTR)-8 -b(T,)30 b(DRESL)-8 b(T,)31 b(J1,)f(J2\))472 5040 y(Lik)m(e)h(sla)p -Ft(_)p FD(DFL)-8 b(TIN)30 b(but)g(with)f(extensions)h(to)h(accept)h -(leading)d(`B')i(and)f(`J')236 5211 y(CALL)g(sla)p Ft(_)p -FD(KBJ)f(\(JB,)i(E,)g(K,)f(J\))472 5324 y(Select)h(ep)s(o)s(c)m(h)f -(pre\014x)f(`B')j(or)e(`J')236 5496 y(D)h(=)f(sla)p Ft(_)p -FD(EPCO)f(\(K0,)i(K,)f(E\))472 5609 y(Con)m(v)m(ert)i(an)e(ep)s(o)s(c)m -(h)g(in)m(to)g(the)h(appropriate)e(form)h({)h(`B')g(or)g(`J')p -eop -%%Page: 217 219 -217 218 bop 0 52 a Fw(SUN/67.70)3206 b FD(217)0 351 y -Fv(Elliptic)33 b(Ab)s(erration)236 574 y FD(CALL)d(sla)p -Ft(_)p FD(ETRMS)f(\(EP)-8 b(,)31 b(EV\))472 687 y(E-terms)236 -858 y(CALL)f(sla)p Ft(_)p FD(SUBET)f(\(R)m(C,)i(DC,)g(EQ,)f(RM,)h(DM\)) -472 971 y(Remo)m(v)m(e)i(the)d(E-terms)236 1142 y(CALL)g(sla)p -Ft(_)p FD(ADDET)g(\(RM,)h(DM,)h(EQ,)e(R)m(C,)g(DC\))472 -1255 y(Add)g(the)h(E-terms)0 1568 y Fv(Geographical)37 -b(and)h(Geo)s(cen)m(tric)f(Co)s(ordinates)236 1791 y -FD(CALL)30 b(sla)p Ft(_)p FD(OBS)f(\(NUMBER,)j(ID,)f(NAME,)g(WLONG,)g -(PHI,)f(HEIGHT\))472 1904 y(In)m(terrogate)j(list)c(of)h(observ)-5 -b(atory)31 b(parameters)236 2075 y(CALL)f(sla)p Ft(_)p -FD(GEOC)f(\(P)-8 b(,)31 b(H,)g(R,)g(Z\))472 2188 y(Con)m(v)m(ert)h(geo) -s(detic)f(p)s(osition)d(to)j(geo)s(cen)m(tric)236 2359 -y(CALL)f(sla)p Ft(_)p FD(POLMO)f(\(ELONGM,)i(PHIM,)g(XP)-8 -b(,)31 b(YP)-8 b(,)31 b(ELONG,)f(PHI,)h(D)m(AZ\))472 -2472 y(P)m(olar)g(motion)236 2643 y(CALL)f(sla)p Ft(_)p -FD(PV)m(OBS)g(\(P)-8 b(,)31 b(H,)g(STL,)e(PV\))472 2755 -y(P)m(osition)h(and)g(v)m(elo)s(cit)m(y)h(of)f(observ)-5 -b(atory)0 3069 y Fv(Apparen)m(t)38 b(and)g(Observ)m(ed)g(Place)236 -3292 y FD(CALL)30 b(sla)p Ft(_)p FD(MAP)g(\(RM,)h(DM,)g(PR,)g(PD,)g -(PX,)f(R)-10 b(V,)31 b(EQ,)f(D)m(A)-8 b(TE,)32 b(RA,)e(D)m(A\))472 -3405 y(Mean)h(place)g(to)g(geo)s(cen)m(tric)g(apparen)m(t)g(place)236 -3576 y(CALL)f(sla)p Ft(_)p FD(MAPP)-8 b(A)30 b(\(EQ,)h(D)m(A)-8 -b(TE,)32 b(AMPRMS\))472 3689 y(Precompute)f(mean)f(to)i(apparen)m(t)e -(parameters)236 3860 y(CALL)g(sla)p Ft(_)p FD(MAPQK)f(\(RM,)j(DM,)f -(PR,)f(PD,)h(PX,)g(R)-10 b(V,)30 b(AMPRMS,)h(RA,)g(D)m(A\))472 -3972 y(Mean)g(to)h(apparen)m(t)e(using)f(precomputed)h(parameters)236 -4143 y(CALL)g(sla)p Ft(_)p FD(MAPQKZ)f(\(RM,)i(DM,)g(AMPRMS,)g(RA,)g(D) -m(A\))472 4256 y(Mean)h(to)g(apparen)m(t)g(using)d(precomputed)i -(parameters,)h(for)f(zero)h(prop)s(er)d(motion,)j(parallax)472 -4369 y(and)e(radial)f(v)m(elo)s(cit)m(y)236 4540 y(CALL)h(sla)p -Ft(_)p FD(AMP)g(\(RA,)h(D)m(A,)h(D)m(A)-8 b(TE,)31 b(EQ,)f(RM,)h(DM\)) -472 4653 y(Geo)s(cen)m(tric)h(apparen)m(t)e(place)h(to)g(mean)f(place) -236 4824 y(CALL)g(sla)p Ft(_)p FD(AMPQK)f(\(RA,)i(D)m(A,)h(AMPRMS,)f -(RM,)g(DM\))472 4937 y(Apparen)m(t)g(to)g(mean)f(using)f(precomputed)h -(parameters)236 5108 y(CALL)g(sla)p Ft(_)p FD(A)m(OP)g(\(RAP)-8 -b(,)31 b(D)m(AP)-8 b(,)32 b(UTC,)e(DUT,)h(ELONGM,)g(PHIM,)g(HM,)g(XP)-8 -b(,)31 b(YP)-8 b(,)932 5221 y(TDK,)31 b(PMB,)g(RH,)f(WL,)h(TLR,)f(A)m -(OB,)h(ZOB,)g(HOB,)f(DOB,)i(R)m(OB\))472 5315 y(Apparen)m(t)f(place)f -(to)h(observ)m(ed)g(place)236 5486 y(CALL)f(sla)p Ft(_)p -FD(A)m(OPP)-8 b(A)30 b(\(UTC,)h(DUT,)g(ELONGM,)f(PHIM,)h(HM,)g(XP)-8 -b(,)31 b(YP)-8 b(,)1054 5599 y(TDK,)31 b(PMB,)g(RH,)g(WL,)g(TLR,)f(A)m -(OPRMS\))472 5693 y(Precompute)h(apparen)m(t)g(to)g(observ)m(ed)f -(parameters)p eop -%%Page: 218 220 -218 219 bop 0 52 a FD(218)236 351 y(CALL)30 b(sla)p Ft(_)p -FD(A)m(OPP)-8 b(A)g(T)30 b(\(UTC,)h(A)m(OPRMS\))472 464 -y(Up)s(date)g(sidereal)e(time)h(in)f(apparen)m(t)h(to)i(observ)m(ed)e -(parameters)236 639 y(CALL)g(sla)p Ft(_)p FD(A)m(OPQK)f(\(RAP)-8 -b(,)32 b(D)m(AP)-8 b(,)31 b(A)m(OPRMS,)g(A)m(OB,)g(ZOB,)g(HOB,)f(DOB,)i -(R)m(OB\))472 752 y(Apparen)m(t)f(to)g(observ)m(ed)f(using)f -(precomputed)h(parameters)236 926 y(CALL)g(sla)p Ft(_)p -FD(O)m(AP)g(\(TYPE,)g(OB1,)h(OB2,)h(UTC,)e(DUT,)g(ELONGM,)h(PHIM,)g -(HM,)g(XP)-8 b(,)31 b(YP)-8 b(,)932 1039 y(TDK,)31 b(PMB,)g(RH,)f(WL,)h -(TLR,)f(RAP)-8 b(,)31 b(D)m(AP\))472 1133 y(Observ)m(ed)f(to)h(apparen) -m(t)236 1308 y(CALL)f(sla)p Ft(_)p FD(O)m(APQK)f(\(TYPE,)i(OB1,)g(OB2,) -g(A)m(OPRMS,)f(RA,)h(D)m(A\))472 1421 y(Observ)m(ed)f(to)h(apparen)m(t) -g(using)e(precomputed)g(parameters)0 1755 y Fv(Azim)m(uth)35 -b(and)k(Elev)-6 b(ation)236 1990 y FD(CALL)30 b(sla)p -Ft(_)p FD(AL)-8 b(T)g(AZ)30 b(\(HA,)h(DEC,)g(PHI,)1033 -2103 y(AZ,)f(AZD,)h(AZDD,)g(EL,)g(ELD,)f(ELDD,)h(P)-8 -b(A,)31 b(P)-8 b(AD,)32 b(P)-8 b(ADD\))472 2197 y(P)m(ositions,)30 -b(v)m(elo)s(cities)g Fq(etc.)g FD(for)g(an)h(altazim)m(uth)f(moun)m(t) -236 2372 y(CALL)g(sla)p Ft(_)p FD(E2H)g(\(HA,)h(DEC,)g(PHI,)f(AZ,)h -(EL\))236 2485 y(CALL)f(sla)p Ft(_)p FD(DE2H)h(\(HA,)g(DEC,)f(PHI,)h -(AZ,)f(EL\))472 2598 y([)15 b Fl(h;)g(\016)21 b FD(])30 -b(to)h([)15 b Fl(Az)t(;)g(E)5 b(l)34 b FD(])236 2772 -y(CALL)c(sla)p Ft(_)p FD(H2E)g(\(AZ,)h(EL,)f(PHI,)g(HA,)h(DEC\))236 -2885 y(CALL)f(sla)p Ft(_)p FD(DH2E)h(\(AZ,)f(EL,)g(PHI,)h(HA,)g(DEC\)) -472 2998 y([)15 b Fl(Az)t(;)g(E)5 b(l)34 b FD(])d(to)g([)15 -b Fl(h;)g(\016)20 b FD(])236 3173 y(CALL)30 b(sla)p Ft(_)p -FD(PD)m(A2H)h(\(P)-8 b(,)31 b(D,)g(A,)g(H1,)g(J1,)g(H2,)g(J2\))472 -3286 y(Hour)f(Angle)h(corresp)s(onding)d(to)j(a)g(giv)m(en)f(azim)m -(uth)236 3460 y(CALL)g(sla)p Ft(_)p FD(PDQ2H)g(\(P)-8 -b(,)31 b(D,)g(Q,)g(H1,)g(J1,)g(H2,)g(J2\))472 3573 y(Hour)f(Angle)h -(corresp)s(onding)d(to)j(a)g(giv)m(en)f(parallactic)g(angle)236 -3748 y(D)h(=)f(sla)p Ft(_)p FD(P)-8 b(A)30 b(\(HA,)h(DEC,)g(PHI\))472 -3861 y([)15 b Fl(h;)g(\016)21 b FD(])30 b(to)h(parallactic)f(angle)236 -4035 y(D)h(=)f(sla)p Ft(_)p FD(ZD)g(\(HA,)h(DEC,)f(PHI\))472 -4148 y([)15 b Fl(h;)g(\016)21 b FD(])30 b(to)h(zenith)f(distance)0 -4482 y Fv(Refraction)36 b(and)j(Air)d(Mass)236 4718 y -FD(CALL)30 b(sla)p Ft(_)p FD(REFR)m(O)g(\(ZOBS,)g(HM,)h(TDK,)f(PMB,)h -(RH,)g(WL,)g(PHI,)f(TLR,)g(EPS,)g(REF\))472 4830 y(Change)h(in)e -(zenith)h(distance)g(due)f(to)i(refraction)236 5005 y(CALL)f(sla)p -Ft(_)p FD(REF)m(CO)g(\(HM,)h(TDK,)f(PMB,)i(RH,)e(WL,)h(PHI,)f(TLR,)g -(EPS,)g(REF)-10 b(A,)31 b(REFB\))472 5118 y(Constan)m(ts)g(for)f -(simple)f(refraction)h(mo)s(del)f(\(accurate\))236 5293 -y(CALL)h(sla)p Ft(_)p FD(REF)m(COQ)f(\(TDK,)i(PMB,)g(RH,)g(WL,)g(REF) --10 b(A,)30 b(REFB\))472 5405 y(Constan)m(ts)h(for)f(simple)f -(refraction)h(mo)s(del)f(\(fast\))236 5580 y(CALL)g(sla)p -Ft(_)p FD(A)-8 b(TMDSP)30 b(\()g(TDK,)f(PMB,)i(RH,)f(WL1,)g(REF)-10 -b(A1,)31 b(REFB1,)g(WL2,)g(REF)-10 b(A2,)31 b(REFB2)f(\))472 -5693 y(Adjust)g(refraction)g(constan)m(ts)i(for)e(colour)p -eop -%%Page: 219 221 -219 220 bop 0 52 a Fw(SUN/67.70)3206 b FD(219)236 351 -y(CALL)30 b(sla)p Ft(_)p FD(REFZ)f(\(ZU,)i(REF)-10 b(A,)31 -b(REFB,)g(ZR\))472 464 y(Unrefracted)g(to)g(refracted)g(ZD,)f(simple)f -(mo)s(del)236 673 y(CALL)h(sla)p Ft(_)p FD(REFV)g(\(VU,)h(REF)-10 -b(A,)31 b(REFB,)g(VR\))472 786 y(Unrefracted)g(to)g(refracted)g([)15 -b Fl(Az)t(;)g(E)5 b(l)34 b FD(])c(v)m(ector,)i(simple)d(mo)s(del)236 -994 y(D)i(=)f(sla)p Ft(_)p FD(AIRMAS)g(\(ZD\))472 1107 -y(Air)g(mass)0 1545 y Fv(Ecliptic)k(Co)s(ordinates)236 -1838 y FD(CALL)c(sla)p Ft(_)p FD(ECMA)-8 b(T)30 b(\(D)m(A)-8 -b(TE,)32 b(RMA)-8 b(T\))472 1951 y(Equatorial)30 b(to)h(ecliptic)e -(rotation)i(matrix)236 2159 y(CALL)f(sla)p Ft(_)p FD(EQECL)f(\(DR,)i -(DD,)g(D)m(A)-8 b(TE,)32 b(DL,)f(DB\))472 2272 y(J2000.0)i(`FK5')e(to)g -(ecliptic)f(co)s(ordinates)236 2481 y(CALL)g(sla)p Ft(_)p -FD(ECLEQ)f(\(DL,)i(DB,)g(D)m(A)-8 b(TE,)32 b(DR,)f(DD\))472 -2594 y(Ecliptic)e(co)s(ordinates)h(to)h(J2000.0)i(`FK5')0 -3031 y Fv(Galactic)j(Co)s(ordinates)236 3325 y FD(CALL)30 -b(sla)p Ft(_)p FD(EG50)h(\(DR,)g(DD,)g(DL,)g(DB\))472 -3437 y(B1950.0)j(`FK4')d(to)g(galactic)236 3646 y(CALL)f(sla)p -Ft(_)p FD(GE50)h(\(DL,)g(DB,)g(DR,)g(DD\))472 3759 y(Galactic)h(to)f -(B1950.0)i(`FK4')236 3968 y(CALL)d(sla)p Ft(_)p FD(EQGAL)g(\(DR,)h(DD,) -g(DL,)g(DB\))472 4081 y(J2000.0)i(`FK5')e(to)g(galactic)236 -4289 y(CALL)f(sla)p Ft(_)p FD(GALEQ)g(\(DL,)h(DB,)g(DR,)g(DD\))472 -4402 y(Galactic)h(to)f(J2000.0)h(`FK5')0 4840 y Fv(Sup)s(ergalactic)37 -b(Co)s(ordinates)236 5133 y FD(CALL)30 b(sla)p Ft(_)p -FD(GALSUP)f(\(DL,)j(DB,)f(DSL,)f(DSB\))472 5246 y(Galactic)i(to)f(sup)s -(ergalactic)236 5454 y(CALL)f(sla)p Ft(_)p FD(SUPGAL)f(\(DSL,)i(DSB,)g -(DL,)g(DB\))472 5567 y(Sup)s(ergalactic)f(to)h(galactic)p -eop -%%Page: 220 222 -220 221 bop 0 52 a FD(220)0 351 y Fv(Ephemerides)236 -566 y FD(CALL)30 b(sla)p Ft(_)p FD(DMOON)g(\(D)m(A)-8 -b(TE,)32 b(PV\))472 678 y(Appro)m(ximate)f(geo)s(cen)m(tric)g(p)s -(osition)e(and)g(v)m(elo)s(cit)m(y)i(of)g(the)f(Mo)s(on)236 -847 y(CALL)g(sla)p Ft(_)p FD(EAR)-8 b(TH)30 b(\(IY,)h(ID,)g(FD,)g(PV\)) -472 960 y(Appro)m(ximate)g(helio)s(cen)m(tric)e(p)s(osition)f(and)i(v)m -(elo)s(cit)m(y)h(of)f(the)h(Earth)236 1129 y(CALL)f(sla)p -Ft(_)p FD(EPV)g(\(D)m(A)-8 b(TE,)31 b(DPH,)h(D)m(VH,)f(DPB,)h(D)m(VB)f -(\))472 1241 y(Helio)s(cen)m(tric)f(and)g(barycen)m(tric)g(p)s(osition) -f(and)g(v)m(elo)s(cit)m(y)i(of)g(the)f(Earth)236 1410 -y(CALL)g(sla)p Ft(_)p FD(EVP)g(\(D)m(A)-8 b(TE,)31 b(DEQX,)g(D)m(VB,)h -(DPB,)g(D)m(VH,)f(DPH\))472 1523 y(Barycen)m(tric)h(and)d(helio)s(cen)m -(tric)g(v)m(elo)s(cit)m(y)i(and)f(p)s(osition)f(of)h(the)h(Earth)236 -1691 y(CALL)f(sla)p Ft(_)p FD(MOON)g(\(IY,)g(ID,)h(FD,)h(PV\))472 -1804 y(Appro)m(ximate)f(geo)s(cen)m(tric)g(p)s(osition)e(and)g(v)m(elo) -s(cit)m(y)i(of)g(the)f(Mo)s(on)236 1973 y(CALL)g(sla)p -Ft(_)p FD(PLANET)f(\(D)m(A)-8 b(TE,)32 b(NP)-8 b(,)31 -b(PV,)g(JST)-8 b(A)g(T\))472 2086 y(Appro)m(ximate)31 -b(helio)s(cen)m(tric)e(p)s(osition)f(and)i(v)m(elo)s(cit)m(y)h(of)f(a)h -(planet)236 2254 y(CALL)f(sla)p Ft(_)p FD(RDPLAN)g(\(D)m(A)-8 -b(TE,)32 b(NP)-8 b(,)31 b(ELONG,)f(PHI,)h(RA,)g(DEC,)f(DIAM\))472 -2367 y(Appro)m(ximate)h(top)s(o)s(cen)m(tric)f(apparen)m(t)h(place)f -(of)h(a)f(planet)236 2536 y(CALL)g(sla)p Ft(_)p FD(PLANEL)f(\(D)m(A)-8 -b(TE,)32 b(JF)m(ORM,)f(EPOCH,)f(ORBINC,)g(ANODE,)h(PERIH,)1107 -2649 y(A)m(OR)m(Q,)h(E,)e(A)m(ORL,)h(DM,)g(PV,)g(JST)-8 -b(A)g(T\))472 2743 y(Helio)s(cen)m(tric)21 b(p)s(osition)f(and)h(v)m -(elo)s(cit)m(y)h(of)g(a)g(planet,)h(asteroid)e(or)g(comet,)k(starting)d -(from)f(orbital)472 2856 y(elemen)m(ts)236 3024 y(CALL)30 -b(sla)p Ft(_)p FD(PLANTE)f(\(D)m(A)-8 b(TE,)32 b(ELONG,)f(PHI,)f(JF)m -(ORM,)h(EPOCH,)f(ORBINC,)g(ANODE,)1116 3137 y(PERIH,)h(A)m(OR)m(Q,)g -(E,)f(A)m(ORL,)h(DM,)g(RA,)g(DEC,)f(R,)h(JST)-8 b(A)g(T\))472 -3232 y(T)g(op)s(o)s(cen)m(tric)31 b(apparen)m(t)h(place)f(of)g(a)g -(Solar-System)g(ob)5 b(ject)32 b(whose)f(helio)s(cen)m(tric)e(orbital)h -(ele-)472 3344 y(men)m(ts)h(are)g(kno)m(wn)236 3513 y(CALL)f(sla)p -Ft(_)p FD(PLANTU)f(\(D)m(A)-8 b(TE,)32 b(ELONG,)f(PHI,)f(U,)h(RA,)g -(DEC,)f(R,)h(JST)-8 b(A)g(T\))472 3626 y(T)g(op)s(o)s(cen)m(tric)40 -b(apparen)m(t)g(place)f(of)h(a)f(Solar-System)g(ob)5 -b(ject)41 b(whose)e(helio)s(cen)m(tric)f(univ)m(ersal)472 -3739 y(orbital)30 b(elemen)m(ts)g(are)h(kno)m(wn)236 -3907 y(CALL)f(sla)p Ft(_)p FD(PV2EL)g(\(PV,)h(D)m(A)-8 -b(TE,)31 b(PMASS,)f(JF)m(ORMR,)h(JF)m(ORM,)g(EPOCH,)f(ORBINC,)1028 -4020 y(ANODE,)h(PERIH,)f(A)m(OR)m(Q,)h(E,)g(A)m(ORL,)f(DM,)i(JST)-8 -b(A)g(T\))472 4114 y(Orbital)29 b(elemen)m(ts)i(of)f(a)h(planet)f(from) -g(instan)m(taneous)g(p)s(osition)e(and)i(v)m(elo)s(cit)m(y)236 -4283 y(CALL)g(sla)p Ft(_)p FD(PER)-8 b(TEL)29 b(\(JF)m(ORM,)i(D)m(A)-8 -b(TE0,)32 b(D)m(A)-8 b(TE1,)1101 4396 y(EPOCH0,)31 b(ORBI0,)g(ANODE0,)g -(PERIH0,)g(A)m(OR)m(Q0,)g(E0,)g(AM0,)1101 4509 y(EPOCH1,)g(ORBI1,)g -(ANODE1,)g(PERIH1,)g(A)m(OR)m(Q1,)g(E1,)g(AM1,)1101 4622 -y(JST)-8 b(A)g(T\))472 4716 y(Up)s(date)31 b(elemen)m(ts)f(b)m(y)h -(applying)d(p)s(erturbations)236 4884 y(CALL)i(sla)p -Ft(_)p FD(EL2UE)g(\(D)m(A)-8 b(TE,)32 b(JF)m(ORM,)f(EPOCH,)f(ORBINC,)g -(ANODE,)1028 4997 y(PERIH,)g(A)m(OR)m(Q,)h(E,)g(A)m(ORL,)f(DM,)1028 -5110 y(U,)h(JST)-8 b(A)g(T\))472 5204 y(T)g(ransform)30 -b(con)m(v)m(en)m(tional)h(elemen)m(ts)g(to)g(univ)m(ersal)e(elemen)m -(ts)236 5373 y(CALL)h(sla)p Ft(_)p FD(UE2EL)g(\(U,)h(JF)m(ORMR,)1028 -5486 y(JF)m(ORM,)g(EPOCH,)f(ORBINC,)g(ANODE,)h(PERIH,)1028 -5599 y(A)m(OR)m(Q,)g(E,)g(A)m(ORL,)f(DM,)i(JST)-8 b(A)g(T\))472 -5693 y(T)g(ransform)30 b(univ)m(ersal)e(elemen)m(ts)j(to)g(con)m(v)m -(en)m(tional)h(elemen)m(ts)p eop -%%Page: 221 223 -221 222 bop 0 52 a Fw(SUN/67.70)3206 b FD(221)236 351 -y(CALL)30 b(sla)p Ft(_)p FD(PV2UE)g(\(PV,)h(D)m(A)-8 -b(TE,)32 b(PMASS,)e(U,)g(JST)-8 b(A)g(T\))472 464 y(P)m(ac)m(k)j(age)34 -b(a)c(p)s(osition)f(and)h(v)m(elo)s(cit)m(y)h(for)f(use)g(as)g(univ)m -(ersal)f(elemen)m(ts)236 640 y(CALL)h(sla)p Ft(_)p FD(UE2PV)g(\(D)m(A) --8 b(TE,)32 b(U,)f(PV,)f(JST)-8 b(A)g(T\))472 753 y(Extract)32 -b(the)e(p)s(osition)f(and)h(v)m(elo)s(cit)m(y)g(from)g(univ)m(ersal)f -(elemen)m(ts)236 928 y(CALL)h(sla)p Ft(_)p FD(PER)-8 -b(TUE)29 b(\(D)m(A)-8 b(TE,)32 b(U,)f(JST)-8 b(A)g(T\))472 -1041 y(Up)s(date)31 b(univ)m(ersal)d(elemen)m(ts)j(b)m(y)f(applying)e -(p)s(erturbations)236 1217 y(R)i(=)g(sla)p Ft(_)p FD(R)-10 -b(VER)m(OT)30 b(\(PHI,)g(RA,)h(D)m(A,)h(ST\))472 1329 -y(V)-8 b(elo)s(cit)m(y)31 b(comp)s(onen)m(t)g(due)f(to)h(rotation)g(of) -f(the)h(Earth)236 1505 y(CALL)f(sla)p Ft(_)p FD(ECOR)f(\(RM,)i(DM,)g -(IY,)g(ID,)g(FD,)g(R)-10 b(V,)31 b(TL\))472 1618 y(Comp)s(onen)m(ts)f -(of)h(v)m(elo)s(cit)m(y)g(and)e(ligh)m(t)h(time)g(due)g(to)h(Earth)f -(orbital)f(motion)236 1793 y(R)h(=)g(sla)p Ft(_)p FD(R)-10 -b(VLSRD)30 b(\(R2000,)i(D2000\))472 1906 y(V)-8 b(elo)s(cit)m(y)31 -b(comp)s(onen)m(t)g(due)f(to)h(solar)f(motion)g(wrt)g(dynamical)f(LSR) -236 2082 y(R)h(=)g(sla)p Ft(_)p FD(R)-10 b(VLSRK)29 b(\(R2000,)k -(D2000\))472 2195 y(V)-8 b(elo)s(cit)m(y)31 b(comp)s(onen)m(t)g(due)f -(to)h(solar)f(motion)g(wrt)g(kinematical)f(LSR)236 2370 -y(R)h(=)g(sla)p Ft(_)p FD(R)-10 b(V)m(GALC)31 b(\(R2000,)h(D2000\))472 -2483 y(V)-8 b(elo)s(cit)m(y)31 b(comp)s(onen)m(t)g(due)f(to)h(rotation) -g(of)f(the)h(Galaxy)236 2659 y(R)f(=)g(sla)p Ft(_)p FD(R)-10 -b(VLG)30 b(\(R2000,)j(D2000\))472 2772 y(V)-8 b(elo)s(cit)m(y)37 -b(comp)s(onen)m(t)g(due)e(to)i(rotation)f(and)g(translation)f(of)h(the) -h(Galaxy)-8 b(,)38 b(relativ)m(e)e(to)h(the)472 2884 -y(mean)31 b(motion)f(of)g(the)h(lo)s(cal)f(group)0 3223 -y Fv(Astrometry)236 3461 y FD(CALL)g(sla)p Ft(_)p FD(S2TP)f(\(RA,)i -(DEC,)g(RAZ,)f(DECZ,)g(XI,)g(ET)-8 b(A,)31 b(J\))236 -3573 y(CALL)f(sla)p Ft(_)p FD(DS2TP)g(\(RA,)h(DEC,)f(RAZ,)g(DECZ,)g -(XI,)h(ET)-8 b(A,)31 b(J\))472 3686 y(T)-8 b(ransform)30 -b(spherical)e(co)s(ordinates)i(in)m(to)h(tangen)m(t)h(plane)236 -3862 y(CALL)e(sla)p Ft(_)p FD(V2TP)g(\(V,)h(V0,)g(XI,)g(ET)-8 -b(A,)30 b(J\))236 3975 y(CALL)g(sla)p Ft(_)p FD(D)m(V2TP)h(\(V,)g(V0,)g -(XI,)g(ET)-8 b(A,)30 b(J\))472 4088 y(T)-8 b(ransform)30 -b([)15 b Fl(x;)g(y)s(;)g(z)20 b FD(])31 b(in)m(to)f(tangen)m(t)i(plane) -d(co)s(ordinates)236 4263 y(CALL)h(sla)p Ft(_)p FD(DTP2S)g(\(XI,)g(ET) --8 b(A,)31 b(RAZ,)f(DECZ,)g(RA,)h(DEC\))236 4376 y(CALL)f(sla)p -Ft(_)p FD(TP2S)f(\(XI,)i(ET)-8 b(A,)31 b(RAZ,)f(DECZ,)g(RA,)h(DEC\))472 -4489 y(T)-8 b(ransform)30 b(tangen)m(t)i(plane)d(co)s(ordinates)h(in)m -(to)h(spherical)d(co)s(ordinates)236 4665 y(CALL)i(sla)p -Ft(_)p FD(DTP2V)g(\(XI,)h(ET)-8 b(A,)31 b(V0,)g(V\))236 -4777 y(CALL)f(sla)p Ft(_)p FD(TP2V)g(\(XI,)h(ET)-8 b(A,)30 -b(V0,)i(V\))472 4890 y(T)-8 b(ransform)30 b(tangen)m(t)i(plane)d(co)s -(ordinates)h(in)m(to)h([)15 b Fl(x;)g(y)s(;)g(z)20 b -FD(])236 5066 y(CALL)30 b(sla)p Ft(_)p FD(DTPS2C)f(\(XI,)i(ET)-8 -b(A,)31 b(RA,)f(DEC,)h(RAZ1,)g(DECZ1,)f(RAZ2,)h(DECZ2,)f(N\))236 -5179 y(CALL)g(sla)p Ft(_)p FD(TPS2C)f(\(XI,)i(ET)-8 b(A,)30 -b(RA,)h(DEC,)g(RAZ1,)f(DECZ1,)h(RAZ2,)f(DECZ2,)h(N\))472 -5292 y(Get)h(plate)e(cen)m(tre)i(from)d(star)i([)15 b -Fl(\013;)g(\016)20 b FD(])31 b(and)f(tangen)m(t)h(plane)f(co)s -(ordinates)236 5467 y(CALL)g(sla)p Ft(_)p FD(DTPV2C)g(\(XI,)h(ET)-8 -b(A,)30 b(V,)h(V01,)h(V02,)f(N\))236 5580 y(CALL)f(sla)p -Ft(_)p FD(TPV2C)f(\(XI,)i(ET)-8 b(A,)31 b(V,)g(V01,)g(V02,)h(N\))472 -5693 y(Get)g(plate)e(cen)m(tre)i(from)d(star)i([)15 b -Fl(x;)g(y)s(;)g(z)20 b FD(])31 b(and)f(tangen)m(t)i(plane)d(co)s -(ordinates)p eop -%%Page: 222 224 -222 223 bop 0 52 a FD(222)236 351 y(CALL)30 b(sla)p Ft(_)p -FD(PCD)g(\(DISCO,)g(X,)g(Y\))472 464 y(Apply)f(pincushion/barrel)e -(distortion)236 637 y(CALL)j(sla)p Ft(_)p FD(UNPCD)g(\(DISCO,)g(X,)h -(Y\))472 750 y(Remo)m(v)m(e)i(pincushion/barrel)26 b(distortion)236 -923 y(CALL)k(sla)p Ft(_)p FD(FITXY)g(\(ITYPE,)g(NP)-8 -b(,)31 b(XYE,)g(XYM,)g(COEFFS,)f(J\))472 1036 y(Fit)h(a)f(linear)f(mo)s -(del)g(to)j(relate)e(t)m(w)m(o)i(sets)f(of)f([)15 b Fl(x;)g(y)k -FD(])31 b(co)s(ordinates)236 1208 y(CALL)f(sla)p Ft(_)p -FD(PXY)g(\(NP)-8 b(,)31 b(XYE,)g(XYM,)g(COEFFS,)f(XYP)-8 -b(,)31 b(XRMS,)g(YRMS,)f(RRMS\))472 1321 y(Compute)g(predicted)g(co)s -(ordinates)g(and)f(residuals)236 1494 y(CALL)h(sla)p -Ft(_)p FD(INVF)g(\(FWDS,)i(BKWDS,)f(J\))472 1607 y(In)m(v)m(ert)g(a)g -(linear)e(mo)s(del)236 1780 y(CALL)h(sla)p Ft(_)p FD(XY2XY)h(\(X1,)g -(Y1,)h(COEFFS,)d(X2,)j(Y2\))472 1893 y(T)-8 b(ransform)30 -b(one)h([)15 b Fl(x;)g(y)j FD(])236 2066 y(CALL)30 b(sla)p -Ft(_)p FD(DCMPF)g(\(COEFFS,)h(XZ,)f(YZ,)g(XS,)g(YS,)h(PERP)-8 -b(,)30 b(ORIENT\))472 2179 y(Decomp)s(ose)i(a)f(linear)d(\014t)j(in)m -(to)f(scales)h Fq(etc.)0 2503 y Fv(Numerical)k(Metho)s(ds)236 -2732 y FD(CALL)30 b(sla)p Ft(_)p FD(COMBN)g(\(NSEL,)g(NCAND,)h(LIST,)f -(J\))472 2845 y(Next)i(com)m(bination)d(\(subset)h(from)g(a)h(sp)s -(eci\014ed)e(n)m(um)m(b)s(er)g(of)h(items\))236 3018 -y(CALL)g(sla)p Ft(_)p FD(PERMUT)f(\(N,)j(IST)-8 b(A)g(TE,)30 -b(IORDER,)g(J\))472 3131 y(Next)i(p)s(erm)m(utation)d(of)i(a)f(sp)s -(eci\014ed)f(n)m(um)m(b)s(er)g(of)i(items)236 3303 y(CALL)f(sla)p -Ft(_)p FD(SMA)-8 b(T)30 b(\(N,)h(A,)g(Y,)f(D,)h(JF,)g(IW\))236 -3416 y(CALL)f(sla)p Ft(_)p FD(DMA)-8 b(T)31 b(\(N,)g(A,)f(Y,)h(D,)g -(JF,)g(IW\))472 3529 y(Matrix)g(in)m(v)m(ersion)e(and)h(solution)f(of)h -(sim)m(ultaneous)f(equations)236 3702 y(CALL)h(sla)p -Ft(_)p FD(SVD)g(\(M,)h(N,)g(MP)-8 b(,)31 b(NP)-8 b(,)31 -b(A,)g(W,)g(V,)f(W)m(ORK,)h(JST)-8 b(A)g(T\))472 3815 -y(Singular)28 b(v)-5 b(alue)30 b(decomp)s(osition)f(of)i(a)f(matrix)236 -3988 y(CALL)g(sla)p Ft(_)p FD(SVDSOL)f(\(M,)i(N,)g(MP)-8 -b(,)31 b(NP)-8 b(,)31 b(B,)g(U,)g(W,)g(V,)f(W)m(ORK,)h(X\))472 -4101 y(Solution)e(from)h(giv)m(en)g(v)m(ector)i(plus)d(SVD)236 -4274 y(CALL)h(sla)p Ft(_)p FD(SVDCO)m(V)g(\(N,)h(NP)-8 -b(,)31 b(NC,)f(W,)h(V,)g(W)m(ORK,)g(CVM\))472 4386 y(Co)m(v)-5 -b(ariance)31 b(matrix)f(from)g(SVD)236 4559 y(R)g(=)g(sla)p -Ft(_)p FD(RANDOM)h(\(SEED\))472 4672 y(Generate)h(pseudo-random)d(real) -h(n)m(um)m(b)s(er)f(in)g(the)i(range)g(0)25 b Fo(\024)g -Fl(x)h(<)f FD(1)236 4845 y(R)30 b(=)g(sla)p Ft(_)p FD(GRESID)g(\(S\)) -472 4958 y(Generate)i(pseudo-random)d(normal)h(deviate)g(\()p -Fo(\021)h FD(`Gaussian)e(residual'\))0 5282 y Fv(Real-time)236 -5511 y FD(CALL)h(sla)p Ft(_)p FD(W)-10 b(AIT)30 b(\(DELA)-8 -b(Y\))472 5624 y(In)m(terv)j(al)31 b(w)m(ait)p eop -%%Trailer -end -userdict /end-hook known{end-hook}if -%%EOF