From eeb20d2cb7065a07b920c685ee3dbb457576448d Mon Sep 17 00:00:00 2001 From: Alexander Bock Date: Tue, 19 Jul 2016 15:03:23 +0200 Subject: [PATCH] Add Spice as a submodule --- .gitmodules | 5 +- ext/spice | 1 + ext/spice/include/SpiceCK.h | 155 - ext/spice/include/SpiceCel.h | 441 - ext/spice/include/SpiceEK.h | 448 - ext/spice/include/SpiceEll.h | 115 - ext/spice/include/SpiceErr.h | 141 - ext/spice/include/SpiceFrm.h | 193 - ext/spice/include/SpiceGF.h | 341 - ext/spice/include/SpiceOccult.h | 147 - ext/spice/include/SpicePln.h | 106 - ext/spice/include/SpiceSPK.h | 128 - ext/spice/include/SpiceUsr.h | 240 - ext/spice/include/SpiceZad.h | 209 - ext/spice/include/SpiceZdf.h | 260 - ext/spice/include/SpiceZfc.h | 14228 --------------------------- ext/spice/include/SpiceZim.h | 1450 --- ext/spice/include/SpiceZmc.h | 980 -- ext/spice/include/SpiceZpl.h | 117 - ext/spice/include/SpiceZpr.h | 4135 -------- ext/spice/include/SpiceZrnm.h | 82 - ext/spice/include/SpiceZst.h | 199 - ext/spice/include/f2c.h | 683 -- ext/spice/include/f2cMang.h | 390 - ext/spice/include/fio.h | 107 - ext/spice/include/fmt.h | 100 - ext/spice/include/fp.h | 28 - ext/spice/include/lio.h | 74 - ext/spice/include/rawio.h | 41 - ext/spice/include/signal1.h | 118 - ext/spice/include/zzalloc.h | 125 - ext/spice/include/zzerror.h | 86 - ext/spice/lib/gcc_linux/cspice.a | Bin 9450500 -> 0 bytes ext/spice/lib/gcc_osx/cspice.a | Bin 5886488 -> 0 bytes ext/spice/lib/gcc_osx/csupport.a | Bin 799152 -> 0 bytes ext/spice/lib/msvc14/cspice.lib | Bin 9420742 -> 0 bytes support/cmake/support_macros.cmake | 9 +- 37 files changed, 10 insertions(+), 25872 deletions(-) create mode 160000 ext/spice delete mode 100644 ext/spice/include/SpiceCK.h delete mode 100644 ext/spice/include/SpiceCel.h delete mode 100644 ext/spice/include/SpiceEK.h delete mode 100644 ext/spice/include/SpiceEll.h delete mode 100644 ext/spice/include/SpiceErr.h delete mode 100644 ext/spice/include/SpiceFrm.h delete mode 100644 ext/spice/include/SpiceGF.h delete mode 100644 ext/spice/include/SpiceOccult.h delete mode 100644 ext/spice/include/SpicePln.h delete mode 100644 ext/spice/include/SpiceSPK.h delete mode 100644 ext/spice/include/SpiceUsr.h delete mode 100644 ext/spice/include/SpiceZad.h delete mode 100644 ext/spice/include/SpiceZdf.h delete mode 100644 ext/spice/include/SpiceZfc.h delete mode 100644 ext/spice/include/SpiceZim.h delete mode 100644 ext/spice/include/SpiceZmc.h delete mode 100644 ext/spice/include/SpiceZpl.h delete mode 100644 ext/spice/include/SpiceZpr.h delete mode 100644 ext/spice/include/SpiceZrnm.h delete mode 100644 ext/spice/include/SpiceZst.h delete mode 100644 ext/spice/include/f2c.h delete mode 100644 ext/spice/include/f2cMang.h delete mode 100644 ext/spice/include/fio.h delete mode 100644 ext/spice/include/fmt.h delete mode 100644 ext/spice/include/fp.h delete mode 100644 ext/spice/include/lio.h delete mode 100644 ext/spice/include/rawio.h delete mode 100644 ext/spice/include/signal1.h delete mode 100644 ext/spice/include/zzalloc.h delete mode 100644 ext/spice/include/zzerror.h delete mode 100644 ext/spice/lib/gcc_linux/cspice.a delete mode 100644 ext/spice/lib/gcc_osx/cspice.a delete mode 100644 ext/spice/lib/gcc_osx/csupport.a delete mode 100644 ext/spice/lib/msvc14/cspice.lib diff --git a/.gitmodules b/.gitmodules index 9ca90f9f27..9748062bd2 100644 --- a/.gitmodules +++ b/.gitmodules @@ -3,4 +3,7 @@ url = https://github.com/OpenSpace/Ghoul.git [submodule "modules/kameleon/ext/kameleon"] path = modules/kameleon/ext/kameleon - url = https://github.com/OpenSpace/Kameleon.git \ No newline at end of file + url = https://github.com/OpenSpace/Kameleon.git +[submodule "ext/spice"] + path = ext/spice + url = https://github.com/OpenSpace/Spice.git diff --git a/ext/spice b/ext/spice new file mode 160000 index 0000000000..283112bc20 --- /dev/null +++ b/ext/spice @@ -0,0 +1 @@ +Subproject commit 283112bc200516188bee23241cdb442c7d0f7375 diff --git a/ext/spice/include/SpiceCK.h b/ext/spice/include/SpiceCK.h deleted file mode 100644 index 894d4e9a6c..0000000000 --- a/ext/spice/include/SpiceCK.h +++ /dev/null @@ -1,155 +0,0 @@ -/* - --Header_File SpiceCK.h ( CSPICE CK definitions ) - --Abstract - - Perform CSPICE definitions to support CK wrapper interfaces. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header defines types that may be referenced in - application code that calls CSPICE CK functions. - - Typedef - ======= - - Name Description - ---- ---------- - - SpiceCK05Subtype Typedef for enum indicating the - mathematical representation used - in an CK type 05 segment. Possible - values and meanings are: - - C05TP0: - - Hermite interpolation, 8- - element packets containing - - q0, q1, q2, q3, - dq0/dt, dq1/dt, dq2/dt dq3/dt - - where q0, q1, q2, q3 represent - quaternion components and dq0/dt, - dq1/dt, dq2/dt, dq3/dt represent - quaternion time derivative components. - - Quaternions are unitless. Quaternion - time derivatives have units of - 1/second. - - - C05TP1: - - Lagrange interpolation, 4- - element packets containing - - q0, q1, q2, q3, - - where q0, q1, q2, q3 represent - quaternion components. Quaternion - derivatives are obtained by - differentiating interpolating - polynomials. - - - C05TP2: - - Hermite interpolation, 14- - element packets containing - - q0, q1, q2, q3, - dq0/dt, dq1/dt, dq2/dt dq3/dt, - av0, av1, av2, - dav0/dt, dav1/dt, dav2/dt - - where q0, q1, q2, q3 represent - quaternion components and dq0/dt, - dq1/dt, dq2/dt, dq3/dt represent - quaternion time derivative components, - av0, av1, av2 represent angular - velocity components, and - dav0/dt, dav1/dt, dav2/dt represent - angular acceleration components. - - - C05TP3: - - Lagrange interpolation, 7- - element packets containing - - q0, q1, q2, q3, - av0, av1, av2 - - where q0, q1, q2, q3 represent - quaternion components and - av0, av1, av2 represent angular - velocity components. - - - -Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 1.0.0, 20-AUG-2002 (NJB) - -*/ - -#ifndef HAVE_SPICE_CK_H - - #define HAVE_SPICE_CK_H - - - - /* - CK type 05 subtype codes: - */ - - enum _SpiceCK05Subtype { C05TP0, C05TP1, C05TP2, C05TP3 }; - - - typedef enum _SpiceCK05Subtype SpiceCK05Subtype; - -#endif - diff --git a/ext/spice/include/SpiceCel.h b/ext/spice/include/SpiceCel.h deleted file mode 100644 index 7b0537e9ee..0000000000 --- a/ext/spice/include/SpiceCel.h +++ /dev/null @@ -1,441 +0,0 @@ -/* - --Header_File SpiceCel.h ( CSPICE Cell definitions ) - --Abstract - - Perform CSPICE definitions for the SpiceCell data type. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - CELLS - --Particulars - - This header defines structures, macros, and enumerated types that - may be referenced in application code that calls CSPICE cell - functions. - - CSPICE cells are data structures that implement functionality - parallel to that of the cell abstract data type in SPICELIB. In - CSPICE, a cell is a C structure containing bookkeeping information, - including a pointer to an associated data array. - - For numeric data types, the data array is simply a SPICELIB-style - cell, including a valid control area. For character cells, the data - array has the same number of elements as the corresponding - SPICELIB-style cell, but the contents of the control area are not - maintained, and the data elements are null-terminated C-style - strings. - - CSPICE cells should be declared using the declaration macros - provided in this header file. See the table of macros below. - - - Structures - ========== - - Name Description - ---- ---------- - - SpiceCell Structure containing CSPICE cell metadata. - - The members are: - - dtype: Data type of cell: character, - integer, or double precision. - - dtype has type - SpiceCellDataType. - - length: For character cells, the - declared length of the - cell's string array. - - size: The maximum number of data - items that can be stored in - the cell's data array. - - card: The cell's "cardinality": the - number of data items currently - present in the cell. - - isSet: Boolean flag indicating whether - the cell is a CSPICE set. - Sets have no duplicate data - items, and their data items are - stored in increasing order. - - adjust: Boolean flag indicating whether - the cell's data area has - adjustable size. Adjustable - size cell data areas are not - currently implemented. - - init: Boolean flag indicating whether - the cell has been initialized. - - base: is a void pointer to the - associated data array. base - points to the start of the - control area of this array. - - data: is a void pointer to the - first data slot in the - associated data array. This - slot is the element following - the control area. - - - ConstSpiceCell A const SpiceCell. - - - - - Declaration Macros - ================== - - Name Description - ---- ---------- - - SPICECHAR_CELL ( name, size, length ) Declare a - character CSPICE - cell having cell - name name, - maximum cell - cardinality size, - and string length - length. The - macro declares - both the cell and - the associated - data array. The - name of the data - array begins with - "SPICE_". - - - SPICEDOUBLE_CELL ( name, size ) Like SPICECHAR_CELL, - but declares a - double precision - cell. - - - SPICEINT_CELL ( name, size ) Like - SPICECHAR_CELL, - but declares an - integer cell. - - Assignment Macros - ================= - - Name Description - ---- ---------- - SPICE_CELL_SET_C( item, i, cell ) Assign the ith - element of a - character cell. - Arguments cell - and item are - pointers. - - SPICE_CELL_SET_D( item, i, cell ) Assign the ith - element of a - double precision - cell. Argument - cell is a - pointer. - - SPICE_CELL_SET_I( item, i, cell ) Assign the ith - element of an - integer cell. - Argument cell is - a pointer. - - - Fetch Macros - ============== - - Name Description - ---- ---------- - SPICE_CELL_GET_C( cell, i, lenout, item ) Fetch the ith - element from a - character cell. - Arguments cell - and item are - pointers. - Argument lenout - is the available - space in item. - - SPICE_CELL_GET_D( cell, i, item ) Fetch the ith - element from a - double precision - cell. Arguments - cell and item are - pointers. - - SPICE_CELL_GET_I( cell, i, item ) Fetch the ith - element from an - integer cell. - Arguments cell - and item are - pointers. - Element Pointer Macros - ====================== - - Name Description - ---- ---------- - SPICE_CELL_ELEM_C( cell, i ) Macro evaluates - to a SpiceChar - pointer to the - ith data element - of a character - cell. Argument - cell is a - pointer. - - SPICE_CELL_ELEM_D( cell, i ) Macro evaluates - to a SpiceDouble - pointer to the - ith data element - of a double - precision cell. - Argument cell is - a pointer. - - SPICE_CELL_ELEM_I( cell, i ) Macro evaluates - to a SpiceInt - pointer to the - ith data element - of an integer - cell. Argument - cell is a - pointer. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 1.0.0, 22-AUG-2002 (NJB) - -*/ -#ifndef HAVE_SPICE_CELLS_H - - #define HAVE_SPICE_CELLS_H - - - /* - Data type codes: - */ - typedef enum _SpiceDataType SpiceCellDataType; - - - /* - Cell structure: - */ - struct _SpiceCell - - { SpiceCellDataType dtype; - SpiceInt length; - SpiceInt size; - SpiceInt card; - SpiceBoolean isSet; - SpiceBoolean adjust; - SpiceBoolean init; - void * base; - void * data; }; - - typedef struct _SpiceCell SpiceCell; - - typedef const SpiceCell ConstSpiceCell; - - - /* - SpiceCell control area size: - */ - #define SPICE_CELL_CTRLSZ 6 - - - /* - Declaration macros: - */ - - #define SPICECHAR_CELL( name, size, length ) \ - \ - static SpiceChar SPICE_CELL_##name[SPICE_CELL_CTRLSZ + size][length]; \ - \ - static SpiceCell name = \ - \ - { SPICE_CHR, \ - length, \ - size, \ - 0, \ - SPICETRUE, \ - SPICEFALSE, \ - SPICEFALSE, \ - (void *) &(SPICE_CELL_##name), \ - (void *) &(SPICE_CELL_##name[SPICE_CELL_CTRLSZ]) } - - - #define SPICEDOUBLE_CELL( name, size ) \ - \ - static SpiceDouble SPICE_CELL_##name [SPICE_CELL_CTRLSZ + size]; \ - \ - static SpiceCell name = \ - \ - { SPICE_DP, \ - 0, \ - size, \ - 0, \ - SPICETRUE, \ - SPICEFALSE, \ - SPICEFALSE, \ - (void *) &(SPICE_CELL_##name), \ - (void *) &(SPICE_CELL_##name[SPICE_CELL_CTRLSZ]) } - - - #define SPICEINT_CELL( name, size ) \ - \ - static SpiceInt SPICE_CELL_##name [SPICE_CELL_CTRLSZ + size]; \ - \ - static SpiceCell name = \ - \ - { SPICE_INT, \ - 0, \ - size, \ - 0, \ - SPICETRUE, \ - SPICEFALSE, \ - SPICEFALSE, \ - (void *) &(SPICE_CELL_##name), \ - (void *) &(SPICE_CELL_##name[SPICE_CELL_CTRLSZ]) } - - - /* - Access macros for individual elements: - */ - - /* - Data element pointer macros: - */ - - #define SPICE_CELL_ELEM_C( cell, i ) \ - \ - ( ( (SpiceChar *) (cell)->data ) + (i)*( (cell)->length ) ) - - - #define SPICE_CELL_ELEM_D( cell, i ) \ - \ - ( ( (SpiceDouble *) (cell)->data )[(i)] ) - - - #define SPICE_CELL_ELEM_I( cell, i ) \ - \ - ( ( (SpiceInt *) (cell)->data )[(i)] ) - - - /* - "Fetch" macros: - */ - - #define SPICE_CELL_GET_C( cell, i, lenout, item ) \ - \ - { \ - SpiceInt nBytes; \ - \ - nBytes = brckti_c ( (cell)->length, 0, (lenout-1) ) \ - * sizeof ( SpiceChar ); \ - \ - memmove ( (item), SPICE_CELL_ELEM_C((cell), (i)), nBytes ); \ - \ - item[nBytes] = NULLCHAR; \ - } - - - #define SPICE_CELL_GET_D( cell, i, item ) \ - \ - ( (*item) = ( (SpiceDouble *) (cell)->data)[i] ) - - - #define SPICE_CELL_GET_I( cell, i, item ) \ - \ - ( (*item) = ( (SpiceInt *) (cell)->data)[i] ) - - - /* - Assignment macros: - */ - - #define SPICE_CELL_SET_C( item, i, cell ) \ - \ - { \ - SpiceChar * sPtr; \ - SpiceInt nBytes; \ - \ - nBytes = brckti_c ( strlen(item), 0, (cell)->length - 1 ) \ - * sizeof ( SpiceChar ); \ - \ - sPtr = SPICE_CELL_ELEM_C((cell), (i)); \ - \ - memmove ( sPtr, (item), nBytes ); \ - \ - sPtr[nBytes] = NULLCHAR; \ - } - - - #define SPICE_CELL_SET_D( item, i, cell ) \ - \ - ( ( (SpiceDouble *) (cell)->data)[i] = (item) ) - - - #define SPICE_CELL_SET_I( item, i, cell ) \ - \ - ( ( (SpiceInt *) (cell)->data)[i] = (item) ) - - - /* - The enum SpiceTransDir is used to indicate language translation - direction: C to Fortran or vice versa. - */ - enum _SpiceTransDir { C2F = 0, F2C = 1 }; - - typedef enum _SpiceTransDir SpiceTransDir; - - -#endif - diff --git a/ext/spice/include/SpiceEK.h b/ext/spice/include/SpiceEK.h deleted file mode 100644 index cbe213fb01..0000000000 --- a/ext/spice/include/SpiceEK.h +++ /dev/null @@ -1,448 +0,0 @@ -/* - --Header_File SpiceEK.h ( CSPICE EK-specific definitions ) - --Abstract - - Perform CSPICE EK-specific definitions, including macros and user- - defined types. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header defines macros, enumerated types, structures, and - typedefs that may be referenced in application code that calls CSPICE - EK functions. - - - Macros - ====== - - General limits - -------------- - - Name Description - ---- ---------- - SPICE_EK_MXCLSG Maximum number of columns per segment. - - SPICE_EK_TYPLEN Maximum length of a short string - indicating a data type (one of - {"CHR", "DP", "INT", "TIME"}). Such - strings are returned by some of the - Fortran SPICELIB EK routines, hence also - by their f2c'd counterparts. - - Sizes of EK objects - ------------------- - - Name Description - ---- ---------- - - SPICE_EK_CNAMSZ Maximum length of column name. - SPICE_EK_CSTRLN Length of string required to hold column - name. - SPICE_EK_TNAMSZ Maximum length of table name. - SPICE_EK_TSTRLN Length of string required to hold table - name. - - - Query-related limits - -------------------- - - Name Description - ---- ---------- - - SPICE_EK_MAXQRY Maximum length of an input query. This - value is currently equivalent to - twenty-five 80-character lines. - - SPICE_EK_MAXQSEL Maximum number of columns that may be - listed in the `SELECT clause' of a query. - - SPICE_EK_MAXQTAB Maximum number of tables that may be - listed in the `FROM clause' of a query. - - SPICE_EK_MAXQCON Maximum number of relational expressions - that may be listed in the `constraint - clause' of a query. - - This limit applies to a query when it is - represented in `normalized form': that - is, the constraints have been expressed - as a disjunction of conjunctions of - relational expressions. The number of - relational expressions in a query that - has been expanded in this fashion may be - greater than the number of relations in - the query as orginally written. For - example, the expression - - ( ( A LT 1 ) OR ( B GT 2 ) ) - AND - ( ( C NE 3 ) OR ( D EQ 4 ) ) - - which contains 4 relational expressions, - expands to the equivalent normalized - constraint - - ( ( A LT 1 ) AND ( C NE 3 ) ) - OR - ( ( A LT 1 ) AND ( D EQ 4 ) ) - OR - ( ( B GT 2 ) AND ( C NE 3 ) ) - OR - ( ( B GT 2 ) AND ( D EQ 4 ) ) - - which contains eight relational - expressions. - - - - SPICE_EK_MAXQJOIN Maximum number of tables that can be - joined. - - SPICE_EK_MAXQJCON Maximum number of join constraints - allowed. - - SPICE_EK_MAXQORD Maximum number of columns that may be - used in the `order-by clause' of a query. - - SPICE_EK_MAXQTOK Maximum number of tokens in a query. - Tokens - are reserved words, column names, - parentheses, and values. Literal strings - and time values count as single tokens. - - SPICE_EK_MAXQNUM Maximum number of numeric tokens in a - query. - - SPICE_EK_MAXQCLN Maximum total length of character tokens - in a query. - - SPICE_EK_MAXQSTR Maximum length of literal string values - allowed in queries. - - - Codes - ----- - - Name Description - ---- ---------- - - SPICE_EK_VARSIZ Code used to indicate variable-size - objects. Usually this is used in a - context where a non-negative integer - indicates the size of a fixed-size object - and the presence of this code indicates a - variable-size object. - - The value of this constant must match the - parameter IFALSE used in the Fortran - library SPICELIB. - - - Enumerated Types - ================ - - Enumerated code values - ---------------------- - - Name Description - ---- ---------- - SpiceEKDataType Codes for data types used in the EK - interface: character, double precision, - integer, and "time." - - The values are: - - { SPICE_CHR = 0, - SPICE_DP = 1, - SPICE_INT = 2, - SPICE_TIME = 3 } - - - - SpiceEKExprClass Codes for types of expressions that may - appear in the SELECT clause of EK - queries. Values and meanings are: - - - SPICE_EK_EXP_COL Selected item was a - column. The column - may qualified by a - table name. - - SPICE_EK_EXP_FUNC Selected item was - a simple function - invocation of the - form - - F ( ) - - or else was - - COUNT(*) - - SPICE_EK_EXP_EXPR Selected item was a - more general - expression than - those shown above. - - - Numeric values are: - - { SPICE_EK_EXP_COL = 0, - SPICE_EK_EXP_FUNC = 1, - SPICE_EK_EXP_EXPR = 2 } - - - Structures - ========== - - EK API structures - ----------------- - - Name Description - ---- ---------- - - SpiceEKAttDsc EK column attribute descriptor. Note - that this object is distinct from the EK - column descriptors used internally in - the EK routines; those descriptors - contain pointers as well as attribute - information. - - The members are: - - cclass: Column class code. - - dtype: Data type code: has type - SpiceEKDataType. - - strlen: String length. Applies to - SPICE_CHR type. Value is - SPICE_EK_VARSIZ for - variable-length strings. - - size: Column entry size; this is - the number of array - elements in a column - entry. The value is - SPICE_EK_VARSIZ for - variable-size columns. - - indexd: Index flag; value is - SPICETRUE if the column is - indexed, SPICEFALSE - otherwise. - - nullok: Null flag; value is - SPICETRUE if the column - may contain null values, - SPICEFALSE otherwise. - - - - SpiceEKSegSum EK segment summary. This structure - contains user interface level descriptive - information. The structure contains the - following members: - - tabnam The name of the table to - which the segment belongs. - - nrows The number of rows in the - segment. - - ncols The number of columns in - the segment. - - cnames An array of names of - columns in the segment. - Column names may contain - as many as SPICE_EK_CNAMSZ - characters. The array - contains room for - SPICE_EK_MXCLSG column - names. - - cdescrs An array of column - attribute descriptors of - type SpiceEKAttDsc. - The array contains room - for SPICE_EK_MXCLSG - descriptors. The Ith - descriptor corresponds to - the column whose name is - the Ith element of the - array cnames. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 2.0.0 27-JUL-2002 (NJB) - - Defined SpiceEKDataType using SpiceDataType. Removed declaration - of enum _SpiceEKDataType. - - -CSPICE Version 1.0.0, 05-JUL-1999 (NJB) - - Renamed _SpiceEKAttDsc member "class" to "cclass." The - former name is a reserved word in C++. - - - -CSPICE Version 1.0.0, 24-FEB-1999 (NJB) - -*/ - -#ifndef HAVE_SPICE_EK_H - - #define HAVE_SPICE_EK_H - - - - /* - Constants - */ - - /* - Sizes of EK objects: - */ - - #define SPICE_EK_CNAMSZ 32 - #define SPICE_EK_CSTRLN ( SPICE_EK_CNAMSZ + 1 ) - #define SPICE_EK_TNAMSZ 64 - #define SPICE_EK_TSTRLN ( SPICE_EK_TNAMSZ + 1 ) - - - - /* - Maximum number of columns per segment: - */ - - #define SPICE_EK_MXCLSG 100 - - - /* - Maximum length of string indicating data type: - */ - - #define SPICE_EK_TYPLEN 4 - - - /* - Query-related limits (see header for details): - */ - - #define SPICE_EK_MAXQRY 2000 - #define SPICE_EK_MAXQSEL 50 - #define SPICE_EK_MAXQTAB 10 - #define SPICE_EK_MAXQCON 1000 - #define SPICE_EK_MAXQJOIN 10 - #define SPICE_EK_MAXQJCON 100 - #define SPICE_EK_MAXQORD 10 - #define SPICE_EK_MAXQTOK 500 - #define SPICE_EK_MAXQNUM 100 - #define SPICE_EK_MAXQCLN SPICE_EK_MAXQRY - #define SPICE_EK_MAXQSTR 1024 - - - - /* - Code indicating "variable size": - */ - #define SPICE_EK_VARSIZ (-1) - - - - /* - Data type codes: - */ - typedef SpiceDataType SpiceEKDataType; - - - - /* - SELECT clause expression type codes: - */ - enum _SpiceEKExprClass{ SPICE_EK_EXP_COL = 0, - SPICE_EK_EXP_FUNC = 1, - SPICE_EK_EXP_EXPR = 2 }; - - typedef enum _SpiceEKExprClass SpiceEKExprClass; - - - - /* - EK column attribute descriptor: - */ - - struct _SpiceEKAttDsc - - { SpiceInt cclass; - SpiceEKDataType dtype; - SpiceInt strlen; - SpiceInt size; - SpiceBoolean indexd; - SpiceBoolean nullok; }; - - typedef struct _SpiceEKAttDsc SpiceEKAttDsc; - - - - /* - EK segment summary: - */ - - struct _SpiceEKSegSum - - { SpiceChar tabnam [SPICE_EK_TSTRLN]; - SpiceInt nrows; - SpiceInt ncols; - SpiceChar cnames [SPICE_EK_MXCLSG][SPICE_EK_CSTRLN]; - SpiceEKAttDsc cdescrs[SPICE_EK_MXCLSG]; }; - - typedef struct _SpiceEKSegSum SpiceEKSegSum; - - -#endif - diff --git a/ext/spice/include/SpiceEll.h b/ext/spice/include/SpiceEll.h deleted file mode 100644 index d0c123ab06..0000000000 --- a/ext/spice/include/SpiceEll.h +++ /dev/null @@ -1,115 +0,0 @@ -/* - --Header_File SpiceEll.h ( CSPICE Ellipse definitions ) - --Abstract - - Perform CSPICE definitions for the SpiceEllipse data type. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header defines structures and typedefs that may be referenced in - application code that calls CSPICE Ellipse functions. - - - Structures - ========== - - Name Description - ---- ---------- - - SpiceEllipse Structure representing an ellipse in 3- - dimensional space. - - The members are: - - center: Vector defining ellipse's - center. - - semiMajor: Vector defining ellipse's - semi-major axis. - - semiMinor: Vector defining ellipse's - semi-minor axis. - - The ellipse is the set of points - - {X: X = center - + cos(theta) * semiMajor - + sin(theta) * semiMinor, - - theta in [0, 2*Pi) } - - - ConstSpiceEllipse A const SpiceEllipse. - - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 1.0.0, 04-MAR-1999 (NJB) - -*/ - -#ifndef HAVE_SPICE_ELLIPSES - - #define HAVE_SPICE_ELLIPSES - - - - /* - Ellipse structure: - */ - - struct _SpiceEllipse - - { SpiceDouble center [3]; - SpiceDouble semiMajor [3]; - SpiceDouble semiMinor [3]; }; - - typedef struct _SpiceEllipse SpiceEllipse; - - typedef const SpiceEllipse ConstSpiceEllipse; - -#endif - diff --git a/ext/spice/include/SpiceErr.h b/ext/spice/include/SpiceErr.h deleted file mode 100644 index 21e76605cf..0000000000 --- a/ext/spice/include/SpiceErr.h +++ /dev/null @@ -1,141 +0,0 @@ -/* - --Header_File SpiceErr.h ( CSPICE error handling definitions ) - --Abstract - - Perform CSPICE definitions for error handling APIs. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header defines constants that may be referenced in - application code that calls CSPICE error handling functions. - - - CONSTANTS - ========== - - Name Description - ---- ---------- - - SPICE_ERROR_LMSGLN Maximum length of a long error message, - including the null terminator. - - SPICE_ERROR_SMSGLN Maximum length of a short error message, - including the null terminator. - - SPICE_ERROR_XMSGLN Maximum length of a short error - explanation message, including the null - terminator. - - SPICE_ERROR_MODLEN Maximum length of a module name - appearing in the traceback message, - including the null terminator. - - SPICE_ERROR_MAXMOD Maximum count of module names - appearing in the traceback message. - - SPICE_ERROR_TRCLEN Maximum length of a traceback message, - including the null terminator. - - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 1.0.0, 05-NOV-2013 (NJB) - -*/ - -#ifndef HAVE_SPICE_ERROR_HANDLING - - #define HAVE_SPICE_ERROR_HANDLING - - - /* - Local constants - */ - #define ARROWLEN 5 - - /* - Public constants - */ - - /* - Long error message length, which is equal to - - ( 23 * 80 ) + 1 - - */ - #define SPICE_ERROR_LMSGLN 1841 - - /* - Short error message length: - */ - #define SPICE_ERROR_SMSGLN 26 - - /* - Short error message explanation length: - */ - #define SPICE_ERROR_XMSGLN 81 - - /* - Module name length for traceback entries: - */ - #define SPICE_ERROR_MODLEN 33 - - /* - Maximum module count for traceback string: - */ - #define SPICE_ERROR_MAXMOD 100 - - /* - Maximum length of traceback string returned - by qcktrc_c. - */ - #define SPICE_ERROR_TRCLEN ( ( SPICE_ERROR_MAXMOD \ - * ( SPICE_ERROR_MODLEN-1 ) ) \ - + ( ARROWLEN \ - * ( SPICE_ERROR_MAXMOD-1 ) ) \ - + 1 ) -#endif - diff --git a/ext/spice/include/SpiceFrm.h b/ext/spice/include/SpiceFrm.h deleted file mode 100644 index 98263c4b16..0000000000 --- a/ext/spice/include/SpiceFrm.h +++ /dev/null @@ -1,193 +0,0 @@ -/* - --Header_File SpiceFrm.h ( CSPICE frame subsystem definitions ) - --Abstract - - Perform CSPICE definitions for frame subsystem APIs. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - CK - FRAMES - PCK - --Particulars - - This header defines constants that may be referenced in - application code that calls CSPICE frame subsystem APIs. - - - CONSTANTS - ========== - - - Frame counts - ------------ - - The following parameter are counts of built-in frames. These - parameters correspond to those defined in the SPICELIB Fortran - INCLUDE files - - ninert.inc - nninrt.inc - - Name Description - ---- ---------- - - SPICE_NFRAME_NINERT Number of built-in inertial frames. - SPICE_NFRAME_NNINRT Number of built-in non-inertial frames. - - - - Frame classes - ------------- - - The following parameters identify SPICE frame classes. These - parameters correspond to those defined in the SPICELIB Fortran - INCLUDE file frmtyp.inc. See the Frames Required Reading for a - detailed discussion of frame classes. - - - Name Description - ---- ---------- - - SPICE_FRMTYP_INERTL an inertial frame that is listed in the - f2c'd routine chgirf_ and that requires - no external file to compute the - transformation from or to any other - inertial frame. - - - SPICE_FRMTYP_PCK is a frame that is specified relative - to some built-in, inertial frame (of - class SPICE_FRMTYP_INERTL) and that has - an IAU model that may be retrieved from - the PCK system via a call to the - routine tisbod_c. - - - SPICE_FRMTYP_CK is a frame defined by a C-kernel. - - - SPICE_FRMTYP_TK is a "text kernel" frame. These frames - are offset from their associated - "relative" frames by a constant - rotation. - - - SPICE_FRMTYP_DYN is a "dynamic" frame. These currently - are limited to parameterized frames - where the full frame definition depends - on parameters supplied via a frame - kernel. - - SPICE_FRMTYP_ALL indicates any of the above classes. - This parameter is used in APIs that - fetch information about frames of a - specified class. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 1.0.0, 23-MAY-2012 (NJB) - -*/ - -#ifndef HAVE_SPICE_FRAME_DEFS - - #define HAVE_SPICE_FRAME_DEFS - - - /* - Frame counts: - */ - - /* - Number of built-in inertial frames. This number must be kept in - sync with that defined in the SPICELIB include file ninert.inc. - */ - #define SPICE_NFRAME_NINERT 21 - - /* - Number of built-in non-inertial frames. This number must be kept in - sync with that defined in the SPICELIB include file nninrt.inc. - */ - #define SPICE_NFRAME_NNINRT 105 - - - - /* - The frame class codes defined here are identical - to those used in SPICELIB. - */ - - /* - Inertial, built-in frames: - */ - #define SPICE_FRMTYP_INERTL 1 - - /* - PCK frames: - */ - #define SPICE_FRMTYP_PCK 2 - - /* - CK frames: - */ - #define SPICE_FRMTYP_CK 3 - - /* - TK frames: - */ - #define SPICE_FRMTYP_TK 4 - - /* - Dynamic frames: - */ - #define SPICE_FRMTYP_DYN 5 - - /* - All frame classes: - */ - #define SPICE_FRMTYP_ALL ( -1 ) - - -#endif - diff --git a/ext/spice/include/SpiceGF.h b/ext/spice/include/SpiceGF.h deleted file mode 100644 index b5840cb7e7..0000000000 --- a/ext/spice/include/SpiceGF.h +++ /dev/null @@ -1,341 +0,0 @@ -/* - --Header_File SpiceGF.h ( CSPICE GF-specific definitions ) - --Abstract - - Perform CSPICE GF-specific definitions. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - GF - --Keywords - - GEOMETRY - SEARCH - --Exceptions - - None - --Files - - None - --Particulars - - This header defines macros that may be referenced in application - code that calls CSPICE GF functions. - - - Macros - ====== - - Workspace parameters - -------------------- - - CSPICE applications normally don't declare workspace arguments - and therefore don't directly reference workspace size parameters. - However, CSPICE GF APIs dealing with numeric constraints - dynamically allocate workspace memory; the amount allocated - depends on the number of intervals the workspace windows can - hold. This amount is an input argument to the GF numeric quantity - APIs. - - The parameters below are used to calculate the amount of memory - required. Each workspace window contains 6 double precision - numbers in its control area and 2 double precision numbers for - each interval it can hold. - - - Name Description - ---- ---------- - SPICE_GF_NWMAX Maximum number of windows required for - a user-defined workspace array. - - SPICE_GF_NWDIST Number of workspace windows used by - gfdist_c and the underlying SPICELIB - routine GFDIST. - - SPICE_GF_NWILUM Number of workspace windows used by - gfilum_c and the underlying SPICELIB - routine GFILUM. - - SPICE_GF_NWSEP Number of workspace windows used by - gfsep_c and the underlying SPICELIB - routine GFSEP. - - SPICE_GF_NWRR Number of workspace windows used by - gfrr_c and the underlying SPICELIB - routine GFRR. - - SPICE_GF_NWPA Number of workspace windows used by - gfpa_c and the underlying SPICELIB - routine GFPA. - - - Field of view (FOV) parameters - ------------------------------ - - Name Description - ---- ---------- - SPICE_GF_MAXVRT Maximum allowed number of boundary - vectors for a polygonal FOV. - - SPICE_GF_CIRFOV Parameter identifying a circular FOV. - - SPICE_GF_ELLFOV Parameter identifying a elliptical FOV. - - SPICE_GF_POLFOV Parameter identifying a polygonal FOV. - - SPICE_GF_RECFOV Parameter identifying a rectangular FOV. - - SPICE_GF_SHPLEN Parameter specifying maximum length of - a FOV shape name. - - SPICE_GF_MARGIN is a small positive number used to - constrain the orientation of the - boundary vectors of polygonal FOVs. Such - FOVs must satisfy the following - constraints: - - 1) The boundary vectors must be - contained within a right circular - cone of angular radius less than - than (pi/2) - MARGIN radians; in - other words, there must be a vector - A such that all boundary vectors - have angular separation from A of - less than (pi/2)-MARGIN radians. - - 2) There must be a pair of boundary - vectors U, V such that all other - boundary vectors lie in the same - half space bounded by the plane - containing U and V. Furthermore, all - other boundary vectors must have - orthogonal projections onto a plane - normal to this plane such that the - projections have angular separation - of at least 2*MARGIN radians from - the plane spanned by U and V. - - MARGIN is currently set to 1.D-12. - - - Occultation parameters - ---------------------- - - SPICE_GF_ANNULR Parameter identifying an "annular - occultation." This geometric condition - is more commonly known as a "transit." - The limb of the background object must - not be blocked by the foreground object - in order for an occultation to be - "annular." - - SPICE_GF_ANY Parameter identifying any type of - occultation or transit. - - SPICE_GF_FULL Parameter identifying a full - occultation: the foreground body - entirely blocks the background body. - - SPICE_GF_PARTL Parameter identifying an "partial - occultation." This is an occultation in - which the foreground body blocks part, - but not all, of the limb of the - background body. - - - - Target shape parameters - ----------------------- - - SPICE_GF_EDSHAP Parameter indicating a target object's - shape is modeled as an ellipsoid. - - SPICE_GF_PTSHAP Parameter indicating a target object's - shape is modeled as a point. - - SPICE_GF_RYSHAP Parameter indicating a target object's - "shape" is modeled as a ray emanating - from an observer's location. This model - may be used in visibility computations - for targets whose direction, but not - position, relative to an observer is - known. - - SPICE_GF_SPSHAP Parameter indicating a target object's - shape is modeled as a point. - - - - Search parameters - ----------------- - - These parameters affect the manner in which GF searches are - performed. - - SPICE_GF_ADDWIN is a parameter used in numeric quantity - searches that use an equality - constraint. This parameter is used to - expand the confinement window (the - window over which the search is - performed) by a small amount at both - ends. This expansion accommodates the - case where a geometric quantity is equal - to a reference value at a boundary point - of the original confinement window. - - SPICE_GF_CNVTOL is the default convergence tolerance - used by GF routines that don't support a - user-supplied tolerance value. GF - searches for roots will terminate when a - root is bracketed by times separated by - no more than this tolerance. Units are - seconds. - - Configuration parameter - ----------------------- - - SPICE_GFEVNT_MAXPAR Parameter indicating the maximum number of - elements needed for the 'qnames' and 'q*pars' - arrays used in gfevnt_c. - - SpiceChar qcpars[SPICE_GFEVNT_MAXPAR][LNSIZE]; - SpiceDouble qdpars[SPICE_GFEVNT_MAXPAR]; - SpiceInt qipars[SPICE_GFEVNT_MAXPAR]; - SpiceBoolean qlpars[SPICE_GFEVNT_MAXPAR]; - --Examples - - None - --Restrictions - - None. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - L.S. Elson (JPL) - --Version - - -CSPICE Version 2.1.0, 23-FEB-2012 (NJB) - - Added parameters: - - SPICE_GF_NWILUM - SPICE_GF_NWRR - SPICE_GF_NWPA - - -CSPICE Version 2.0.0, 23-JUN-2009 (NJB) - - Added parameter for maximum length of FOV shape string. - - -CSPICE Version 1.0.0, 11-MAR-2009 (NJB) - -*/ - - -#ifndef HAVE_SPICE_GF_H - - #define HAVE_SPICE_GF_H - - - /* - See the Particulars section above for parameter descriptions. - */ - - /* - Workspace parameters - */ - #define SPICE_GF_NWMAX 15 - #define SPICE_GF_NWDIST 5 - #define SPICE_GF_NWILUM 5 - #define SPICE_GF_NWSEP 5 - #define SPICE_GF_NWRR 5 - #define SPICE_GF_NWPA 5 - - - /* - Field of view (FOV) parameters - */ - #define SPICE_GF_MAXVRT 10000 - #define SPICE_GF_CIRFOV "CIRCLE" - #define SPICE_GF_ELLFOV "ELLIPSE" - #define SPICE_GF_POLFOV "POLYGON" - #define SPICE_GF_RECFOV "RECTANGLE" - #define SPICE_GF_SHPLEN 10 - #define SPICE_GF_MARGIN ( 1.e-12 ) - - - /* - Occultation parameters - */ - #define SPICE_GF_ANNULR "ANNULAR" - #define SPICE_GF_ANY "ANY" - #define SPICE_GF_FULL "FULL" - #define SPICE_GF_PARTL "PARTIAL" - - - /* - Target shape parameters - */ - #define SPICE_GF_EDSHAP "ELLIPSOID" - #define SPICE_GF_PTSHAP "POINT" - #define SPICE_GF_RYSHAP "RAY" - #define SPICE_GF_SPSHAP "SPHERE" - - - /* - Search parameters - */ - #define SPICE_GF_ADDWIN 1.0 - #define SPICE_GF_CNVTOL 1.e-6 - - - /* - Configuration parameters. - */ - #define SPICE_GFEVNT_MAXPAR 10 - - -#endif - - -/* - End of header file SpiceGF.h -*/ diff --git a/ext/spice/include/SpiceOccult.h b/ext/spice/include/SpiceOccult.h deleted file mode 100644 index 0caab7c3cc..0000000000 --- a/ext/spice/include/SpiceOccult.h +++ /dev/null @@ -1,147 +0,0 @@ -/* - --Header_File SpiceOccult.h ( CSPICE Occultation specific definitions ) - --Abstract - - Perform CSPICE occultation specific definitions. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Keywords - - OCCULTATION - GEOMETRY - ELLIPSOID - --Exceptions - - None - --Files - - None - --Particulars - - The following integer codes indicate the geometric relationship - of the three bodies. - - The meaning of the sign of each code is given below. - - Code sign Meaning - --------- ------------------------------ - > 0 The second ellipsoid is - partially or fully occulted - by the first. - - < 0 The first ellipsoid is - partially of fully - occulted by the second. - - = 0 No occultation. - - The meanings of the codes are given below. The variable names - indicate the type of occultation and which target is in the back. - For example, SPICE_OCCULT_TOTAL1 represents a total occultation in which - the first target is in the back (or occulted by) the second target. - - Name Code Meaning - ------ ----- ------------------------------ - SPICE_OCCULT_TOTAL1 -3 Total occultation of first - target by second. - - SPICE_OCCULT_ANNLR1 -2 Annular occultation of first - target by second. The second - target does not block the limb - of the first. - - SPICE_OCCULT_PARTL1 -1 Partial occultation of first - target by second target. - - SPICE_OCCULT_NOOCC 0 No occultation or transit: both - objects are completely visible - to the observer. - - SPICE_OCCULT_PARTL2 1 Partial occultation of second - target by first target. - - SPICE_OCCULT_ANNLR2 2 Annular occultation of second - target by first. - - SPICE_OCCULT_TOTAL2 3 Total occultation of second - target by first. - --Examples - - None - --Restrictions - - None. - --Literature_References - - None. - --Author_and_Institution - - S.C. Krening (JPL) - N.J. Bachman (JPL) - --Version - - -CSPICE Version 1.0.0, 23-FEB-2012 (SCK) - -*/ - - -#ifndef HAVE_SPICE_OCCULT_H - - #define HAVE_SPICE_OCCULT_H - - /* - See the Particulars section above for parameter descriptions. - */ - - /* - Occultation parameters - */ - - #define SPICE_OCCULT_TOTAL1 -3 - #define SPICE_OCCULT_ANNLR1 -2 - #define SPICE_OCCULT_PARTL1 -1 - #define SPICE_OCCULT_NOOCC 0 - #define SPICE_OCCULT_PARTL2 1 - #define SPICE_OCCULT_ANNLR2 2 - #define SPICE_OCCULT_TOTAL2 3 - - -#endif diff --git a/ext/spice/include/SpicePln.h b/ext/spice/include/SpicePln.h deleted file mode 100644 index 839fb15606..0000000000 --- a/ext/spice/include/SpicePln.h +++ /dev/null @@ -1,106 +0,0 @@ -/* - --Header_File SpicePln.h ( CSPICE Plane definitions ) - --Abstract - - Perform CSPICE definitions for the SpicePlane data type. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header defines structures and typedefs that may be referenced in - application code that calls CSPICE Plane functions. - - - Structures - ========== - - Name Description - ---- ---------- - - SpicePlane Structure representing a plane in 3- - dimensional space. - - The members are: - - normal: Vector normal to plane. - - constant: Constant of plane equation - - Plane = - - {X: = constant} - - - - ConstSpicePlane A const SpicePlane. - - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 1.0.0, 04-MAR-1999 (NJB) - -*/ - -#ifndef HAVE_SPICE_PLANES - - #define HAVE_SPICE_PLANES - - - - /* - Plane structure: - */ - - struct _SpicePlane - - { SpiceDouble normal [3]; - SpiceDouble constant; }; - - typedef struct _SpicePlane SpicePlane; - - typedef const SpicePlane ConstSpicePlane; - -#endif - diff --git a/ext/spice/include/SpiceSPK.h b/ext/spice/include/SpiceSPK.h deleted file mode 100644 index a4c8eac5f7..0000000000 --- a/ext/spice/include/SpiceSPK.h +++ /dev/null @@ -1,128 +0,0 @@ -/* - --Header_File SpiceSPK.h ( CSPICE SPK definitions ) - --Abstract - - Perform CSPICE definitions to support SPK wrapper interfaces. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header defines types that may be referenced in - application code that calls CSPICE SPK functions. - - Typedef - ======= - - Name Description - ---- ---------- - - SpiceSPK18Subtype Typedef for enum indicating the - mathematical representation used - in an SPK type 18 segment. Possible - values and meanings are: - - S18TP0: - - Hermite interpolation, 12- - element packets containing - - x, y, z, dx/dt, dy/dt, dz/dt, - vx, vy, vz, dvx/dt, dvy/dt, dvz/dt - - where x, y, z represent Cartesian - position components and vx, vy, vz - represent Cartesian velocity - components. Note well: vx, vy, and - vz *are not necessarily equal* to the - time derivatives of x, y, and z. - This packet structure mimics that of - the Rosetta/MEX orbit file from which - the data are taken. - - Position units are kilometers, - velocity units are kilometers per - second, and acceleration units are - kilometers per second per second. - - - S18TP1: - - Lagrange interpolation, 6- - element packets containing - - x, y, z, dx/dt, dy/dt, dz/dt - - where x, y, z represent Cartesian - position components and vx, vy, vz - represent Cartesian velocity - components. - - Position units are kilometers; - velocity units are kilometers per - second. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 1.0.0, 16-AUG-2002 (NJB) - -*/ - -#ifndef HAVE_SPICE_SPK_H - - #define HAVE_SPICE_SPK_H - - - - /* - SPK type 18 subtype codes: - */ - - enum _SpiceSPK18Subtype { S18TP0, S18TP1 }; - - - typedef enum _SpiceSPK18Subtype SpiceSPK18Subtype; - -#endif - diff --git a/ext/spice/include/SpiceUsr.h b/ext/spice/include/SpiceUsr.h deleted file mode 100644 index 38ad5a41c7..0000000000 --- a/ext/spice/include/SpiceUsr.h +++ /dev/null @@ -1,240 +0,0 @@ -/* - --Header_File SpiceUsr.h ( CSPICE user interface definitions ) - --Abstract - - Perform CSPICE user interface declarations, including type - definitions and function prototype declarations. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This file is an umbrella header that includes all header files - required to support the CSPICE application programming interface - (API). Users' application code that calls CSPICE need include only - this single header file. This file includes function prototypes for - the entire set of CSPICE routines. Typedef statements used to create - SPICE data types are also included. - - - About SPICE data types - ====================== - - To assist with long-term maintainability of CSPICE, NAIF has elected - to use typedefs to represent data types occurring in argument lists - and as return values of CSPICE functions. These are: - - SpiceBoolean - SpiceChar - SpiceDouble - SpiceInt - ConstSpiceBoolean - ConstSpiceChar - ConstSpiceDouble - ConstSpiceInt - - The SPICE typedefs map in an arguably natural way to ANSI C types: - - SpiceBoolean -> enum { SPICEFALSE = 0, SPICETRUE = 1 } - SpiceChar -> char - SpiceDouble -> double - SpiceInt -> int or long - ConstX -> const X (X = any of the above types) - - The type SpiceInt is a special case: the corresponding type is picked - so as to be half the size of a double. On all currently supported - platforms, type double occupies 8 bytes and type int occupies 4 - bytes. Other platforms may require a SpiceInt to map to type long. - - While other data types may be used internally in CSPICE, no other - types appear in the API. - - - About CSPICE function prototypes - ================================ - - Because CSPICE function prototypes enable substantial compile-time - error checking, we recommend that user applications always reference - them. Including the header file SpiceUsr.h in any module that calls - CSPICE will automatically make the prototypes available. - - - About CSPICE C style - ==================== - - CSPICE is written in ANSI C. No attempt has been made to support K&R - conventions or restrictions. - - - About C++ compatibility - ======================= - - The preprocessor directive -D__cplusplus should be used when - compiling C++ source code that includes this header file. This - directive will suppress mangling of CSPICE names, permitting linkage - to a CSPICE object library built from object modules produced by - an ANSI C compiler. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - S.C. Krening (JPL) - E.D. Wright (JPL) - --Restrictions - - The #include statements contained in this file are not part of - the CSPICE API. The set of files included may change without notice. - Users should not include these files directly in their own - application code. - --Version - - -CSPICE Version 5.0.0, 11-MAY-2012 (NJB) (SCK) - - Updated to include header files - - SpiceErr.h - SpiceFrm.h - SpiceOccult.h - - -CSPICE Version 4.0.0, 30-SEP-2008 (NJB) - - Updated to include header file - - SpiceGF.h - - -CSPICE Version 3.0.0, 19-AUG-2002 (NJB) - - Updated to include header files - - SpiceCel.h - SpiceCK.h - SpiceSPK.h - - -CSPICE Version 3.0.0, 17-FEB-1999 (NJB) - - Updated to support suppression of name mangling when included in - C++ source code. Also now interface macros to intercept function - calls and perform automatic type casting. - - Now includes platform macro definition header file. - - References to types SpiceVoid and ConstSpiceVoid were removed. - - -CSPICE Version 2.0.0, 06-MAY-1998 (NJB) (EDW) - -*/ - -#ifdef __cplusplus - extern "C" { -#endif - - -#ifndef HAVE_SPICE_USER - - #define HAVE_SPICE_USER - - - /* - Include CSPICE platform macro definitions. - */ - #include "SpiceZpl.h" - - /* - Include CSPICE data type definitions. - */ - #include "SpiceZdf.h" - - /* - Include the CSPICE error handling interface definitions. - */ - #include "SpiceErr.h" - - /* - Include the CSPICE EK interface definitions. - */ - #include "SpiceEK.h" - - /* - Include the CSPICE frame subsystem API definitions. - */ - #include "SpiceFrm.h" - - /* - Include the CSPICE Cell interface definitions. - */ - #include "SpiceCel.h" - - /* - Include the CSPICE CK interface definitions. - */ - #include "SpiceCK.h" - - /* - Include the CSPICE SPK interface definitions. - */ - #include "SpiceSPK.h" - - /* - Include the CSPICE GF interface definitions. - */ - #include "SpiceGF.h" - - /* - Include the CSPICE occultation definitions. - */ - #include "SpiceOccult.h" - - /* - Include CSPICE prototypes. - */ - #include "SpiceZpr.h" - - /* - Define the CSPICE function interface macros. - */ - #include "SpiceZim.h" - - - -#endif - - -#ifdef __cplusplus - } -#endif - diff --git a/ext/spice/include/SpiceZad.h b/ext/spice/include/SpiceZad.h deleted file mode 100644 index 46db3e95a8..0000000000 --- a/ext/spice/include/SpiceZad.h +++ /dev/null @@ -1,209 +0,0 @@ -/* - --Header_File SpiceZad.h ( CSPICE adapter definitions ) - --Abstract - - Perform CSPICE declarations to support passed-in function - adapters used in wrapper interfaces. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header file contains declarations used by the CSPICE - passed-in function adapter ("PFA") system. This system enables - CSPICE wrapper functions to support passed-in function - arguments whose prototypes are C-style, even when these - functions are to be called from f2c'd Fortran routines - expecting f2c-style interfaces. - - This header declares: - - - The prototype for the passed-in function argument - pointer storage and fetch routines - - zzadsave_c - zzadget_c - - - Prototypes for CSPICE adapter functions. Each passed-in - function argument in a CSPICE wrapper has a corresponding - adapter function. The adapter functions have interfaces - that match those of their f2c'd counterparts; this allows - the adapters to be called by f2c'd SPICELIB code. The - adapters look up saved function pointers for routines - passed in by the wrapper's caller and call these functions. - - - Values for the enumerated type SpicePassedInFunc. These - values are used to map function pointers to the - functions they represent, enabling adapters to call - the correct passed-in functions. - -Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 2.2.0, 29-NOV-2011 (EDW) - - Updated to support the user defined boolean function capability. - - -CSPICE Version 2.1.0, 21-DEC-2009 (EDW) - - Updated to support the user defined scalar function capability. - - -CSPICE Version 2.0.0, 29-JAN-2009 (NJB) - - Now conditionally includes SpiceZfc.h. - - Updated to reflect new calling sequence of f2c'd - routine gfrefn_. Some header updates were made - as well. - - -CSPICE Version 1.0.0, 29-MAR-2008 (NJB) - -*/ - - -/* - This file has dependencies defined in SpiceZfc.h. Include that - file if it hasn't already been included. -*/ -#ifndef HAVE_SPICEF2C_H - #include "SpiceZfc.h" -#endif - - - -#ifndef HAVE_SPICE_ZAD_H - - #define HAVE_SPICE_ZAD_H - - - - /* - Prototypes for GF adapters: - */ - - logical zzadbail_c ( void ); - - - int zzadstep_c ( doublereal * et, - doublereal * step ); - - - int zzadrefn_c ( doublereal * t1, - doublereal * t2, - logical * s1, - logical * s2, - doublereal * t ); - - - int zzadrepf_c ( void ); - - - int zzadrepi_c ( doublereal * cnfine, - char * srcpre, - char * srcsuf, - ftnlen srcprelen, - ftnlen srcsuflen ); - - - int zzadrepu_c ( doublereal * ivbeg, - doublereal * ivend, - doublereal * et ); - - - int zzadfunc_c ( doublereal * et, - doublereal * value ); - - - int zzadqdec_c ( U_fp udfunc, - doublereal * et, - logical * xbool ); - - /* - Define the enumerated type - - SpicePassedInFunc - - for names of passed-in functions. Using this type gives - us compile-time checking and avoids string comparisons. - */ - enum _SpicePassedInFunc { - UDBAIL, - UDREFN, - UDREPF, - UDREPI, - UDREPU, - UDSTEP, - UDFUNC, - UDQDEC, - }; - - typedef enum _SpicePassedInFunc SpicePassedInFunc; - - /* - SPICE_N_PASSED_IN_FUNC is the count of SpicePassedInFunc values. - */ - #define SPICE_N_PASSED_IN_FUNC 8 - - - /* - CSPICE wrappers supporting passed-in function arguments call - the adapter setup interface function once per each such argument; - these calls save the function pointers for later use within the - f2c'd code that calls passed-in functions. The saved pointers - will be used in calls by the adapter functions whose prototypes - are declared above. - - Prototypes for adapter setup interface: - */ - void zzadsave_c ( SpicePassedInFunc functionID, - void * functionPtr ); - - void * zzadget_c ( SpicePassedInFunc functionID ); - - -#endif - -/* -End of header file SpiceZad.h -*/ - diff --git a/ext/spice/include/SpiceZdf.h b/ext/spice/include/SpiceZdf.h deleted file mode 100644 index d59f76db7f..0000000000 --- a/ext/spice/include/SpiceZdf.h +++ /dev/null @@ -1,260 +0,0 @@ -/* - --Header_File SpiceZdf.h ( CSPICE definitions ) - --Abstract - - Define CSPICE data types via typedefs; also define some user-visible - enumerated types. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - CSPICE data types - ================= - - To assist with long-term maintainability of CSPICE, NAIF has elected - to use typedefs to represent data types occurring in argument lists - and as return values of CSPICE functions. These are: - - SpiceBoolean - SpiceChar - SpiceDouble - SpiceInt - ConstSpiceBoolean - ConstSpiceChar - ConstSpiceDouble - ConstSpiceInt - - The SPICE typedefs map in an arguably natural way to ANSI C types: - - SpiceBoolean -> int - SpiceChar -> char - SpiceDouble -> double - SpiceInt -> int or long - ConstX -> const X (X = any of the above types) - - The type SpiceInt is a special case: the corresponding type is picked - so as to be half the size of a double. On most currently supported - platforms, type double occupies 8 bytes and type long occupies 4 - bytes. Other platforms may require a SpiceInt to map to type int. - The Alpha/Digital Unix platform is an example of the latter case. - - While other data types may be used internally in CSPICE, no other - types appear in the API. - - - CSPICE enumerated types - ======================= - - These are provided to enhance readability of the code. - - Type name Value set - --------- --------- - - _Spicestatus { SPICEFAILURE = -1, SPICESUCCESS = 0 } - - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - B.V. Semenov (JPL) - E.D. Wright (JPL) - --Restrictions - - None. - --Version - - -CSPICE Version 6.2.0, 10-MAR-2014 (BVS) - - Updated for: - - PC-CYGWIN-64BIT-GCC_C - - environment. Added the corresponding tag: - - CSPICE_PC_CYGWIN_64BIT_GCC - - tag to the #ifdefs set. - - -CSPICE Version 6.1.0, 14-MAY-2010 (EDW)(BVS) - - Updated for: - - MAC-OSX-64BIT-INTEL_C - SUN-SOLARIS-64BIT-NATIVE_C - SUN-SOLARIS-INTEL-64BIT-CC_C - - environments. Added the corresponding tags: - - CSPICE_MAC_OSX_INTEL_64BIT_GCC - CSPICE_SUN_SOLARIS_64BIT_NATIVE - CSPICE_SUN_SOLARIS_INTEL_64BIT_CC - - tag to the #ifdefs set. - - -CSPICE Version 6.0.0, 21-FEB-2006 (NJB) - - Updated to support the PC Linux 64 bit mode/gcc platform. - - -CSPICE Version 5.0.0, 27-JAN-2003 (NJB) - - Updated to support the Sun Solaris 64 bit mode/gcc platform. - - -CSPICE Version 4.0.0 27-JUL-2002 (NJB) - - Added definition of SpiceDataType. - - -CSPICE Version 3.0.0 18-SEP-1999 (NJB) - - SpiceBoolean implementation changed from enumerated type to - typedef mapping to int. - - -CSPICE Version 2.0.0 29-JAN-1999 (NJB) - - Made definition of SpiceInt and ConstSpiceInt platform - dependent to accommodate the Alpha/Digital Unix platform. - - Removed definitions of SpiceVoid and ConstSpiceVoid. - - -CSPICE Version 1.0.0 25-OCT-1997 (KRG) (NJB) (EDW) -*/ - - #ifndef HAVE_SPICEDEFS_H - #define HAVE_SPICEDEFS_H - - /* - Include platform definitions, if they haven't been executed already. - */ - #ifndef HAVE_PLATFORM_MACROS_H - #include "SpiceZpl.h" - #endif - - /* - Basic data types. These are defined to be compatible with the - types used by f2c, and so they follow the Fortran notion of what - these things are. See the f2c documentation for the details - about the choices for the sizes of these types. - */ - typedef char SpiceChar; - typedef double SpiceDouble; - typedef float SpiceFloat; - - - - #if ( defined(CSPICE_ALPHA_DIGITAL_UNIX ) \ - || defined(CSPICE_SUN_SOLARIS_64BIT_NATIVE) \ - || defined(CSPICE_SUN_SOLARIS_64BIT_GCC ) \ - || defined(CSPICE_MAC_OSX_INTEL_64BIT_GCC ) \ - || defined(CSPICE_SUN_SOLARIS_INTEL_64BIT_CC ) \ - || defined(CSPICE_PC_CYGWIN_64BIT_GCC ) \ - || defined(CSPICE_PC_LINUX_64BIT_GCC ) ) - - typedef int SpiceInt; - #else - typedef long SpiceInt; - #endif - - - typedef const char ConstSpiceChar; - typedef const double ConstSpiceDouble; - typedef const float ConstSpiceFloat; - - - #if ( defined(CSPICE_ALPHA_DIGITAL_UNIX ) \ - || defined(CSPICE_SUN_SOLARIS_64BIT_NATIVE) \ - || defined(CSPICE_SUN_SOLARIS_64BIT_GCC ) \ - || defined(CSPICE_MAC_OSX_INTEL_64BIT_GCC ) \ - || defined(CSPICE_SUN_SOLARIS_INTEL_64BIT_CC ) \ - || defined(CSPICE_PC_CYGWIN_64BIT_GCC ) \ - || defined(CSPICE_PC_LINUX_64BIT_GCC ) ) - - typedef const int ConstSpiceInt; - #else - typedef const long ConstSpiceInt; - #endif - - - /* - More basic data types. These give mnemonics for some other data - types in C that are not used in Fortran written by NAIF or - supported by ANSI Fortran 77. These are for use in C functions - but should not be passed to any C SPICE wrappers, ``*_c.c'' - since they are not Fortran compatible. - */ - typedef long SpiceLong; - typedef short SpiceShort; - - /* - Unsigned data types - */ - typedef unsigned char SpiceUChar; - typedef unsigned int SpiceUInt; - typedef unsigned long SpiceULong; - typedef unsigned short SpiceUShort; - - /* - Signed data types - */ - typedef signed char SpiceSChar; - - /* - Other basic types - */ - typedef int SpiceBoolean; - typedef const int ConstSpiceBoolean; - - #define SPICETRUE 1 - #define SPICEFALSE 0 - - - enum _Spicestatus { SPICEFAILURE = -1, SPICESUCCESS = 0 }; - - typedef enum _Spicestatus SpiceStatus; - - - enum _SpiceDataType { SPICE_CHR = 0, - SPICE_DP = 1, - SPICE_INT = 2, - SPICE_TIME = 3, - SPICE_BOOL = 4 }; - - - typedef enum _SpiceDataType SpiceDataType; - - -#endif diff --git a/ext/spice/include/SpiceZfc.h b/ext/spice/include/SpiceZfc.h deleted file mode 100644 index db755d70ae..0000000000 --- a/ext/spice/include/SpiceZfc.h +++ /dev/null @@ -1,14228 +0,0 @@ -/* - --Header_File SpiceZfc.h ( f2c'd SPICELIB prototypes ) - --Abstract - - Define prototypes for functions produced by converting Fortran - SPICELIB routines to C using f2c. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - K.R. Gehringer (JPL) - B.V. Semenov (JPL) - E.D. Wright (JPL) - --Version - - -CSPICE Version 7.0.0, 10-MAR-2014 (BVS) - - Reformatted version lines. - - Now this header conditionally includes SpiceUsr.h. - - Updated for: - - PC-CYGWIN-64BIT-GCC_C - - environment. Added the corresponding tag: - - CSPICE_PC_CYGWIN_64BIT_GCC - - tag to the #ifdefs set. - - -CSPICE Version 6.1.0, 14-MAY-2010 (EDW)(BVS) - - Updated for: - - MAC-OSX-64BIT-INTEL_C - SUN-SOLARIS-64BIT-NATIVE_C - SUN-SOLARIS-INTEL-64BIT-CC_C - - environments. Added the corresponding tags: - - CSPICE_MAC_OSX_INTEL_64BIT_GCC - CSPICE_SUN_SOLARIS_64BIT_NATIVE - CSPICE_SUN_SOLARIS_INTEL_64BIT_CC - - tag to the #ifdefs set. - - -CSPICE Version 6.0.0, 21-FEB-2006 (NJB) - - Added typedefs for the PC-LINUX-64BIT-GCC_C - environment (these are identical to those for the - ALPHA-DIGITAL-UNIX_C environment). - - -CSPICE Version 5.0.0, 06-MAR-2005 (NJB) - - Added typedefs for pointers to functions. This change was - made to support CSPICE wrappers for geometry finder routines. - - Added typedefs for the SUN-SOLARIS-64BIT-GCC_C - environment (these are identical to those for the - ALPHA-DIGITAL-UNIX_C environment). - - -CSPICE Version 4.1.0, 24-MAY-2001 (WLT) - - Moved the #ifdef __cplusplus so that it appears after the - typedefs. This allows us to more easily wrap CSPICE in a - namespace for C++. - - -CSPICE Version 4.0.0, 09-FEB-1999 (NJB) - - Updated to accommodate the Alpha/Digital Unix platform. - Also updated to support inclusion in C++ code. - - -CSPICE Version 3.0.0, 02-NOV-1998 (NJB) - - Updated for SPICELIB version N0049. - - -CSPICE Version 2.0.0, 15-SEP-1997 (NJB) - - Changed variable name "typid" to "typid" in prototype - for zzfdat_. This was done to enable compilation under - Borland C++. - - -CSPICE Version 1.0.0, 15-SEP-1997 (NJB) (KRG) - --Index_Entries - - prototypes of f2c'd SPICELIB functions - -*/ - - -/* - Include SpiceUsr.h if it hasn't already been included - by the current compilation unit. -*/ -#ifndef HAVE_SPICE_USER - #include "SpiceUsr.h" -#endif - - - -#ifndef HAVE_SPICEF2C_H -#define HAVE_SPICEF2C_H - - -/* - Include Files: - - Many of the prototypes below use data types defined by f2c. We - copy here the f2c definitions that occur in prototypes of functions - produced by running f2c on Fortran SPICELIB routines. - - The reason we don't simply conditionally include f2c.h itself here - is that f2c.h defines macros that conflict with stdlib.h on some - systems. It's simpler to just replicate the few typedefs we need. -*/ - -#if ( defined( CSPICE_ALPHA_DIGITAL_UNIX ) \ - || defined( CSPICE_PC_CYGWIN_64BIT_GCC ) \ - || defined( CSPICE_PC_LINUX_64BIT_GCC ) \ - || defined( CSPICE_MAC_OSX_INTEL_64BIT_GCC ) \ - || defined( CSPICE_SUN_SOLARIS_INTEL_64BIT_CC ) \ - || defined( CSPICE_SUN_SOLARIS_64BIT_NATIVE) \ - || defined( CSPICE_SUN_SOLARIS_64BIT_GCC ) ) - - #define VOID void - - typedef VOID H_f; - typedef int integer; - typedef double doublereal; - typedef int logical; - typedef int ftnlen; - - - /* - Type H_fp is used for character return type. - Type S_fp is used for subroutines. - Type U_fp is used for functions of unknown type. - */ - typedef VOID (*H_fp)(); - typedef doublereal (*D_fp)(); - typedef doublereal (*E_fp)(); - typedef int (*S_fp)(); - typedef int (*U_fp)(); - typedef integer (*I_fp)(); - typedef logical (*L_fp)(); - -#else - - #define VOID void - - typedef VOID H_f; - typedef long integer; - typedef double doublereal; - typedef long logical; - typedef long ftnlen; - - /* - Type H_fp is used for character return type. - Type S_fp is used for subroutines. - Type U_fp is used for functions of unknown type. - */ - typedef VOID (*H_fp)(); - typedef doublereal (*D_fp)(); - typedef doublereal (*E_fp)(); - typedef int (*S_fp)(); - typedef int (*U_fp)(); - typedef integer (*I_fp)(); - typedef logical (*L_fp)(); - -#endif - - -#ifdef __cplusplus - extern "C" { -#endif - - -/* - Function prototypes for functions created by f2c are listed below. - See the headers of the Fortran routines for descriptions of the - routines' interfaces. - - The functions listed below are those expected to be called by - C-SPICELIB wrappers. Prototypes are not currently provided for other - f2c'd functions. - -*/ - -/* --Prototypes -*/ - -extern logical accept_(logical *ok); -extern logical allowd_(void); - -extern logical alltru_(logical *logcls, integer *n); - -extern H_f ana_(char *ret_val, ftnlen ret_val_len, char *word, char *case__, ftnlen word_len, ftnlen case_len); -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: replch_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ - -extern int appndc_(char *item, char *cell, ftnlen item_len, ftnlen cell_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int appndd_(doublereal *item, doublereal *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int appndi_(integer *item, integer *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical approx_(doublereal *x, doublereal *y, doublereal *tol); - -extern int astrip_(char *instr, char *asciib, char *asciie, char *outstr, ftnlen instr_len, ftnlen asciib_len, ftnlen asciie_len, ftnlen outstr_len); -/*:ref: lastnb_ 4 2 13 124 */ - -extern int axisar_(doublereal *axis, doublereal *angle, doublereal *r__); -/*:ref: ident_ 14 1 7 */ -/*:ref: vrotv_ 14 4 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern doublereal b1900_(void); - -extern doublereal b1950_(void); - -extern logical badkpv_(char *caller, char *name__, char *comp, integer *size, integer *divby, char *type__, ftnlen caller_len, ftnlen name_len, ftnlen comp_len, ftnlen type_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: eqchr_ 12 4 13 13 124 124 */ - -extern logical bedec_(char *string, ftnlen string_len); -/*:ref: pos_ 4 5 13 13 4 124 124 */ -/*:ref: beint_ 12 2 13 124 */ -/*:ref: beuns_ 12 2 13 124 */ - -extern logical beint_(char *string, ftnlen string_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: beuns_ 12 2 13 124 */ - -extern logical benum_(char *string, ftnlen string_len); -/*:ref: cpos_ 4 5 13 13 4 124 124 */ -/*:ref: bedec_ 12 2 13 124 */ -/*:ref: beint_ 12 2 13 124 */ - -extern logical beuns_(char *string, ftnlen string_len); -/*:ref: frstnb_ 4 2 13 124 */ - -extern int bltfrm_(integer *frmcls, integer *idset); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: zzfdat_ 14 18 4 4 13 4 4 4 4 4 4 4 13 4 4 4 4 4 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: orderi_ 14 3 4 4 4 */ - -extern int bodc2n_(integer *code, char *name__, logical *found, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzbodc2n_ 14 4 4 13 12 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int bodc2s_(integer *code, char *name__, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzbodc2n_ 14 4 4 13 12 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ - -extern int boddef_(char *name__, integer *code, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzboddef_ 14 3 13 4 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int bodeul_(integer *body, doublereal *et, doublereal *ra, doublereal *dec, doublereal *w, doublereal *lambda); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: pckeul_ 14 6 4 7 12 13 7 124 */ -/*:ref: bodfnd_ 12 3 4 13 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: rpd_ 7 0 */ -/*:ref: twopi_ 7 0 */ -/*:ref: zzbodbry_ 4 1 4 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: spd_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vdotg_ 7 3 7 7 4 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: eul2m_ 14 7 7 7 7 4 4 4 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: m2eul_ 14 7 7 4 4 4 7 7 7 */ - -extern logical bodfnd_(integer *body, char *item, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int bodmat_(integer *body, doublereal *et, doublereal *tipm); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: pckmat_ 14 5 4 7 4 7 12 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: ccifrm_ 14 7 4 4 4 13 4 12 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzbodbry_ 4 1 4 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: spd_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: bodfnd_ 12 3 4 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: rpd_ 7 0 */ -/*:ref: vdotg_ 7 3 7 7 4 */ -/*:ref: twopi_ 7 0 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: eul2m_ 14 7 7 7 7 4 4 4 7 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int bodn2c_(char *name__, integer *code, logical *found, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzbodn2c_ 14 4 13 4 12 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int bods2c_(char *name__, integer *code, logical *found, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzbodn2c_ 14 4 13 4 12 124 */ -/*:ref: beint_ 12 2 13 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int bodvar_(integer *body, char *item, integer *dim, doublereal *values, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: rtpool_ 14 5 13 4 7 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int bodvcd_(integer *bodyid, char *item, integer *maxn, integer *dim, doublereal *values, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ - -extern int bodvrd_(char *bodynm, char *item, integer *maxn, integer *dim, doublereal *values, ftnlen bodynm_len, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ - -extern doublereal brcktd_(doublereal *number, doublereal *end1, doublereal *end2); - -extern integer brckti_(integer *number, integer *end1, integer *end2); - -extern integer bschoc_(char *value, integer *ndim, char *array, integer *order, ftnlen value_len, ftnlen array_len); - -extern integer bschoi_(integer *value, integer *ndim, integer *array, integer *order); - -extern integer bsrchc_(char *value, integer *ndim, char *array, ftnlen value_len, ftnlen array_len); - -extern integer bsrchd_(doublereal *value, integer *ndim, doublereal *array); - -extern integer bsrchi_(integer *value, integer *ndim, integer *array); - -extern integer cardc_(char *cell, ftnlen cell_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dechar_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer cardd_(doublereal *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer cardi_(integer *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int cgv2el_(doublereal *center, doublereal *vec1, doublereal *vec2, doublereal *ellips); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: saelgv_ 14 4 7 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer chbase_(void); - -extern int chbder_(doublereal *cp, integer *degp, doublereal *x2s, doublereal *x, integer *nderiv, doublereal *partdp, doublereal *dpdxs); - -extern int chbigr_(integer *degp, doublereal *cp, doublereal *x2s, doublereal *x, doublereal *p, doublereal *itgrlp); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ - -extern int chbint_(doublereal *cp, integer *degp, doublereal *x2s, doublereal *x, doublereal *p, doublereal *dpdx); - -extern int chbval_(doublereal *cp, integer *degp, doublereal *x2s, doublereal *x, doublereal *p); - -extern int chckid_(char *class__, integer *maxlen, char *id, ftnlen class_len, ftnlen id_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: frstnp_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ - -extern int chgirf_(integer *refa, integer *refb, doublereal *rotab, char *name__, integer *index, ftnlen name_len); -extern int irfrot_(integer *refa, integer *refb, doublereal *rotab); -extern int irfnum_(char *name__, integer *index, ftnlen name_len); -extern int irfnam_(integer *index, char *name__, ftnlen name_len); -extern int irfdef_(integer *index); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rotate_ 14 3 7 4 7 */ -/*:ref: wdcnt_ 4 2 13 124 */ -/*:ref: nthwd_ 14 6 13 4 13 4 124 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ -/*:ref: convrt_ 14 6 7 13 13 7 124 124 */ -/*:ref: rotmat_ 14 4 7 7 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: mxmt_ 14 3 7 7 7 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: esrchc_ 4 5 13 4 13 124 124 */ - -extern int ckbsr_(char *fname, integer *handle, integer *inst, doublereal *sclkdp, doublereal *tol, logical *needav, doublereal *descr, char *segid, logical *found, ftnlen fname_len, ftnlen segid_len); -extern int cklpf_(char *fname, integer *handle, ftnlen fname_len); -extern int ckupf_(integer *handle); -extern int ckbss_(integer *inst, doublereal *sclkdp, doublereal *tol, logical *needav); -extern int cksns_(integer *handle, doublereal *descr, char *segid, logical *found, ftnlen segid_len); -extern int ckhave_(logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lnktl_ 4 2 4 4 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: dafcls_ 14 1 4 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: intmax_ 4 0 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: lnkprv_ 4 2 4 4 */ -/*:ref: dpmin_ 7 0 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafbbs_ 14 1 4 */ -/*:ref: daffpa_ 14 1 12 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: dafgn_ 14 2 13 124 */ -/*:ref: lnkilb_ 14 3 4 4 4 */ -/*:ref: lnkila_ 14 3 4 4 4 */ - -extern int ckcls_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int ckcov_(char *ck, integer *idcode, logical *needav, char *level, doublereal *tol, char *timsys, doublereal *cover, ftnlen ck_len, ftnlen level_len, ftnlen timsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: getfat_ 14 6 13 13 13 124 124 124 */ -/*:ref: ckmeta_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ -/*:ref: zzckcv01_ 14 8 4 4 4 4 7 13 7 124 */ -/*:ref: zzckcv02_ 14 8 4 4 4 4 7 13 7 124 */ -/*:ref: zzckcv03_ 14 8 4 4 4 4 7 13 7 124 */ -/*:ref: zzckcv04_ 14 8 4 4 4 4 7 13 7 124 */ -/*:ref: zzckcv05_ 14 9 4 4 4 4 7 7 13 7 124 */ -/*:ref: zzckcv06_ 14 9 4 4 4 4 7 7 13 7 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int cke01_(logical *needav, doublereal *record, doublereal *cmat, doublereal *av, doublereal *clkout); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: q2m_ 14 2 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int cke02_(logical *needav, doublereal *record, doublereal *cmat, doublereal *av, doublereal *clkout); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vequg_ 14 3 7 4 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: axisar_ 14 3 7 7 7 */ -/*:ref: q2m_ 14 2 7 7 */ -/*:ref: mxmt_ 14 3 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int cke03_(logical *needav, doublereal *record, doublereal *cmat, doublereal *av, doublereal *clkout); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: q2m_ 14 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: mtxm_ 14 3 7 7 7 */ -/*:ref: raxisa_ 14 3 7 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: axisar_ 14 3 7 7 7 */ -/*:ref: mxmt_ 14 3 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int cke04_(logical *needav, doublereal *record, doublereal *cmat, doublereal *av, doublereal *clkout); -/*:ref: chbval_ 14 5 7 4 7 7 7 */ -/*:ref: vhatg_ 14 3 7 4 7 */ -/*:ref: q2m_ 14 2 7 7 */ - -extern int cke05_(logical *needav, doublereal *record, doublereal *cmat, doublereal *av, doublereal *clkout); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vminug_ 14 3 7 4 7 */ -/*:ref: vdistg_ 7 3 7 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: xpsgip_ 14 3 4 4 7 */ -/*:ref: lgrind_ 14 7 4 7 7 7 7 7 7 */ -/*:ref: vnormg_ 7 2 7 4 */ -/*:ref: vsclg_ 14 4 7 7 4 7 */ -/*:ref: vdotg_ 7 3 7 7 4 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: qdq2av_ 14 3 7 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: lgrint_ 7 5 4 7 7 7 7 */ -/*:ref: vhatg_ 14 3 7 4 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: hrmint_ 14 7 4 7 7 7 7 7 7 */ -/*:ref: q2m_ 14 2 7 7 */ - -extern int cke06_(logical *needav, doublereal *record, doublereal *cmat, doublereal *av, doublereal *clkout); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cke05_ 14 5 12 7 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int ckfrot_(integer *inst, doublereal *et, doublereal *rotate, integer *ref, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ckhave_ 14 1 12 */ -/*:ref: ckmeta_ 14 4 4 13 4 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzsclk_ 12 2 4 4 */ -/*:ref: sce2c_ 14 3 4 7 7 */ -/*:ref: ckbss_ 14 4 4 7 7 12 */ -/*:ref: cksns_ 14 5 4 7 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ckpfs_ 14 9 4 7 7 7 12 7 7 7 12 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: xpose_ 14 2 7 7 */ - -extern int ckfxfm_(integer *inst, doublereal *et, doublereal *xform, integer *ref, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ckmeta_ 14 4 4 13 4 124 */ -/*:ref: ckhave_ 14 1 12 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzsclk_ 12 2 4 4 */ -/*:ref: sce2c_ 14 3 4 7 7 */ -/*:ref: ckbss_ 14 4 4 7 7 12 */ -/*:ref: cksns_ 14 5 4 7 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ckpfs_ 14 9 4 7 7 7 12 7 7 7 12 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: rav2xf_ 14 3 7 7 7 */ -/*:ref: invstm_ 14 2 7 7 */ - -extern int ckgp_(integer *inst, doublereal *sclkdp, doublereal *tol, char *ref, doublereal *cmat, doublereal *clkout, logical *found, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ckbss_ 14 4 4 7 7 12 */ -/*:ref: cksns_ 14 5 4 7 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ckpfs_ 14 9 4 7 7 7 12 7 7 7 12 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: ckmeta_ 14 4 4 13 4 124 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: refchg_ 14 4 4 4 7 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int ckgpav_(integer *inst, doublereal *sclkdp, doublereal *tol, char *ref, doublereal *cmat, doublereal *av, doublereal *clkout, logical *found, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ckbss_ 14 4 4 7 7 12 */ -/*:ref: cksns_ 14 5 4 7 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ckpfs_ 14 9 4 7 7 7 12 7 7 7 12 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: ckmeta_ 14 4 4 13 4 124 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: xf2rav_ 14 3 7 7 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: mtxv_ 14 3 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ - -extern int ckgr01_(integer *handle, doublereal *descr, integer *recno, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int ckgr02_(integer *handle, doublereal *descr, integer *recno, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cknr02_ 14 3 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int ckgr03_(integer *handle, doublereal *descr, integer *recno, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int ckgr04_(integer *handle, doublereal *descr, integer *recno, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cknr04_ 14 3 4 7 4 */ -/*:ref: sgfpkt_ 14 6 4 7 4 4 7 4 */ -/*:ref: zzck4d2i_ 14 4 7 4 7 4 */ - -extern int ckgr05_(integer *handle, doublereal *descr, integer *recno, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int ckgr06_(integer *handle, doublereal *descr, integer *msno, integer *recno, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ - -extern int ckmeta_(integer *ckid, char *meta, integer *idcode, ftnlen meta_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: clearc_ 14 3 4 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: bschoi_ 4 4 4 4 4 4 */ -/*:ref: zzcvpool_ 14 4 13 4 12 124 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cvpool_ 14 3 13 12 124 */ -/*:ref: dwpool_ 14 2 13 124 */ -/*:ref: orderi_ 14 3 4 4 4 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int ckmp06_(integer *handle, doublereal *descr, integer *msno, doublereal *rate, integer *subtyp, integer *winsiz, integer *nrec, doublereal *ivlbds, doublereal *lstepc); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ - -extern int cknm06_(integer *handle, doublereal *descr, integer *nmini); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ - -extern int cknr01_(integer *handle, doublereal *descr, integer *nrec); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int cknr02_(integer *handle, doublereal *descr, integer *nrec); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int cknr03_(integer *handle, doublereal *descr, integer *nrec); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int cknr04_(integer *handle, doublereal *descr, integer *nrec); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sgmeta_ 14 4 4 7 4 4 */ - -extern int cknr05_(integer *handle, doublereal *descr, integer *nrec); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int ckobj_(char *ck, integer *ids, ftnlen ck_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: getfat_ 14 6 13 13 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int ckopn_(char *name__, char *ifname, integer *ncomch, integer *handle, ftnlen name_len, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafonw_ 14 10 13 13 4 4 13 4 4 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int ckpfs_(integer *handle, doublereal *descr, doublereal *sclkdp, doublereal *tol, logical *needav, doublereal *cmat, doublereal *av, doublereal *clkout, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: ckr01_ 14 7 4 7 7 7 12 7 12 */ -/*:ref: cke01_ 14 5 12 7 7 7 7 */ -/*:ref: ckr02_ 14 6 4 7 7 7 7 12 */ -/*:ref: cke02_ 14 5 12 7 7 7 7 */ -/*:ref: ckr03_ 14 7 4 7 7 7 12 7 12 */ -/*:ref: cke03_ 14 5 12 7 7 7 7 */ -/*:ref: ckr04_ 14 7 4 7 7 7 12 7 12 */ -/*:ref: cke04_ 14 5 12 7 7 7 7 */ -/*:ref: ckr05_ 14 7 4 7 7 7 12 7 12 */ -/*:ref: cke05_ 14 5 12 7 7 7 7 */ -/*:ref: ckr06_ 14 7 4 7 7 7 12 7 12 */ -/*:ref: cke06_ 14 5 12 7 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int ckr01_(integer *handle, doublereal *descr, doublereal *sclkdp, doublereal *tol, logical *needav, doublereal *record, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: lstcld_ 4 3 7 4 7 */ - -extern int ckr02_(integer *handle, doublereal *descr, doublereal *sclkdp, doublereal *tol, doublereal *record, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: vequg_ 14 3 7 4 7 */ - -extern int ckr03_(integer *handle, doublereal *descr, doublereal *sclkdp, doublereal *tol, logical *needav, doublereal *record, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: dpmax_ 7 0 */ - -extern int ckr04_(integer *handle, doublereal *descr, doublereal *sclkdp, doublereal *tol, logical *needav, doublereal *record, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cknr04_ 14 3 4 7 4 */ -/*:ref: sgfrvi_ 14 6 4 7 7 7 4 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: sgfpkt_ 14 6 4 7 4 4 7 4 */ -/*:ref: zzck4d2i_ 14 4 7 4 7 4 */ - -extern int ckr05_(integer *handle, doublereal *descr, doublereal *sclkdp, doublereal *tol, logical *needav, doublereal *record, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int ckr06_(integer *handle, doublereal *descr, doublereal *sclkdp, doublereal *tol, logical *needav, doublereal *record, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: touchl_ 12 1 12 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: odd_ 12 1 4 */ - -extern int ckw01_(integer *handle, doublereal *begtim, doublereal *endtim, integer *inst, char *ref, logical *avflag, char *segid, integer *nrec, doublereal *sclkdp, doublereal *quats, doublereal *avvs, ftnlen ref_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: vzerog_ 12 2 7 4 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int ckw02_(integer *handle, doublereal *begtim, doublereal *endtim, integer *inst, char *ref, char *segid, integer *nrec, doublereal *start, doublereal *stop, doublereal *quats, doublereal *avvs, doublereal *rates, ftnlen ref_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: vzerog_ 12 2 7 4 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int ckw03_(integer *handle, doublereal *begtim, doublereal *endtim, integer *inst, char *ref, logical *avflag, char *segid, integer *nrec, doublereal *sclkdp, doublereal *quats, doublereal *avvs, integer *nints, doublereal *starts, ftnlen ref_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: vzerog_ 12 2 7 4 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int ckw04a_(integer *handle, integer *npkts, integer *pktsiz, doublereal *pktdat, doublereal *sclkdp); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzck4i2d_ 14 4 4 4 7 7 */ -/*:ref: sgwvpk_ 14 6 4 4 4 7 4 7 */ - -extern int ckw04b_(integer *handle, doublereal *begtim, integer *inst, char *ref, logical *avflag, char *segid, ftnlen ref_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: sgbwvs_ 14 7 4 7 13 4 7 4 124 */ - -extern int ckw04e_(integer *handle, doublereal *endtim); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sgwes_ 14 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafbbs_ 14 1 4 */ -/*:ref: daffpa_ 14 1 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafrs_ 14 1 7 */ - -extern int ckw05_(integer *handle, integer *subtyp, integer *degree, doublereal *begtim, doublereal *endtim, integer *inst, char *ref, logical *avflag, char *segid, integer *n, doublereal *sclkdp, doublereal *packts, doublereal *rate, integer *nints, doublereal *starts, ftnlen ref_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: bsrchd_ 4 3 7 4 7 */ -/*:ref: vzerog_ 12 2 7 4 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int ckw06_(integer *handle, integer *inst, char *ref, logical *avflag, doublereal *first, doublereal *last, char *segid, integer *nmini, integer *npkts, integer *subtps, integer *degres, doublereal *packts, doublereal *rates, doublereal *sclkdp, doublereal *ivlbds, logical *sellst, ftnlen ref_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: vzerog_ 12 2 7 4 */ -/*:ref: even_ 12 1 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: vminug_ 14 3 7 4 7 */ -/*:ref: vdistg_ 7 3 7 7 4 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int clearc_(integer *ndim, char *array, ftnlen array_len); - -extern int cleard_(integer *ndim, doublereal *array); - -extern int cleari_(integer *ndim, integer *array); - -extern doublereal clight_(void); - -extern int cmprss_(char *delim, integer *n, char *input, char *output, ftnlen delim_len, ftnlen input_len, ftnlen output_len); - -extern int conics_(doublereal *elts, doublereal *et, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: twopi_ 7 0 */ -/*:ref: prop2b_ 14 4 7 7 7 7 */ - -extern int convrt_(doublereal *x, char *in, char *out, doublereal *y, ftnlen in_len, ftnlen out_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dpr_ 7 0 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int copyc_(char *cell, char *copy, ftnlen cell_len, ftnlen copy_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: lastpc_ 4 2 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int copyd_(doublereal *cell, doublereal *copy); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int copyi_(integer *cell, integer *copy); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer countc_(integer *unit, integer *bline, integer *eline, char *line, ftnlen line_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: astrip_ 14 8 13 13 13 13 124 124 124 124 */ - -extern integer cpos_(char *str, char *chars, integer *start, ftnlen str_len, ftnlen chars_len); - -extern integer cposr_(char *str, char *chars, integer *start, ftnlen str_len, ftnlen chars_len); - -extern int cyacip_(integer *nelt, char *dir, integer *ncycle, char *array, ftnlen dir_len, ftnlen array_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: nbwid_ 4 3 13 4 124 */ -/*:ref: gcd_ 4 2 4 4 */ - -extern int cyadip_(integer *nelt, char *dir, integer *ncycle, doublereal *array, ftnlen dir_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gcd_ 4 2 4 4 */ - -extern int cyaiip_(integer *nelt, char *dir, integer *ncycle, integer *array, ftnlen dir_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gcd_ 4 2 4 4 */ - -extern int cyclac_(char *array, integer *nelt, char *dir, integer *ncycle, char *out, ftnlen array_len, ftnlen dir_len, ftnlen out_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: movec_ 14 5 13 4 13 124 124 */ -/*:ref: nbwid_ 4 3 13 4 124 */ -/*:ref: gcd_ 4 2 4 4 */ - -extern int cyclad_(doublereal *array, integer *nelt, char *dir, integer *ncycle, doublereal *out, ftnlen dir_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: gcd_ 4 2 4 4 */ - -extern int cyclai_(integer *array, integer *nelt, char *dir, integer *ncycle, integer *out, ftnlen dir_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: gcd_ 4 2 4 4 */ - -extern int cyclec_(char *instr, char *dir, integer *ncycle, char *outstr, ftnlen instr_len, ftnlen dir_len, ftnlen outstr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: gcd_ 4 2 4 4 */ - -extern int cyllat_(doublereal *r__, doublereal *longc, doublereal *z__, doublereal *radius, doublereal *long__, doublereal *lat); - -extern int cylrec_(doublereal *r__, doublereal *long__, doublereal *z__, doublereal *rectan); - -extern int cylsph_(doublereal *r__, doublereal *longc, doublereal *z__, doublereal *radius, doublereal *colat, doublereal *long__); - -extern doublereal dacosh_(doublereal *x); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern doublereal dacosn_(doublereal *arg, doublereal *tol); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dafa2b_(char *ascii, char *binary, integer *resv, ftnlen ascii_len, ftnlen binary_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: txtopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: daft2b_ 14 4 4 13 4 124 */ - -extern int dafac_(integer *handle, integer *n, char *buffer, ftnlen buffer_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: cpos_ 4 5 13 13 4 124 124 */ -/*:ref: ncpos_ 4 5 13 13 4 124 124 */ -/*:ref: dafarr_ 14 2 4 4 */ - -extern int dafah_(char *fname, char *ftype, integer *nd, integer *ni, char *ifname, integer *resv, integer *handle, integer *unit, integer *fhset, char *access, ftnlen fname_len, ftnlen ftype_len, ftnlen ifname_len, ftnlen access_len); -extern int dafopr_(char *fname, integer *handle, ftnlen fname_len); -extern int dafopw_(char *fname, integer *handle, ftnlen fname_len); -extern int dafonw_(char *fname, char *ftype, integer *nd, integer *ni, char *ifname, integer *resv, integer *handle, ftnlen fname_len, ftnlen ftype_len, ftnlen ifname_len); -extern int dafopn_(char *fname, integer *nd, integer *ni, char *ifname, integer *resv, integer *handle, ftnlen fname_len, ftnlen ifname_len); -extern int dafcls_(integer *handle); -extern int dafhsf_(integer *handle, integer *nd, integer *ni); -extern int dafhlu_(integer *handle, integer *unit); -extern int dafluh_(integer *unit, integer *handle); -extern int dafhfn_(integer *handle, char *fname, ftnlen fname_len); -extern int daffnh_(char *fname, integer *handle, ftnlen fname_len); -extern int dafhof_(integer *fhset); -extern int dafsih_(integer *handle, char *access, ftnlen access_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: zzddhopn_ 14 7 13 13 13 4 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zzdafgfr_ 14 11 4 13 4 4 13 4 4 4 12 124 124 */ -/*:ref: zzddhcls_ 14 4 4 13 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: ltrim_ 4 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: dafrwa_ 14 3 4 4 4 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: zzdafnfr_ 14 12 4 13 4 4 13 4 4 4 13 124 124 124 */ -/*:ref: removi_ 14 2 4 4 */ -/*:ref: zzddhluh_ 14 3 4 4 12 */ -/*:ref: zzddhnfo_ 14 7 4 13 4 4 4 12 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: zzddhfnh_ 14 4 13 4 12 124 */ -/*:ref: copyi_ 14 2 4 4 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: elemi_ 12 2 4 4 */ - -extern int dafana_(integer *handle, doublereal *sum, char *name__, doublereal *data, integer *n, ftnlen name_len); -extern int dafbna_(integer *handle, doublereal *sum, char *name__, ftnlen name_len); -extern int dafada_(doublereal *data, integer *n); -extern int dafena_(void); -extern int dafcad_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafhof_ 14 1 4 */ -/*:ref: elemi_ 12 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: dafhsf_ 14 3 4 4 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: dafhfn_ 14 3 4 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafwda_ 14 4 4 4 4 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafrdr_ 14 6 4 4 4 4 7 12 */ -/*:ref: dafrcr_ 14 4 4 4 13 124 */ -/*:ref: dafwdr_ 14 3 4 4 7 */ -/*:ref: dafwcr_ 14 4 4 4 13 124 */ -/*:ref: dafarw_ 14 3 4 4 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: dafrwa_ 14 3 4 4 4 */ -/*:ref: dafwfr_ 14 8 4 4 4 13 4 4 4 124 */ - -extern int dafarr_(integer *handle, integer *resv); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafarw_ 14 3 4 4 4 */ -/*:ref: dafwdr_ 14 3 4 4 7 */ -/*:ref: dafrdr_ 14 6 4 4 4 4 7 12 */ -/*:ref: dafrcr_ 14 4 4 4 13 124 */ -/*:ref: dafwcr_ 14 4 4 4 13 124 */ -/*:ref: dafwfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafws_ 14 1 7 */ - -extern int dafb2a_(char *binary, char *ascii, ftnlen binary_len, ftnlen ascii_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: txtopn_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafb2t_ 14 3 13 4 124 */ - -extern int dafb2t_(char *binary, integer *text, ftnlen binary_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafcls_ 14 1 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafgn_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int dafbt_(char *binfil, integer *xfrlun, ftnlen binfil_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: wrenci_ 14 3 4 4 4 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgn_ 14 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: wrencd_ 14 3 4 4 7 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int dafdc_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafrrr_ 14 2 4 4 */ - -extern int dafec_(integer *handle, integer *bufsiz, integer *n, char *buffer, logical *done, ftnlen buffer_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: cpos_ 4 5 13 13 4 124 124 */ -/*:ref: ncpos_ 4 5 13 13 4 124 124 */ - -extern int daffa_(integer *handle, doublereal *sum, char *name__, logical *found, ftnlen name_len); -extern int dafbfs_(integer *handle); -extern int daffna_(logical *found); -extern int dafbbs_(integer *handle); -extern int daffpa_(logical *found); -extern int dafgs_(doublereal *sum); -extern int dafgn_(char *name__, ftnlen name_len); -extern int dafgh_(integer *handle); -extern int dafrs_(doublereal *sum); -extern int dafrn_(char *name__, ftnlen name_len); -extern int dafws_(doublereal *sum); -extern int dafcs_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: dafhof_ 14 1 4 */ -/*:ref: elemi_ 12 2 4 4 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafgsr_ 14 6 4 4 4 4 7 12 */ -/*:ref: dafhfn_ 14 3 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafhsf_ 14 3 4 4 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: dafrcr_ 14 4 4 4 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafwdr_ 14 3 4 4 7 */ -/*:ref: dafwcr_ 14 4 4 4 13 124 */ - -extern int dafgda_(integer *handle, integer *begin, integer *end, doublereal *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafarw_ 14 3 4 4 4 */ -/*:ref: dafgdr_ 14 6 4 4 4 4 7 12 */ -/*:ref: cleard_ 14 2 4 7 */ - -extern int dafps_(integer *nd, integer *ni, doublereal *dc, integer *ic, doublereal *sum); -extern int dafus_(doublereal *sum, integer *nd, integer *ni, doublereal *dc, integer *ic); -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: movei_ 14 3 4 4 4 */ - -extern int dafra_(integer *handle, integer *iorder, integer *n); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: isordv_ 12 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafgn_ 14 2 13 124 */ -/*:ref: dafws_ 14 1 7 */ -/*:ref: dafrn_ 14 2 13 124 */ - -extern int dafrcr_(integer *handle, integer *recno, char *crec, ftnlen crec_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ - -extern int dafrda_(integer *handle, integer *begin, integer *end, doublereal *data); -/*:ref: return_ 12 0 */ -/*:ref: zzddhisn_ 14 3 4 12 12 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: dafarw_ 14 3 4 4 4 */ -/*:ref: dafrdr_ 14 6 4 4 4 4 7 12 */ -/*:ref: cleard_ 14 2 4 7 */ - -extern int dafrfr_(integer *handle, integer *nd, integer *ni, char *ifname, integer *fward, integer *bward, integer *free, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzdafgfr_ 14 11 4 13 4 4 13 4 4 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int dafrrr_(integer *handle, integer *resv); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafrdr_ 14 6 4 4 4 4 7 12 */ -/*:ref: dafarw_ 14 3 4 4 4 */ -/*:ref: dafwdr_ 14 3 4 4 7 */ -/*:ref: dafrcr_ 14 4 4 4 13 124 */ -/*:ref: dafwcr_ 14 4 4 4 13 124 */ -/*:ref: dafwfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafws_ 14 1 7 */ - -extern int dafrwa_(integer *recno, integer *wordno, integer *addr__); -extern int dafarw_(integer *addr__, integer *recno, integer *wordno); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dafrwd_(integer *handle, integer *recno, integer *begin, integer *end, doublereal *drec, doublereal *data, logical *found, integer *reads, integer *reqs); -extern int dafgdr_(integer *handle, integer *recno, integer *begin, integer *end, doublereal *data, logical *found); -extern int dafgsr_(integer *handle, integer *recno, integer *begin, integer *end, doublereal *data, logical *found); -extern int dafrdr_(integer *handle, integer *recno, integer *begin, integer *end, doublereal *data, logical *found); -extern int dafwdr_(integer *handle, integer *recno, doublereal *drec); -extern int dafnrr_(integer *reads, integer *reqs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: minai_ 14 4 4 4 4 4 */ -/*:ref: zzdafgdr_ 14 4 4 4 7 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: zzddhrcm_ 14 3 4 4 4 */ -/*:ref: dafhsf_ 14 3 4 4 4 */ -/*:ref: zzdafgsr_ 14 6 4 4 4 4 7 12 */ -/*:ref: zzddhisn_ 14 3 4 12 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int daft2b_(integer *text, char *binary, integer *resv, ftnlen binary_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: idw2at_ 14 6 13 13 13 124 124 124 */ -/*:ref: dafopn_ 14 8 13 4 4 13 4 4 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafcls_ 14 1 4 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafena_ 14 0 */ - -extern int daftb_(integer *xfrlun, char *binfil, ftnlen binfil_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: idw2at_ 14 6 13 13 13 124 124 124 */ -/*:ref: rdenci_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafonw_ 14 10 13 13 4 4 13 4 4 124 124 124 */ -/*:ref: dafopn_ 14 8 13 4 4 13 4 4 124 124 */ -/*:ref: nextwd_ 14 6 13 13 13 124 124 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: rdencd_ 14 3 4 4 7 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int dafwcr_(integer *handle, integer *recno, char *crec, ftnlen crec_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dafwda_(integer *handle, integer *begin, integer *end, doublereal *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafarw_ 14 3 4 4 4 */ -/*:ref: dafrdr_ 14 6 4 4 4 4 7 12 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: dafwdr_ 14 3 4 4 7 */ - -extern int dafwfr_(integer *handle, integer *nd, integer *ni, char *ifname, integer *fward, integer *bward, integer *free, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int dasa2l_(integer *handle, integer *type__, integer *addrss, integer *clbase, integer *clsize, integer *recno, integer *wordno); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: dasham_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: dasrri_ 14 5 4 4 4 4 4 */ - -extern int dasac_(integer *handle, integer *n, char *buffer, ftnlen buffer_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: dasrfr_ 14 9 4 13 13 4 4 4 4 124 124 */ -/*:ref: dasacr_ 14 2 4 4 */ -/*:ref: dasioc_ 14 6 13 4 4 13 124 124 */ -/*:ref: daswfr_ 14 9 4 13 13 4 4 4 4 124 124 */ - -extern int dasacr_(integer *handle, integer *n); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: daswbr_ 14 1 4 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: maxai_ 14 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: dasioi_ 14 5 13 4 4 4 124 */ -/*:ref: dasioc_ 14 6 13 4 4 13 124 124 */ -/*:ref: dasiod_ 14 5 13 4 4 7 124 */ -/*:ref: dasufs_ 14 9 4 4 4 4 4 4 4 4 4 */ - -extern int dasacu_(integer *comlun, char *begmrk, char *endmrk, logical *insbln, integer *handle, ftnlen begmrk_len, ftnlen endmrk_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrfr_ 14 9 4 13 13 4 4 4 4 124 124 */ -/*:ref: getlun_ 14 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: readln_ 14 4 4 13 12 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: readla_ 14 6 4 4 4 13 12 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: writla_ 14 4 4 13 4 124 */ -/*:ref: dasac_ 14 4 4 4 13 124 */ - -extern int dasadc_(integer *handle, integer *n, integer *bpos, integer *epos, char *data, ftnlen data_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: daswrc_ 14 4 4 4 13 124 */ -/*:ref: dasurc_ 14 6 4 4 4 4 13 124 */ -/*:ref: dascud_ 14 3 4 4 4 */ - -extern int dasadd_(integer *handle, integer *n, doublereal *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: daswrd_ 14 3 4 4 7 */ -/*:ref: dasurd_ 14 5 4 4 4 4 7 */ -/*:ref: dascud_ 14 3 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dasadi_(integer *handle, integer *n, integer *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: daswri_ 14 3 4 4 4 */ -/*:ref: dasuri_ 14 5 4 4 4 4 4 */ -/*:ref: dascud_ 14 3 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dasbt_(char *binfil, integer *xfrlun, ftnlen binfil_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dasopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrfr_ 14 9 4 13 13 4 4 4 4 124 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: dascls_ 14 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: wrenci_ 14 3 4 4 4 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: dasioc_ 14 6 13 4 4 13 124 124 */ -/*:ref: wrencc_ 14 4 4 4 13 124 */ -/*:ref: daslla_ 14 4 4 4 4 4 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ -/*:ref: wrencd_ 14 3 4 4 7 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int dascls_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: dashof_ 14 1 4 */ -/*:ref: elemi_ 12 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasham_ 14 3 4 13 124 */ -/*:ref: daswbr_ 14 1 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dassdr_ 14 1 4 */ -/*:ref: dasllc_ 14 1 4 */ - -extern int dascud_(integer *handle, integer *type__, integer *nwords); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: maxai_ 14 4 4 4 4 4 */ -/*:ref: dasuri_ 14 5 4 4 4 4 4 */ -/*:ref: dasufs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: dasrri_ 14 5 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: daswri_ 14 3 4 4 4 */ - -extern int dasdc_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrfr_ 14 9 4 13 13 4 4 4 4 124 124 */ -/*:ref: dasrcr_ 14 2 4 4 */ -/*:ref: daswfr_ 14 9 4 13 13 4 4 4 4 124 124 */ - -extern int dasec_(integer *handle, integer *bufsiz, integer *n, char *buffer, logical *done, ftnlen buffer_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: dasrfr_ 14 9 4 13 13 4 4 4 4 124 124 */ -/*:ref: dasioc_ 14 6 13 4 4 13 124 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ - -extern int dasecu_(integer *handle, integer *comlun, logical *comnts); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasec_ 14 6 4 4 4 13 12 124 */ -/*:ref: writla_ 14 4 4 13 4 124 */ - -extern int dasfm_(char *fname, char *ftype, char *ifname, integer *handle, integer *unit, integer *free, integer *lastla, integer *lastrc, integer *lastwd, integer *nresvr, integer *nresvc, integer *ncomr, integer *ncomc, integer *fhset, char *access, ftnlen fname_len, ftnlen ftype_len, ftnlen ifname_len, ftnlen access_len); -extern int dasopr_(char *fname, integer *handle, ftnlen fname_len); -extern int dasopw_(char *fname, integer *handle, ftnlen fname_len); -extern int dasonw_(char *fname, char *ftype, char *ifname, integer *ncomr, integer *handle, ftnlen fname_len, ftnlen ftype_len, ftnlen ifname_len); -extern int dasopn_(char *fname, char *ifname, integer *handle, ftnlen fname_len, ftnlen ifname_len); -extern int dasops_(integer *handle); -extern int dasllc_(integer *handle); -extern int dashfs_(integer *handle, integer *nresvr, integer *nresvc, integer *ncomr, integer *ncomc, integer *free, integer *lastla, integer *lastrc, integer *lastwd); -extern int dasufs_(integer *handle, integer *nresvr, integer *nresvc, integer *ncomr, integer *ncomc, integer *free, integer *lastla, integer *lastrc, integer *lastwd); -extern int dashlu_(integer *handle, integer *unit); -extern int dasluh_(integer *unit, integer *handle); -extern int dashfn_(integer *handle, char *fname, ftnlen fname_len); -extern int dasfnh_(char *fname, integer *handle, ftnlen fname_len); -extern int dashof_(integer *fhset); -extern int dassih_(integer *handle, char *access, ftnlen access_len); -extern int dasham_(integer *handle, char *access, ftnlen access_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: exists_ 12 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: getlun_ 14 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzddhppf_ 14 3 4 4 4 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: idw2at_ 14 6 13 13 13 124 124 124 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: lnkilb_ 14 3 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: dasioi_ 14 5 13 4 4 4 124 */ -/*:ref: maxai_ 14 4 4 4 4 4 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: ltrim_ 4 2 13 124 */ -/*:ref: zzdasnfr_ 14 11 4 13 13 4 4 4 4 13 124 124 124 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: removi_ 14 2 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: copyi_ 14 2 4 4 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: elemi_ 12 2 4 4 */ - -extern doublereal dasine_(doublereal *arg, doublereal *tol); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dasioc_(char *action, integer *unit, integer *recno, char *record, ftnlen action_len, ftnlen record_len); -/*:ref: return_ 12 0 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int dasiod_(char *action, integer *unit, integer *recno, doublereal *record, ftnlen action_len); -/*:ref: return_ 12 0 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int dasioi_(char *action, integer *unit, integer *recno, integer *record, ftnlen action_len); -/*:ref: return_ 12 0 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int daslla_(integer *handle, integer *lastc, integer *lastd, integer *lasti); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dasrcr_(integer *handle, integer *n); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: daswbr_ 14 1 4 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: maxai_ 14 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: dasioi_ 14 5 13 4 4 4 124 */ -/*:ref: dasioc_ 14 6 13 4 4 13 124 124 */ -/*:ref: dasiod_ 14 5 13 4 4 7 124 */ -/*:ref: dasufs_ 14 9 4 4 4 4 4 4 4 4 4 */ - -extern int dasrdc_(integer *handle, integer *first, integer *last, integer *bpos, integer *epos, char *data, ftnlen data_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasrrc_ 14 6 4 4 4 4 13 124 */ - -extern int dasrdd_(integer *handle, integer *first, integer *last, doublereal *data); -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: dasrrd_ 14 5 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ - -extern int dasrdi_(integer *handle, integer *first, integer *last, integer *data); -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: dasrri_ 14 5 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ - -extern int dasrfr_(integer *handle, char *idword, char *ifname, integer *nresvr, integer *nresvc, integer *ncomr, integer *ncomc, ftnlen idword_len, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int dasrwr_(integer *handle, integer *recno, char *recc, doublereal *recd, integer *reci, integer *first, integer *last, doublereal *datad, integer *datai, char *datac, ftnlen recc_len, ftnlen datac_len); -extern int dasrrd_(integer *handle, integer *recno, integer *first, integer *last, doublereal *datad); -extern int dasrri_(integer *handle, integer *recno, integer *first, integer *last, integer *datai); -extern int dasrrc_(integer *handle, integer *recno, integer *first, integer *last, char *datac, ftnlen datac_len); -extern int daswrd_(integer *handle, integer *recno, doublereal *recd); -extern int daswri_(integer *handle, integer *recno, integer *reci); -extern int daswrc_(integer *handle, integer *recno, char *recc, ftnlen recc_len); -extern int dasurd_(integer *handle, integer *recno, integer *first, integer *last, doublereal *datad); -extern int dasuri_(integer *handle, integer *recno, integer *first, integer *last, integer *datai); -extern int dasurc_(integer *handle, integer *recno, integer *first, integer *last, char *datac, ftnlen datac_len); -extern int daswbr_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: lnkxsl_ 14 3 4 4 4 */ -/*:ref: lnkilb_ 14 3 4 4 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: lnktl_ 4 2 4 4 */ -/*:ref: dasiod_ 14 5 13 4 4 7 124 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: dasioi_ 14 5 13 4 4 4 124 */ -/*:ref: dasioc_ 14 6 13 4 4 13 124 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ - -extern int dassdr_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: daswbr_ 14 1 4 */ -/*:ref: dasops_ 14 1 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: maxai_ 14 4 4 4 4 4 */ -/*:ref: dasrri_ 14 5 4 4 4 4 4 */ -/*:ref: dasadi_ 14 3 4 4 4 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: dasioc_ 14 6 13 4 4 13 124 124 */ -/*:ref: dasiod_ 14 5 13 4 4 7 124 */ -/*:ref: dasioi_ 14 5 13 4 4 4 124 */ -/*:ref: dasufs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: dasllc_ 14 1 4 */ - -extern int dastb_(integer *xfrlun, char *binfil, ftnlen binfil_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: idw2at_ 14 6 13 13 13 124 124 124 */ -/*:ref: dasonw_ 14 8 13 13 13 4 4 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: daswfr_ 14 9 4 13 13 4 4 4 4 124 124 */ -/*:ref: dascls_ 14 1 4 */ -/*:ref: rdenci_ 14 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: dasacr_ 14 2 4 4 */ -/*:ref: nextwd_ 14 6 13 13 13 124 124 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: rdencc_ 14 4 4 4 13 124 */ -/*:ref: dasioc_ 14 6 13 4 4 13 124 124 */ -/*:ref: dasadc_ 14 6 4 4 4 4 13 124 */ -/*:ref: rdencd_ 14 3 4 4 7 */ -/*:ref: dasadd_ 14 3 4 4 7 */ -/*:ref: dasadi_ 14 3 4 4 4 */ - -extern int dasudc_(integer *handle, integer *first, integer *last, integer *bpos, integer *epos, char *data, ftnlen data_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: daslla_ 14 4 4 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasurc_ 14 6 4 4 4 4 13 124 */ - -extern int dasudd_(integer *handle, integer *first, integer *last, doublereal *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: daslla_ 14 4 4 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasurd_ 14 5 4 4 4 4 7 */ - -extern int dasudi_(integer *handle, integer *first, integer *last, integer *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: daslla_ 14 4 4 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasa2l_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasuri_ 14 5 4 4 4 4 4 */ - -extern int daswfr_(integer *handle, char *idword, char *ifname, integer *nresvr, integer *nresvc, integer *ncomr, integer *ncomc, ftnlen idword_len, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dashfs_ 14 9 4 4 4 4 4 4 4 4 4 */ -/*:ref: dasufs_ 14 9 4 4 4 4 4 4 4 4 4 */ - -extern doublereal datanh_(doublereal *x); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern doublereal dcbrt_(doublereal *x); - -extern int dcyldr_(doublereal *x, doublereal *y, doublereal *z__, doublereal *jacobi); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: reccyl_ 14 4 7 7 7 7 */ -/*:ref: drdcyl_ 14 4 7 7 7 7 */ -/*:ref: invort_ 14 2 7 7 */ - -extern int delfil_(char *filnam, ftnlen filnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: getlun_ 14 1 4 */ - -extern int deltet_(doublereal *epoch, char *eptype, doublereal *delta, ftnlen eptype_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern doublereal det_(doublereal *m1); - -extern int dgeodr_(doublereal *x, doublereal *y, doublereal *z__, doublereal *re, doublereal *f, doublereal *jacobi); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: recgeo_ 14 6 7 7 7 7 7 7 */ -/*:ref: drdgeo_ 14 6 7 7 7 7 7 7 */ -/*:ref: invort_ 14 2 7 7 */ - -extern doublereal dhfa_(doublereal *state, doublereal *bodyr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ - -extern int diags2_(doublereal *symmat, doublereal *diag, doublereal *rotate); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rquad_ 14 5 7 7 7 7 7 */ -/*:ref: vhatg_ 14 3 7 4 7 */ - -extern int diffc_(char *a, char *b, char *c__, ftnlen a_len, ftnlen b_len, ftnlen c_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: excess_ 14 3 4 13 124 */ - -extern int diffd_(doublereal *a, doublereal *b, doublereal *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int diffi_(integer *a, integer *b, integer *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dlatdr_(doublereal *x, doublereal *y, doublereal *z__, doublereal *jacobi); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: reclat_ 14 4 7 7 7 7 */ -/*:ref: drdlat_ 14 4 7 7 7 7 */ -/*:ref: invort_ 14 2 7 7 */ - -extern int dnearp_(doublereal *state, doublereal *a, doublereal *b, doublereal *c__, doublereal *dnear, doublereal *dalt, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vtmv_ 7 3 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int dp2hx_(doublereal *number, char *string, integer *length, ftnlen string_len); -/*:ref: int2hx_ 14 4 4 13 4 124 */ - -extern int dpfmt_(doublereal *x, char *pictur, char *str, ftnlen pictur_len, ftnlen str_len); -/*:ref: pos_ 4 5 13 13 4 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzvststr_ 14 4 7 13 4 124 */ -/*:ref: dpstr_ 14 4 7 4 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: rjust_ 14 4 13 13 124 124 */ -/*:ref: zzvsbstr_ 14 6 4 4 12 13 12 124 */ -/*:ref: ncpos_ 4 5 13 13 4 124 124 */ - -extern int dpgrdr_(char *body, doublereal *x, doublereal *y, doublereal *z__, doublereal *re, doublereal *f, doublereal *jacobi, ftnlen body_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: plnsns_ 4 1 4 */ -/*:ref: dgeodr_ 14 6 7 7 7 7 7 7 */ - -extern doublereal dpr_(void); - -extern int dpspce_(doublereal *time, doublereal *geophs, doublereal *elems, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: twopi_ 7 0 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: zzdpinit_ 14 6 7 7 7 7 7 7 */ -/*:ref: zzdpsec_ 14 9 7 7 7 7 7 7 7 7 7 */ -/*:ref: zzdpper_ 14 6 7 7 7 7 7 7 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dpstr_(doublereal *x, integer *sigdig, char *string, ftnlen string_len); -/*:ref: intstr_ 14 3 4 13 124 */ - -extern int dpstrf_(doublereal *x, integer *sigdig, char *format, char *string, ftnlen format_len, ftnlen string_len); -/*:ref: dpstr_ 14 4 7 4 13 124 */ -/*:ref: zzvststr_ 14 4 7 13 4 124 */ -/*:ref: zzvsbstr_ 14 6 4 4 12 13 12 124 */ - -extern int drdcyl_(doublereal *r__, doublereal *long__, doublereal *z__, doublereal *jacobi); - -extern int drdgeo_(doublereal *long__, doublereal *lat, doublereal *alt, doublereal *re, doublereal *f, doublereal *jacobi); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int drdlat_(doublereal *r__, doublereal *long__, doublereal *lat, doublereal *jacobi); - -extern int drdpgr_(char *body, doublereal *lon, doublereal *lat, doublereal *alt, doublereal *re, doublereal *f, doublereal *jacobi, ftnlen body_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: plnsns_ 4 1 4 */ -/*:ref: drdgeo_ 14 6 7 7 7 7 7 7 */ - -extern int drdsph_(doublereal *r__, doublereal *colat, doublereal *long__, doublereal *jacobi); - -extern int drotat_(doublereal *angle, integer *iaxis, doublereal *dmout); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int dsphdr_(doublereal *x, doublereal *y, doublereal *z__, doublereal *jacobi); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: recsph_ 14 4 7 7 7 7 */ -/*:ref: drdsph_ 14 4 7 7 7 7 */ -/*:ref: invort_ 14 2 7 7 */ - -extern int ducrss_(doublereal *s1, doublereal *s2, doublereal *sout); -/*:ref: vsclg_ 14 4 7 7 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: dvcrss_ 14 3 7 7 7 */ -/*:ref: dvhat_ 14 2 7 7 */ - -extern int dvcrss_(doublereal *s1, doublereal *s2, doublereal *sout); -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ - -extern doublereal dvdot_(doublereal *s1, doublereal *s2); - -extern int dvhat_(doublereal *s1, doublereal *sout); -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vperp_ 14 3 7 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ - -extern doublereal dvnorm_(doublereal *state); -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ - -extern doublereal dvsep_(doublereal *s1, doublereal *s2); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dvhat_ 14 2 7 7 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: zzdiv_ 7 2 7 7 */ - -extern int dxtrct_(char *keywd, integer *maxwds, char *string, integer *nfound, integer *parsed, doublereal *values, ftnlen keywd_len, ftnlen string_len); -/*:ref: wdindx_ 4 4 13 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: nblen_ 4 2 13 124 */ -/*:ref: fndnwd_ 14 5 13 4 4 4 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ - -extern int edlimb_(doublereal *a, doublereal *b, doublereal *c__, doublereal *viewpt, doublereal *limb); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: nvc2pl_ 14 3 7 7 7 */ -/*:ref: inedpl_ 14 6 7 7 7 7 7 12 */ -/*:ref: vsclg_ 14 4 7 7 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int edterm_(char *trmtyp, char *source, char *target, doublereal *et, char *fixref, char *abcorr, char *obsrvr, integer *npts, doublereal *trgepc, doublereal *obspos, doublereal *trmpts, ftnlen trmtyp_len, ftnlen source_len, ftnlen target_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzcorepc_ 14 5 13 7 7 7 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: zzedterm_ 14 9 13 7 7 7 7 7 4 7 124 */ - -extern int ekacec_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, char *cvals, logical *isnull, ftnlen column_len, ftnlen cvals_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekad03_ 14 7 4 4 4 4 13 12 124 */ -/*:ref: zzekad06_ 14 8 4 4 4 4 4 13 12 124 */ - -extern int ekaced_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, doublereal *dvals, logical *isnull, ftnlen column_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekad02_ 14 6 4 4 4 4 7 12 */ -/*:ref: zzekad05_ 14 7 4 4 4 4 4 7 12 */ - -extern int ekacei_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, integer *ivals, logical *isnull, ftnlen column_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekad01_ 14 6 4 4 4 4 4 12 */ -/*:ref: zzekad04_ 14 7 4 4 4 4 4 4 12 */ - -extern int ekaclc_(integer *handle, integer *segno, char *column, char *cvals, integer *entszs, logical *nlflgs, integer *rcptrs, integer *wkindx, ftnlen column_len, ftnlen cvals_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzekac03_ 14 8 4 4 4 13 12 4 4 124 */ -/*:ref: zzekac06_ 14 7 4 4 4 13 4 12 124 */ -/*:ref: zzekac09_ 14 7 4 4 4 13 12 4 124 */ - -extern int ekacld_(integer *handle, integer *segno, char *column, doublereal *dvals, integer *entszs, logical *nlflgs, integer *rcptrs, integer *wkindx, ftnlen column_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzekac02_ 14 7 4 4 4 7 12 4 4 */ -/*:ref: zzekac05_ 14 6 4 4 4 7 4 12 */ -/*:ref: zzekac08_ 14 6 4 4 4 7 12 4 */ - -extern int ekacli_(integer *handle, integer *segno, char *column, integer *ivals, integer *entszs, logical *nlflgs, integer *rcptrs, integer *wkindx, ftnlen column_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzekac01_ 14 7 4 4 4 4 12 4 4 */ -/*:ref: zzekac04_ 14 6 4 4 4 4 4 12 */ -/*:ref: zzekac07_ 14 6 4 4 4 4 12 4 */ - -extern int ekappr_(integer *handle, integer *segno, integer *recno); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekmloc_ 14 4 4 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: ekinsr_ 14 3 4 4 4 */ - -extern int ekbseg_(integer *handle, char *tabnam, integer *ncols, char *cnames, char *decls, integer *segno, ftnlen tabnam_len, ftnlen cnames_len, ftnlen decls_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: lxdfid_ 14 1 4 */ -/*:ref: chckid_ 14 5 13 4 13 124 124 */ -/*:ref: lxidnt_ 14 6 4 13 4 4 4 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekpdec_ 14 3 13 4 124 */ -/*:ref: zzekstyp_ 4 2 4 4 */ -/*:ref: zzekbs01_ 14 8 4 13 4 13 4 4 124 124 */ -/*:ref: zzekbs02_ 14 8 4 13 4 13 4 4 124 124 */ - -extern int ekcls_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dascls_ 14 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int ekdelr_(integer *handle, integer *segno, integer *recno); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekmloc_ 14 4 4 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekrbck_ 14 6 13 4 4 4 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekde01_ 14 4 4 4 4 4 */ -/*:ref: zzekde02_ 14 4 4 4 4 4 */ -/*:ref: zzekde03_ 14 4 4 4 4 4 */ -/*:ref: zzekde04_ 14 4 4 4 4 4 */ -/*:ref: zzekde05_ 14 4 4 4 4 4 */ -/*:ref: zzekde06_ 14 4 4 4 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekdps_ 14 4 4 4 4 4 */ -/*:ref: zzektrdl_ 14 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int ekffld_(integer *handle, integer *segno, integer *rcptrs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekff01_ 14 3 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int ekfind_(char *query, integer *nmrows, logical *error, char *errmsg, ftnlen query_len, ftnlen errmsg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekqini_ 14 6 4 4 4 13 7 124 */ -/*:ref: zzekscan_ 14 17 13 4 4 4 4 4 4 4 7 13 4 4 12 13 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpars_ 14 19 13 4 4 4 4 4 7 13 4 4 4 13 7 12 13 124 124 124 124 */ -/*:ref: zzeknres_ 14 9 13 4 13 12 13 4 124 124 124 */ -/*:ref: zzektres_ 14 10 13 4 13 7 12 13 4 124 124 124 */ -/*:ref: zzeksemc_ 14 9 13 4 13 12 13 4 124 124 124 */ -/*:ref: eksrch_ 14 8 4 13 7 4 12 13 124 124 */ - -extern int ekifld_(integer *handle, char *tabnam, integer *ncols, integer *nrows, char *cnames, char *decls, integer *segno, integer *rcptrs, ftnlen tabnam_len, ftnlen cnames_len, ftnlen decls_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ekbseg_ 14 9 4 13 4 13 13 4 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekmloc_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekif01_ 14 3 4 4 4 */ -/*:ref: zzekif02_ 14 2 4 4 */ - -extern int ekinsr_(integer *handle, integer *segno, integer *recno); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekmloc_ 14 4 4 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: filli_ 14 3 4 4 4 */ -/*:ref: ekshdw_ 14 2 4 12 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: zzektrin_ 14 4 4 4 4 4 */ -/*:ref: zzekrbck_ 14 6 13 4 4 4 4 124 */ - -extern integer eknseg_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzektrsz_ 4 2 4 4 */ - -extern int ekopn_(char *fname, char *ifname, integer *ncomch, integer *handle, ftnlen fname_len, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasonw_ 14 8 13 13 13 4 4 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekpgin_ 14 1 4 */ -/*:ref: zzekpgan_ 14 4 4 4 4 4 */ -/*:ref: zzektrit_ 14 2 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int ekopr_(char *fname, integer *handle, ftnlen fname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dasopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ - -extern int ekops_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dasops_ 14 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgin_ 14 1 4 */ -/*:ref: zzekpgan_ 14 4 4 4 4 4 */ -/*:ref: zzektrit_ 14 2 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int ekopw_(char *fname, integer *handle, ftnlen fname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dasopw_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ - -extern int ekpsel_(char *query, integer *n, integer *xbegs, integer *xends, char *xtypes, char *xclass, char *tabs, char *cols, logical *error, char *errmsg, ftnlen query_len, ftnlen xtypes_len, ftnlen xclass_len, ftnlen tabs_len, ftnlen cols_len, ftnlen errmsg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekqini_ 14 6 4 4 4 13 7 124 */ -/*:ref: zzekencd_ 14 10 13 4 13 7 12 13 4 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: zzekqsel_ 14 12 4 13 4 4 4 13 4 13 4 124 124 124 */ -/*:ref: zzekqtab_ 14 8 4 13 4 13 13 124 124 124 */ -/*:ref: ekcii_ 14 6 13 4 13 4 124 124 */ - -extern int ekqmgr_(integer *cindex, integer *elment, char *eqryc, doublereal *eqryd, integer *eqryi, char *fname, integer *row, integer *selidx, char *column, integer *handle, integer *n, char *table, integer *attdsc, integer *ccount, logical *found, integer *nelt, integer *nmrows, logical *semerr, char *errmsg, char *cdata, doublereal *ddata, integer *idata, logical *null, ftnlen eqryc_len, ftnlen fname_len, ftnlen column_len, ftnlen table_len, ftnlen errmsg_len, ftnlen cdata_len); -extern int eklef_(char *fname, integer *handle, ftnlen fname_len); -extern int ekuef_(integer *handle); -extern int ekntab_(integer *n); -extern int ektnam_(integer *n, char *table, ftnlen table_len); -extern int ekccnt_(char *table, integer *ccount, ftnlen table_len); -extern int ekcii_(char *table, integer *cindex, char *column, integer *attdsc, ftnlen table_len, ftnlen column_len); -extern int eksrch_(integer *eqryi, char *eqryc, doublereal *eqryd, integer *nmrows, logical *semerr, char *errmsg, ftnlen eqryc_len, ftnlen errmsg_len); -extern int eknelt_(integer *selidx, integer *row, integer *nelt); -extern int ekgc_(integer *selidx, integer *row, integer *elment, char *cdata, logical *null, logical *found, ftnlen cdata_len); -extern int ekgd_(integer *selidx, integer *row, integer *elment, doublereal *ddata, logical *null, logical *found); -extern int ekgi_(integer *selidx, integer *row, integer *elment, integer *idata, logical *null, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: ekopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dascls_ 14 1 4 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: ekcls_ 14 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: eknseg_ 4 1 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: lnkilb_ 14 3 4 4 4 */ -/*:ref: zzeksinf_ 14 8 4 4 13 4 13 4 124 124 */ -/*:ref: ssizec_ 14 3 4 13 124 */ -/*:ref: movec_ 14 5 13 4 13 124 124 */ -/*:ref: validc_ 14 4 4 4 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: lnktl_ 4 2 4 4 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: zzekqtab_ 14 8 4 13 4 13 13 124 124 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: appndc_ 14 4 13 13 124 124 */ -/*:ref: appndi_ 14 2 4 4 */ -/*:ref: zzekstop_ 14 1 4 */ -/*:ref: zzeksdec_ 14 1 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekqcnj_ 14 3 4 4 4 */ -/*:ref: zzekqcon_ 14 24 4 13 7 4 4 13 4 13 4 4 13 4 13 4 4 4 4 7 4 124 124 124 124 124 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzeksupd_ 14 3 4 4 4 */ -/*:ref: zzekkey_ 14 20 4 4 4 4 4 4 4 4 13 4 4 7 4 12 4 4 4 4 12 124 */ -/*:ref: zzekixlk_ 14 4 4 4 4 4 */ -/*:ref: zzekrplk_ 14 4 4 4 4 4 */ -/*:ref: zzekrmch_ 12 15 4 12 4 4 4 4 4 4 4 13 4 4 7 4 124 */ -/*:ref: zzekvmch_ 12 13 4 12 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: zzekjsqz_ 14 1 4 */ -/*:ref: zzekjoin_ 14 18 4 4 4 12 4 4 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: zzeksrd_ 14 3 4 4 4 */ -/*:ref: zzekweed_ 14 3 4 4 4 */ -/*:ref: zzekvset_ 14 2 4 4 */ -/*:ref: zzekqsel_ 14 12 4 13 4 4 4 13 4 13 4 124 124 124 */ -/*:ref: zzekqord_ 14 11 4 13 4 13 4 13 4 4 124 124 124 */ -/*:ref: zzekjsrt_ 14 13 4 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: zzekvcal_ 14 3 4 4 4 */ -/*:ref: zzekesiz_ 4 4 4 4 4 4 */ -/*:ref: zzekrsc_ 14 10 4 4 4 4 4 4 13 12 12 124 */ -/*:ref: zzekrsd_ 14 8 4 4 4 4 4 7 12 12 */ -/*:ref: zzekrsi_ 14 8 4 4 4 4 4 4 12 12 */ - -extern int ekrcec_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, char *cvals, logical *isnull, ftnlen column_len, ftnlen cvals_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekrd03_ 14 8 4 4 4 4 4 13 12 124 */ -/*:ref: zzekesiz_ 4 4 4 4 4 4 */ -/*:ref: zzekrd06_ 14 10 4 4 4 4 4 4 13 12 12 124 */ -/*:ref: zzekrd09_ 14 8 4 4 4 4 4 13 12 124 */ - -extern int ekrced_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, doublereal *dvals, logical *isnull, ftnlen column_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekrd02_ 14 6 4 4 4 4 7 12 */ -/*:ref: zzekesiz_ 4 4 4 4 4 4 */ -/*:ref: zzekrd05_ 14 9 4 4 4 4 4 4 7 12 12 */ -/*:ref: zzekrd08_ 14 6 4 4 4 4 7 12 */ - -extern int ekrcei_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, integer *ivals, logical *isnull, ftnlen column_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekrd01_ 14 6 4 4 4 4 4 12 */ -/*:ref: zzekesiz_ 4 4 4 4 4 4 */ -/*:ref: zzekrd04_ 14 9 4 4 4 4 4 4 4 12 12 */ -/*:ref: zzekrd07_ 14 6 4 4 4 4 4 12 */ - -extern int ekshdw_(integer *handle, logical *isshad); - -extern int ekssum_(integer *handle, integer *segno, char *tabnam, integer *nrows, integer *ncols, char *cnames, char *dtypes, integer *sizes, integer *strlns, logical *indexd, logical *nullok, ftnlen tabnam_len, ftnlen cnames_len, ftnlen dtypes_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzeksinf_ 14 8 4 4 13 4 13 4 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int ekucec_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, char *cvals, logical *isnull, ftnlen column_len, ftnlen cvals_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: ekshdw_ 14 2 4 12 */ -/*:ref: zzekrbck_ 14 6 13 4 4 4 4 124 */ -/*:ref: zzekue03_ 14 7 4 4 4 4 13 12 124 */ -/*:ref: zzekue06_ 14 8 4 4 4 4 4 13 12 124 */ - -extern int ekuced_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, doublereal *dvals, logical *isnull, ftnlen column_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: ekshdw_ 14 2 4 12 */ -/*:ref: zzekrbck_ 14 6 13 4 4 4 4 124 */ -/*:ref: zzekue02_ 14 6 4 4 4 4 7 12 */ -/*:ref: zzekue05_ 14 7 4 4 4 4 4 7 12 */ - -extern int ekucei_(integer *handle, integer *segno, integer *recno, char *column, integer *nvals, integer *ivals, logical *isnull, ftnlen column_len); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekcdsc_ 14 5 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: ekshdw_ 14 2 4 12 */ -/*:ref: zzekrbck_ 14 6 13 4 4 4 4 124 */ -/*:ref: zzekue01_ 14 6 4 4 4 4 4 12 */ -/*:ref: zzekue04_ 14 7 4 4 4 4 4 4 12 */ - -extern int el2cgv_(doublereal *ellips, doublereal *center, doublereal *smajor, doublereal *sminor); -/*:ref: vequ_ 14 2 7 7 */ - -extern logical elemc_(char *item, char *a, ftnlen item_len, ftnlen a_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical elemd_(doublereal *item, doublereal *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bsrchd_ 4 3 7 4 7 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical elemi_(integer *item, integer *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bsrchi_ 4 3 4 4 4 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int elltof_(doublereal *ma, doublereal *ecc, doublereal *e); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: pi_ 7 0 */ -/*:ref: twopi_ 7 0 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: dcbrt_ 7 1 7 */ - -extern int enchar_(integer *number, char *string, ftnlen string_len); -extern int dechar_(char *string, integer *number, ftnlen string_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: chbase_ 4 0 */ - -extern logical eqchr_(char *a, char *b, ftnlen a_len, ftnlen b_len); -extern logical nechr_(char *a, char *b, ftnlen a_len, ftnlen b_len); - -extern int eqncpv_(doublereal *et, doublereal *epoch, doublereal *eqel, doublereal *rapol, doublereal *decpol, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: twopi_ 7 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: kepleq_ 7 3 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vlcom3_ 14 7 7 7 7 7 7 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ - -extern logical eqstr_(char *a, char *b, ftnlen a_len, ftnlen b_len); - -extern int erract_(char *op, char *action, ftnlen op_len, ftnlen action_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: getact_ 14 1 4 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: putact_ 14 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int errch_(char *marker, char *string, ftnlen marker_len, ftnlen string_len); -/*:ref: allowd_ 12 0 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: getlms_ 14 2 13 124 */ -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: nblen_ 4 2 13 124 */ -/*:ref: putlms_ 14 2 13 124 */ - -extern int errdev_(char *op, char *device, ftnlen op_len, ftnlen device_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: getdev_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: putdev_ 14 2 13 124 */ - -extern int errdp_(char *marker, doublereal *dpnum, ftnlen marker_len); -/*:ref: allowd_ 12 0 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: getlms_ 14 2 13 124 */ -/*:ref: dpstr_ 14 4 7 4 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: putlms_ 14 2 13 124 */ - -extern int errfnm_(char *marker, integer *unit, ftnlen marker_len); -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int errhan_(char *marker, integer *handle, ftnlen marker_len); -/*:ref: zzddhnfo_ 14 7 4 13 4 4 4 12 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int errint_(char *marker, integer *integr, ftnlen marker_len); -/*:ref: allowd_ 12 0 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: getlms_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: putlms_ 14 2 13 124 */ - -extern int errprt_(char *op, char *list, ftnlen op_len, ftnlen list_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: msgsel_ 12 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: lparse_ 14 8 13 13 4 4 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: setprt_ 12 5 12 12 12 12 12 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer esrchc_(char *value, integer *ndim, char *array, ftnlen value_len, ftnlen array_len); -/*:ref: eqstr_ 12 4 13 13 124 124 */ - -extern int et2lst_(doublereal *et, integer *body, doublereal *long__, char *type__, integer *hr, integer *mn, integer *sc, char *time, char *ampm, ftnlen type_len, ftnlen time_len, ftnlen ampm_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: pgrrec_ 14 8 13 7 7 7 7 7 7 124 */ -/*:ref: reclat_ 14 4 7 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: rmaind_ 14 4 7 7 7 7 */ -/*:ref: twopi_ 7 0 */ -/*:ref: pi_ 7 0 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: dpfmt_ 14 5 7 13 13 124 124 */ - -extern int et2utc_(doublereal *et, char *format, integer *prec, char *utcstr, ftnlen format_len, ftnlen utcstr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ttrans_ 14 5 13 13 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dpstrf_ 14 6 7 4 13 13 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: unitim_ 7 5 7 13 13 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int etcal_(doublereal *et, char *string, ftnlen string_len); -/*:ref: spd_ 7 0 */ -/*:ref: intmax_ 4 0 */ -/*:ref: intmin_ 4 0 */ -/*:ref: lstlti_ 4 3 4 4 4 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: dpstrf_ 14 6 7 4 13 13 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ - -extern int eul2m_(doublereal *angle3, doublereal *angle2, doublereal *angle1, integer *axis3, integer *axis2, integer *axis1, doublereal *r__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rotate_ 14 3 7 4 7 */ -/*:ref: rotmat_ 14 4 7 7 4 7 */ - -extern int ev2lin_(doublereal *et, doublereal *geophs, doublereal *elems, doublereal *state); -/*:ref: twopi_ 7 0 */ -/*:ref: brcktd_ 7 3 7 7 7 */ - -extern logical even_(integer *i__); - -extern doublereal exact_(doublereal *number, doublereal *value, doublereal *tol); - -extern int excess_(integer *number, char *struct__, ftnlen struct_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical exists_(char *file, ftnlen file_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int expln_(char *msg, char *expl, ftnlen msg_len, ftnlen expl_len); - -extern integer fetchc_(integer *nth, char *set, ftnlen set_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer fetchd_(integer *nth, doublereal *set); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer fetchi_(integer *nth, integer *set); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int fillc_(char *value, integer *ndim, char *array, ftnlen value_len, ftnlen array_len); - -extern int filld_(doublereal *value, integer *ndim, doublereal *array); - -extern int filli_(integer *value, integer *ndim, integer *array); - -extern int fn2lun_(char *filnam, integer *lunit, ftnlen filnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int fndlun_(integer *unit); -extern int reslun_(integer *unit); -extern int frelun_(integer *unit); - -extern int fndnwd_(char *string, integer *start, integer *b, integer *e, ftnlen string_len); - -extern int fovray_(char *inst, doublereal *raydir, char *rframe, char *abcorr, char *obsrvr, doublereal *et, logical *visibl, ftnlen inst_len, ftnlen rframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzgffvin_ 14 13 13 13 7 13 13 13 13 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzgffvst_ 14 2 7 12 */ - -extern int fovtrg_(char *inst, char *target, char *tshape, char *tframe, char *abcorr, char *obsrvr, doublereal *et, logical *visibl, ftnlen inst_len, ftnlen target_len, ftnlen tshape_len, ftnlen tframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzgffvin_ 14 13 13 13 7 13 13 13 13 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzgffvst_ 14 2 7 12 */ - -extern int frame_(doublereal *x, doublereal *y, doublereal *z__); -/*:ref: vhatip_ 14 1 7 */ - -extern int framex_(char *cname, char *frname, integer *frcode, integer *cent, integer *class__, integer *clssid, logical *found, ftnlen cname_len, ftnlen frname_len); -extern int namfrm_(char *frname, integer *frcode, ftnlen frname_len); -extern int frmnam_(integer *frcode, char *frname, ftnlen frname_len); -extern int frinfo_(integer *frcode, integer *cent, integer *class__, integer *clssid, logical *found); -extern int cidfrm_(integer *cent, integer *frcode, char *frname, logical *found, ftnlen frname_len); -extern int cnmfrm_(char *cname, integer *frcode, char *frname, logical *found, ftnlen cname_len, ftnlen frname_len); -extern int ccifrm_(integer *class__, integer *clssid, integer *frcode, char *frname, integer *cent, logical *found, ftnlen frname_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzhsiini_ 14 3 4 4 4 */ -/*:ref: zzhscini_ 14 3 4 4 4 */ -/*:ref: zzfdat_ 14 18 4 4 13 4 4 4 4 4 4 4 13 4 4 4 4 4 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzhscchk_ 14 7 4 4 13 13 4 124 124 */ -/*:ref: zzpctrck_ 14 2 4 12 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ -/*:ref: zzhscadd_ 14 8 4 4 13 13 4 12 124 124 */ -/*:ref: zzhsichk_ 14 5 4 4 4 4 4 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: zzdynbid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzdynvai_ 14 8 13 4 13 4 4 4 124 124 */ -/*:ref: zzhsiadd_ 14 6 4 4 4 4 4 12 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: bschoi_ 4 4 4 4 4 4 */ -/*:ref: bodn2c_ 14 4 13 4 12 124 */ -/*:ref: gnpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern int frmchg_(integer *frame1, integer *frame2, doublereal *et, doublereal *xform); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: frmget_ 14 5 4 7 7 4 12 */ -/*:ref: zzmsxf_ 14 3 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zznofcon_ 14 7 7 4 4 4 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: invstm_ 14 2 7 7 */ - -extern int frmget_(integer *infrm, doublereal *et, doublereal *xform, integer *outfrm, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: tisbod_ 14 5 13 4 7 7 124 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: ckfxfm_ 14 5 4 7 7 4 12 */ -/*:ref: tkfram_ 14 4 4 7 4 12 */ -/*:ref: zzdynfrm_ 14 5 4 4 7 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern integer frstnb_(char *string, ftnlen string_len); - -extern integer frstnp_(char *string, ftnlen string_len); - -extern integer frstpc_(char *string, ftnlen string_len); - -extern integer gcd_(integer *a, integer *b); - -extern int georec_(doublereal *long__, doublereal *lat, doublereal *alt, doublereal *re, doublereal *f, doublereal *rectan); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: surfnm_ 14 5 7 7 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int getelm_(integer *frstyr, char *lines, doublereal *epoch, doublereal *elems, ftnlen lines_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzgetelm_ 14 8 4 13 7 7 12 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int getfat_(char *file, char *arch, char *kertyp, ftnlen file_len, ftnlen arch_len, ftnlen kertyp_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhfnh_ 14 4 13 4 12 124 */ -/*:ref: zzddhnfo_ 14 7 4 13 4 4 4 12 124 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: dashof_ 14 1 4 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: getlun_ 14 1 4 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: nextwd_ 14 6 13 13 13 124 124 124 */ -/*:ref: idw2at_ 14 6 13 13 13 124 124 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: zzckspk_ 14 3 4 13 124 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int getfov_(integer *instid, integer *room, char *shape, char *frame, doublereal *bsight, integer *n, doublereal *bounds, ftnlen shape_len, ftnlen frame_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: convrt_ 14 6 7 13 13 7 124 124 */ -/*:ref: vrotv_ 14 4 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: vperp_ 14 3 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ - -extern int getlun_(integer *unit); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: fndlun_ 14 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int getmsg_(char *option, char *msg, ftnlen option_len, ftnlen msg_len); -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: getsms_ 14 2 13 124 */ -/*:ref: expln_ 14 4 13 13 124 124 */ -/*:ref: getlms_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern logical gfbail_(void); - -extern int gfdist_(char *target, char *abcorr, char *obsrvr, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: gfevnt_ 14 28 200 200 13 4 13 13 7 4 12 13 7 7 7 7 12 200 200 200 4 4 7 12 212 7 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfevnt_(U_fp udstep, U_fp udrefn, char *gquant, integer *qnpars, char *qpnams, char *qcpars, doublereal *qdpars, integer *qipars, logical *qlpars, char *op, doublereal *refval, doublereal *tol, doublereal *adjust, doublereal *cnfine, logical *rpt, U_fp udrepi, U_fp udrepu, U_fp udrepf, integer *mw, integer *nw, doublereal *work, logical *bail, L_fp udbail, doublereal *result, ftnlen gquant_len, ftnlen qpnams_len, ftnlen qcpars_len, ftnlen op_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: zzgfspin_ 14 10 13 13 13 13 13 124 124 124 124 124 */ -/*:ref: zzgfrelx_ 14 25 200 200 200 200 200 13 7 7 7 7 4 4 7 12 200 200 200 13 13 12 212 7 124 124 124 */ -/*:ref: zzgfdiin_ 14 6 13 13 13 124 124 124 */ -/*:ref: zzgfcslv_ 14 37 13 13 13 13 13 13 13 7 13 13 13 7 7 7 200 200 12 200 200 200 12 212 4 4 7 7 7 124 124 124 124 124 124 124 124 124 124 */ -/*:ref: zzgfrrin_ 14 7 13 13 13 7 124 124 124 */ -/*:ref: zzgfpain_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: zzgfilin_ 14 15 13 13 13 13 13 13 13 7 124 124 124 124 124 124 124 */ - -extern int gffove_(char *inst, char *tshape, doublereal *raydir, char *target, char *tframe, char *abcorr, char *obsrvr, doublereal *tol, U_fp udstep, U_fp udrefn, logical *rpt, S_fp udrepi, U_fp udrepu, S_fp udrepf, logical *bail, L_fp udbail, doublereal *cnfine, doublereal *result, ftnlen inst_len, ftnlen tshape_len, ftnlen target_len, ftnlen tframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: zzgffvin_ 14 13 13 13 7 13 13 13 13 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: wncard_ 4 1 7 */ -/*:ref: wnfetd_ 14 4 7 4 7 7 */ -/*:ref: zzgfsolv_ 14 13 200 200 200 12 212 12 7 7 7 7 12 200 7 */ - -extern int gfilum_(char *method, char *angtyp, char *target, char *illmn, char *fixref, char *abcorr, char *obsrvr, doublereal *spoint, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen method_len, ftnlen angtyp_len, ftnlen target_len, ftnlen illmn_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: gfevnt_ 14 28 200 200 13 4 13 13 7 4 12 13 7 7 7 7 12 200 200 200 4 4 7 12 212 7 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfocce_(char *occtyp, char *front, char *fshape, char *fframe, char *back, char *bshape, char *bframe, char *abcorr, char *obsrvr, doublereal *tol, U_fp udstep, U_fp udrefn, logical *rpt, S_fp udrepi, U_fp udrepu, S_fp udrepf, logical *bail, L_fp udbail, doublereal *cnfine, doublereal *result, ftnlen occtyp_len, ftnlen front_len, ftnlen fshape_len, ftnlen fframe_len, ftnlen back_len, ftnlen bshape_len, ftnlen bframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzgfocin_ 14 18 13 13 13 13 13 13 13 13 13 124 124 124 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: wncard_ 4 1 7 */ -/*:ref: wnfetd_ 14 4 7 4 7 7 */ -/*:ref: zzgfsolv_ 14 13 200 200 200 12 212 12 7 7 7 7 12 200 7 */ - -extern int gfoclt_(char *occtyp, char *front, char *fshape, char *fframe, char *back, char *bshape, char *bframe, char *abcorr, char *obsrvr, doublereal *step, doublereal *cnfine, doublereal *result, ftnlen occtyp_len, ftnlen front_len, ftnlen fshape_len, ftnlen fframe_len, ftnlen back_len, ftnlen bshape_len, ftnlen bframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: gfocce_ 14 29 13 13 13 13 13 13 13 13 13 7 200 200 12 200 200 200 12 212 7 7 124 124 124 124 124 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfpa_(char *target, char *illmn, char *abcorr, char *obsrvr, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen target_len, ftnlen illmn_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: gfevnt_ 14 28 200 200 13 4 13 13 7 4 12 13 7 7 7 7 12 200 200 200 4 4 7 12 212 7 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfposc_(char *target, char *frame, char *abcorr, char *obsrvr, char *crdsys, char *coord, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen target_len, ftnlen frame_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen crdsys_len, ftnlen coord_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: even_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: gfevnt_ 14 28 200 200 13 4 13 13 7 4 12 13 7 7 7 7 12 200 200 200 4 4 7 12 212 7 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfrefn_(doublereal *t1, doublereal *t2, logical *s1, logical *s2, doublereal *t); -/*:ref: brcktd_ 7 3 7 7 7 */ - -extern int gfrfov_(char *inst, doublereal *raydir, char *rframe, char *abcorr, char *obsrvr, doublereal *step, doublereal *cnfine, doublereal *result, ftnlen inst_len, ftnlen rframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: gffove_ 14 24 13 13 7 13 13 13 13 7 200 200 12 200 200 200 12 212 7 7 124 124 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfrprt_(doublereal *window, char *begmss, char *endmss, doublereal *ivbeg, doublereal *ivend, doublereal *time, ftnlen begmss_len, ftnlen endmss_len); -extern int gfrepi_(doublereal *window, char *begmss, char *endmss, ftnlen begmss_len, ftnlen endmss_len); -extern int gfrepu_(doublereal *ivbeg, doublereal *ivend, doublereal *time); -extern int gfrepf_(void); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: wnsumd_ 14 6 7 7 7 7 4 4 */ -/*:ref: zzgftswk_ 14 7 7 7 4 13 13 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: zzgfwkin_ 14 1 7 */ -/*:ref: zzgfwkad_ 14 6 7 4 13 13 124 124 */ -/*:ref: zzgfwkmo_ 14 9 4 7 7 4 13 13 7 124 124 */ -/*:ref: stdio_ 14 3 13 4 124 */ -/*:ref: zzgfdsps_ 14 6 4 13 13 4 124 124 */ - -extern int gfrr_(char *target, char *abcorr, char *obsrvr, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: gfevnt_ 14 28 200 200 13 4 13 13 7 4 12 13 7 7 7 7 12 200 200 200 4 4 7 12 212 7 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfsep_(char *targ1, char *shape1, char *frame1, char *targ2, char *shape2, char *frame2, char *abcorr, char *obsrvr, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen targ1_len, ftnlen shape1_len, ftnlen frame1_len, ftnlen targ2_len, ftnlen shape2_len, ftnlen frame2_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: even_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: gfevnt_ 14 28 200 200 13 4 13 13 7 4 12 13 7 7 7 7 12 200 200 200 4 4 7 12 212 7 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfsntc_(char *target, char *fixref, char *method, char *abcorr, char *obsrvr, char *dref, doublereal *dvec, char *crdsys, char *coord, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen target_len, ftnlen fixref_len, ftnlen method_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen dref_len, ftnlen crdsys_len, ftnlen coord_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: even_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: gfevnt_ 14 28 200 200 13 4 13 13 7 4 12 13 7 7 7 7 12 200 200 200 4 4 7 12 212 7 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfstep_(doublereal *time, doublereal *step); -extern int gfsstp_(doublereal *step); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ - -extern int gfstol_(doublereal *value); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ - -extern int gfsubc_(char *target, char *fixref, char *method, char *abcorr, char *obsrvr, char *crdsys, char *coord, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen target_len, ftnlen fixref_len, ftnlen method_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen crdsys_len, ftnlen coord_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: even_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: gfevnt_ 14 28 200 200 13 4 13 13 7 4 12 13 7 7 7 7 12 200 200 200 4 4 7 12 212 7 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gftfov_(char *inst, char *target, char *tshape, char *tframe, char *abcorr, char *obsrvr, doublereal *step, doublereal *cnfine, doublereal *result, ftnlen inst_len, ftnlen target_len, ftnlen tshape_len, ftnlen tframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: gffove_ 14 24 13 13 7 13 13 13 13 7 200 200 12 200 200 200 12 212 7 7 124 124 124 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfudb_(U_fp udfuns, U_fp udfunb, doublereal *step, doublereal *cnfine, doublereal *result); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: zzgfudb_ 14 13 200 200 7 200 200 12 200 200 200 12 212 7 7 */ -/*:ref: gfbail_ 12 :*/ - -extern int gfuds_(U_fp udfuns, U_fp udqdec, char *relate, doublereal *refval, doublereal *adjust, doublereal *step, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, doublereal *result, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: gfsstp_ 14 1 7 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: zzgfrelx_ 14 25 200 200 200 200 200 13 7 7 7 7 4 4 7 12 200 200 200 13 13 12 212 7 124 124 124 */ -/*:ref: gfbail_ 12 :*/ - -extern doublereal halfpi_(void); - -extern int hrmesp_(integer *n, doublereal *first, doublereal *step, doublereal *yvals, doublereal *x, doublereal *work, doublereal *f, doublereal *df); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int hrmint_(integer *n, doublereal *xvals, doublereal *yvals, doublereal *x, doublereal *work, doublereal *f, doublereal *df); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ - -extern int hx2dp_(char *string, doublereal *number, logical *error, char *errmsg, ftnlen string_len, ftnlen errmsg_len); -/*:ref: dpmin_ 7 0 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: hx2int_ 14 6 13 4 12 13 124 124 */ - -extern int hx2int_(char *string, integer *number, logical *error, char *errmsg, ftnlen string_len, ftnlen errmsg_len); -/*:ref: intmin_ 4 0 */ -/*:ref: intmax_ 4 0 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ - -extern int hyptof_(doublereal *ma, doublereal *ecc, doublereal *f); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dcbrt_ 7 1 7 */ - -extern int ident_(doublereal *matrix); - -extern int idw2at_(char *idword, char *arch, char *type__, ftnlen idword_len, ftnlen arch_len, ftnlen type_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: pos_ 4 5 13 13 4 124 124 */ - -extern int illum_(char *target, doublereal *et, char *abcorr, char *obsrvr, doublereal *spoint, doublereal *phase, doublereal *solar, doublereal *emissn, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: surfnm_ 14 5 7 7 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ - -extern int illumg_(char *method, char *target, char *illum, doublereal *et, char *fixref, char *abcorr, char *obsrvr, doublereal *spoint, doublereal *trgepc, doublereal *srfvec, doublereal *phase, doublereal *incdnc, doublereal *emissn, ftnlen method_len, ftnlen target_len, ftnlen illum_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: spkcpt_ 14 16 7 13 13 7 13 13 13 13 7 7 124 124 124 124 124 124 */ -/*:ref: spkcpo_ 14 16 13 7 13 13 13 7 13 13 7 7 124 124 124 124 124 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: surfnm_ 14 5 7 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ - -extern int ilumin_(char *method, char *target, doublereal *et, char *fixref, char *abcorr, char *obsrvr, doublereal *spoint, doublereal *trgepc, doublereal *srfvec, doublereal *phase, doublereal *solar, doublereal *emissn, ftnlen method_len, ftnlen target_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: illumg_ 14 19 13 13 13 7 13 13 13 7 7 7 7 7 7 124 124 124 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int inedpl_(doublereal *a, doublereal *b, doublereal *c__, doublereal *plane, doublereal *ellips, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: pl2psv_ 14 4 7 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: psv2pl_ 14 4 7 7 7 7 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: cgv2el_ 14 4 7 7 7 7 */ - -extern int inelpl_(doublereal *ellips, doublereal *plane, integer *nxpts, doublereal *xpt1, doublereal *xpt2); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: el2cgv_ 14 4 7 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: pl2nvp_ 14 3 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: nvp2pl_ 14 3 7 7 7 */ -/*:ref: vzerog_ 12 2 7 4 */ -/*:ref: vnormg_ 7 2 7 4 */ -/*:ref: vlcom3_ 14 7 7 7 7 7 7 7 7 */ - -extern int inrypl_(doublereal *vertex, doublereal *dir, doublereal *plane, integer *nxpts, doublereal *xpt); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: smsgnd_ 12 2 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ - -extern int inslac_(char *elts, integer *ne, integer *loc, char *array, integer *na, ftnlen elts_len, ftnlen array_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int inslad_(doublereal *elts, integer *ne, integer *loc, doublereal *array, integer *na); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int inslai_(integer *elts, integer *ne, integer *loc, integer *array, integer *na); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int insrtc_(char *item, char *a, ftnlen item_len, ftnlen a_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int insrtd_(doublereal *item, doublereal *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int insrti_(integer *item, integer *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlei_ 4 3 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int inssub_(char *in, char *sub, integer *loc, char *out, ftnlen in_len, ftnlen sub_len, ftnlen out_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int int2hx_(integer *number, char *string, integer *length, ftnlen string_len); - -extern int interc_(char *a, char *b, char *c__, ftnlen a_len, ftnlen b_len, ftnlen c_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: excess_ 14 3 4 13 124 */ - -extern int interd_(doublereal *a, doublereal *b, doublereal *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int interi_(integer *a, integer *b, integer *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int intord_(integer *n, char *string, ftnlen string_len); -/*:ref: inttxt_ 14 3 4 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern int intstr_(integer *number, char *string, ftnlen string_len); - -extern int inttxt_(integer *n, char *string, ftnlen string_len); -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern int invert_(doublereal *m1, doublereal *mout); -/*:ref: det_ 7 1 7 */ -/*:ref: filld_ 14 3 7 4 7 */ -/*:ref: vsclg_ 14 4 7 7 4 7 */ - -extern int invort_(doublereal *m, doublereal *mit); -/*:ref: dpmax_ 7 0 */ -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: xpose_ 14 2 7 7 */ - -extern int invstm_(doublereal *mat, doublereal *invmat); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: xposbl_ 14 5 7 4 4 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int ioerr_(char *action, char *file, integer *iostat, ftnlen action_len, ftnlen file_len); -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ - -extern int irftrn_(char *refa, char *refb, doublereal *rotab, ftnlen refa_len, ftnlen refb_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int iso2utc_(char *tstrng, char *utcstr, char *error, ftnlen tstrng_len, ftnlen utcstr_len, ftnlen error_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical isopen_(char *file, ftnlen file_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern logical isordv_(integer *array, integer *n); - -extern integer isrchc_(char *value, integer *ndim, char *array, ftnlen value_len, ftnlen array_len); - -extern integer isrchd_(doublereal *value, integer *ndim, doublereal *array); - -extern integer isrchi_(integer *value, integer *ndim, integer *array); - -extern logical isrot_(doublereal *m, doublereal *ntol, doublereal *dtol); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: det_ 7 1 7 */ -/*:ref: brcktd_ 7 3 7 7 7 */ - -extern doublereal j1900_(void); - -extern doublereal j1950_(void); - -extern doublereal j2000_(void); - -extern doublereal j2100_(void); - -extern int jul2gr_(integer *year, integer *month, integer *day, integer *doy); -extern int gr2jul_(integer *year, integer *month, integer *day, integer *doy); -/*:ref: rmaini_ 14 4 4 4 4 4 */ -/*:ref: lstlti_ 4 3 4 4 4 */ - -extern doublereal jyear_(void); - -extern int keeper_(integer *which, char *kind, char *file, integer *count, char *filtyp, integer *handle, char *source, logical *found, ftnlen kind_len, ftnlen file_len, ftnlen filtyp_len, ftnlen source_len); -extern int furnsh_(char *file, ftnlen file_len); -extern int ktotal_(char *kind, integer *count, ftnlen kind_len); -extern int kdata_(integer *which, char *kind, char *file, char *filtyp, char *source, integer *handle, logical *found, ftnlen kind_len, ftnlen file_len, ftnlen filtyp_len, ftnlen source_len); -extern int kinfo_(char *file, char *filtyp, char *source, integer *handle, logical *found, ftnlen file_len, ftnlen filtyp_len, ftnlen source_len); -extern int kclear_(void); -extern int unload_(char *file, ftnlen file_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: cvpool_ 14 3 13 12 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzldker_ 14 7 13 13 13 4 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: stpool_ 14 9 13 4 13 13 4 12 124 124 124 */ -/*:ref: sepool_ 14 10 13 4 13 13 4 4 12 124 124 124 */ -/*:ref: pos_ 4 5 13 13 4 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: samsub_ 12 8 13 4 4 13 4 4 124 124 */ -/*:ref: repsub_ 14 8 13 4 4 13 13 124 124 124 */ -/*:ref: repmot_ 14 9 13 13 4 13 13 124 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: dvpool_ 14 2 13 124 */ -/*:ref: fndnwd_ 14 5 13 4 4 4 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: spkuef_ 14 1 4 */ -/*:ref: ckupf_ 14 1 4 */ -/*:ref: pckuof_ 14 1 4 */ -/*:ref: ekuef_ 14 1 4 */ -/*:ref: clpool_ 14 0 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: ldpool_ 14 2 13 124 */ -/*:ref: spklef_ 14 3 13 4 124 */ -/*:ref: cklpf_ 14 3 13 4 124 */ -/*:ref: pcklof_ 14 3 13 4 124 */ -/*:ref: eklef_ 14 3 13 4 124 */ - -extern doublereal kepleq_(doublereal *ml, doublereal *h__, doublereal *k); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: kpsolv_ 7 1 7 */ - -extern int kplfrm_(integer *frmcls, integer *idset); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: gnpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: validi_ 14 3 4 4 4 */ - -extern doublereal kpsolv_(doublereal *evec); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int kxtrct_(char *keywd, char *terms, integer *nterms, char *string, logical *found, char *substr, ftnlen keywd_len, ftnlen terms_len, ftnlen string_len, ftnlen substr_len); -/*:ref: wdindx_ 4 4 13 13 124 124 */ -/*:ref: nblen_ 4 2 13 124 */ -/*:ref: fndnwd_ 14 5 13 4 4 4 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: shiftl_ 14 7 13 4 13 13 124 124 124 */ - -extern integer lastnb_(char *string, ftnlen string_len); - -extern integer lastpc_(char *string, ftnlen string_len); - -extern int latcyl_(doublereal *radius, doublereal *long__, doublereal *lat, doublereal *r__, doublereal *longc, doublereal *z__); - -extern int latrec_(doublereal *radius, doublereal *long__, doublereal *lat, doublereal *rectan); - -extern int latsph_(doublereal *radius, doublereal *long__, doublereal *lat, doublereal *rho, doublereal *colat, doublereal *longs); -/*:ref: halfpi_ 7 0 */ - -extern int lbuild_(char *items, integer *n, char *delim, char *list, ftnlen items_len, ftnlen delim_len, ftnlen list_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern int lcase_(char *in, char *out, ftnlen in_len, ftnlen out_len); - -extern doublereal lgresp_(integer *n, doublereal *first, doublereal *step, doublereal *yvals, doublereal *work, doublereal *x); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int lgrind_(integer *n, doublereal *xvals, doublereal *yvals, doublereal *work, doublereal *x, doublereal *p, doublereal *dp); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ - -extern doublereal lgrint_(integer *n, doublereal *xvals, doublereal *yvals, doublereal *work, doublereal *x); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ - -extern int ljucrs_(integer *n, char *input, char *output, ftnlen input_len, ftnlen output_len); - -extern int ljust_(char *input, char *output, ftnlen input_len, ftnlen output_len); - -extern int lnkan_(integer *pool, integer *new__); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int lnkfsl_(integer *head, integer *tail, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer lnkhl_(integer *node, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int lnkila_(integer *prev, integer *list, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int lnkilb_(integer *list, integer *next, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int lnkini_(integer *size, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer lnknfn_(integer *pool); - -extern integer lnknxt_(integer *node, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer lnkprv_(integer *node, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer lnksiz_(integer *pool); - -extern integer lnktl_(integer *node, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int lnkxsl_(integer *head, integer *tail, integer *pool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int locati_(integer *id, integer *idsz, integer *list, integer *pool, integer *at, logical *presnt); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnksiz_ 4 1 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: lnkxsl_ 14 3 4 4 4 */ -/*:ref: lnkilb_ 14 3 4 4 4 */ - -extern int locln_(integer *unit, char *bmark, char *emark, char *line, integer *bline, integer *eline, logical *found, ftnlen bmark_len, ftnlen emark_len, ftnlen line_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ltrim_ 4 2 13 124 */ - -extern int lparse_(char *list, char *delim, integer *nmax, integer *n, char *items, ftnlen list_len, ftnlen delim_len, ftnlen items_len); - -extern int lparsm_(char *list, char *delims, integer *nmax, integer *n, char *items, ftnlen list_len, ftnlen delims_len, ftnlen items_len); - -extern int lparss_(char *list, char *delims, char *set, ftnlen list_len, ftnlen delims_len, ftnlen set_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: insrtc_ 14 4 13 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: validc_ 14 4 4 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern doublereal lspcn_(char *body, doublereal *et, char *abcorr, ftnlen body_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: tipbod_ 14 5 13 4 7 7 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: twovec_ 14 5 7 4 7 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: spkezr_ 14 11 13 7 13 13 13 7 7 124 124 124 124 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: recrad_ 14 4 7 7 7 7 */ - -extern integer lstcld_(doublereal *x, integer *n, doublereal *array); - -extern integer lstcli_(integer *x, integer *n, integer *array); - -extern integer lstlec_(char *string, integer *n, char *array, ftnlen string_len, ftnlen array_len); - -extern integer lstled_(doublereal *x, integer *n, doublereal *array); - -extern integer lstlei_(integer *x, integer *n, integer *array); - -extern integer lstltc_(char *string, integer *n, char *array, ftnlen string_len, ftnlen array_len); - -extern integer lstltd_(doublereal *x, integer *n, doublereal *array); - -extern integer lstlti_(integer *x, integer *n, integer *array); - -extern int ltime_(doublereal *etobs, integer *obs, char *dir, integer *targ, doublereal *ettarg, doublereal *elapsd, ftnlen dir_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: clight_ 7 0 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: failed_ 12 0 */ - -extern integer ltrim_(char *string, ftnlen string_len); -/*:ref: frstnb_ 4 2 13 124 */ - -extern int lun2fn_(integer *lunit, char *filnam, ftnlen filnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int lx4dec_(char *string, integer *first, integer *last, integer *nchar, ftnlen string_len); -/*:ref: lx4uns_ 14 5 13 4 4 4 124 */ -/*:ref: lx4sgn_ 14 5 13 4 4 4 124 */ - -extern int lx4num_(char *string, integer *first, integer *last, integer *nchar, ftnlen string_len); -/*:ref: lx4dec_ 14 5 13 4 4 4 124 */ -/*:ref: lx4sgn_ 14 5 13 4 4 4 124 */ - -extern int lx4sgn_(char *string, integer *first, integer *last, integer *nchar, ftnlen string_len); -/*:ref: lx4uns_ 14 5 13 4 4 4 124 */ - -extern int lx4uns_(char *string, integer *first, integer *last, integer *nchar, ftnlen string_len); - -extern int lxname_(char *hdchrs, char *tlchrs, char *string, integer *first, integer *last, integer *idspec, integer *nchar, ftnlen hdchrs_len, ftnlen tlchrs_len, ftnlen string_len); -extern int lxidnt_(integer *idspec, char *string, integer *first, integer *last, integer *nchar, ftnlen string_len); -extern int lxdfid_(integer *idspec); -extern int lxcsid_(char *hdchrs, char *tlchrs, integer *idspec, ftnlen hdchrs_len, ftnlen tlchrs_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: bsrchi_ 4 3 4 4 4 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: validi_ 14 3 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: appndi_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: cardi_ 4 1 4 */ - -extern int lxqstr_(char *string, char *qchar, integer *first, integer *last, integer *nchar, ftnlen string_len, ftnlen qchar_len); - -extern int m2eul_(doublereal *r__, integer *axis3, integer *axis2, integer *axis1, doublereal *angle3, doublereal *angle2, doublereal *angle1); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: isrot_ 12 3 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: mtxm_ 14 3 7 7 7 */ - -extern int m2q_(doublereal *r__, doublereal *q); -/*:ref: isrot_ 12 3 7 7 7 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical matchi_(char *string, char *templ, char *wstr, char *wchr, ftnlen string_len, ftnlen templ_len, ftnlen wstr_len, ftnlen wchr_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: samch_ 12 6 13 4 13 4 124 124 */ -/*:ref: nechr_ 12 4 13 13 124 124 */ -/*:ref: samchi_ 12 6 13 4 13 4 124 124 */ - -extern logical matchw_(char *string, char *templ, char *wstr, char *wchr, ftnlen string_len, ftnlen templ_len, ftnlen wstr_len, ftnlen wchr_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: samch_ 12 6 13 4 13 4 124 124 */ - -extern int maxac_(char *array, integer *ndim, char *maxval, integer *loc, ftnlen array_len, ftnlen maxval_len); - -extern int maxad_(doublereal *array, integer *ndim, doublereal *maxval, integer *loc); - -extern int maxai_(integer *array, integer *ndim, integer *maxval, integer *loc); - -extern int mequ_(doublereal *m1, doublereal *mout); -/*:ref: moved_ 14 3 7 4 7 */ - -extern int mequg_(doublereal *m1, integer *nr, integer *nc, doublereal *mout); -/*:ref: moved_ 14 3 7 4 7 */ - -extern int minac_(char *array, integer *ndim, char *minval, integer *loc, ftnlen array_len, ftnlen minval_len); - -extern int minad_(doublereal *array, integer *ndim, doublereal *minval, integer *loc); - -extern int minai_(integer *array, integer *ndim, integer *minval, integer *loc); - -extern int movec_(char *arrfrm, integer *ndim, char *arrto, ftnlen arrfrm_len, ftnlen arrto_len); - -extern int movei_(integer *arrfrm, integer *ndim, integer *arrto); - -extern int mtxm_(doublereal *m1, doublereal *m2, doublereal *mout); -/*:ref: moved_ 14 3 7 4 7 */ - -extern int mtxmg_(doublereal *m1, doublereal *m2, integer *nc1, integer *nr1r2, integer *nc2, doublereal *mout); - -extern int mtxv_(doublereal *matrix, doublereal *vin, doublereal *vout); - -extern int mtxvg_(doublereal *m1, doublereal *v2, integer *nc1, integer *nr1r2, doublereal *vout); - -extern int mxm_(doublereal *m1, doublereal *m2, doublereal *mout); -/*:ref: moved_ 14 3 7 4 7 */ - -extern int mxmg_(doublereal *m1, doublereal *m2, integer *row1, integer *col1, integer *col2, doublereal *mout); - -extern int mxmt_(doublereal *m1, doublereal *m2, doublereal *mout); -/*:ref: moved_ 14 3 7 4 7 */ - -extern int mxmtg_(doublereal *m1, doublereal *m2, integer *nr1, integer *nc1c2, integer *nr2, doublereal *mout); - -extern int mxv_(doublereal *matrix, doublereal *vin, doublereal *vout); - -extern int mxvg_(doublereal *m1, doublereal *v2, integer *nr1, integer *nc1r2, doublereal *vout); - -extern integer nblen_(char *string, ftnlen string_len); -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: frstnb_ 4 2 13 124 */ - -extern integer nbwid_(char *array, integer *nelt, ftnlen array_len); - -extern integer ncpos_(char *str, char *chars, integer *start, ftnlen str_len, ftnlen chars_len); - -extern integer ncposr_(char *str, char *chars, integer *start, ftnlen str_len, ftnlen chars_len); - -extern int nearpt_(doublereal *positn, doublereal *a, doublereal *b, doublereal *c__, doublereal *npoint, doublereal *alt); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: orderd_ 14 3 7 4 4 */ -/*:ref: reordd_ 14 3 4 4 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: approx_ 12 3 7 7 7 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: surfnm_ 14 5 7 7 7 7 7 */ -/*:ref: vperp_ 14 3 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ - -extern int nextwd_(char *string, char *next, char *rest, ftnlen string_len, ftnlen next_len, ftnlen rest_len); -/*:ref: ljust_ 14 4 13 13 124 124 */ - -extern logical notru_(logical *logcls, integer *n); - -extern int nparsd_(char *string, doublereal *x, char *error, integer *ptr, ftnlen string_len, ftnlen error_len); -/*:ref: dpmax_ 7 0 */ -/*:ref: zzinssub_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: pi_ 7 0 */ - -extern int nparsi_(char *string, integer *n, char *error, integer *pnter, ftnlen string_len, ftnlen error_len); -/*:ref: intmax_ 4 0 */ -/*:ref: intmin_ 4 0 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ - -extern int npedln_(doublereal *a, doublereal *b, doublereal *c__, doublereal *linept, doublereal *linedr, doublereal *pnear, doublereal *dist); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: nvc2pl_ 14 3 7 7 7 */ -/*:ref: inedpl_ 14 6 7 7 7 7 7 12 */ -/*:ref: pjelpl_ 14 3 7 7 7 */ -/*:ref: vprjp_ 14 3 7 7 7 */ -/*:ref: npelpt_ 14 4 7 7 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: vprjpi_ 14 5 7 7 7 7 12 */ -/*:ref: vsclip_ 14 2 7 7 */ - -extern int npelpt_(doublereal *point, doublereal *ellips, doublereal *pnear, doublereal *dist); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: el2cgv_ 14 4 7 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: twovec_ 14 5 7 4 7 4 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: mtxv_ 14 3 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vdist_ 7 2 7 7 */ - -extern int nplnpt_(doublereal *linpt, doublereal *lindir, doublereal *point, doublereal *pnear, doublereal *dist); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vproj_ 14 3 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vdist_ 7 2 7 7 */ - -extern int nthwd_(char *string, integer *nth, char *word, integer *loc, ftnlen string_len, ftnlen word_len); - -extern int nvc2pl_(doublereal *normal, doublereal *const__, doublereal *plane); -/*:ref: return_ 12 0 */ -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int nvp2pl_(doublereal *normal, doublereal *point, doublereal *plane); -/*:ref: return_ 12 0 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int occult_(char *targ1, char *shape1, char *frame1, char *targ2, char *shape2, char *frame2, char *abcorr, char *obsrvr, doublereal *et, integer *ocltid, ftnlen targ1_len, ftnlen shape1_len, ftnlen frame1_len, ftnlen targ2_len, ftnlen shape2_len, ftnlen frame2_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzgfocin_ 14 18 13 13 13 13 13 13 13 13 13 124 124 124 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzgfocst_ 14 2 7 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern logical odd_(integer *i__); - -extern logical opsgnd_(doublereal *x, doublereal *y); - -extern logical opsgni_(integer *x, integer *y); - -extern integer ordc_(char *item, char *set, ftnlen item_len, ftnlen set_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer ordd_(doublereal *item, doublereal *set); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bsrchd_ 4 3 7 4 7 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int orderc_(char *array, integer *ndim, integer *iorder, ftnlen array_len); -/*:ref: swapi_ 14 2 4 4 */ - -extern int orderd_(doublereal *array, integer *ndim, integer *iorder); -/*:ref: swapi_ 14 2 4 4 */ - -extern int orderi_(integer *array, integer *ndim, integer *iorder); -/*:ref: swapi_ 14 2 4 4 */ - -extern integer ordi_(integer *item, integer *set); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bsrchi_ 4 3 4 4 4 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int oscelt_(doublereal *state, doublereal *et, doublereal *mu, doublereal *elts); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: exact_ 7 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: pi_ 7 0 */ -/*:ref: twopi_ 7 0 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: dacosh_ 7 1 7 */ - -extern int outmsg_(char *list, ftnlen list_len); -/*:ref: lparse_ 14 8 13 13 4 4 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: getdev_ 14 2 13 124 */ -/*:ref: wrline_ 14 4 13 13 124 124 */ -/*:ref: msgsel_ 12 2 13 124 */ -/*:ref: tkvrsn_ 14 4 13 13 124 124 */ -/*:ref: getsms_ 14 2 13 124 */ -/*:ref: expln_ 14 4 13 13 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: getlms_ 14 2 13 124 */ -/*:ref: wdcnt_ 4 2 13 124 */ -/*:ref: nextwd_ 14 6 13 13 13 124 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: trcdep_ 14 1 4 */ -/*:ref: trcnam_ 14 3 4 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern int packac_(char *in, integer *pack, integer *npack, integer *maxout, integer *nout, char *out, ftnlen in_len, ftnlen out_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int packad_(doublereal *in, integer *pack, integer *npack, integer *maxout, integer *nout, doublereal *out); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int packai_(integer *in, integer *pack, integer *npack, integer *maxout, integer *nout, integer *out); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int parsqs_(char *string, char *qchar, char *value, integer *length, logical *error, char *errmsg, integer *ptr, ftnlen string_len, ftnlen qchar_len, ftnlen value_len, ftnlen errmsg_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ - -extern int partof_(doublereal *ma, doublereal *d__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dcbrt_ 7 1 7 */ - -extern int pck03a_(integer *handle, integer *ncsets, doublereal *coeffs, doublereal *epochs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sgwfpk_ 14 5 4 4 7 4 7 */ - -extern int pck03b_(integer *handle, char *segid, integer *body, char *frame, doublereal *first, doublereal *last, integer *chbdeg, ftnlen segid_len, ftnlen frame_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: pckpds_ 14 7 4 13 4 7 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: sgbwfs_ 14 8 4 7 13 4 7 4 4 124 */ - -extern int pck03e_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sgwes_ 14 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pckbsr_(char *fname, integer *handle, integer *body, doublereal *et, doublereal *descr, char *ident, logical *found, ftnlen fname_len, ftnlen ident_len); -extern int pcklof_(char *fname, integer *handle, ftnlen fname_len); -extern int pckuof_(integer *handle); -extern int pcksfs_(integer *body, doublereal *et, integer *handle, doublereal *descr, char *ident, logical *found, ftnlen ident_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: dafcls_ 14 1 4 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: intmax_ 4 0 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: lnkprv_ 4 2 4 4 */ -/*:ref: dpmin_ 7 0 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafbbs_ 14 1 4 */ -/*:ref: daffpa_ 14 1 12 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: dafgn_ 14 2 13 124 */ -/*:ref: lnkilb_ 14 3 4 4 4 */ -/*:ref: lnkila_ 14 3 4 4 4 */ -/*:ref: lnktl_ 4 2 4 4 */ - -extern int pckcls_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int pckcov_(char *pck, integer *idcode, doublereal *cover, ftnlen pck_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: getfat_ 14 6 13 13 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: wninsd_ 14 3 7 7 7 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int pcke02_(doublereal *et, doublereal *record, doublereal *eulang); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spke02_ 14 3 7 7 7 */ -/*:ref: twopi_ 7 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pcke03_(doublereal *et, doublereal *record, doublereal *rotmat); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chbval_ 14 5 7 4 7 7 7 */ -/*:ref: rpd_ 7 0 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: eul2m_ 14 7 7 7 7 4 4 4 7 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pcke20_(doublereal *et, doublereal *record, doublereal *eulang); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spke20_ 14 3 7 7 7 */ -/*:ref: twopi_ 7 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pckeul_(integer *body, doublereal *et, logical *found, char *ref, doublereal *eulang, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: pcksfs_ 14 7 4 7 4 7 13 12 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: irfnam_ 14 3 4 13 124 */ -/*:ref: pckr02_ 14 4 4 7 7 7 */ -/*:ref: pcke02_ 14 3 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pckfrm_(char *pck, integer *ids, ftnlen pck_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: getfat_ 14 6 13 13 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int pckmat_(integer *body, doublereal *et, integer *ref, doublereal *tsipm, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: pcksfs_ 14 7 4 7 4 7 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: pckr02_ 14 4 4 7 7 7 */ -/*:ref: pcke02_ 14 3 7 7 7 */ -/*:ref: eul2xf_ 14 5 7 4 4 4 7 */ -/*:ref: sgfcon_ 14 5 4 7 4 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: pckr03_ 14 4 4 7 7 7 */ -/*:ref: pcke03_ 14 3 7 7 7 */ -/*:ref: pckr20_ 14 4 4 7 7 7 */ -/*:ref: pcke20_ 14 3 7 7 7 */ - -extern int pckopn_(char *name__, char *ifname, integer *ncomch, integer *handle, ftnlen name_len, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafonw_ 14 10 13 13 4 4 13 4 4 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pckpds_(integer *body, char *frame, integer *type__, doublereal *first, doublereal *last, doublereal *descr, ftnlen frame_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ - -extern int pckr02_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pckr03_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sgfcon_ 14 5 4 7 4 4 7 */ -/*:ref: sgfrvi_ 14 6 4 7 7 7 4 12 */ -/*:ref: sgfpkt_ 14 6 4 7 4 4 7 4 */ - -extern int pckr20_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: j2000_ 7 0 */ -/*:ref: spd_ 7 0 */ -/*:ref: remlad_ 14 4 4 4 7 4 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pckuds_(doublereal *descr, integer *body, integer *frame, integer *type__, doublereal *first, doublereal *last, integer *begin, integer *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pckw02_(integer *handle, integer *body, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *intlen, integer *n, integer *polydg, doublereal *cdata, doublereal *btime, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: chckid_ 14 5 13 4 13 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int pckw20_(integer *handle, integer *clssid, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *intlen, integer *n, integer *polydg, doublereal *cdata, doublereal *ascale, doublereal *tscale, doublereal *initjd, doublereal *initfr, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: spd_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: chckid_ 14 5 13 4 13 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern integer pcwid_(char *array, integer *nelt, ftnlen array_len); - -extern int pgrrec_(char *body, doublereal *lon, doublereal *lat, doublereal *alt, doublereal *re, doublereal *f, doublereal *rectan, ftnlen body_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: plnsns_ 4 1 4 */ -/*:ref: georec_ 14 6 7 7 7 7 7 7 */ - -extern doublereal phaseq_(doublereal *et, char *target, char *illmn, char *obsrvr, char *abcorr, ftnlen target_len, ftnlen illmn_len, ftnlen obsrvr_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzgfpaq_ 14 7 7 4 4 4 13 7 124 */ - -extern doublereal pi_(void); - -extern int pjelpl_(doublereal *elin, doublereal *plane, doublereal *elout); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: el2cgv_ 14 4 7 7 7 7 */ -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vperp_ 14 3 7 7 7 */ -/*:ref: vprjp_ 14 3 7 7 7 */ -/*:ref: cgv2el_ 14 4 7 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pl2nvc_(doublereal *plane, doublereal *normal, doublereal *const__); -/*:ref: vequ_ 14 2 7 7 */ - -extern int pl2nvp_(doublereal *plane, doublereal *normal, doublereal *point); -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ - -extern int pl2psv_(doublereal *plane, doublereal *point, doublereal *span1, doublereal *span2); -/*:ref: pl2nvp_ 14 3 7 7 7 */ -/*:ref: frame_ 14 3 7 7 7 */ - -extern integer plnsns_(integer *bodid); -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ - -extern int polyds_(doublereal *coeffs, integer *deg, integer *nderiv, doublereal *t, doublereal *p); - -extern int pool_(char *kernel, integer *unit, char *name__, char *names, integer *nnames, char *agent, integer *n, doublereal *values, logical *found, logical *update, integer *start, integer *room, char *cvals, integer *ivals, char *type__, char *uwvars, integer *uwptrs, integer *uwpool, char *uwagnt, integer *usrctr, ftnlen kernel_len, ftnlen name_len, ftnlen names_len, ftnlen agent_len, ftnlen cvals_len, ftnlen type_len, ftnlen uwvars_len, ftnlen uwagnt_len); -extern int clpool_(void); -extern int ldpool_(char *kernel, ftnlen kernel_len); -extern int rtpool_(char *name__, integer *n, doublereal *values, logical *found, ftnlen name_len); -extern int expool_(char *name__, logical *found, ftnlen name_len); -extern int wrpool_(integer *unit); -extern int swpool_(char *agent, integer *nnames, char *names, ftnlen agent_len, ftnlen names_len); -extern int cvpool_(char *agent, logical *update, ftnlen agent_len); -extern int gcpool_(char *name__, integer *start, integer *room, integer *n, char *cvals, logical *found, ftnlen name_len, ftnlen cvals_len); -extern int gdpool_(char *name__, integer *start, integer *room, integer *n, doublereal *values, logical *found, ftnlen name_len); -extern int gipool_(char *name__, integer *start, integer *room, integer *n, integer *ivals, logical *found, ftnlen name_len); -extern int dtpool_(char *name__, logical *found, integer *n, char *type__, ftnlen name_len, ftnlen type_len); -extern int pcpool_(char *name__, integer *n, char *cvals, ftnlen name_len, ftnlen cvals_len); -extern int pdpool_(char *name__, integer *n, doublereal *values, ftnlen name_len); -extern int pipool_(char *name__, integer *n, integer *ivals, ftnlen name_len); -extern int lmpool_(char *cvals, integer *n, ftnlen cvals_len); -extern int szpool_(char *name__, integer *n, logical *found, ftnlen name_len); -extern int dvpool_(char *name__, ftnlen name_len); -extern int gnpool_(char *name__, integer *start, integer *room, integer *n, char *cvals, logical *found, ftnlen name_len, ftnlen cvals_len); -extern int dwpool_(char *agent, ftnlen agent_len); -extern int zzvupool_(char *uwvars, integer *uwptrs, integer *uwpool, char *uwagnt, ftnlen uwvars_len, ftnlen uwagnt_len); -extern int zzpctrck_(integer *usrctr, logical *update); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzpini_ 14 28 12 4 4 4 13 13 4 4 4 4 4 4 4 13 4 4 13 13 13 13 4 124 124 124 124 124 124 124 */ -/*:ref: zzctrinc_ 14 1 4 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: zznwpool_ 14 14 13 13 4 4 13 13 13 13 124 124 124 124 124 124 */ -/*:ref: rdknew_ 14 2 13 124 */ -/*:ref: zzrvar_ 14 13 4 4 13 4 4 7 4 13 13 12 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: elemc_ 12 4 13 13 124 124 */ -/*:ref: cltext_ 14 2 13 124 */ -/*:ref: zzhash_ 4 2 13 124 */ -/*:ref: ioerr_ 14 5 13 13 4 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzgapool_ 14 10 13 13 4 4 13 13 124 124 124 124 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: lnktl_ 4 2 4 4 */ -/*:ref: lnkila_ 14 3 4 4 4 */ -/*:ref: lstltc_ 4 5 13 4 13 124 124 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: insrtc_ 14 4 13 13 124 124 */ -/*:ref: removc_ 14 4 13 13 124 124 */ -/*:ref: intmax_ 4 0 */ -/*:ref: intmin_ 4 0 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: zzgpnm_ 14 15 4 4 13 4 4 7 4 13 13 12 4 4 124 124 124 */ -/*:ref: zzcln_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: zzrvbf_ 14 17 13 4 4 4 4 13 4 4 7 4 13 13 12 124 124 124 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: matchi_ 12 8 13 13 13 13 124 124 124 124 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: copyc_ 14 4 13 13 124 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: movec_ 14 5 13 4 13 124 124 */ -/*:ref: zzctrchk_ 14 3 4 4 12 */ - -extern integer pos_(char *str, char *substr, integer *start, ftnlen str_len, ftnlen substr_len); - -extern integer posr_(char *str, char *substr, integer *start, ftnlen str_len, ftnlen substr_len); - -extern int prefix_(char *pref, integer *spaces, char *string, ftnlen pref_len, ftnlen string_len); -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: shiftr_ 14 7 13 4 13 13 124 124 124 */ - -extern doublereal prodad_(doublereal *array, integer *n); - -extern integer prodai_(integer *array, integer *n); - -extern int prompt_(char *prmpt, char *string, ftnlen prmpt_len, ftnlen string_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int prop2b_(doublereal *gm, doublereal *pvinit, doublereal *dt, doublereal *pvprop); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: brckti_ 4 3 4 4 4 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: stmp03_ 14 5 7 7 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: vequg_ 14 3 7 4 7 */ - -extern int prsdp_(char *string, doublereal *dpval, ftnlen string_len); -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int prsint_(char *string, integer *intval, ftnlen string_len); -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int prtenc_(integer *number, char *string, ftnlen string_len); -extern int prtdec_(char *string, integer *number, ftnlen string_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical prtpkg_(logical *short__, logical *long__, logical *expl, logical *trace, logical *dfault, char *type__, ftnlen type_len); -extern logical setprt_(logical *short__, logical *expl, logical *long__, logical *trace, logical *dfault); -extern logical msgsel_(char *type__, ftnlen type_len); -/*:ref: getdev_ 14 2 13 124 */ -/*:ref: wrline_ 14 4 13 13 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ - -extern int psv2pl_(doublereal *point, doublereal *span1, doublereal *span2, doublereal *plane); -/*:ref: return_ 12 0 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int putact_(integer *action); -extern int getact_(integer *action); - -extern int putdev_(char *device, ftnlen device_len); -extern int getdev_(char *device, ftnlen device_len); - -extern int putlms_(char *msg, ftnlen msg_len); -extern int getlms_(char *msg, ftnlen msg_len); - -extern int putsms_(char *msg, ftnlen msg_len); -extern int getsms_(char *msg, ftnlen msg_len); - -extern int pxform_(char *from, char *to, doublereal *et, doublereal *rotate, ftnlen from_len, ftnlen to_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: refchg_ 14 4 4 4 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int pxfrm2_(char *from, char *to, doublereal *etfrom, doublereal *etto, doublereal *rotate, ftnlen from_len, ftnlen to_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: refchg_ 14 4 4 4 7 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int q2m_(doublereal *q, doublereal *r__); - -extern int qderiv_(integer *n, doublereal *f0, doublereal *f2, doublereal *delta, doublereal *dfdt); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vlcomg_ 14 6 4 7 7 7 7 7 */ - -extern int qdq2av_(doublereal *q, doublereal *dq, doublereal *av); -/*:ref: vhatg_ 14 3 7 4 7 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: qxq_ 14 3 7 7 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ - -extern int quote_(char *in, char *left, char *right, char *out, ftnlen in_len, ftnlen left_len, ftnlen right_len, ftnlen out_len); -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ - -extern int qxq_(doublereal *q1, doublereal *q2, doublereal *qout); -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vlcom3_ 14 7 7 7 7 7 7 7 7 */ - -extern int radrec_(doublereal *range, doublereal *ra, doublereal *dec, doublereal *rectan); -/*:ref: latrec_ 14 4 7 7 7 7 */ - -extern int rav2xf_(doublereal *rot, doublereal *av, doublereal *xform); -/*:ref: mxm_ 14 3 7 7 7 */ - -extern int raxisa_(doublereal *matrix, doublereal *axis, doublereal *angle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: m2q_ 14 2 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: pi_ 7 0 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ - -extern int rdencc_(integer *unit, integer *n, char *data, ftnlen data_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: hx2int_ 14 6 13 4 12 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int rdencd_(integer *unit, integer *n, doublereal *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: hx2dp_ 14 6 13 7 12 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int rdenci_(integer *unit, integer *n, integer *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: hx2int_ 14 6 13 4 12 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int rdker_(char *kernel, char *line, integer *number, logical *eof, ftnlen kernel_len, ftnlen line_len); -extern int rdknew_(char *kernel, ftnlen kernel_len); -extern int rdkdat_(char *line, logical *eof, ftnlen line_len); -extern int rdklin_(char *kernel, integer *number, ftnlen kernel_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cltext_ 14 2 13 124 */ -/*:ref: zzsetnnread_ 14 1 12 */ -/*:ref: rdtext_ 14 5 13 13 12 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: failed_ 12 0 */ - -extern int rdkvar_(char *tabsym, integer *tabptr, doublereal *tabval, char *name__, logical *eof, ftnlen tabsym_len, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: rdkdat_ 14 3 13 12 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: replch_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: nextwd_ 14 6 13 13 13 124 124 124 */ -/*:ref: sydeld_ 14 6 13 13 4 7 124 124 */ -/*:ref: tparse_ 14 5 13 7 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ -/*:ref: syenqd_ 14 7 13 7 13 4 7 124 124 */ - -extern int rdnbl_(char *file, char *line, logical *eof, ftnlen file_len, ftnlen line_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: rdtext_ 14 5 13 13 12 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int rdtext_(char *file, char *line, logical *eof, ftnlen file_len, ftnlen line_len); -extern int cltext_(char *file, ftnlen file_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: getlun_ 14 1 4 */ - -extern int readla_(integer *unit, integer *maxlin, integer *numlin, char *array, logical *eof, ftnlen array_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: readln_ 14 4 4 13 12 124 */ -/*:ref: failed_ 12 0 */ - -extern int readln_(integer *unit, char *line, logical *eof, ftnlen line_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int reccyl_(doublereal *rectan, doublereal *r__, doublereal *long__, doublereal *z__); -/*:ref: twopi_ 7 0 */ - -extern int recgeo_(doublereal *rectan, doublereal *re, doublereal *f, doublereal *long__, doublereal *lat, doublereal *alt); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: surfnm_ 14 5 7 7 7 7 7 */ -/*:ref: reclat_ 14 4 7 7 7 7 */ - -extern int reclat_(doublereal *rectan, doublereal *radius, doublereal *long__, doublereal *lat); - -extern int recpgr_(char *body, doublereal *rectan, doublereal *re, doublereal *f, doublereal *lon, doublereal *lat, doublereal *alt, ftnlen body_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: plnsns_ 4 1 4 */ -/*:ref: recgeo_ 14 6 7 7 7 7 7 7 */ -/*:ref: twopi_ 7 0 */ -/*:ref: brcktd_ 7 3 7 7 7 */ - -extern int recrad_(doublereal *rectan, doublereal *range, doublereal *ra, doublereal *dec); -/*:ref: reclat_ 14 4 7 7 7 7 */ -/*:ref: twopi_ 7 0 */ - -extern int recsph_(doublereal *rectan, doublereal *r__, doublereal *colat, doublereal *long__); - -extern int refchg_(integer *frame1, integer *frame2, doublereal *et, doublereal *rotate); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ident_ 14 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: rotget_ 14 5 4 7 7 4 12 */ -/*:ref: zzrxr_ 14 3 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zznofcon_ 14 7 7 4 4 4 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: xpose_ 14 2 7 7 */ - -extern int remlac_(integer *ne, integer *loc, char *array, integer *na, ftnlen array_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int remlad_(integer *ne, integer *loc, doublereal *array, integer *na); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int remlai_(integer *ne, integer *loc, integer *array, integer *na); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int removc_(char *item, char *a, ftnlen item_len, ftnlen a_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int removd_(doublereal *item, doublereal *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: bsrchd_ 4 3 7 4 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int removi_(integer *item, integer *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: bsrchi_ 4 3 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int remsub_(char *in, integer *left, integer *right, char *out, ftnlen in_len, ftnlen out_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ - -extern int reordc_(integer *iorder, integer *ndim, char *array, ftnlen array_len); - -extern int reordd_(integer *iorder, integer *ndim, doublereal *array); - -extern int reordi_(integer *iorder, integer *ndim, integer *array); - -extern int reordl_(integer *iorder, integer *ndim, logical *array); - -extern int replch_(char *instr, char *old, char *new__, char *outstr, ftnlen instr_len, ftnlen old_len, ftnlen new_len, ftnlen outstr_len); - -extern int replwd_(char *instr, integer *nth, char *new__, char *outstr, ftnlen instr_len, ftnlen new_len, ftnlen outstr_len); -/*:ref: nthwd_ 14 6 13 4 13 4 124 124 */ -/*:ref: fndnwd_ 14 5 13 4 4 4 124 */ -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ - -extern int repmc_(char *in, char *marker, char *value, char *out, ftnlen in_len, ftnlen marker_len, ftnlen value_len, ftnlen out_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: zzrepsub_ 14 8 13 4 4 13 13 124 124 124 */ - -extern int repmct_(char *in, char *marker, integer *value, char *case__, char *out, ftnlen in_len, ftnlen marker_len, ftnlen case_len, ftnlen out_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: inttxt_ 14 3 4 13 124 */ -/*:ref: lcase_ 14 4 13 13 124 124 */ -/*:ref: repsub_ 14 8 13 4 4 13 13 124 124 124 */ - -extern int repmd_(char *in, char *marker, doublereal *value, integer *sigdig, char *out, ftnlen in_len, ftnlen marker_len, ftnlen out_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: dpstr_ 14 4 7 4 13 124 */ -/*:ref: zzrepsub_ 14 8 13 4 4 13 13 124 124 124 */ - -extern int repmf_(char *in, char *marker, doublereal *value, integer *sigdig, char *format, char *out, ftnlen in_len, ftnlen marker_len, ftnlen format_len, ftnlen out_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: dpstrf_ 14 6 7 4 13 13 124 124 */ -/*:ref: zzrepsub_ 14 8 13 4 4 13 13 124 124 124 */ - -extern int repmi_(char *in, char *marker, integer *value, char *out, ftnlen in_len, ftnlen marker_len, ftnlen out_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: zzrepsub_ 14 8 13 4 4 13 13 124 124 124 */ - -extern int repmot_(char *in, char *marker, integer *value, char *case__, char *out, ftnlen in_len, ftnlen marker_len, ftnlen case_len, ftnlen out_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: intord_ 14 3 4 13 124 */ -/*:ref: lcase_ 14 4 13 13 124 124 */ -/*:ref: repsub_ 14 8 13 4 4 13 13 124 124 124 */ - -extern int repsub_(char *in, integer *left, integer *right, char *string, char *out, ftnlen in_len, ftnlen string_len, ftnlen out_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ - -extern int reset_(void); -/*:ref: seterr_ 12 1 12 */ -/*:ref: putsms_ 14 2 13 124 */ -/*:ref: putlms_ 14 2 13 124 */ -/*:ref: accept_ 12 1 12 */ - -extern logical return_(void); -/*:ref: failed_ 12 0 */ -/*:ref: getact_ 14 1 4 */ - -extern int rjust_(char *input, char *output, ftnlen input_len, ftnlen output_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ - -extern int rmaind_(doublereal *num, doublereal *denom, doublereal *q, doublereal *rem); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int rmaini_(integer *num, integer *denom, integer *q, integer *rem); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int rmdupc_(integer *nelt, char *array, ftnlen array_len); -/*:ref: shellc_ 14 3 4 13 124 */ - -extern int rmdupd_(integer *nelt, doublereal *array); -/*:ref: shelld_ 14 2 4 7 */ - -extern int rmdupi_(integer *nelt, integer *array); -/*:ref: shelli_ 14 2 4 4 */ - -extern int rotate_(doublereal *angle, integer *iaxis, doublereal *mout); - -extern int rotget_(integer *infrm, doublereal *et, doublereal *rotate, integer *outfrm, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: tipbod_ 14 5 13 4 7 7 124 */ -/*:ref: xpose_ 14 2 7 7 */ -/*:ref: ckfrot_ 14 5 4 7 7 4 12 */ -/*:ref: tkfram_ 14 4 4 7 4 12 */ -/*:ref: zzdynrot_ 14 5 4 4 7 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int rotmat_(doublereal *m1, doublereal *angle, integer *iaxis, doublereal *mout); -/*:ref: moved_ 14 3 7 4 7 */ - -extern int rotvec_(doublereal *v1, doublereal *angle, integer *iaxis, doublereal *vout); - -extern doublereal rpd_(void); - -extern int rquad_(doublereal *a, doublereal *b, doublereal *c__, doublereal *root1, doublereal *root2); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern integer rtrim_(char *string, ftnlen string_len); -/*:ref: lastnb_ 4 2 13 124 */ - -extern int saelgv_(doublereal *vec1, doublereal *vec2, doublereal *smajor, doublereal *sminor); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: diags2_ 14 3 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ - -extern logical samch_(char *str1, integer *l1, char *str2, integer *l2, ftnlen str1_len, ftnlen str2_len); - -extern logical samchi_(char *str1, integer *l1, char *str2, integer *l2, ftnlen str1_len, ftnlen str2_len); -/*:ref: eqchr_ 12 4 13 13 124 124 */ - -extern logical sameai_(integer *a1, integer *a2, integer *ndim); - -extern logical samsbi_(char *str1, integer *b1, integer *e1, char *str2, integer *b2, integer *e2, ftnlen str1_len, ftnlen str2_len); -/*:ref: nechr_ 12 4 13 13 124 124 */ - -extern logical samsub_(char *str1, integer *b1, integer *e1, char *str2, integer *b2, integer *e2, ftnlen str1_len, ftnlen str2_len); - -extern int sc01_(integer *sc, char *clkstr, doublereal *ticks, doublereal *sclkdp, doublereal *et, ftnlen clkstr_len); -extern int sctk01_(integer *sc, char *clkstr, doublereal *ticks, ftnlen clkstr_len); -extern int scfm01_(integer *sc, doublereal *ticks, char *clkstr, ftnlen clkstr_len); -extern int scte01_(integer *sc, doublereal *sclkdp, doublereal *et); -extern int scet01_(integer *sc, doublereal *et, doublereal *sclkdp); -extern int scec01_(integer *sc, doublereal *et, doublereal *sclkdp); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: movec_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzcvpool_ 14 4 13 4 12 124 */ -/*:ref: scli01_ 14 6 13 4 4 4 4 124 */ -/*:ref: scld01_ 14 6 13 4 4 4 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: lparsm_ 14 8 13 13 4 4 13 124 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: dpstrf_ 14 6 7 4 13 13 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: unitim_ 7 5 7 13 13 124 124 */ - -extern int scanit_(char *string, integer *start, integer *room, integer *nmarks, char *marks, integer *mrklen, integer *pnters, integer *ntokns, integer *ident, integer *beg, integer *end, ftnlen string_len, ftnlen marks_len); -extern int scanpr_(integer *nmarks, char *marks, integer *mrklen, integer *pnters, ftnlen marks_len); -extern int scan_(char *string, char *marks, integer *mrklen, integer *pnters, integer *room, integer *start, integer *ntokns, integer *ident, integer *beg, integer *end, ftnlen string_len, ftnlen marks_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: rmdupc_ 14 3 4 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: ncpos_ 4 5 13 13 4 124 124 */ - -extern int scanrj_(integer *ids, integer *n, integer *ntokns, integer *ident, integer *beg, integer *end); -/*:ref: isrchi_ 4 3 4 4 4 */ - -extern int scardc_(integer *card, char *cell, ftnlen cell_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dechar_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: enchar_ 14 3 4 13 124 */ - -extern int scardd_(integer *card, doublereal *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int scardi_(integer *card, integer *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int scdecd_(integer *sc, doublereal *sclkdp, char *sclkch, ftnlen sclkch_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: scpart_ 14 4 4 4 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: scfmt_ 14 4 4 7 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ - -extern int sce2c_(integer *sc, doublereal *et, doublereal *sclkdp); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sctype_ 4 1 4 */ -/*:ref: scec01_ 14 3 4 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sce2s_(integer *sc, doublereal *et, char *sclkch, ftnlen sclkch_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sce2t_ 14 3 4 7 7 */ -/*:ref: scdecd_ 14 4 4 7 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sce2t_(integer *sc, doublereal *et, doublereal *sclkdp); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sctype_ 4 1 4 */ -/*:ref: scet01_ 14 3 4 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int scencd_(integer *sc, char *sclkch, doublereal *sclkdp, ftnlen sclkch_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cpos_ 4 5 13 13 4 124 124 */ -/*:ref: sctiks_ 14 4 4 13 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: scpart_ 14 4 4 4 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ - -extern int scfmt_(integer *sc, doublereal *ticks, char *clkstr, ftnlen clkstr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sctype_ 4 1 4 */ -/*:ref: scfm01_ 14 4 4 7 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sclu01_(char *name__, integer *sc, integer *maxnv, integer *n, integer *ival, doublereal *dval, ftnlen name_len); -extern int scli01_(char *name__, integer *sc, integer *maxnv, integer *n, integer *ival, ftnlen name_len); -extern int scld01_(char *name__, integer *sc, integer *maxnv, integer *n, doublereal *dval, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: repmd_ 14 8 13 13 7 4 13 124 124 124 */ - -extern int scpars_(integer *sc, char *sclkch, logical *error, char *msg, doublereal *sclkdp, ftnlen sclkch_len, ftnlen msg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cpos_ 4 5 13 13 4 124 124 */ -/*:ref: sctype_ 4 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: scps01_ 14 7 4 13 12 13 7 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: scpart_ 14 4 4 4 7 7 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ - -extern int scpart_(integer *sc, integer *nparts, doublereal *pstart, doublereal *pstop); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzcvpool_ 14 4 13 4 12 124 */ -/*:ref: scld01_ 14 6 13 4 4 4 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int scps01_(integer *sc, char *clkstr, logical *error, char *msg, doublereal *ticks, ftnlen clkstr_len, ftnlen msg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: scli01_ 14 6 13 4 4 4 4 124 */ -/*:ref: scld01_ 14 6 13 4 4 4 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lparsm_ 14 8 13 13 4 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ - -extern int scs2e_(integer *sc, char *sclkch, doublereal *et, ftnlen sclkch_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: scencd_ 14 4 4 13 7 124 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sct2e_(integer *sc, doublereal *sclkdp, doublereal *et); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sctype_ 4 1 4 */ -/*:ref: scte01_ 14 3 4 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sctiks_(integer *sc, char *clkstr, doublereal *ticks, ftnlen clkstr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sctype_ 4 1 4 */ -/*:ref: sctk01_ 14 4 4 13 7 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sctran_(char *clknam, integer *clkid, logical *found, ftnlen clknam_len); -extern int scn2id_(char *clknam, integer *clkid, logical *found, ftnlen clknam_len); -extern int scid2n_(integer *clkid, char *clknam, logical *found, ftnlen clknam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: posr_ 4 5 13 13 4 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: bodn2c_ 14 4 13 4 12 124 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern integer sctype_(integer *sc); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzcvpool_ 14 4 13 4 12 124 */ -/*:ref: scli01_ 14 6 13 4 4 4 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sdiffc_(char *a, char *b, char *c__, ftnlen a_len, ftnlen b_len, ftnlen c_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: excess_ 14 3 4 13 124 */ - -extern int sdiffd_(doublereal *a, doublereal *b, doublereal *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sdiffi_(integer *a, integer *b, integer *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sepool_(char *item, integer *fidx, char *contin, char *string, integer *size, integer *lidx, logical *found, ftnlen item_len, ftnlen contin_len, ftnlen string_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ - -extern logical setc_(char *a, char *op, char *b, ftnlen a_len, ftnlen op_len, ftnlen b_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern logical setd_(doublereal *a, char *op, doublereal *b, ftnlen op_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern logical seterr_(logical *status); -extern logical failed_(void); - -extern logical seti_(integer *a, char *op, integer *b, ftnlen op_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int setmsg_(char *msg, ftnlen msg_len); -/*:ref: allowd_ 12 0 */ -/*:ref: putlms_ 14 2 13 124 */ - -extern int sgfcon_(integer *handle, doublereal *descr, integer *first, integer *last, doublereal *values); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sgmeta_ 14 4 4 7 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int sgfpkt_(integer *handle, doublereal *descr, integer *first, integer *last, doublereal *values, integer *ends); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sgmeta_ 14 4 4 7 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int sgfref_(integer *handle, doublereal *descr, integer *first, integer *last, doublereal *values); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sgmeta_ 14 4 4 7 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int sgfrvi_(integer *handle, doublereal *descr, doublereal *x, doublereal *value, integer *indx, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intmax_ 4 0 */ -/*:ref: sgmeta_ 14 4 4 7 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ - -extern int sgmeta_(integer *handle, doublereal *descr, integer *mnemon, integer *value); -/*:ref: return_ 12 0 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafhsf_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int sgseqw_(integer *handle, doublereal *descr, char *segid, integer *nconst, doublereal *const__, integer *npkts, integer *pktsiz, doublereal *pktdat, integer *nrefs, doublereal *refdat, integer *idxtyp, ftnlen segid_len); -extern int sgbwfs_(integer *handle, doublereal *descr, char *segid, integer *nconst, doublereal *const__, integer *pktsiz, integer *idxtyp, ftnlen segid_len); -extern int sgbwvs_(integer *handle, doublereal *descr, char *segid, integer *nconst, doublereal *const__, integer *idxtyp, ftnlen segid_len); -extern int sgwfpk_(integer *handle, integer *npkts, doublereal *pktdat, integer *nrefs, doublereal *refdat); -extern int sgwvpk_(integer *handle, integer *npkts, integer *pktsiz, doublereal *pktdat, integer *nrefs, doublereal *refdat); -extern int sgwes_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: dafhsf_ 14 3 4 4 4 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafcad_ 14 1 4 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafena_ 14 0 */ - -extern int sharpr_(doublereal *rot); -/*:ref: vhatip_ 14 1 7 */ -/*:ref: ucrss_ 14 3 7 7 7 */ - -extern int shellc_(integer *ndim, char *array, ftnlen array_len); -/*:ref: swapc_ 14 4 13 13 124 124 */ - -extern int shelld_(integer *ndim, doublereal *array); -/*:ref: swapd_ 14 2 7 7 */ - -extern int shelli_(integer *ndim, integer *array); -/*:ref: swapi_ 14 2 4 4 */ - -extern int shiftc_(char *in, char *dir, integer *nshift, char *fillc, char *out, ftnlen in_len, ftnlen dir_len, ftnlen fillc_len, ftnlen out_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: shiftl_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: shiftr_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int shiftl_(char *in, integer *nshift, char *fillc, char *out, ftnlen in_len, ftnlen fillc_len, ftnlen out_len); - -extern int shiftr_(char *in, integer *nshift, char *fillc, char *out, ftnlen in_len, ftnlen fillc_len, ftnlen out_len); - -extern int sigdgt_(char *in, char *out, ftnlen in_len, ftnlen out_len); -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: cpos_ 4 5 13 13 4 124 124 */ - -extern int sigerr_(char *msg, ftnlen msg_len); -/*:ref: getact_ 14 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: seterr_ 12 1 12 */ -/*:ref: putsms_ 14 2 13 124 */ -/*:ref: freeze_ 14 0 */ -/*:ref: outmsg_ 14 2 13 124 */ -/*:ref: accept_ 12 1 12 */ -/*:ref: byebye_ 14 2 13 124 */ - -extern int sincpt_(char *method, char *target, doublereal *et, char *fixref, char *abcorr, char *obsrvr, char *dref, doublereal *dvec, doublereal *spoint, doublereal *trgepc, doublereal *srfvec, logical *found, ftnlen method_len, ftnlen target_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen dref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: pxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: dasine_ 7 2 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: npedln_ 14 7 7 7 7 7 7 7 7 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: vhatip_ 14 1 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ - -extern integer sizec_(char *cell, ftnlen cell_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dechar_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer sized_(doublereal *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer sizei_(integer *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical smsgnd_(doublereal *x, doublereal *y); - -extern logical smsgni_(integer *x, integer *y); - -extern logical somfls_(logical *logcls, integer *n); - -extern logical somtru_(logical *logcls, integer *n); - -extern int spca2b_(char *text, char *binary, ftnlen text_len, ftnlen binary_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: txtopr_ 14 3 13 4 124 */ -/*:ref: spct2b_ 14 3 4 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spcac_(integer *handle, integer *unit, char *bmark, char *emark, ftnlen bmark_len, ftnlen emark_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: locln_ 14 10 4 13 13 13 4 4 12 124 124 124 */ -/*:ref: countc_ 4 5 4 4 4 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafarr_ 14 2 4 4 */ -/*:ref: lastnb_ 4 2 13 124 */ - -extern int spcb2a_(char *binary, char *text, ftnlen binary_len, ftnlen text_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: txtopn_ 14 3 13 4 124 */ -/*:ref: spcb2t_ 14 3 13 4 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spcb2t_(char *binary, integer *unit, ftnlen binary_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafb2t_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: spcec_ 14 2 4 4 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int spcdc_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: dafrrr_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spcec_(integer *handle, integer *unit); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafsih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int spcopn_(char *spc, char *ifname, integer *handle, ftnlen spc_len, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafopn_ 14 8 13 4 4 13 4 4 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spcrfl_(integer *handle, char *line, logical *eoc, ftnlen line_len); -extern int spcrnl_(char *line, logical *eoc, ftnlen line_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafrfr_ 14 8 4 4 4 13 4 4 4 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: pos_ 4 5 13 13 4 124 124 */ - -extern int spct2b_(integer *unit, char *binary, ftnlen binary_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: daft2b_ 14 4 4 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ltrim_ 4 2 13 124 */ -/*:ref: getlun_ 14 1 4 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: dafopw_ 14 3 13 4 124 */ -/*:ref: spcac_ 14 6 4 4 13 13 124 124 */ -/*:ref: dafcls_ 14 1 4 */ - -extern doublereal spd_(void); - -extern int sphcyl_(doublereal *radius, doublereal *colat, doublereal *slong, doublereal *r__, doublereal *long__, doublereal *z__); - -extern int sphlat_(doublereal *r__, doublereal *colat, doublereal *longs, doublereal *radius, doublereal *long__, doublereal *lat); -/*:ref: halfpi_ 7 0 */ - -extern int sphrec_(doublereal *r__, doublereal *colat, doublereal *long__, doublereal *rectan); - -extern doublereal sphsd_(doublereal *radius, doublereal *long1, doublereal *lat1, doublereal *long2, doublereal *lat2); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: brcktd_ 7 3 7 7 7 */ - -extern int spk14a_(integer *handle, integer *ncsets, doublereal *coeffs, doublereal *epochs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sgwfpk_ 14 5 4 4 7 4 7 */ - -extern int spk14b_(integer *handle, char *segid, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, integer *chbdeg, ftnlen segid_len, ftnlen frame_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: spkpds_ 14 8 4 4 13 4 7 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: sgbwfs_ 14 8 4 7 13 4 7 4 4 124 */ - -extern int spk14e_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sgwes_ 14 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkacs_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: spkaps_ 14 11 4 7 13 13 7 7 7 7 7 124 124 */ - -extern int spkapo_(integer *targ, doublereal *et, char *ref, doublereal *sobs, char *abcorr, doublereal *ptarg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: spkgps_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ - -extern int spkapp_(integer *targ, doublereal *et, char *ref, doublereal *sobs, char *abcorr, doublereal *starg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ - -extern int spkaps_(integer *targ, doublereal *et, char *ref, char *abcorr, doublereal *stobs, doublereal *accobs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: spkltc_ 14 10 4 7 13 13 7 7 7 7 124 124 */ -/*:ref: zzstelab_ 14 6 12 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int spkbsr_(char *fname, integer *handle, integer *body, doublereal *et, doublereal *descr, char *ident, logical *found, ftnlen fname_len, ftnlen ident_len); -extern int spklef_(char *fname, integer *handle, ftnlen fname_len); -extern int spkuef_(integer *handle); -extern int spksfs_(integer *body, doublereal *et, integer *handle, doublereal *descr, char *ident, logical *found, ftnlen ident_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: dafcls_ 14 1 4 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: intmax_ 4 0 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: lnkprv_ 4 2 4 4 */ -/*:ref: dpmin_ 7 0 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafbbs_ 14 1 4 */ -/*:ref: daffpa_ 14 1 12 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: dafgn_ 14 2 13 124 */ -/*:ref: lnkilb_ 14 3 4 4 4 */ -/*:ref: lnkila_ 14 3 4 4 4 */ -/*:ref: lnktl_ 4 2 4 4 */ - -extern int spkcls_(integer *handle); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int spkcov_(char *spk, integer *idcode, doublereal *cover, ftnlen spk_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: getfat_ 14 6 13 13 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: wninsd_ 14 3 7 7 7 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int spkcpo_(char *target, doublereal *et, char *outref, char *refloc, char *abcorr, doublereal *obspos, char *obsctr, char *obsref, doublereal *state, doublereal *lt, ftnlen target_len, ftnlen outref_len, ftnlen refloc_len, ftnlen abcorr_len, ftnlen obsctr_len, ftnlen obsref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: spkcvo_ 14 17 13 7 13 13 13 7 7 13 13 7 7 124 124 124 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkcpt_(doublereal *trgpos, char *trgctr, char *trgref, doublereal *et, char *outref, char *refloc, char *abcorr, char *obsrvr, doublereal *state, doublereal *lt, ftnlen trgctr_len, ftnlen trgref_len, ftnlen outref_len, ftnlen refloc_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: spkcvt_ 14 17 7 7 13 13 7 13 13 13 13 7 7 124 124 124 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkcvo_(char *target, doublereal *et, char *outref, char *refloc, char *abcorr, doublereal *obssta, doublereal *obsepc, char *obsctr, char *obsref, doublereal *state, doublereal *lt, ftnlen target_len, ftnlen outref_len, ftnlen refloc_len, ftnlen abcorr_len, ftnlen obsctr_len, ftnlen obsref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: esrchc_ 4 5 13 4 13 124 124 */ -/*:ref: zzcvssta_ 14 5 7 4 7 13 124 */ -/*:ref: zzspkfzo_ 14 9 4 7 13 13 200 7 7 124 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: zzspkfao_ 14 10 4 7 13 13 200 7 7 7 124 124 */ -/*:ref: zzcorsxf_ 14 4 12 7 7 7 */ - -extern int spkcvt_(doublereal *trgsta, doublereal *trgepc, char *trgctr, char *trgref, doublereal *et, char *outref, char *refloc, char *abcorr, char *obsrvr, doublereal *state, doublereal *lt, ftnlen trgctr_len, ftnlen trgref_len, ftnlen outref_len, ftnlen refloc_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: esrchc_ 4 5 13 4 13 124 124 */ -/*:ref: zzcvssta_ 14 5 7 4 7 13 124 */ -/*:ref: zzspkfzt_ 14 9 200 7 13 13 4 7 7 124 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: zzspkfat_ 14 10 200 7 13 13 4 7 7 7 124 124 */ -/*:ref: zzcorsxf_ 14 4 12 7 7 7 */ - -extern int spke01_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int spke02_(doublereal *et, doublereal *record, doublereal *xyzdot); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: chbint_ 14 6 7 4 7 7 7 7 */ - -extern int spke03_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: chbval_ 14 5 7 4 7 7 7 */ - -extern int spke05_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: prop2b_ 14 4 7 7 7 7 */ -/*:ref: pi_ 7 0 */ -/*:ref: vlcomg_ 14 6 4 7 7 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spke08_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: xposeg_ 14 4 7 4 4 7 */ -/*:ref: lgresp_ 7 6 4 7 7 7 7 7 */ - -extern int spke09_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: xposeg_ 14 4 7 4 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: lgrint_ 7 5 4 7 7 7 7 */ - -extern int spke10_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: pi_ 7 0 */ -/*:ref: twopi_ 7 0 */ -/*:ref: ev2lin_ 14 4 7 7 7 7 */ -/*:ref: dpspce_ 14 4 7 7 7 7 */ -/*:ref: vlcomg_ 14 6 4 7 7 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: zzteme_ 14 2 7 7 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spke12_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: hrmesp_ 14 8 4 7 7 7 7 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spke13_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: hrmint_ 14 7 4 7 7 7 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spke14_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chbval_ 14 5 7 4 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spke15_(doublereal *et, doublereal *recin, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vhatip_ 14 1 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: dpr_ 7 0 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: prop2b_ 14 4 7 7 7 7 */ -/*:ref: twopi_ 7 0 */ -/*:ref: pi_ 7 0 */ -/*:ref: vrotv_ 14 4 7 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int spke17_(doublereal *et, doublereal *recin, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqncpv_ 14 6 7 7 7 7 7 7 */ - -extern int spke18_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: xpsgip_ 14 3 4 4 7 */ -/*:ref: lgrint_ 7 5 4 7 7 7 7 */ -/*:ref: hrmint_ 14 7 4 7 7 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int spke19_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spke18_ 14 3 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spke20_(doublereal *et, doublereal *record, doublereal *xyzdot); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: chbigr_ 14 6 4 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ - -extern int spke21_(doublereal *et, doublereal *record, doublereal *state); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int spkez_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *starg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: spkacs_ 14 10 4 7 13 13 4 7 7 7 124 124 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: spkltc_ 14 10 4 7 13 13 7 7 7 7 124 124 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ - -extern int spkezp_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *ptarg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: ltrim_ 4 2 13 124 */ -/*:ref: eqchr_ 12 4 13 13 124 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: spkgps_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: spkapo_ 14 9 4 7 13 7 13 7 7 124 124 */ -/*:ref: refchg_ 14 4 4 4 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ - -extern int spkezr_(char *targ, doublereal *et, char *ref, char *abcorr, char *obs, doublereal *starg, doublereal *lt, ftnlen targ_len, ftnlen ref_len, ftnlen abcorr_len, ftnlen obs_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ - -extern int spkgeo_(integer *targ, doublereal *et, char *ref, integer *obs, doublereal *state, doublereal *lt, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: frstnp_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spksfs_ 14 7 4 7 4 7 13 12 124 */ -/*:ref: spkpvn_ 14 6 4 7 7 4 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ - -extern int spkgps_(integer *targ, doublereal *et, char *ref, integer *obs, doublereal *pos, doublereal *lt, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: frstnp_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spksfs_ 14 7 4 7 4 7 13 12 124 */ -/*:ref: spkpvn_ 14 6 4 7 7 4 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: refchg_ 14 4 4 4 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ - -extern int spkltc_(integer *targ, doublereal *et, char *ref, char *abcorr, doublereal *stobs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int spkobj_(char *spk, integer *ids, ftnlen spk_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: getfat_ 14 6 13 13 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafopr_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: dafcls_ 14 1 4 */ - -extern int spkopa_(char *file, integer *handle, ftnlen file_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: exists_ 12 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: getfat_ 14 6 13 13 13 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafopw_ 14 3 13 4 124 */ - -extern int spkopn_(char *name__, char *ifname, integer *ncomch, integer *handle, ftnlen name_len, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafonw_ 14 10 13 13 4 4 13 4 4 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkpds_(integer *body, integer *center, char *frame, integer *type__, doublereal *first, doublereal *last, doublereal *descr, ftnlen frame_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ - -extern int spkpos_(char *targ, doublereal *et, char *ref, char *abcorr, char *obs, doublereal *ptarg, doublereal *lt, ftnlen targ_len, ftnlen ref_len, ftnlen abcorr_len, ftnlen obs_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ - -extern int spkpv_(integer *handle, doublereal *descr, doublereal *et, char *ref, doublereal *state, integer *center, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: spkpvn_ 14 6 4 7 7 4 7 4 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkpvn_(integer *handle, doublereal *descr, doublereal *et, integer *ref, doublereal *state, integer *center); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: spkr01_ 14 4 4 7 7 7 */ -/*:ref: spke01_ 14 3 7 7 7 */ -/*:ref: spkr02_ 14 4 4 7 7 7 */ -/*:ref: spke02_ 14 3 7 7 7 */ -/*:ref: spkr03_ 14 4 4 7 7 7 */ -/*:ref: spke03_ 14 3 7 7 7 */ -/*:ref: spkr05_ 14 4 4 7 7 7 */ -/*:ref: spke05_ 14 3 7 7 7 */ -/*:ref: spkr08_ 14 4 4 7 7 7 */ -/*:ref: spke08_ 14 3 7 7 7 */ -/*:ref: spkr09_ 14 4 4 7 7 7 */ -/*:ref: spke09_ 14 3 7 7 7 */ -/*:ref: spkr10_ 14 4 4 7 7 7 */ -/*:ref: spke10_ 14 3 7 7 7 */ -/*:ref: spkr12_ 14 4 4 7 7 7 */ -/*:ref: spke12_ 14 3 7 7 7 */ -/*:ref: spkr13_ 14 4 4 7 7 7 */ -/*:ref: spke13_ 14 3 7 7 7 */ -/*:ref: sgfcon_ 14 5 4 7 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: spkr14_ 14 4 4 7 7 7 */ -/*:ref: spke14_ 14 3 7 7 7 */ -/*:ref: spkr15_ 14 4 4 7 7 7 */ -/*:ref: spke15_ 14 3 7 7 7 */ -/*:ref: spkr17_ 14 4 4 7 7 7 */ -/*:ref: spke17_ 14 3 7 7 7 */ -/*:ref: spkr18_ 14 4 4 7 7 7 */ -/*:ref: spke18_ 14 3 7 7 7 */ -/*:ref: spkr19_ 14 4 4 7 7 7 */ -/*:ref: spke19_ 14 3 7 7 7 */ -/*:ref: spkr20_ 14 4 4 7 7 7 */ -/*:ref: spke20_ 14 3 7 7 7 */ -/*:ref: spkr21_ 14 4 4 7 7 7 */ -/*:ref: spke21_ 14 3 7 7 7 */ - -extern int spkr01_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkr02_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkr03_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkr05_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int spkr08_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: odd_ 12 1 4 */ - -extern int spkr09_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: odd_ 12 1 4 */ - -extern int spkr10_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sgfcon_ 14 5 4 7 4 4 7 */ -/*:ref: sgfrvi_ 14 6 4 7 7 7 4 12 */ -/*:ref: sgmeta_ 14 4 4 7 4 4 */ -/*:ref: sgfpkt_ 14 6 4 7 4 4 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkr12_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spkr08_ 14 4 4 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkr13_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spkr09_ 14 4 4 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkr14_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sgfcon_ 14 5 4 7 4 4 7 */ -/*:ref: sgfrvi_ 14 6 4 7 7 7 4 12 */ -/*:ref: sgfpkt_ 14 6 4 7 4 4 7 4 */ - -extern int spkr15_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int spkr17_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int spkr18_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: lstltd_ 4 3 7 4 7 */ - -extern int spkr19_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: odd_ 12 1 4 */ - -extern int spkr20_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: j2000_ 7 0 */ -/*:ref: spd_ 7 0 */ -/*:ref: remlad_ 14 4 4 4 7 4 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkr21_(integer *handle, doublereal *descr, doublereal *et, doublereal *record); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lstltd_ 4 3 7 4 7 */ - -extern int spks01_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spks02_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spks03_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spks05_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spks08_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ - -extern int spks09_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafada_ 14 2 7 4 */ - -extern int spks10_(integer *srchan, doublereal *srcdsc, integer *dsthan, doublereal *dstdsc, char *dstsid, ftnlen dstsid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: sgfcon_ 14 5 4 7 4 4 7 */ -/*:ref: sgbwfs_ 14 8 4 7 13 4 7 4 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sgfrvi_ 14 6 4 7 7 7 4 12 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sgmeta_ 14 4 4 7 4 4 */ -/*:ref: sgfpkt_ 14 6 4 7 4 4 7 4 */ -/*:ref: sgfref_ 14 5 4 7 4 4 7 */ -/*:ref: sgwfpk_ 14 5 4 4 7 4 7 */ -/*:ref: sgwes_ 14 1 4 */ - -extern int spks12_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spks08_ 14 5 4 4 4 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spks13_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spks09_ 14 5 4 4 4 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spks14_(integer *srchan, doublereal *srcdsc, integer *dsthan, doublereal *dstdsc, char *dstsid, ftnlen dstsid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: irfnam_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sgfcon_ 14 5 4 7 4 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sgfrvi_ 14 6 4 7 7 7 4 12 */ -/*:ref: spk14b_ 14 10 4 13 4 4 13 7 7 4 124 124 */ -/*:ref: sgfpkt_ 14 6 4 7 4 4 7 4 */ -/*:ref: sgfref_ 14 5 4 7 4 4 7 */ -/*:ref: spk14a_ 14 4 4 4 7 7 */ -/*:ref: spk14e_ 14 1 4 */ - -extern int spks15_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafada_ 14 2 7 4 */ - -extern int spks17_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafada_ 14 2 7 4 */ - -extern int spks18_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ - -extern int spks19_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: lstltd_ 4 3 7 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: dafhfn_ 14 3 4 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: dafada_ 14 2 7 4 */ - -extern int spks20_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: j2000_ 7 0 */ -/*:ref: spd_ 7 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spks21_(integer *handle, integer *baddr, integer *eaddr, doublereal *begin, doublereal *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkssb_(integer *targ, doublereal *et, char *ref, doublereal *starg, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spksub_(integer *handle, doublereal *descr, char *ident, doublereal *begin, doublereal *end, integer *newh, ftnlen ident_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: spks01_ 14 5 4 4 4 7 7 */ -/*:ref: dafena_ 14 0 */ -/*:ref: spks02_ 14 5 4 4 4 7 7 */ -/*:ref: spks03_ 14 5 4 4 4 7 7 */ -/*:ref: spks05_ 14 5 4 4 4 7 7 */ -/*:ref: spks08_ 14 5 4 4 4 7 7 */ -/*:ref: spks09_ 14 5 4 4 4 7 7 */ -/*:ref: spks10_ 14 6 4 7 4 7 13 124 */ -/*:ref: spks12_ 14 5 4 4 4 7 7 */ -/*:ref: spks13_ 14 5 4 4 4 7 7 */ -/*:ref: spks14_ 14 6 4 7 4 7 13 124 */ -/*:ref: spks15_ 14 5 4 4 4 7 7 */ -/*:ref: spks17_ 14 5 4 4 4 7 7 */ -/*:ref: spks18_ 14 5 4 4 4 7 7 */ -/*:ref: spks19_ 14 5 4 4 4 7 7 */ -/*:ref: spks20_ 14 5 4 4 4 7 7 */ -/*:ref: spks21_ 14 5 4 4 4 7 7 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int spkuds_(doublereal *descr, integer *body, integer *center, integer *frame, integer *type__, doublereal *first, doublereal *last, integer *begin, integer *end); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int spkw01_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, integer *n, doublereal *dlines, doublereal *epochs, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: spkpds_ 14 8 4 4 13 4 7 7 7 124 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw02_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *intlen, integer *n, integer *polydg, doublereal *cdata, doublereal *btime, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: chckid_ 14 5 13 4 13 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw03_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *intlen, integer *n, integer *polydg, doublereal *cdata, doublereal *btime, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: chckid_ 14 5 13 4 13 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw05_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *gm, integer *n, doublereal *states, doublereal *epochs, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw08_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, integer *degree, integer *n, doublereal *states, doublereal *epoch1, doublereal *step, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw09_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, integer *degree, integer *n, doublereal *states, doublereal *epochs, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw10_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *consts, integer *n, doublereal *elems, doublereal *epochs, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spkpds_ 14 8 4 4 13 4 7 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sgbwfs_ 14 8 4 7 13 4 7 4 4 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: zzwahr_ 14 2 7 7 */ -/*:ref: sgwfpk_ 14 5 4 4 7 4 7 */ -/*:ref: sgwes_ 14 1 4 */ - -extern int spkw12_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, integer *degree, integer *n, doublereal *states, doublereal *epoch1, doublereal *step, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: even_ 12 1 4 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: spkpds_ 14 8 4 4 13 4 7 7 7 124 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw13_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, integer *degree, integer *n, doublereal *states, doublereal *epochs, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: even_ 12 1 4 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: spkpds_ 14 8 4 4 13 4 7 7 7 124 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw15_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *epoch, doublereal *tp, doublereal *pa, doublereal *p, doublereal *ecc, doublereal *j2flg, doublereal *pv, doublereal *gm, doublereal *j2, doublereal *radius, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: dpr_ 7 0 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: spkpds_ 14 8 4 4 13 4 7 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw17_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *epoch, doublereal *eqel, doublereal *rapol, doublereal *decpol, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: spkpds_ 14 8 4 4 13 4 7 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw18_(integer *handle, integer *subtyp, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, integer *degree, integer *n, doublereal *packts, doublereal *epochs, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw19_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, integer *nintvl, integer *npkts, integer *subtps, integer *degres, doublereal *packts, doublereal *epochs, doublereal *ivlbds, logical *sellst, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw20_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, doublereal *intlen, integer *n, integer *polydg, doublereal *cdata, doublereal *dscale, doublereal *tscale, doublereal *initjd, doublereal *initfr, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: spd_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: chckid_ 14 5 13 4 13 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int spkw21_(integer *handle, integer *body, integer *center, char *frame, doublereal *first, doublereal *last, char *segid, integer *n, integer *dlsize, doublereal *dlines, doublereal *epochs, ftnlen frame_len, ftnlen segid_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: spkpds_ 14 8 4 4 13 4 7 7 7 124 */ -/*:ref: dafbna_ 14 4 4 7 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafada_ 14 2 7 4 */ -/*:ref: dafena_ 14 0 */ - -extern int srfrec_(integer *body, doublereal *long__, doublereal *lat, doublereal *rectan); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int srfxpt_(char *method, char *target, doublereal *et, char *abcorr, char *obsrvr, char *dref, doublereal *dvec, doublereal *spoint, doublereal *dist, doublereal *trgepc, doublereal *obspos, logical *found, ftnlen method_len, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen dref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: eqchr_ 12 4 13 13 124 124 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: pxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: dasine_ 7 2 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: npedln_ 14 7 7 7 7 7 7 7 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: touchd_ 7 1 7 */ - -extern int ssizec_(integer *size, char *cell, ftnlen cell_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: enchar_ 14 3 4 13 124 */ - -extern int ssized_(integer *size, doublereal *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int ssizei_(integer *size, integer *cell); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int stcc01_(char *catfnm, char *tabnam, logical *istyp1, char *errmsg, ftnlen catfnm_len, ftnlen tabnam_len, ftnlen errmsg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ekopr_ 14 3 13 4 124 */ -/*:ref: eknseg_ 4 1 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ekssum_ 14 14 4 4 13 4 4 13 13 4 4 12 12 124 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: nblen_ 4 2 13 124 */ -/*:ref: ekcls_ 14 1 4 */ - -extern int stcf01_(char *catnam, doublereal *westra, doublereal *eastra, doublereal *sthdec, doublereal *nthdec, integer *nstars, ftnlen catnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dpr_ 7 0 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: repmd_ 14 8 13 13 7 4 13 124 124 124 */ -/*:ref: ekfind_ 14 6 13 4 12 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int stcg01_(integer *index, doublereal *ra, doublereal *dec, doublereal *rasig, doublereal *decsig, integer *catnum, char *sptype, doublereal *vmag, ftnlen sptype_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ekgd_ 14 6 4 4 4 7 12 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ekgi_ 14 6 4 4 4 4 12 12 */ -/*:ref: ekgc_ 14 7 4 4 4 13 12 12 124 */ -/*:ref: rpd_ 7 0 */ - -extern int stcl01_(char *catfnm, char *tabnam, integer *handle, ftnlen catfnm_len, ftnlen tabnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: stcc01_ 14 7 13 13 12 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eklef_ 14 3 13 4 124 */ - -extern int stdio_(char *name__, integer *unit, ftnlen name_len); -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int stelab_(doublereal *pobj, doublereal *vobs, doublereal *appobj); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vrotv_ 14 4 7 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int stlabx_(doublereal *pobj, doublereal *vobs, doublereal *corpos); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int stmp03_(doublereal *x, doublereal *c0, doublereal *c1, doublereal *c2, doublereal *c3); -/*:ref: dpmax_ 7 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int stpool_(char *item, integer *nth, char *contin, char *string, integer *size, logical *found, ftnlen item_len, ftnlen contin_len, ftnlen string_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int str2et_(char *string, doublereal *et, ftnlen string_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: timdef_ 14 6 13 13 13 124 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: zzutcpm_ 14 7 13 4 7 7 4 12 124 */ -/*:ref: tpartv_ 14 15 13 7 4 13 13 12 12 12 13 13 124 124 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: ttrans_ 14 5 13 13 7 124 124 */ -/*:ref: tchckd_ 14 2 13 124 */ -/*:ref: tparch_ 14 2 13 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: tcheck_ 14 9 7 13 12 13 12 13 124 124 124 */ -/*:ref: texpyr_ 14 1 4 */ -/*:ref: jul2gr_ 14 4 4 4 4 4 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: dpfmt_ 14 5 7 13 13 124 124 */ -/*:ref: gr2jul_ 14 4 4 4 4 4 */ - -extern int subpnt_(char *method, char *target, doublereal *et, char *fixref, char *abcorr, char *obsrvr, doublereal *spoint, doublereal *trgepc, doublereal *srfvec, ftnlen method_len, ftnlen target_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: lparse_ 14 8 13 13 4 4 13 124 124 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: pxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: mtxv_ 14 3 7 7 7 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: touchd_ 7 1 7 */ - -extern int subpt_(char *method, char *target, doublereal *et, char *abcorr, char *obsrvr, doublereal *spoint, doublereal *alt, ftnlen method_len, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: vdist_ 7 2 7 7 */ - -extern int subslr_(char *method, char *target, doublereal *et, char *fixref, char *abcorr, char *obsrvr, doublereal *spoint, doublereal *trgepc, doublereal *srfvec, ftnlen method_len, ftnlen target_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: lparse_ 14 8 13 13 4 4 13 124 124 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: pxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: spkcpo_ 14 16 13 7 13 13 13 7 13 13 7 7 124 124 124 124 124 124 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: spkcpt_ 14 16 7 13 13 7 13 13 13 13 7 7 124 124 124 124 124 124 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int subsol_(char *method, char *target, doublereal *et, char *abcorr, char *obsrvr, doublereal *spoint, ftnlen method_len, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: ltime_ 14 7 7 4 13 4 7 7 124 */ -/*:ref: spkpos_ 14 11 13 7 13 13 13 7 7 124 124 124 124 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ - -extern int suffix_(char *suff, integer *spaces, char *string, ftnlen suff_len, ftnlen string_len); -/*:ref: lastnb_ 4 2 13 124 */ - -extern doublereal sumad_(doublereal *array, integer *n); - -extern integer sumai_(integer *array, integer *n); - -extern int surfnm_(doublereal *a, doublereal *b, doublereal *c__, doublereal *point, doublereal *normal); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vhatip_ 14 1 7 */ - -extern int surfpt_(doublereal *positn, doublereal *u, doublereal *a, doublereal *b, doublereal *c__, doublereal *point, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: vperp_ 14 3 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int surfpv_(doublereal *stvrtx, doublereal *stdir, doublereal *a, doublereal *b, doublereal *c__, doublereal *stx, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: surfpt_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dvhat_ 14 2 7 7 */ -/*:ref: surfnm_ 14 5 7 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: vlcom3_ 14 7 7 7 7 7 7 7 7 */ - -extern int swapac_(integer *n, integer *locn, integer *m, integer *locm, char *array, ftnlen array_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: swapc_ 14 4 13 13 124 124 */ -/*:ref: cyacip_ 14 6 4 13 4 13 124 124 */ - -extern int swapad_(integer *n, integer *locn, integer *m, integer *locm, doublereal *array); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: swapd_ 14 2 7 7 */ -/*:ref: cyadip_ 14 5 4 13 4 7 124 */ - -extern int swapai_(integer *n, integer *locn, integer *m, integer *locm, integer *array); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: swapi_ 14 2 4 4 */ -/*:ref: cyaiip_ 14 5 4 13 4 4 124 */ - -extern int swapc_(char *a, char *b, ftnlen a_len, ftnlen b_len); - -extern int swapd_(doublereal *a, doublereal *b); - -extern int swapi_(integer *a, integer *b); - -extern int sxform_(char *from, char *to, doublereal *et, doublereal *xform, ftnlen from_len, ftnlen to_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sydelc_(char *name__, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sydeld_(char *name__, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: remlad_ 14 4 4 4 7 4 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sydeli_(char *name__, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer sydimc_(char *name__, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer sydimd_(char *name__, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer sydimi_(char *name__, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sydupc_(char *name__, char *copy, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen copy_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sydupd_(char *name__, char *copy, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen copy_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: remlad_ 14 4 4 4 7 4 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sydupi_(char *name__, char *copy, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen copy_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syenqc_(char *name__, char *value, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen value_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sysetc_ 14 9 13 13 13 4 13 124 124 124 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syenqd_(char *name__, doublereal *value, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sysetd_ 14 7 13 7 13 4 7 124 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: inslad_ 14 5 7 4 4 7 4 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syenqi_(char *name__, integer *value, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: syseti_ 14 7 13 4 13 4 4 124 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syfetc_(integer *nth, char *tabsym, integer *tabptr, char *tabval, char *name__, logical *found, ftnlen tabsym_len, ftnlen tabval_len, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syfetd_(integer *nth, char *tabsym, integer *tabptr, doublereal *tabval, char *name__, logical *found, ftnlen tabsym_len, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syfeti_(integer *nth, char *tabsym, integer *tabptr, integer *tabval, char *name__, logical *found, ftnlen tabsym_len, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sygetc_(char *name__, char *tabsym, integer *tabptr, char *tabval, integer *n, char *values, logical *found, ftnlen name_len, ftnlen tabsym_len, ftnlen tabval_len, ftnlen values_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: movec_ 14 5 13 4 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sygetd_(char *name__, char *tabsym, integer *tabptr, doublereal *tabval, integer *n, doublereal *values, logical *found, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sygeti_(char *name__, char *tabsym, integer *tabptr, integer *tabval, integer *n, integer *values, logical *found, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int synthc_(char *name__, integer *nth, char *tabsym, integer *tabptr, char *tabval, char *value, logical *found, ftnlen name_len, ftnlen tabsym_len, ftnlen tabval_len, ftnlen value_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int synthd_(char *name__, integer *nth, char *tabsym, integer *tabptr, doublereal *tabval, doublereal *value, logical *found, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int synthi_(char *name__, integer *nth, char *tabsym, integer *tabptr, integer *tabval, integer *value, logical *found, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syordc_(char *name__, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: shellc_ 14 3 4 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syordd_(char *name__, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: shelld_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syordi_(char *name__, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: shelli_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sypopc_(char *name__, char *tabsym, integer *tabptr, char *tabval, char *value, logical *found, ftnlen name_len, ftnlen tabsym_len, ftnlen tabval_len, ftnlen value_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sypopd_(char *name__, char *tabsym, integer *tabptr, doublereal *tabval, doublereal *value, logical *found, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlad_ 14 4 4 4 7 4 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sypopi_(char *name__, char *tabsym, integer *tabptr, integer *tabval, integer *value, logical *found, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sypshc_(char *name__, char *value, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen value_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sysetc_ 14 9 13 13 13 4 13 124 124 124 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sypshd_(char *name__, doublereal *value, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sysetd_ 14 7 13 7 13 4 7 124 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: inslad_ 14 5 7 4 4 7 4 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sypshi_(char *name__, integer *value, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: syseti_ 14 7 13 4 13 4 4 124 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syputc_(char *name__, char *values, integer *n, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen values_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ - -extern int syputd_(char *name__, doublereal *values, integer *n, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: remlad_ 14 4 4 4 7 4 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: inslad_ 14 5 7 4 4 7 4 */ - -extern int syputi_(char *name__, integer *values, integer *n, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ - -extern int syrenc_(char *old, char *new__, char *tabsym, integer *tabptr, char *tabval, ftnlen old_len, ftnlen new_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sydelc_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: swapac_ 14 6 4 4 4 4 13 124 */ -/*:ref: swapai_ 14 5 4 4 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syrend_(char *old, char *new__, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen old_len, ftnlen new_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sydeld_ 14 6 13 13 4 7 124 124 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: swapad_ 14 5 4 4 4 4 7 */ -/*:ref: swapac_ 14 6 4 4 4 4 13 124 */ -/*:ref: swapai_ 14 5 4 4 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syreni_(char *old, char *new__, char *tabsym, integer *tabptr, integer *tabval, ftnlen old_len, ftnlen new_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sydeli_ 14 6 13 13 4 4 124 124 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: swapai_ 14 5 4 4 4 4 4 */ -/*:ref: swapac_ 14 6 4 4 4 4 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syselc_(char *name__, integer *begin, integer *end, char *tabsym, integer *tabptr, char *tabval, char *values, logical *found, ftnlen name_len, ftnlen tabsym_len, ftnlen tabval_len, ftnlen values_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: movec_ 14 5 13 4 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syseld_(char *name__, integer *begin, integer *end, char *tabsym, integer *tabptr, doublereal *tabval, doublereal *values, logical *found, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syseli_(char *name__, integer *begin, integer *end, char *tabsym, integer *tabptr, integer *tabval, integer *values, logical *found, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sysetc_(char *name__, char *value, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen value_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlac_ 14 5 4 4 13 4 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sysetd_(char *name__, doublereal *value, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlad_ 14 4 4 4 7 4 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: inslad_ 14 5 7 4 4 7 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int syseti_(char *name__, integer *value, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: lstlec_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: remlai_ 14 4 4 4 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: inslac_ 14 7 13 4 4 13 4 124 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: inslai_ 14 5 4 4 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sytrnc_(char *name__, integer *i__, integer *j, char *tabsym, integer *tabptr, char *tabval, ftnlen name_len, ftnlen tabsym_len, ftnlen tabval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: swapc_ 14 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sytrnd_(char *name__, integer *i__, integer *j, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: swapd_ 14 2 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int sytrni_(char *name__, integer *i__, integer *j, char *tabsym, integer *tabptr, integer *tabval, ftnlen name_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: sumai_ 4 2 4 4 */ -/*:ref: swapi_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int tcheck_(doublereal *tvec, char *type__, logical *mods, char *modify, logical *ok, char *error, ftnlen type_len, ftnlen modify_len, ftnlen error_len); -extern int tparch_(char *type__, ftnlen type_len); -extern int tchckd_(char *type__, ftnlen type_len); -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: repmd_ 14 8 13 13 7 4 13 124 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ - -extern int texpyr_(integer *year); -extern int tsetyr_(integer *year); - -extern int timdef_(char *action, char *item, char *value, ftnlen action_len, ftnlen item_len, ftnlen value_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: zzutcpm_ 14 7 13 4 7 7 4 12 124 */ - -extern int timout_(doublereal *et, char *pictur, char *output, ftnlen pictur_len, ftnlen output_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: scanpr_ 14 5 4 13 4 4 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: scan_ 14 12 13 13 4 4 4 4 4 4 4 4 124 124 */ -/*:ref: timdef_ 14 6 13 13 13 124 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: zzutcpm_ 14 7 13 4 7 7 4 12 124 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: scanrj_ 14 6 4 4 4 4 4 4 */ -/*:ref: unitim_ 7 5 7 13 13 124 124 */ -/*:ref: spd_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: j1950_ 7 0 */ -/*:ref: brckti_ 4 3 4 4 4 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: dpfmt_ 14 5 7 13 13 124 124 */ -/*:ref: ttrans_ 14 5 13 13 7 124 124 */ -/*:ref: gr2jul_ 14 4 4 4 4 4 */ -/*:ref: jul2gr_ 14 4 4 4 4 4 */ -/*:ref: rmaind_ 14 4 7 7 7 7 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: lcase_ 14 4 13 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int tipbod_(char *ref, integer *body, doublereal *et, doublereal *tipm, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irftrn_ 14 5 13 13 7 124 124 */ -/*:ref: bodmat_ 14 3 4 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int tisbod_(char *ref, integer *body, doublereal *et, doublereal *tsipm, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: pckmat_ 14 5 4 7 4 7 12 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: ccifrm_ 14 7 4 4 4 13 4 12 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzbodbry_ 4 1 4 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: spd_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: bodfnd_ 12 3 4 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: rpd_ 7 0 */ -/*:ref: vdotg_ 7 3 7 7 4 */ -/*:ref: twopi_ 7 0 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: failed_ 12 0 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: eul2xf_ 14 5 7 4 4 4 7 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ - -extern int tkfram_(integer *id, doublereal *rot, integer *frame, logical *found); -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnktl_ 4 2 4 4 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: locati_ 14 6 4 4 4 4 4 12 */ -/*:ref: cvpool_ 14 3 13 12 124 */ -/*:ref: dwpool_ 14 2 13 124 */ -/*:ref: ident_ 14 1 7 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: frmnam_ 14 3 4 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: badkpv_ 12 10 13 13 13 4 4 13 124 124 124 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: sharpr_ 14 1 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ -/*:ref: convrt_ 14 6 7 13 13 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: eul2m_ 14 7 7 7 7 4 4 4 7 */ -/*:ref: vhatg_ 14 3 7 4 7 */ -/*:ref: q2m_ 14 2 7 7 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ - -extern int tkvrsn_(char *item, char *verstr, ftnlen item_len, ftnlen verstr_len); -/*:ref: eqstr_ 12 4 13 13 124 124 */ - -extern int tostdo_(char *line, ftnlen line_len); -/*:ref: stdio_ 14 3 13 4 124 */ -/*:ref: writln_ 14 3 13 4 124 */ - -extern H_f touchc_(char *ret_val, ftnlen ret_val_len, char *string, ftnlen string_len); - -extern doublereal touchd_(doublereal *dp); - -extern integer touchi_(integer *int__); - -extern logical touchl_(logical *log__); - -extern int tparse_(char *string, doublereal *sp2000, char *error, ftnlen string_len, ftnlen error_len); -/*:ref: tpartv_ 14 15 13 7 4 13 13 12 12 12 13 13 124 124 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: j2000_ 7 0 */ -/*:ref: spd_ 7 0 */ -/*:ref: tcheck_ 14 9 7 13 12 13 12 13 124 124 124 */ -/*:ref: texpyr_ 14 1 4 */ -/*:ref: rmaini_ 14 4 4 4 4 4 */ - -extern int tpartv_(char *string, doublereal *tvec, integer *ntvec, char *type__, char *modify, logical *mods, logical *yabbrv, logical *succes, char *pictur, char *error, ftnlen string_len, ftnlen type_len, ftnlen modify_len, ftnlen pictur_len, ftnlen error_len); -/*:ref: zztpats_ 12 6 4 4 13 13 124 124 */ -/*:ref: zztokns_ 12 4 13 13 124 124 */ -/*:ref: zzcmbt_ 12 5 13 13 12 124 124 */ -/*:ref: zzsubt_ 12 5 13 13 12 124 124 */ -/*:ref: zzrept_ 12 5 13 13 12 124 124 */ -/*:ref: zzremt_ 12 2 13 124 */ -/*:ref: zzist_ 12 2 13 124 */ -/*:ref: zznote_ 12 4 13 4 4 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzunpck_ 12 11 13 12 7 4 13 13 13 124 124 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: intmax_ 4 0 */ -/*:ref: zzvalt_ 12 6 13 4 4 13 124 124 */ -/*:ref: zzgrep_ 12 2 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: zzispt_ 12 4 13 4 4 124 */ -/*:ref: zzinssub_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ - -extern int tpictr_(char *sample, char *pictur, logical *ok, char *error, ftnlen sample_len, ftnlen pictur_len, ftnlen error_len); -/*:ref: tpartv_ 14 15 13 7 4 13 13 12 12 12 13 13 124 124 124 124 124 */ - -extern doublereal trace_(doublereal *matrix); - -extern doublereal traceg_(doublereal *matrix, integer *ndim); - -extern int trcpkg_(integer *depth, integer *index, char *module, char *trace, char *name__, ftnlen module_len, ftnlen trace_len, ftnlen name_len); -extern int chkin_(char *module, ftnlen module_len); -extern int chkout_(char *module, ftnlen module_len); -extern int trcdep_(integer *depth); -extern int trcmxd_(integer *depth); -extern int trcnam_(integer *index, char *name__, ftnlen name_len); -extern int qcktrc_(char *trace, ftnlen trace_len); -extern int freeze_(void); -extern int trcoff_(void); -/*:ref: wrline_ 14 4 13 13 124 124 */ -/*:ref: frstnb_ 4 2 13 124 */ -/*:ref: getdev_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: getact_ 14 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern int ttrans_(char *from, char *to, doublereal *tvec, ftnlen from_len, ftnlen to_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spd_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: ssizec_ 14 3 4 13 124 */ -/*:ref: insrtc_ 14 4 13 13 124 124 */ -/*:ref: orderc_ 14 4 13 4 4 124 */ -/*:ref: reordc_ 14 4 4 4 13 124 */ -/*:ref: reordi_ 14 3 4 4 4 */ -/*:ref: reordl_ 14 3 4 4 12 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: zzcvpool_ 14 4 13 4 12 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: nextwd_ 14 6 13 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: rmaini_ 14 4 4 4 4 4 */ -/*:ref: lstlei_ 4 3 4 4 4 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: rmaind_ 14 4 7 7 7 7 */ -/*:ref: elemc_ 12 4 13 13 124 124 */ -/*:ref: unitim_ 7 5 7 13 13 124 124 */ -/*:ref: lstled_ 4 3 7 4 7 */ -/*:ref: lstlti_ 4 3 4 4 4 */ - -extern doublereal twopi_(void); - -extern int twovec_(doublereal *axdef, integer *indexa, doublereal *plndef, integer *indexp, doublereal *mout); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: xpose_ 14 2 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int twovxf_(doublereal *axdef, integer *indexa, doublereal *plndef, integer *indexp, doublereal *xform); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zztwovxf_ 14 5 7 4 7 4 7 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int txtopn_(char *fname, integer *unit, ftnlen fname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: getlun_ 14 1 4 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int txtopr_(char *fname, integer *unit, ftnlen fname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: getlun_ 14 1 4 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern doublereal tyear_(void); - -extern int ucase_(char *in, char *out, ftnlen in_len, ftnlen out_len); - -extern int ucrss_(doublereal *v1, doublereal *v2, doublereal *vout); -/*:ref: vnorm_ 7 1 7 */ - -extern int uddc_(U_fp udfunc, doublereal *x, doublereal *dx, logical *isdecr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: uddf_ 14 4 200 7 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int uddf_(S_fp udfunc, doublereal *x, doublereal *dx, doublereal *deriv); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ - -extern int udf_(doublereal *x, doublereal *value); - -extern int unionc_(char *a, char *b, char *c__, ftnlen a_len, ftnlen b_len, ftnlen c_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: excess_ 14 3 4 13 124 */ - -extern int uniond_(doublereal *a, doublereal *b, doublereal *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int unioni_(integer *a, integer *b, integer *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: scardi_ 14 2 4 4 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern doublereal unitim_(doublereal *epoch, char *insys, char *outsys, ftnlen insys_len, ftnlen outsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spd_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: validc_ 14 4 4 4 13 124 */ -/*:ref: ssizec_ 14 3 4 13 124 */ -/*:ref: unionc_ 14 6 13 13 13 124 124 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: zzcvpool_ 14 4 13 4 12 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: somfls_ 12 2 12 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: insrtc_ 14 4 13 13 124 124 */ -/*:ref: setc_ 12 6 13 13 13 124 124 124 */ -/*:ref: elemc_ 12 4 13 13 124 124 */ - -extern int unorm_(doublereal *v1, doublereal *vout, doublereal *vmag); -/*:ref: vnorm_ 7 1 7 */ - -extern int unormg_(doublereal *v1, integer *ndim, doublereal *vout, doublereal *vmag); -/*:ref: vnormg_ 7 2 7 4 */ - -extern int utc2et_(char *utcstr, doublereal *et, ftnlen utcstr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: tpartv_ 14 15 13 7 4 13 13 12 12 12 13 13 124 124 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: tcheck_ 14 9 7 13 12 13 12 13 124 124 124 */ -/*:ref: texpyr_ 14 1 4 */ -/*:ref: ttrans_ 14 5 13 13 7 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int vadd_(doublereal *v1, doublereal *v2, doublereal *vout); - -extern int vaddg_(doublereal *v1, doublereal *v2, integer *ndim, doublereal *vout); - -extern int validc_(integer *size, integer *n, char *a, ftnlen a_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rmdupc_ 14 3 4 13 124 */ -/*:ref: ssizec_ 14 3 4 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ - -extern int validd_(integer *size, integer *n, doublereal *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rmdupd_ 14 2 4 7 */ -/*:ref: ssized_ 14 2 4 7 */ -/*:ref: scardd_ 14 2 4 7 */ - -extern int validi_(integer *size, integer *n, integer *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rmdupi_ 14 2 4 4 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: scardi_ 14 2 4 4 */ - -extern int vcrss_(doublereal *v1, doublereal *v2, doublereal *vout); - -extern doublereal vdist_(doublereal *v1, doublereal *v2); -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ - -extern doublereal vdistg_(doublereal *v1, doublereal *v2, integer *ndim); - -extern doublereal vdot_(doublereal *v1, doublereal *v2); - -extern doublereal vdotg_(doublereal *v1, doublereal *v2, integer *ndim); - -extern int vequ_(doublereal *vin, doublereal *vout); - -extern int vequg_(doublereal *vin, integer *ndim, doublereal *vout); - -extern int vhat_(doublereal *v1, doublereal *vout); -/*:ref: vnorm_ 7 1 7 */ - -extern int vhatg_(doublereal *v1, integer *ndim, doublereal *vout); -/*:ref: vnormg_ 7 2 7 4 */ - -extern int vhatip_(doublereal *v); -/*:ref: vnorm_ 7 1 7 */ - -extern int vlcom_(doublereal *a, doublereal *v1, doublereal *b, doublereal *v2, doublereal *sum); - -extern int vlcom3_(doublereal *a, doublereal *v1, doublereal *b, doublereal *v2, doublereal *c__, doublereal *v3, doublereal *sum); - -extern int vlcomg_(integer *n, doublereal *a, doublereal *v1, doublereal *b, doublereal *v2, doublereal *sum); - -extern int vminug_(doublereal *vin, integer *ndim, doublereal *vout); - -extern int vminus_(doublereal *v1, doublereal *vout); - -extern doublereal vnorm_(doublereal *v1); - -extern doublereal vnormg_(doublereal *v1, integer *ndim); - -extern int vpack_(doublereal *x, doublereal *y, doublereal *z__, doublereal *v); - -extern int vperp_(doublereal *a, doublereal *b, doublereal *p); -/*:ref: vproj_ 14 3 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ - -extern int vprjp_(doublereal *vin, doublereal *plane, doublereal *vout); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int vprjpi_(doublereal *vin, doublereal *projpl, doublereal *invpl, doublereal *vout, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int vproj_(doublereal *a, doublereal *b, doublereal *p); -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ - -extern int vprojg_(doublereal *a, doublereal *b, integer *ndim, doublereal *p); -/*:ref: vdotg_ 7 3 7 7 4 */ -/*:ref: vsclg_ 14 4 7 7 4 7 */ - -extern doublereal vrel_(doublereal *v1, doublereal *v2); -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ - -extern doublereal vrelg_(doublereal *v1, doublereal *v2, integer *ndim); -/*:ref: vdistg_ 7 3 7 7 4 */ -/*:ref: vnormg_ 7 2 7 4 */ - -extern int vrotv_(doublereal *v, doublereal *axis, doublereal *theta, doublereal *r__); -/*:ref: vnorm_ 7 1 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vproj_ 14 3 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ - -extern int vscl_(doublereal *s, doublereal *v1, doublereal *vout); - -extern int vsclg_(doublereal *s, doublereal *v1, integer *ndim, doublereal *vout); - -extern int vsclip_(doublereal *s, doublereal *v); - -extern doublereal vsep_(doublereal *v1, doublereal *v2); -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: pi_ 7 0 */ - -extern doublereal vsepg_(doublereal *v1, doublereal *v2, integer *ndim); -/*:ref: vnormg_ 7 2 7 4 */ -/*:ref: vdotg_ 7 3 7 7 4 */ -/*:ref: pi_ 7 0 */ - -extern int vsub_(doublereal *v1, doublereal *v2, doublereal *vout); - -extern int vsubg_(doublereal *v1, doublereal *v2, integer *ndim, doublereal *vout); - -extern doublereal vtmv_(doublereal *v1, doublereal *matrix, doublereal *v2); - -extern doublereal vtmvg_(doublereal *v1, doublereal *matrix, doublereal *v2, integer *nrow, integer *ncol); - -extern int vupack_(doublereal *v, doublereal *x, doublereal *y, doublereal *z__); - -extern logical vzero_(doublereal *v); - -extern logical vzerog_(doublereal *v, integer *ndim); - -extern integer wdcnt_(char *string, ftnlen string_len); - -extern integer wdindx_(char *string, char *word, ftnlen string_len, ftnlen word_len); -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: frstnb_ 4 2 13 124 */ - -extern integer wncard_(doublereal *window); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: even_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wncomd_(doublereal *left, doublereal *right, doublereal *window, doublereal *result); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: wninsd_ 14 3 7 7 7 */ -/*:ref: failed_ 12 0 */ - -extern int wncond_(doublereal *left, doublereal *right, doublereal *window); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: wnexpd_ 14 3 7 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wndifd_(doublereal *a, doublereal *b, doublereal *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: ssized_ 14 2 4 7 */ -/*:ref: copyd_ 14 2 7 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern logical wnelmd_(doublereal *point, doublereal *window); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wnexpd_(doublereal *left, doublereal *right, doublereal *window); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wnextd_(char *side, doublereal *window, ftnlen side_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wnfetd_(doublereal *window, integer *n, doublereal *left, doublereal *right); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wnfild_(doublereal *small, doublereal *window); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wnfltd_(doublereal *small, doublereal *window); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical wnincd_(doublereal *left, doublereal *right, doublereal *window); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wninsd_(doublereal *left, doublereal *right, doublereal *window); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: excess_ 14 3 4 13 124 */ - -extern int wnintd_(doublereal *a, doublereal *b, doublereal *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical wnreld_(doublereal *a, char *op, doublereal *b, ftnlen op_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: wnincd_ 12 3 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wnsumd_(doublereal *window, doublereal *meas, doublereal *avg, doublereal *stddev, integer *short__, integer *long__); -/*:ref: return_ 12 0 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: even_ 12 1 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wnunid_(doublereal *a, doublereal *b, doublereal *c__); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: excess_ 14 3 4 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wnvald_(integer *size, integer *n, doublereal *a); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ssized_ 14 2 4 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ - -extern int wrencc_(integer *unit, integer *n, char *data, ftnlen data_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wrencd_(integer *unit, integer *n, doublereal *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dp2hx_ 14 4 7 13 4 124 */ - -extern int wrenci_(integer *unit, integer *n, integer *data); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: int2hx_ 14 4 4 13 4 124 */ - -extern int writla_(integer *numlin, char *array, integer *unit, ftnlen array_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: writln_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ - -extern int writln_(char *line, integer *unit, ftnlen line_len); -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wrkvar_(integer *unit, char *name__, char *dirctv, char *tabsym, integer *tabptr, doublereal *tabval, ftnlen name_len, ftnlen dirctv_len, ftnlen tabsym_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sydimd_ 4 6 13 13 4 7 124 124 */ -/*:ref: synthd_ 14 9 13 4 13 4 7 7 12 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: rjust_ 14 4 13 13 124 124 */ -/*:ref: ioerr_ 14 5 13 13 4 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int wrline_(char *device, char *line, ftnlen device_len, ftnlen line_len); -extern int clline_(char *device, ftnlen device_len); -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: ltrim_ 4 2 13 124 */ -/*:ref: fndlun_ 14 1 4 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ - -extern int xf2eul_(doublereal *xform, integer *axisa, integer *axisb, integer *axisc, doublereal *eulang, logical *unique); -extern int eul2xf_(doublereal *eulang, integer *axisa, integer *axisb, integer *axisc, doublereal *xform); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: m2eul_ 14 7 7 4 4 4 7 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: mxmt_ 14 3 7 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: eul2m_ 14 7 7 7 7 4 4 4 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ - -extern int xf2rav_(doublereal *xform, doublereal *rot, doublereal *av); -/*:ref: mtxm_ 14 3 7 7 7 */ - -extern int xfmsta_(doublereal *istate, char *icosys, char *ocosys, char *body, doublereal *ostate, ftnlen icosys_len, ftnlen ocosys_len, ftnlen body_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vequg_ 14 3 7 4 7 */ -/*:ref: zzbods2c_ 14 9 4 13 4 12 13 4 12 124 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: cylrec_ 14 4 7 7 7 7 */ -/*:ref: drdcyl_ 14 4 7 7 7 7 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: drdlat_ 14 4 7 7 7 7 */ -/*:ref: sphrec_ 14 4 7 7 7 7 */ -/*:ref: drdsph_ 14 4 7 7 7 7 */ -/*:ref: georec_ 14 6 7 7 7 7 7 7 */ -/*:ref: drdgeo_ 14 6 7 7 7 7 7 7 */ -/*:ref: pgrrec_ 14 8 13 7 7 7 7 7 7 124 */ -/*:ref: drdpgr_ 14 8 13 7 7 7 7 7 7 124 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: reccyl_ 14 4 7 7 7 7 */ -/*:ref: reclat_ 14 4 7 7 7 7 */ -/*:ref: recsph_ 14 4 7 7 7 7 */ -/*:ref: recgeo_ 14 6 7 7 7 7 7 7 */ -/*:ref: recpgr_ 14 8 13 7 7 7 7 7 7 124 */ -/*:ref: dcyldr_ 14 4 7 7 7 7 */ -/*:ref: dlatdr_ 14 4 7 7 7 7 */ -/*:ref: dsphdr_ 14 4 7 7 7 7 */ -/*:ref: dgeodr_ 14 6 7 7 7 7 7 7 */ -/*:ref: dpgrdr_ 14 8 13 7 7 7 7 7 7 124 */ - -extern int xposbl_(doublereal *bmat, integer *nrow, integer *ncol, integer *bsize, doublereal *btmat); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int xpose_(doublereal *m1, doublereal *mout); - -extern int xposeg_(doublereal *matrix, integer *nrow, integer *ncol, doublereal *xposem); - -extern int xpsgip_(integer *nrow, integer *ncol, doublereal *matrix); - -extern int zzascii_(char *file, char *line, logical *check, char *termin, ftnlen file_len, ftnlen line_len, ftnlen termin_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: getlun_ 14 1 4 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int zzasryel_(char *extrem, doublereal *ellips, doublereal *vertex, doublereal *dir, doublereal *angle, doublereal *extpt, ftnlen extrem_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: el2cgv_ 14 4 7 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: psv2pl_ 14 4 7 7 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: vprjp_ 14 3 7 7 7 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: inrypl_ 14 5 7 7 7 4 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: twopi_ 7 0 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vlcom3_ 14 7 7 7 7 7 7 7 7 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: swapd_ 14 2 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ - -extern int zzbodblt_(integer *room, char *names, char *nornam, integer *codes, integer *nvals, char *device, char *reqst, ftnlen names_len, ftnlen nornam_len, ftnlen device_len, ftnlen reqst_len); -extern int zzbodget_(integer *room, char *names, char *nornam, integer *codes, integer *nvals, ftnlen names_len, ftnlen nornam_len); -extern int zzbodlst_(char *device, char *reqst, ftnlen device_len, ftnlen reqst_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzidmap_ 14 3 4 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: movec_ 14 5 13 4 13 124 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: wrline_ 14 4 13 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: orderi_ 14 3 4 4 4 */ -/*:ref: orderc_ 14 4 13 4 4 124 */ - -extern integer zzbodbry_(integer *body); - -extern int zzbodini_(char *names, char *nornam, integer *codes, integer *nvals, integer *maxval, integer *bnmlst, integer *bnmpol, char *bnmnms, integer *bnmidx, integer *bidlst, integer *bidpol, integer *bidids, integer *bididx, ftnlen names_len, ftnlen nornam_len, ftnlen bnmnms_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzhsiini_ 14 3 4 4 4 */ -/*:ref: zzhscini_ 14 3 4 4 4 */ -/*:ref: zzhscadd_ 14 8 4 4 13 13 4 12 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: zzhsiadd_ 14 6 4 4 4 4 4 12 */ - -extern int zzbodker_(char *names, char *nornam, integer *codes, integer *nvals, logical *extker, integer *bnmlst, integer *bnmpol, char *bnmnms, integer *bnmidx, integer *bidlst, integer *bidpol, integer *bidids, integer *bididx, ftnlen names_len, ftnlen nornam_len, ftnlen bnmnms_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: zzbodini_ 14 16 13 13 4 4 4 4 4 13 4 4 4 4 4 124 124 124 */ - -extern int zzbods2c_(integer *usrctr, char *savnam, integer *savcde, logical *savfnd, char *name__, integer *code, logical *found, ftnlen savnam_len, ftnlen name_len); -/*:ref: return_ 12 0 */ -/*:ref: zzbctrck_ 14 2 4 12 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzbodtrn_(char *name__, integer *code, logical *found, integer *usrctr, logical *update, ftnlen name_len); -extern int zzbodn2c_(char *name__, integer *code, logical *found, ftnlen name_len); -extern int zzbodc2n_(integer *code, char *name__, logical *found, ftnlen name_len); -extern int zzboddef_(char *name__, integer *code, ftnlen name_len); -extern int zzbodkik_(void); -extern int zzbodrst_(void); -extern int zzbctrck_(integer *usrctr, logical *update); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzctrsin_ 14 1 4 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzbodget_ 14 7 4 13 13 4 4 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzbodini_ 14 16 13 13 4 4 4 4 4 13 4 4 4 4 4 124 124 124 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: zzcvpool_ 14 4 13 4 12 124 */ -/*:ref: zzctrinc_ 14 1 4 */ -/*:ref: zzbodker_ 14 16 13 13 4 4 12 4 4 13 4 4 4 4 4 124 124 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: zzhscchk_ 14 7 4 4 13 13 4 124 124 */ -/*:ref: zzhsichk_ 14 5 4 4 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: zzctrchk_ 14 3 4 4 12 */ - -extern int zzbodvcd_(integer *bodyid, char *item, integer *maxn, integer *dim, doublereal *values, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ - -extern int zzck4d2i_(doublereal *dpcoef, integer *nsets, doublereal *parcod, integer *i__); - -extern int zzck4i2d_(integer *i__, integer *nsets, doublereal *parcod, doublereal *dpcoef); - -extern int zzckcv01_(integer *handle, integer *arrbeg, integer *arrend, integer *sclkid, doublereal *tol, char *timsys, doublereal *schedl, ftnlen timsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ - -extern int zzckcv02_(integer *handle, integer *arrbeg, integer *arrend, integer *sclkid, doublereal *tol, char *timsys, doublereal *schedl, ftnlen timsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ - -extern int zzckcv03_(integer *handle, integer *arrbeg, integer *arrend, integer *sclkid, doublereal *tol, char *timsys, doublereal *schedl, ftnlen timsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: errhan_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ - -extern int zzckcv04_(integer *handle, integer *arrbeg, integer *arrend, integer *sclkid, doublereal *tol, char *timsys, doublereal *schedl, ftnlen timsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: intmax_ 4 0 */ -/*:ref: dafps_ 14 5 4 4 7 4 7 */ -/*:ref: cknr04_ 14 3 4 7 4 */ -/*:ref: sgfpkt_ 14 6 4 7 4 4 7 4 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ - -extern int zzckcv05_(integer *handle, integer *arrbeg, integer *arrend, integer *sclkid, doublereal *dc, doublereal *tol, char *timsys, doublereal *schedl, ftnlen timsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: errint_ 14 3 13 7 124 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ - -extern int zzckcv06_(integer *handle, integer *arrbeg, integer *arrend, integer *sclkid, doublereal *dc, doublereal *tol, char *timsys, doublereal *schedl, ftnlen timsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ - -extern int zzckspk_(integer *handle, char *ckspk, ftnlen ckspk_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dafhsf_ 14 3 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dafbfs_ 14 1 4 */ -/*:ref: daffna_ 14 1 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: dafgs_ 14 1 7 */ -/*:ref: dafus_ 14 5 7 4 4 7 4 */ -/*:ref: zzsizeok_ 14 6 4 4 4 4 12 4 */ -/*:ref: dafgda_ 14 4 4 4 4 7 */ - -extern int zzcln_(integer *lookat, integer *nameat, integer *namlst, integer *datlst, integer *nmpool, integer *chpool, integer *dppool); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzcorepc_(char *abcorr, doublereal *et, doublereal *lt, doublereal *etcorr, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzcorsxf_(logical *xmit, doublereal *dlt, doublereal *xform, doublereal *corxfm); -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: vsclip_ 14 2 7 7 */ - -extern int zzcputim_(doublereal *tvec); -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzctr_(integer *newctr, integer *oldctr, logical *update); -extern int zzctruin_(integer *oldctr); -extern int zzctrsin_(integer *oldctr); -extern int zzctrinc_(integer *oldctr); -extern int zzctrchk_(integer *newctr, integer *oldctr, logical *update); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: intmax_ 4 0 */ -/*:ref: intmin_ 4 0 */ - -extern int zzcvpool_(char *agent, integer *usrctr, logical *update, ftnlen agent_len); -/*:ref: return_ 12 0 */ -/*:ref: zzpctrck_ 14 2 4 12 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cvpool_ 14 3 13 12 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzcvstat_(doublereal *et, char *ref, integer *center, doublereal *state, ftnlen ref_len); -extern int zzcvxsta_(doublereal *et, char *ref, integer *center, doublereal *state, ftnlen ref_len); -extern int zzcvssta_(doublereal *state, integer *center, doublereal *et, char *ref, ftnlen ref_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: sxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int zzdafgdr_(integer *handle, integer *recno, doublereal *dprec, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhnfo_ 14 7 4 13 4 4 4 12 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzxlated_ 14 5 4 13 4 7 124 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int zzdafgfr_(integer *handle, char *idword, integer *nd, integer *ni, char *ifname, integer *fward, integer *bward, integer *free, logical *found, ftnlen idword_len, ftnlen ifname_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhnfo_ 14 7 4 13 4 4 4 12 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzxlatei_ 14 5 4 13 4 4 124 */ - -extern int zzdafgsr_(integer *handle, integer *recno, integer *nd, integer *ni, doublereal *dprec, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhnfo_ 14 7 4 13 4 4 4 12 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzddhhlu_ 14 5 4 13 12 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzxlated_ 14 5 4 13 4 7 124 */ -/*:ref: zzxlatei_ 14 5 4 13 4 4 124 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int zzdafnfr_(integer *lun, char *idword, integer *nd, integer *ni, char *ifname, integer *fward, integer *bward, integer *free, char *format, ftnlen idword_len, ftnlen ifname_len, ftnlen format_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzftpstr_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzdasnfr_(integer *lun, char *idword, char *ifname, integer *nresvr, integer *nresvc, integer *ncomr, integer *ncomc, char *format, ftnlen idword_len, ftnlen ifname_len, ftnlen format_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzftpstr_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer zzddhclu_(logical *utlck, integer *nut); - -extern int zzddhf2h_(char *fname, integer *ftabs, integer *ftamh, integer *ftarc, integer *ftbff, integer *fthan, char *ftnam, integer *ftrtm, doublereal *ftmnm, integer *nft, integer *utcst, integer *uthan, logical *utlck, integer *utlun, integer *nut, logical *exists, logical *opened, integer *handle, logical *found, doublereal *mnm, ftnlen fname_len, ftnlen ftnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zzddhgtu_ 14 6 4 4 12 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzddhrmu_ 14 7 4 4 4 4 12 4 4 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: zzddhmnm_ 7 1 4 */ - -extern int zzddhgsd_(char *class__, integer *id, char *label, ftnlen class_len, ftnlen label_len); -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ - -extern int zzddhgtu_(integer *utcst, integer *uthan, logical *utlck, integer *utlun, integer *nut, integer *uindex); -/*:ref: return_ 12 0 */ -/*:ref: getlun_ 14 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: orderi_ 14 3 4 4 4 */ -/*:ref: frelun_ 14 1 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzddhini_(integer *natbff, integer *supbff, integer *numsup, char *stramh, char *strarc, char *strbff, ftnlen stramh_len, ftnlen strarc_len, ftnlen strbff_len); -/*:ref: return_ 12 0 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: nextwd_ 14 6 13 13 13 124 124 124 */ - -extern int zzddhivf_(char *nsum, integer *bff, logical *found, ftnlen nsum_len); - -extern int zzddhman_(logical *lock, char *arch, char *fname, char *method, integer *handle, integer *unit, integer *intamh, integer *intarc, integer *intbff, logical *native, logical *found, logical *kill, ftnlen arch_len, ftnlen fname_len, ftnlen method_len); -extern int zzddhopn_(char *fname, char *method, char *arch, integer *handle, ftnlen fname_len, ftnlen method_len, ftnlen arch_len); -extern int zzddhcls_(integer *handle, char *arch, logical *kill, ftnlen arch_len); -extern int zzddhhlu_(integer *handle, char *arch, logical *lock, integer *unit, ftnlen arch_len); -extern int zzddhunl_(integer *handle, char *arch, ftnlen arch_len); -extern int zzddhnfo_(integer *handle, char *fname, integer *intarc, integer *intbff, integer *intamh, logical *found, ftnlen fname_len); -extern int zzddhisn_(integer *handle, logical *native, logical *found); -extern int zzddhfnh_(char *fname, integer *handle, logical *found, ftnlen fname_len); -extern int zzddhluh_(integer *unit, integer *handle, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzddhini_ 14 9 4 4 4 13 13 13 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzpltchk_ 14 1 12 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: zzddhclu_ 4 2 12 4 */ -/*:ref: zzddhf2h_ 14 22 13 4 4 4 4 4 13 4 7 4 4 4 12 4 4 12 12 4 12 7 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: bsrchi_ 4 3 4 4 4 */ -/*:ref: zzddhrcm_ 14 3 4 4 4 */ -/*:ref: zzddhgtu_ 14 6 4 4 12 4 4 4 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: zzddhppf_ 14 3 4 4 4 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zzddhrmu_ 14 7 4 4 4 4 12 4 4 */ -/*:ref: frelun_ 14 1 4 */ - -extern doublereal zzddhmnm_(integer *unit); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzddhini_ 14 9 4 4 4 13 13 13 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: idw2at_ 14 6 13 13 13 124 124 124 */ -/*:ref: zzddhppf_ 14 3 4 4 4 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zzxlatei_ 14 5 4 13 4 4 124 */ - -extern int zzddhppf_(integer *unit, integer *arch, integer *bff); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: zzftpstr_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: idw2at_ 14 6 13 13 13 124 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: zzftpchk_ 14 3 13 12 124 */ -/*:ref: pos_ 4 5 13 13 4 124 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzddhivf_ 14 4 13 4 12 124 */ - -extern int zzddhrcm_(integer *nut, integer *utcst, integer *reqcnt); -/*:ref: intmax_ 4 0 */ - -extern int zzddhrmu_(integer *uindex, integer *nft, integer *utcst, integer *uthan, logical *utlck, integer *utlun, integer *nut); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: reslun_ 14 1 4 */ - -extern doublereal zzdiv_(doublereal *numr, doublereal *denom); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzdynbid_(char *frname, integer *frcode, char *item, integer *idcode, ftnlen frname_len, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ - -extern int zzdynfid_(char *frname, integer *frcode, char *item, integer *idcode, ftnlen frname_len, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: beint_ 12 2 13 124 */ -/*:ref: prsint_ 14 3 13 4 124 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ - -extern int zzdynfr0_(integer *infram, integer *center, doublereal *et, doublereal *xform, integer *basfrm); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: bodn2c_ 14 4 13 4 12 124 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: frmnam_ 14 3 4 13 124 */ -/*:ref: zzdynfid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzdynvac_ 14 9 13 4 13 4 4 13 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzdynoad_ 14 9 13 4 13 4 4 7 12 124 124 */ -/*:ref: zzdynoac_ 14 10 13 4 13 4 4 13 12 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: zzeprc76_ 14 2 7 7 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: zzenut80_ 14 2 7 7 */ -/*:ref: mxmg_ 14 6 7 7 4 4 4 7 */ -/*:ref: zzmobliq_ 14 3 7 7 7 */ -/*:ref: eul2xf_ 14 5 7 4 4 4 7 */ -/*:ref: zzfrmch1_ 14 4 4 4 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzdynbid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzspkez1_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: zzspkzp1_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: zzcorepc_ 14 5 13 7 7 7 124 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: vminug_ 14 3 7 4 7 */ -/*:ref: dnearp_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: zzspksb1_ 14 5 4 7 13 7 124 */ -/*:ref: zzdynvad_ 14 8 13 4 13 4 4 7 124 124 */ -/*:ref: convrt_ 14 6 7 13 13 7 124 124 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: zztwovxf_ 14 5 7 4 7 4 7 */ -/*:ref: zzdynvai_ 14 8 13 4 13 4 4 4 124 124 */ -/*:ref: polyds_ 14 5 7 4 4 7 7 */ - -extern int zzdynfrm_(integer *infram, integer *center, doublereal *et, doublereal *xform, integer *basfrm); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: bodn2c_ 14 4 13 4 12 124 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: frmnam_ 14 3 4 13 124 */ -/*:ref: zzdynfid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzdynvac_ 14 9 13 4 13 4 4 13 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzdynoad_ 14 9 13 4 13 4 4 7 12 124 124 */ -/*:ref: zzdynoac_ 14 10 13 4 13 4 4 13 12 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: zzeprc76_ 14 2 7 7 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: zzenut80_ 14 2 7 7 */ -/*:ref: mxmg_ 14 6 7 7 4 4 4 7 */ -/*:ref: zzmobliq_ 14 3 7 7 7 */ -/*:ref: eul2xf_ 14 5 7 4 4 4 7 */ -/*:ref: zzfrmch0_ 14 4 4 4 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzdynbid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzspkez0_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: zzspkzp0_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: zzcorepc_ 14 5 13 7 7 7 124 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: vminug_ 14 3 7 4 7 */ -/*:ref: dnearp_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: zzspksb0_ 14 5 4 7 13 7 124 */ -/*:ref: zzdynvad_ 14 8 13 4 13 4 4 7 124 124 */ -/*:ref: convrt_ 14 6 7 13 13 7 124 124 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: zztwovxf_ 14 5 7 4 7 4 7 */ -/*:ref: zzdynvai_ 14 8 13 4 13 4 4 4 124 124 */ -/*:ref: polyds_ 14 5 7 4 4 7 7 */ - -extern int zzdynoac_(char *frname, integer *frcode, char *item, integer *maxn, integer *n, char *values, logical *found, ftnlen frname_len, ftnlen item_len, ftnlen values_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ - -extern int zzdynoad_(char *frname, integer *frcode, char *item, integer *maxn, integer *n, doublereal *values, logical *found, ftnlen frname_len, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ - -extern int zzdynrot_(integer *infram, integer *center, doublereal *et, doublereal *rotate, integer *basfrm); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: bodn2c_ 14 4 13 4 12 124 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: frmnam_ 14 3 4 13 124 */ -/*:ref: zzdynfid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzdynvac_ 14 9 13 4 13 4 4 13 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzdynoad_ 14 9 13 4 13 4 4 7 12 124 124 */ -/*:ref: zzdynoac_ 14 10 13 4 13 4 4 13 12 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: zzeprc76_ 14 2 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: xpose_ 14 2 7 7 */ -/*:ref: zzenut80_ 14 2 7 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: zzmobliq_ 14 3 7 7 7 */ -/*:ref: eul2m_ 14 7 7 7 7 4 4 4 7 */ -/*:ref: zzrefch0_ 14 4 4 4 7 7 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzdynbid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzspkzp0_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: zzspkez0_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: zzcorepc_ 14 5 13 7 7 7 124 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: zzspksb0_ 14 5 4 7 13 7 124 */ -/*:ref: zzdynvad_ 14 8 13 4 13 4 4 7 124 124 */ -/*:ref: convrt_ 14 6 7 13 13 7 124 124 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: twovec_ 14 5 7 4 7 4 7 */ -/*:ref: zzdynvai_ 14 8 13 4 13 4 4 4 124 124 */ -/*:ref: polyds_ 14 5 7 4 4 7 7 */ - -extern int zzdynrt0_(integer *infram, integer *center, doublereal *et, doublereal *rotate, integer *basfrm); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: bodn2c_ 14 4 13 4 12 124 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: frmnam_ 14 3 4 13 124 */ -/*:ref: zzdynfid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzdynvac_ 14 9 13 4 13 4 4 13 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzdynoad_ 14 9 13 4 13 4 4 7 12 124 124 */ -/*:ref: zzdynoac_ 14 10 13 4 13 4 4 13 12 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: zzeprc76_ 14 2 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: xpose_ 14 2 7 7 */ -/*:ref: zzenut80_ 14 2 7 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: zzmobliq_ 14 3 7 7 7 */ -/*:ref: eul2m_ 14 7 7 7 7 4 4 4 7 */ -/*:ref: zzrefch1_ 14 4 4 4 7 7 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzdynbid_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzspkzp1_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: zzspkez1_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: zzcorepc_ 14 5 13 7 7 7 124 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: cidfrm_ 14 5 4 4 13 12 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: nearpt_ 14 6 7 7 7 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: zzspksb1_ 14 5 4 7 13 7 124 */ -/*:ref: zzdynvad_ 14 8 13 4 13 4 4 7 124 124 */ -/*:ref: convrt_ 14 6 7 13 13 7 124 124 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: twovec_ 14 5 7 4 7 4 7 */ -/*:ref: zzdynvai_ 14 8 13 4 13 4 4 4 124 124 */ -/*:ref: polyds_ 14 5 7 4 4 7 7 */ - -extern int zzdynvac_(char *frname, integer *frcode, char *item, integer *maxn, integer *n, char *values, ftnlen frname_len, ftnlen item_len, ftnlen values_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gcpool_ 14 8 13 4 4 4 13 12 124 124 */ - -extern int zzdynvad_(char *frname, integer *frcode, char *item, integer *maxn, integer *n, doublereal *values, ftnlen frname_len, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gdpool_ 14 7 13 4 4 4 7 12 124 */ - -extern int zzdynvai_(char *frname, integer *frcode, char *item, integer *maxn, integer *n, integer *values, ftnlen frname_len, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: gipool_ 14 7 13 4 4 4 4 12 124 */ - -extern int zzedterm_(char *type__, doublereal *a, doublereal *b, doublereal *c__, doublereal *srcrad, doublereal *srcpos, integer *npts, doublereal *trmpts, ftnlen type_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: frame_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: twopi_ 7 0 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: nvp2pl_ 14 3 7 7 7 */ -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ - -extern int zzekac01_(integer *handle, integer *segdsc, integer *coldsc, integer *ivals, logical *nlflgs, integer *rcptrs, integer *wkindx); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzekordi_ 14 5 4 12 12 4 4 */ -/*:ref: zzektrit_ 14 2 4 4 */ -/*:ref: zzektr1s_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int zzekac02_(integer *handle, integer *segdsc, integer *coldsc, doublereal *dvals, logical *nlflgs, integer *rcptrs, integer *wkindx); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: zzekpgwd_ 14 3 4 4 7 */ -/*:ref: zzekordd_ 14 5 7 12 12 4 4 */ -/*:ref: zzektrit_ 14 2 4 4 */ -/*:ref: zzektr1s_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int zzekac03_(integer *handle, integer *segdsc, integer *coldsc, char *cvals, logical *nlflgs, integer *rcptrs, integer *wkindx, ftnlen cvals_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: prtenc_ 14 3 4 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: prtdec_ 14 3 13 4 124 */ -/*:ref: zzekpgwc_ 14 4 4 4 13 124 */ -/*:ref: zzekordc_ 14 6 13 12 12 4 4 124 */ -/*:ref: zzektrit_ 14 2 4 4 */ -/*:ref: zzektr1s_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int zzekac04_(integer *handle, integer *segdsc, integer *coldsc, integer *ivals, integer *entszs, logical *nlflgs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ - -extern int zzekac05_(integer *handle, integer *segdsc, integer *coldsc, doublereal *dvals, integer *entszs, logical *nlflgs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: zzekpgwd_ 14 3 4 4 7 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ - -extern int zzekac06_(integer *handle, integer *segdsc, integer *coldsc, char *cvals, integer *entszs, logical *nlflgs, ftnlen cvals_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: prtenc_ 14 3 4 13 124 */ -/*:ref: zzekpgwc_ 14 4 4 4 13 124 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ - -extern int zzekac07_(integer *handle, integer *segdsc, integer *coldsc, integer *ivals, logical *nlflgs, integer *wkindx); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekacps_ 14 6 4 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekordi_ 14 5 4 12 12 4 4 */ -/*:ref: zzekwpai_ 14 6 4 4 4 4 4 4 */ -/*:ref: zzekwpal_ 14 6 4 4 4 12 4 4 */ - -extern int zzekac08_(integer *handle, integer *segdsc, integer *coldsc, doublereal *dvals, logical *nlflgs, integer *wkindx); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekacps_ 14 6 4 4 4 4 4 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: zzekpgwd_ 14 3 4 4 7 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekordd_ 14 5 7 12 12 4 4 */ -/*:ref: zzekwpai_ 14 6 4 4 4 4 4 4 */ -/*:ref: zzekwpal_ 14 6 4 4 4 12 4 4 */ - -extern int zzekac09_(integer *handle, integer *segdsc, integer *coldsc, char *cvals, logical *nlflgs, integer *wkindx, ftnlen cvals_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekacps_ 14 6 4 4 4 4 4 4 */ -/*:ref: zzekpgwc_ 14 4 4 4 13 124 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekordc_ 14 6 13 12 12 4 4 124 */ -/*:ref: zzekwpai_ 14 6 4 4 4 4 4 4 */ -/*:ref: zzekwpal_ 14 6 4 4 4 12 4 4 */ - -extern int zzekacps_(integer *handle, integer *segdsc, integer *type__, integer *n, integer *p, integer *base); -/*:ref: zzekpgan_ 14 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ -/*:ref: zzektrap_ 14 4 4 4 4 4 */ - -extern int zzekad01_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *ival, logical *isnull); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: zzekiii1_ 14 6 4 4 4 4 4 12 */ - -extern int zzekad02_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, doublereal *dval, logical *isnull); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: dasudd_ 14 4 4 4 4 7 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: zzekiid1_ 14 6 4 4 4 7 4 12 */ - -extern int zzekad03_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, char *cval, logical *isnull, ftnlen cval_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: zzeksei_ 14 3 4 4 4 */ -/*:ref: dasudc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ -/*:ref: zzekiic1_ 14 7 4 4 4 13 4 12 124 */ - -extern int zzekad04_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *nvals, integer *ivals, logical *isnull); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ - -extern int zzekad05_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *nvals, doublereal *dvals, logical *isnull); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: dasudd_ 14 4 4 4 4 7 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ - -extern int zzekad06_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *nvals, char *cvals, logical *isnull, ftnlen cvals_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzeksei_ 14 3 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: dasudc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ - -extern int zzekaps_(integer *handle, integer *segdsc, integer *type__, logical *new__, integer *p, integer *base); -/*:ref: zzekpgan_ 14 4 4 4 4 4 */ -/*:ref: zzekpgal_ 14 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzeksfwd_ 14 4 4 4 4 4 */ -/*:ref: zzektrap_ 14 4 4 4 4 4 */ - -extern int zzekbs01_(integer *handle, char *tabnam, integer *ncols, char *cnames, integer *cdscrs, integer *segno, ftnlen tabnam_len, ftnlen cnames_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgan_ 14 4 4 4 4 4 */ -/*:ref: zzektrit_ 14 2 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: eknseg_ 4 1 4 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzekpgwc_ 14 4 4 4 13 124 */ -/*:ref: zzekcix1_ 14 2 4 4 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzektrap_ 14 4 4 4 4 4 */ - -extern int zzekbs02_(integer *handle, char *tabnam, integer *ncols, char *cnames, integer *cdscrs, integer *segno, ftnlen tabnam_len, ftnlen cnames_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgan_ 14 4 4 4 4 4 */ -/*:ref: zzektrit_ 14 2 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: eknseg_ 4 1 4 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzekpgwc_ 14 4 4 4 13 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzektrap_ 14 4 4 4 4 4 */ - -extern int zzekcchk_(char *query, integer *eqryi, char *eqryc, integer *ntab, char *tablst, char *alslst, integer *base, logical *error, char *errmsg, integer *errptr, ftnlen query_len, ftnlen eqryc_len, ftnlen tablst_len, ftnlen alslst_len, ftnlen errmsg_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: ekccnt_ 14 3 13 4 124 */ -/*:ref: ekcii_ 14 6 13 4 13 4 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ - -extern int zzekcdsc_(integer *handle, integer *segdsc, char *column, integer *coldsc, ftnlen column_len); -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekcix1_(integer *handle, integer *coldsc); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrit_ 14 2 4 4 */ - -extern int zzekcnam_(integer *handle, integer *coldsc, char *column, ftnlen column_len); -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ - -extern int zzekde01_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekixdl_ 14 4 4 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekdps_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzekde02_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekixdl_ 14 4 4 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekdps_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzekde03_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekixdl_ 14 4 4 4 4 4 */ -/*:ref: zzekgei_ 14 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekgfwd_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekdps_ 14 4 4 4 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzekde04_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekgfwd_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekdps_ 14 4 4 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzekde05_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekgfwd_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekdps_ 14 4 4 4 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzekde06_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekgei_ 14 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekgfwd_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: zzekdps_ 14 4 4 4 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzekdps_(integer *handle, integer *segdsc, integer *type__, integer *p); -/*:ref: zzekpgfr_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzektrls_ 4 3 4 4 4 */ -/*:ref: zzektrdl_ 14 3 4 4 4 */ - -extern integer zzekecmp_(integer *hans, integer *sgdscs, integer *cldscs, integer *rows, integer *elts); -/*:ref: zzekrsi_ 14 8 4 4 4 4 4 4 12 12 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrsd_ 14 8 4 4 4 4 4 7 12 12 */ -/*:ref: zzekrsc_ 14 10 4 4 4 4 4 4 13 12 12 124 */ - -extern int zzekencd_(char *query, integer *eqryi, char *eqryc, doublereal *eqryd, logical *error, char *errmsg, integer *errptr, ftnlen query_len, ftnlen eqryc_len, ftnlen errmsg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekqini_ 14 6 4 4 4 13 7 124 */ -/*:ref: zzekscan_ 14 17 13 4 4 4 4 4 4 4 7 13 4 4 12 13 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpars_ 14 19 13 4 4 4 4 4 7 13 4 4 4 13 7 12 13 124 124 124 124 */ -/*:ref: zzeknres_ 14 9 13 4 13 12 13 4 124 124 124 */ -/*:ref: zzektres_ 14 10 13 4 13 7 12 13 4 124 124 124 */ -/*:ref: zzeksemc_ 14 9 13 4 13 12 13 4 124 124 124 */ - -extern int zzekerc1_(integer *handle, integer *segdsc, integer *coldsc, char *ckey, integer *recptr, logical *null, integer *prvidx, integer *prvptr, ftnlen ckey_len); -/*:ref: failed_ 12 0 */ -/*:ref: zzektrsz_ 4 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern int zzekerd1_(integer *handle, integer *segdsc, integer *coldsc, doublereal *dkey, integer *recptr, logical *null, integer *prvidx, integer *prvptr); -/*:ref: failed_ 12 0 */ -/*:ref: zzektrsz_ 4 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern int zzekeri1_(integer *handle, integer *segdsc, integer *coldsc, integer *ikey, integer *recptr, logical *null, integer *prvidx, integer *prvptr); -/*:ref: failed_ 12 0 */ -/*:ref: zzektrsz_ 4 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern integer zzekesiz_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: zzeksz04_ 4 4 4 4 4 4 */ -/*:ref: zzeksz05_ 4 4 4 4 4 4 */ -/*:ref: zzeksz06_ 4 4 4 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekff01_(integer *handle, integer *segno, integer *rcptrs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzeksrd_ 14 3 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekmloc_ 14 4 4 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzektrit_ 14 2 4 4 */ -/*:ref: zzektr1s_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int zzekfrx_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *pos); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekrsc_ 14 10 4 4 4 4 4 4 13 12 12 124 */ -/*:ref: zzekrsd_ 14 8 4 4 4 4 4 7 12 12 */ -/*:ref: zzekrsi_ 14 8 4 4 4 4 4 4 12 12 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: zzeklerc_ 14 9 4 4 4 13 4 12 4 4 124 */ -/*:ref: zzeklerd_ 14 8 4 4 4 7 4 12 4 4 */ -/*:ref: zzekleri_ 14 8 4 4 4 4 4 12 4 4 */ - -extern int zzekgcdp_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *datptr); -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzekgei_(integer *handle, integer *addrss, integer *ival); -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: prtdec_ 14 3 13 4 124 */ - -extern int zzekgfwd_(integer *handle, integer *type__, integer *p, integer *fward); -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekgei_ 14 3 4 4 4 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzekglnk_(integer *handle, integer *type__, integer *p, integer *nlinks); -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekgei_ 14 3 4 4 4 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzekgrcp_(integer *handle, integer *recptr, integer *ptr); -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzekgrs_(integer *handle, integer *recptr, integer *status); -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzekif01_(integer *handle, integer *segno, integer *rcptrs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: zzekstop_ 14 1 4 */ -/*:ref: zzeksdec_ 14 1 4 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekif02_(integer *handle, integer *segno); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekmloc_ 14 4 4 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekaps_ 14 6 4 4 4 12 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekiic1_(integer *handle, integer *segdsc, integer *coldsc, char *ckey, integer *recptr, logical *null, ftnlen ckey_len); -/*:ref: failed_ 12 0 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzeklerc_ 14 9 4 4 4 13 4 12 4 4 124 */ -/*:ref: zzektrin_ 14 4 4 4 4 4 */ - -extern int zzekiid1_(integer *handle, integer *segdsc, integer *coldsc, doublereal *dkey, integer *recptr, logical *null); -/*:ref: failed_ 12 0 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzeklerd_ 14 8 4 4 4 7 4 12 4 4 */ -/*:ref: zzektrin_ 14 4 4 4 4 4 */ - -extern int zzekiii1_(integer *handle, integer *segdsc, integer *coldsc, integer *ikey, integer *recptr, logical *null); -/*:ref: failed_ 12 0 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekleri_ 14 8 4 4 4 4 4 12 4 4 */ -/*:ref: zzektrin_ 14 4 4 4 4 4 */ - -extern integer zzekille_(integer *handle, integer *segdsc, integer *coldsc, integer *nrows, integer *dtype, char *cval, doublereal *dval, integer *ival, ftnlen cval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekllec_ 14 7 4 4 4 13 4 4 124 */ -/*:ref: zzeklled_ 14 6 4 4 4 7 4 4 */ -/*:ref: zzekllei_ 14 6 4 4 4 4 4 4 */ - -extern integer zzekillt_(integer *handle, integer *segdsc, integer *coldsc, integer *nrows, integer *dtype, char *cval, doublereal *dval, integer *ival, ftnlen cval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzeklltc_ 14 7 4 4 4 13 4 4 124 */ -/*:ref: zzeklltd_ 14 6 4 4 4 7 4 4 */ -/*:ref: zzekllti_ 14 6 4 4 4 4 4 4 */ - -extern int zzekinqc_(char *value, integer *length, integer *lexbeg, integer *lexend, integer *eqryi, char *eqryc, integer *descr, ftnlen value_len, ftnlen eqryc_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekweqi_ 14 4 13 4 4 124 */ - -extern int zzekinqn_(doublereal *value, integer *type__, integer *lexbeg, integer *lexend, integer *eqryi, doublereal *eqryd, integer *descr); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekweqi_ 14 4 13 4 4 124 */ - -extern int zzekixdl_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekfrx_ 14 5 4 4 4 4 4 */ -/*:ref: zzektrdl_ 14 3 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ - -extern int zzekixlk_(integer *handle, integer *coldsc, integer *key, integer *recptr); -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekjoin_(integer *jbase1, integer *jbase2, integer *njcnst, logical *active, integer *cpidx1, integer *clidx1, integer *elts1, integer *ops, integer *cpidx2, integer *clidx2, integer *elts2, integer *sthan, integer *stsdsc, integer *stdtpt, integer *dtpool, integer *dtdscs, integer *jbase3, integer *nrows); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzeksrd_ 14 3 4 4 4 */ -/*:ref: zzekstop_ 14 1 4 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzeksupd_ 14 3 4 4 4 */ -/*:ref: zzekjprp_ 14 23 4 4 4 4 4 4 4 4 4 4 12 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: zzekjnxt_ 14 2 12 4 */ - -extern int zzekjsqz_(integer *jrsbas); -/*:ref: zzeksrd_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzeksupd_ 14 3 4 4 4 */ - -extern int zzekjsrt_(integer *njrs, integer *ubases, integer *norder, integer *otabs, integer *ocols, integer *oelts, integer *senses, integer *sthan, integer *stsdsc, integer *stdtpt, integer *dtpool, integer *dtdscs, integer *ordbas); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzeksrd_ 14 3 4 4 4 */ -/*:ref: zzekvset_ 14 2 4 4 */ -/*:ref: zzekvcal_ 14 3 4 4 4 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: zzekrsc_ 14 10 4 4 4 4 4 4 13 12 12 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: zzekrsd_ 14 8 4 4 4 4 4 7 12 12 */ -/*:ref: zzekrsi_ 14 8 4 4 4 4 4 4 12 12 */ -/*:ref: zzekvcmp_ 12 15 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: swapi_ 14 2 4 4 */ -/*:ref: zzekstop_ 14 1 4 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzeksupd_ 14 3 4 4 4 */ - -extern int zzekjtst_(integer *segvec, integer *jbase1, integer *nt1, integer *rb1, integer *nr1, integer *jbase2, integer *nt2, integer *rb2, integer *nr2, integer *njcnst, logical *active, integer *cpidx1, integer *clidx1, integer *elts1, integer *ops, integer *cpidx2, integer *clidx2, integer *elts2, integer *sthan, integer *stsdsc, integer *stdtpt, integer *dtpool, integer *dtdscs, logical *found, integer *rowvec); -extern int zzekjprp_(integer *segvec, integer *jbase1, integer *nt1, integer *rb1, integer *nr1, integer *jbase2, integer *nt2, integer *rb2, integer *nr2, integer *njcnst, logical *active, integer *cpidx1, integer *clidx1, integer *elts1, integer *ops, integer *cpidx2, integer *clidx2, integer *elts2, integer *sthan, integer *stsdsc, integer *stdtpt, integer *dtpool, integer *dtdscs); -extern int zzekjnxt_(logical *found, integer *rowvec); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: zzekstop_ 14 1 4 */ -/*:ref: zzekspsh_ 14 2 4 4 */ -/*:ref: zzeksrd_ 14 3 4 4 4 */ -/*:ref: zzeksupd_ 14 3 4 4 4 */ -/*:ref: zzekjsrt_ 14 13 4 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: zzekrcmp_ 12 12 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: zzekvmch_ 12 13 4 12 4 4 4 4 4 4 4 4 4 4 4 */ - -extern int zzekkey_(integer *handle, integer *segdsc, integer *nrows, integer *ncnstr, integer *clidxs, integer *dsclst, integer *ops, integer *dtypes, char *chrbuf, integer *cbegs, integer *cends, doublereal *dvals, integer *ivals, logical *active, integer *key, integer *keydsc, integer *begidx, integer *endidx, logical *found, ftnlen chrbuf_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: zzekillt_ 4 9 4 4 4 4 4 13 7 4 124 */ -/*:ref: zzekille_ 4 9 4 4 4 4 4 13 7 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ordi_ 4 2 4 4 */ -/*:ref: movei_ 14 3 4 4 4 */ - -extern int zzeklerc_(integer *handle, integer *segdsc, integer *coldsc, char *ckey, integer *recptr, logical *null, integer *prvidx, integer *prvptr, ftnlen ckey_len); -/*:ref: failed_ 12 0 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekerc1_ 14 9 4 4 4 13 4 12 4 4 124 */ - -extern int zzeklerd_(integer *handle, integer *segdsc, integer *coldsc, doublereal *dkey, integer *recptr, logical *null, integer *prvidx, integer *prvptr); -/*:ref: failed_ 12 0 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekerd1_ 14 8 4 4 4 7 4 12 4 4 */ - -extern int zzekleri_(integer *handle, integer *segdsc, integer *coldsc, integer *ikey, integer *recptr, logical *null, integer *prvidx, integer *prvptr); -/*:ref: failed_ 12 0 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekeri1_ 14 8 4 4 4 4 4 12 4 4 */ - -extern int zzekllec_(integer *handle, integer *segdsc, integer *coldsc, char *ckey, integer *prvloc, integer *prvptr, ftnlen ckey_len); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekixlk_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern int zzeklled_(integer *handle, integer *segdsc, integer *coldsc, doublereal *dkey, integer *prvloc, integer *prvptr); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekixlk_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern int zzekllei_(integer *handle, integer *segdsc, integer *coldsc, integer *ikey, integer *prvloc, integer *prvptr); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekixlk_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern int zzeklltc_(integer *handle, integer *segdsc, integer *coldsc, char *ckey, integer *prvloc, integer *prvptr, ftnlen ckey_len); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekixlk_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern int zzeklltd_(integer *handle, integer *segdsc, integer *coldsc, doublereal *dkey, integer *prvloc, integer *prvptr); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekixlk_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern int zzekllti_(integer *handle, integer *segdsc, integer *coldsc, integer *ikey, integer *prvloc, integer *prvptr); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekixlk_ 14 4 4 4 4 4 */ -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern int zzekmloc_(integer *handle, integer *segno, integer *page, integer *base); -/*:ref: eknseg_ 4 1 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ - -extern int zzeknres_(char *query, integer *eqryi, char *eqryc, logical *error, char *errmsg, integer *errptr, ftnlen query_len, ftnlen eqryc_len, ftnlen errmsg_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekqtab_ 14 8 4 13 4 13 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: ekntab_ 14 1 4 */ -/*:ref: ektnam_ 14 3 4 13 124 */ -/*:ref: ekccnt_ 14 3 13 4 124 */ -/*:ref: zzekcchk_ 14 15 13 4 13 4 13 13 4 12 13 4 124 124 124 124 124 */ -/*:ref: zzekweqi_ 14 4 13 4 4 124 */ - -extern int zzeknrml_(char *query, integer *ntoken, integer *lxbegs, integer *lxends, integer *tokens, integer *values, doublereal *numvls, char *chrbuf, integer *chbegs, integer *chends, integer *eqryi, char *eqryc, doublereal *eqryd, logical *error, char *prserr, ftnlen query_len, ftnlen chrbuf_len, ftnlen eqryc_len, ftnlen prserr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektloc_ 14 7 4 4 4 4 4 4 12 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: lnkila_ 14 3 4 4 4 */ -/*:ref: zzekinqn_ 14 7 7 4 4 4 4 7 4 */ -/*:ref: zzekinqc_ 14 9 13 4 4 4 4 13 4 124 124 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: lnkhl_ 4 2 4 4 */ -/*:ref: lnkprv_ 4 2 4 4 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: lnkilb_ 14 3 4 4 4 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnktl_ 4 2 4 4 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: appndi_ 14 2 4 4 */ -/*:ref: zzekweqi_ 14 4 13 4 4 124 */ - -extern int zzekordc_(char *cvals, logical *nullok, logical *nlflgs, integer *nvals, integer *iorder, ftnlen cvals_len); -/*:ref: swapi_ 14 2 4 4 */ - -extern int zzekordd_(doublereal *dvals, logical *nullok, logical *nlflgs, integer *nvals, integer *iorder); -/*:ref: swapi_ 14 2 4 4 */ - -extern int zzekordi_(integer *ivals, logical *nullok, logical *nlflgs, integer *nvals, integer *iorder); -/*:ref: swapi_ 14 2 4 4 */ - -extern int zzekpage_(integer *handle, integer *type__, integer *addrss, char *stat, integer *p, char *pagec, doublereal *paged, integer *pagei, integer *base, integer *value, ftnlen stat_len, ftnlen pagec_len); -extern int zzekpgin_(integer *handle); -extern int zzekpgan_(integer *handle, integer *type__, integer *p, integer *base); -extern int zzekpgal_(integer *handle, integer *type__, integer *p, integer *base); -extern int zzekpgfr_(integer *handle, integer *type__, integer *p); -extern int zzekpgrc_(integer *handle, integer *p, char *pagec, ftnlen pagec_len); -extern int zzekpgrd_(integer *handle, integer *p, doublereal *paged); -extern int zzekpgri_(integer *handle, integer *p, integer *pagei); -extern int zzekpgwc_(integer *handle, integer *p, char *pagec, ftnlen pagec_len); -extern int zzekpgwd_(integer *handle, integer *p, doublereal *paged); -extern int zzekpgwi_(integer *handle, integer *p, integer *pagei); -extern int zzekpgbs_(integer *type__, integer *p, integer *base); -extern int zzekpgpg_(integer *type__, integer *addrss, integer *p, integer *base); -extern int zzekpgst_(integer *handle, char *stat, integer *value, ftnlen stat_len); -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: daslla_ 14 4 4 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: fillc_ 14 5 13 4 13 124 124 */ -/*:ref: filld_ 14 3 7 4 7 */ -/*:ref: filli_ 14 3 4 4 4 */ -/*:ref: dasadi_ 14 3 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: dasadc_ 14 6 4 4 4 4 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasadd_ 14 3 4 4 7 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: prtdec_ 14 3 13 4 124 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ -/*:ref: prtenc_ 14 3 4 13 124 */ -/*:ref: dasudc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: dasudd_ 14 4 4 4 4 7 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int zzekpars_(char *query, integer *ntoken, integer *lxbegs, integer *lxends, integer *tokens, integer *values, doublereal *numvls, char *chrbuf, integer *chbegs, integer *chends, integer *eqryi, char *eqryc, doublereal *eqryd, logical *error, char *prserr, ftnlen query_len, ftnlen chrbuf_len, ftnlen eqryc_len, ftnlen prserr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekqini_ 14 6 4 4 4 13 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektloc_ 14 7 4 4 4 4 4 4 12 */ -/*:ref: zzekinqc_ 14 9 13 4 4 4 4 13 4 124 124 */ -/*:ref: appndi_ 14 2 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekweqi_ 14 4 13 4 4 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: zzeknrml_ 14 19 13 4 4 4 4 4 7 13 4 4 4 13 7 12 13 124 124 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ - -extern int zzekpcol_(char *qcol, integer *eqryi, char *eqryc, char *table, char *alias, integer *tabidx, char *column, integer *colidx, logical *error, char *errmsg, ftnlen qcol_len, ftnlen eqryc_len, ftnlen table_len, ftnlen alias_len, ftnlen column_len, ftnlen errmsg_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekscan_ 14 17 13 4 4 4 4 4 4 4 7 13 4 4 12 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzekqtab_ 14 8 4 13 4 13 13 124 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: ekccnt_ 14 3 13 4 124 */ -/*:ref: ekcii_ 14 6 13 4 13 4 124 124 */ - -extern int zzekpdec_(char *decl, integer *pardsc, ftnlen decl_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: lparsm_ 14 8 13 13 4 4 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ - -extern int zzekpgch_(integer *handle, char *access, ftnlen access_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dassih_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: daslla_ 14 4 4 4 4 4 */ - -extern int zzekqcnj_(integer *eqryi, integer *n, integer *size); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int zzekqcon_(integer *eqryi, char *eqryc, doublereal *eqryd, integer *n, integer *cnstyp, char *ltname, integer *ltidx, char *lcname, integer *lcidx, integer *opcode, char *rtname, integer *rtidx, char *rcname, integer *rcidx, integer *dtype, integer *cbeg, integer *cend, doublereal *dval, integer *ival, ftnlen eqryc_len, ftnlen ltname_len, ftnlen lcname_len, ftnlen rtname_len, ftnlen rcname_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int zzekqini_(integer *isize, integer *dsize, integer *eqryi, char *eqryc, doublereal *eqryd, ftnlen eqryc_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: appndi_ 14 2 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ - -extern int zzekqord_(integer *eqryi, char *eqryc, integer *n, char *table, integer *tabidx, char *column, integer *colidx, integer *sense, ftnlen eqryc_len, ftnlen table_len, ftnlen column_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int zzekqsel_(integer *eqryi, char *eqryc, integer *n, integer *lxbeg, integer *lxend, char *table, integer *tabidx, char *column, integer *colidx, ftnlen eqryc_len, ftnlen table_len, ftnlen column_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int zzekqtab_(integer *eqryi, char *eqryc, integer *n, char *table, char *alias, ftnlen eqryc_len, ftnlen table_len, ftnlen alias_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int zzekrbck_(char *action, integer *handle, integer *segdsc, integer *coldsc, integer *recno, ftnlen action_len); - -extern logical zzekrcmp_(integer *op, integer *ncols, integer *han1, integer *sgdsc1, integer *cdlst1, integer *row1, integer *elts1, integer *han2, integer *sgdsc2, integer *cdlst2, integer *row2, integer *elts2); -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekecmp_ 4 5 4 4 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekrd01_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *ival, logical *isnull); -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzekrd02_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, doublereal *dval, logical *isnull); -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ - -extern int zzekrd03_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *cvlen, char *cval, logical *isnull, ftnlen cval_len); -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekgei_ 14 3 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int zzekrd04_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *beg, integer *end, integer *ivals, logical *isnull, logical *found); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekgfwd_ 14 4 4 4 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ - -extern int zzekrd05_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *beg, integer *end, doublereal *dvals, logical *isnull, logical *found); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekgfwd_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ - -extern int zzekrd06_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *beg, integer *end, char *cvals, logical *isnull, logical *found, ftnlen cvals_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekgei_ 14 3 4 4 4 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ - -extern int zzekrd07_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *ival, logical *isnull); -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ - -extern int zzekrd08_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, doublereal *dval, logical *isnull); -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ - -extern int zzekrd09_(integer *handle, integer *segdsc, integer *coldsc, integer *recno, integer *cvlen, char *cval, logical *isnull, ftnlen cval_len); -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ - -extern int zzekreqi_(integer *eqryi, char *name__, integer *value, ftnlen name_len); -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical zzekrmch_(integer *ncnstr, logical *active, integer *handle, integer *segdsc, integer *cdscrs, integer *row, integer *elts, integer *ops, integer *vtypes, char *chrbuf, integer *cbegs, integer *cends, doublereal *dvals, integer *ivals, ftnlen chrbuf_len); -/*:ref: zzekscmp_ 12 12 4 4 4 4 4 4 4 13 7 4 12 124 */ - -extern integer zzekrp2n_(integer *handle, integer *segno, integer *recptr); -/*:ref: zzeksdsc_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzektrls_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekrplk_(integer *handle, integer *segdsc, integer *n, integer *recptr); -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekrsc_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *eltidx, integer *cvlen, char *cval, logical *isnull, logical *found, ftnlen cval_len); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrd03_ 14 8 4 4 4 4 4 13 12 124 */ -/*:ref: zzekrd06_ 14 10 4 4 4 4 4 4 13 12 12 124 */ -/*:ref: zzekrd09_ 14 8 4 4 4 4 4 13 12 124 */ - -extern int zzekrsd_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *eltidx, doublereal *dval, logical *isnull, logical *found); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrd02_ 14 6 4 4 4 4 7 12 */ -/*:ref: zzekrd05_ 14 9 4 4 4 4 4 4 7 12 12 */ -/*:ref: zzekrd08_ 14 6 4 4 4 4 7 12 */ - -extern int zzekrsi_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *eltidx, integer *ival, logical *isnull, logical *found); -/*:ref: zzekcnam_ 14 4 4 4 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekrd01_ 14 6 4 4 4 4 4 12 */ -/*:ref: zzekrd04_ 14 9 4 4 4 4 4 4 4 12 12 */ -/*:ref: zzekrd07_ 14 6 4 4 4 4 4 12 */ - -extern int zzeksca_(integer *n, integer *beg, integer *end, integer *idata, integer *top); -extern int zzekstop_(integer *top); -extern int zzekspsh_(integer *n, integer *idata); -extern int zzekspop_(integer *n, integer *idata); -extern int zzeksdec_(integer *n); -extern int zzeksupd_(integer *beg, integer *end, integer *idata); -extern int zzeksrd_(integer *beg, integer *end, integer *idata); -extern int zzekscln_(void); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasops_ 14 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: daslla_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: dasadi_ 14 3 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: daswbr_ 14 1 4 */ -/*:ref: dasllc_ 14 1 4 */ - -extern int zzekscan_(char *query, integer *maxntk, integer *maxnum, integer *ntoken, integer *tokens, integer *lxbegs, integer *lxends, integer *values, doublereal *numvls, char *chrbuf, integer *chbegs, integer *chends, logical *scnerr, char *errmsg, ftnlen query_len, ftnlen chrbuf_len, ftnlen errmsg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: lxcsid_ 14 5 13 13 4 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lxqstr_ 14 7 13 13 4 4 4 124 124 */ -/*:ref: parsqs_ 14 11 13 13 13 4 12 13 4 124 124 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: lx4num_ 14 5 13 4 4 4 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ -/*:ref: beint_ 12 2 13 124 */ -/*:ref: lxidnt_ 14 6 4 13 4 4 4 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: frstpc_ 4 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern int zzekscdp_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *datptr); -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern logical zzekscmp_(integer *op, integer *handle, integer *segdsc, integer *coldsc, integer *row, integer *eltidx, integer *dtype, char *cval, doublereal *dval, integer *ival, logical *null, ftnlen cval_len); -/*:ref: zzekrsc_ 14 10 4 4 4 4 4 4 13 12 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzekrsd_ 14 8 4 4 4 4 4 7 12 12 */ -/*:ref: zzekrsi_ 14 8 4 4 4 4 4 4 12 12 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: matchi_ 12 8 13 13 13 13 124 124 124 124 */ - -extern int zzeksdsc_(integer *handle, integer *segno, integer *segdsc); -/*:ref: zzekmloc_ 14 4 4 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzeksei_(integer *handle, integer *addrss, integer *ival); -/*:ref: prtenc_ 14 3 4 13 124 */ -/*:ref: dasudc_ 14 7 4 4 4 4 4 13 124 */ - -extern int zzeksemc_(char *query, integer *eqryi, char *eqryc, logical *error, char *errmsg, integer *errptr, ftnlen query_len, ftnlen eqryc_len, ftnlen errmsg_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekqtab_ 14 8 4 13 4 13 13 124 124 124 */ -/*:ref: ekcii_ 14 6 13 4 13 4 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: zzekweqi_ 14 4 13 4 4 124 */ - -extern int zzeksfwd_(integer *handle, integer *type__, integer *p, integer *fward); -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzeksei_ 14 3 4 4 4 */ -/*:ref: dasudd_ 14 4 4 4 4 7 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int zzeksinf_(integer *handle, integer *segno, char *tabnam, integer *segdsc, char *cnames, integer *cdscrs, ftnlen tabnam_len, ftnlen cnames_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eknseg_ 4 1 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzekmloc_ 14 4 4 4 4 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdc_ 14 7 4 4 4 4 4 13 124 */ - -extern int zzekslnk_(integer *handle, integer *type__, integer *p, integer *nlinks); -/*:ref: zzekpgbs_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzeksei_ 14 3 4 4 4 */ -/*:ref: dasudd_ 14 4 4 4 4 7 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int zzeksrcp_(integer *handle, integer *recptr, integer *recno); -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int zzeksrs_(integer *handle, integer *recptr, integer *status); -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern integer zzekstyp_(integer *ncols, integer *cdscrs); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer zzeksz04_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern integer zzeksz05_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasrdd_ 14 4 4 4 4 7 */ - -extern integer zzeksz06_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekgei_ 14 3 4 4 4 */ - -extern int zzektcnv_(char *timstr, doublereal *et, logical *error, char *errmsg, ftnlen timstr_len, ftnlen errmsg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: posr_ 4 5 13 13 4 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: scn2id_ 14 4 13 4 12 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: scpars_ 14 7 4 13 12 13 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: sct2e_ 14 3 4 7 7 */ -/*:ref: tpartv_ 14 15 13 7 4 13 13 12 12 12 13 13 124 124 124 124 124 */ -/*:ref: str2et_ 14 3 13 7 124 */ - -extern int zzektloc_(integer *tokid, integer *kwcode, integer *ntoken, integer *tokens, integer *values, integer *loc, logical *found); - -extern int zzektr13_(integer *handle, integer *tree); -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgal_ 14 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ - -extern int zzektr1s_(integer *handle, integer *tree, integer *size, integer *values); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzektrsz_ 4 2 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: zzekpgal_ 14 4 4 4 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ - -extern int zzektr23_(integer *handle, integer *tree, integer *left, integer *right, integer *parent, integer *pkidx, logical *overfl); -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgal_ 14 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ - -extern int zzektr31_(integer *handle, integer *tree); -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzekpgfr_ 14 3 4 4 4 */ - -extern int zzektr32_(integer *handle, integer *tree, integer *left, integer *middle, integer *right, integer *parent, integer *lpkidx, logical *undrfl); -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzekpgfr_ 14 3 4 4 4 */ - -extern int zzektrap_(integer *handle, integer *tree, integer *value, integer *key); -/*:ref: zzektrsz_ 4 2 4 4 */ -/*:ref: zzektrin_ 14 4 4 4 4 4 */ - -extern int zzektrbn_(integer *handle, integer *tree, integer *left, integer *right, integer *parent, integer *pkidx); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrnk_ 4 3 4 4 4 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzektrrk_ 14 7 4 4 4 4 4 4 4 */ - -extern integer zzektrbs_(integer *node); -/*:ref: zzekpgbs_ 14 3 4 4 4 */ - -extern int zzektrdl_(integer *handle, integer *tree, integer *key); -/*:ref: zzektrud_ 14 5 4 4 4 4 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzektrlk_ 14 8 4 4 4 4 4 4 4 4 */ -/*:ref: zzektrsb_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: zzektrnk_ 4 3 4 4 4 */ -/*:ref: zzektrpi_ 14 12 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: zzektrrk_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: zzektrbn_ 14 6 4 4 4 4 4 4 */ -/*:ref: zzektrki_ 14 5 4 4 4 4 4 */ -/*:ref: zzektr32_ 14 8 4 4 4 4 4 4 4 12 */ -/*:ref: zzektr31_ 14 2 4 4 */ - -extern int zzektrdp_(integer *handle, integer *tree, integer *key, integer *ptr); -/*:ref: zzektrlk_ 14 8 4 4 4 4 4 4 4 4 */ - -extern int zzektres_(char *query, integer *eqryi, char *eqryc, doublereal *eqryd, logical *error, char *errmsg, integer *errptr, ftnlen query_len, ftnlen eqryc_len, ftnlen errmsg_len); -/*:ref: zzekreqi_ 14 4 4 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekqtab_ 14 8 4 13 4 13 13 124 124 124 */ -/*:ref: ekcii_ 14 6 13 4 13 4 124 124 */ -/*:ref: zzektcnv_ 14 6 13 7 12 13 124 124 */ -/*:ref: zzekinqn_ 14 7 7 4 4 4 4 7 4 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekweqi_ 14 4 13 4 4 124 */ - -extern int zzektrfr_(integer *handle, integer *tree); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgfr_ 14 3 4 4 4 */ - -extern int zzektrin_(integer *handle, integer *tree, integer *key, integer *value); -/*:ref: zzektrui_ 14 5 4 4 4 4 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzektrlk_ 14 8 4 4 4 4 4 4 4 4 */ -/*:ref: zzektrpi_ 14 12 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: zzektrnk_ 4 3 4 4 4 */ -/*:ref: zzektrbn_ 14 6 4 4 4 4 4 4 */ -/*:ref: zzektrki_ 14 5 4 4 4 4 4 */ -/*:ref: zzektr23_ 14 7 4 4 4 4 4 4 12 */ -/*:ref: zzektr13_ 14 2 4 4 */ - -extern int zzektrit_(integer *handle, integer *tree); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgal_ 14 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzektrki_(integer *handle, integer *tree, integer *nodkey, integer *n, integer *key); -/*:ref: zzektrlk_ 14 8 4 4 4 4 4 4 4 4 */ -/*:ref: zzektrnk_ 4 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzektrlk_(integer *handle, integer *tree, integer *key, integer *idx, integer *node, integer *noffst, integer *level, integer *value); -/*:ref: dasham_ 14 3 4 13 124 */ -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lstlei_ 4 3 4 4 4 */ - -extern integer zzektrls_(integer *handle, integer *tree, integer *ival); -/*:ref: zzektrsz_ 4 2 4 4 */ -/*:ref: zzektrdp_ 14 4 4 4 4 4 */ - -extern integer zzektrnk_(integer *handle, integer *tree, integer *node); -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzektrpi_(integer *handle, integer *tree, integer *key, integer *parent, integer *pkey, integer *poffst, integer *lpidx, integer *lpkey, integer *lsib, integer *rpidx, integer *rpkey, integer *rsib); -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lstlei_ 4 3 4 4 4 */ - -extern int zzektrrk_(integer *handle, integer *tree, integer *left, integer *right, integer *parent, integer *pkidx, integer *nrot); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ - -extern int zzektrsb_(integer *handle, integer *tree, integer *key, integer *lsib, integer *lkey, integer *rsib, integer *rkey); -/*:ref: zzektrpi_ 14 12 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern integer zzektrsz_(integer *handle, integer *tree); -/*:ref: zzektrbs_ 4 1 4 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ - -extern int zzektrud_(integer *handle, integer *tree, integer *key, integer *trgkey, logical *undrfl); -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzektrlk_ 14 8 4 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzektrpi_ 14 12 4 4 4 4 4 4 4 4 4 4 4 4 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzektrui_(integer *handle, integer *tree, integer *key, integer *value, logical *overfl); -/*:ref: zzekpgri_ 14 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: zzektrlk_ 14 8 4 4 4 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzektrpi_ 14 12 4 4 4 4 4 4 4 4 4 4 4 4 */ - -extern int zzekue01_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *ival, logical *isnull); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekixdl_ 14 4 4 4 4 4 */ -/*:ref: zzekiii1_ 14 6 4 4 4 4 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: zzekad01_ 14 6 4 4 4 4 4 12 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ - -extern int zzekue02_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, doublereal *dval, logical *isnull); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekpgch_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dasrdi_ 14 4 4 4 4 4 */ -/*:ref: zzekixdl_ 14 4 4 4 4 4 */ -/*:ref: zzekiid1_ 14 6 4 4 4 7 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzekpgpg_ 14 4 4 4 4 4 */ -/*:ref: zzekglnk_ 14 4 4 4 4 4 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: dasudi_ 14 4 4 4 4 4 */ -/*:ref: dasudd_ 14 4 4 4 4 7 */ -/*:ref: zzekad02_ 14 6 4 4 4 4 7 12 */ -/*:ref: zzekrp2n_ 4 3 4 4 4 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: errfnm_ 14 3 13 4 124 */ - -extern int zzekue03_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, char *cval, logical *isnull, ftnlen cval_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekde03_ 14 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekad03_ 14 7 4 4 4 4 13 12 124 */ - -extern int zzekue04_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *nvals, integer *ivals, logical *isnull); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekde04_ 14 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekad04_ 14 7 4 4 4 4 4 4 12 */ - -extern int zzekue05_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *nvals, doublereal *dvals, logical *isnull); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekde05_ 14 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekad05_ 14 7 4 4 4 4 4 7 12 */ - -extern int zzekue06_(integer *handle, integer *segdsc, integer *coldsc, integer *recptr, integer *nvals, char *cvals, logical *isnull, ftnlen cvals_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekde06_ 14 4 4 4 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekad06_ 14 8 4 4 4 4 4 13 12 124 */ - -extern int zzekvadr_(integer *njrs, integer *bases, integer *rwvidx, integer *rwvbas, integer *sgvbas); -extern int zzekvset_(integer *njrs, integer *bases); -extern int zzekvcal_(integer *rwvidx, integer *rwvbas, integer *sgvbas); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzekstop_ 14 1 4 */ -/*:ref: zzeksrd_ 14 3 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: lstlei_ 4 3 4 4 4 */ - -extern logical zzekvcmp_(integer *op, integer *ncols, integer *tabs, integer *cols, integer *elts, integer *senses, integer *sthan, integer *stsdsc, integer *stdtpt, integer *dtpool, integer *dtdscs, integer *sgvec1, integer *rwvec1, integer *sgvec2, integer *rwvec2); -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekecmp_ 4 5 4 4 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical zzekvmch_(integer *ncnstr, logical *active, integer *lhans, integer *lsdscs, integer *lcdscs, integer *lrows, integer *lelts, integer *ops, integer *rhans, integer *rsdscs, integer *rcdscs, integer *rrows, integer *relts); -/*:ref: movei_ 14 3 4 4 4 */ -/*:ref: zzekecmp_ 4 5 4 4 4 4 4 */ -/*:ref: zzekrsc_ 14 10 4 4 4 4 4 4 13 12 12 124 */ -/*:ref: dashlu_ 14 2 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errfnm_ 14 3 13 4 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: matchi_ 12 8 13 13 13 13 124 124 124 124 */ - -extern int zzekweed_(integer *njrs, integer *bases, integer *nrows); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekvset_ 14 2 4 4 */ -/*:ref: zzeksrd_ 14 3 4 4 4 */ -/*:ref: sameai_ 12 3 4 4 4 */ -/*:ref: zzeksupd_ 14 3 4 4 4 */ -/*:ref: zzekjsqz_ 14 1 4 */ - -extern int zzekweqi_(char *name__, integer *value, integer *eqryi, ftnlen name_len); -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekwpac_(integer *handle, integer *segdsc, integer *nvals, integer *l, char *cvals, integer *p, integer *base, ftnlen cvals_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzekacps_ 14 6 4 4 4 4 4 4 */ -/*:ref: zzekpgwc_ 14 4 4 4 13 124 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ - -extern int zzekwpai_(integer *handle, integer *segdsc, integer *nvals, integer *ivals, integer *p, integer *base); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekacps_ 14 6 4 4 4 4 4 4 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: zzekpgwi_ 14 3 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzekwpal_(integer *handle, integer *segdsc, integer *nvals, logical *lvals, integer *p, integer *base); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzekacps_ 14 6 4 4 4 4 4 4 */ -/*:ref: zzekpgwc_ 14 4 4 4 13 124 */ -/*:ref: zzekslnk_ 14 4 4 4 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzelvupy_(doublereal *ellips, doublereal *vertex, doublereal *axis, integer *n, doublereal *bounds, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: el2cgv_ 14 4 7 7 7 7 */ -/*:ref: saelgv_ 14 4 7 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: cgv2el_ 14 4 7 7 7 7 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: pi_ 7 0 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: repmot_ 14 9 13 13 4 13 13 124 124 124 124 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: nvp2pl_ 14 3 7 7 7 */ -/*:ref: inrypl_ 14 5 7 7 7 4 7 */ -/*:ref: zzwind_ 4 4 7 4 7 7 */ -/*:ref: psv2pl_ 14 4 7 7 7 7 */ -/*:ref: inelpl_ 14 5 7 7 4 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int zzenut80_(doublereal *et, doublereal *nutxf); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzwahr_ 14 2 7 7 */ -/*:ref: zzmobliq_ 14 3 7 7 7 */ -/*:ref: eul2xf_ 14 5 7 4 4 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzeprc76_(doublereal *et, doublereal *precxf); -/*:ref: jyear_ 7 0 */ -/*:ref: rpd_ 7 0 */ -/*:ref: eul2xf_ 14 5 7 4 4 4 7 */ - -extern int zzeprcss_(doublereal *et, doublereal *precm); -/*:ref: jyear_ 7 0 */ -/*:ref: rpd_ 7 0 */ -/*:ref: eul2m_ 14 7 7 7 7 4 4 4 7 */ - -extern int zzfdat_(integer *ncount, integer *maxbfr, char *name__, integer *idcode, integer *center, integer *type__, integer *typid, integer *centrd, integer *bnmlst, integer *bnmpol, char *bnmnms, integer *bnmidx, integer *bidlst, integer *bidpol, integer *bidids, integer *bididx, ftnlen name_len, ftnlen bnmnms_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnam_ 14 3 4 13 124 */ -/*:ref: orderi_ 14 3 4 4 4 */ -/*:ref: zzhscini_ 14 3 4 4 4 */ -/*:ref: zzhsiini_ 14 3 4 4 4 */ -/*:ref: zzhscadd_ 14 8 4 4 13 13 4 12 124 124 */ -/*:ref: zzhsiadd_ 14 6 4 4 4 4 4 12 */ - -extern int zzfovaxi_(char *inst, integer *n, doublereal *bounds, doublereal *axis, ftnlen inst_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: zzhullax_ 14 5 13 4 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: vhatip_ 14 1 7 */ - -extern int zzfrmch0_(integer *frame1, integer *frame2, doublereal *et, doublereal *xform); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzfrmgt0_ 14 5 4 7 7 4 12 */ -/*:ref: zzmsxf_ 14 3 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zznofcon_ 14 7 7 4 4 4 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: invstm_ 14 2 7 7 */ - -extern int zzfrmch1_(integer *frame1, integer *frame2, doublereal *et, doublereal *xform); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzfrmgt1_ 14 5 4 7 7 4 12 */ -/*:ref: zzmsxf_ 14 3 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zznofcon_ 14 7 7 4 4 4 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: invstm_ 14 2 7 7 */ - -extern int zzfrmgt0_(integer *infrm, doublereal *et, doublereal *xform, integer *outfrm, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: tisbod_ 14 5 13 4 7 7 124 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: ckfxfm_ 14 5 4 7 7 4 12 */ -/*:ref: tkfram_ 14 4 4 7 4 12 */ -/*:ref: zzdynfr0_ 14 5 4 4 7 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ - -extern int zzfrmgt1_(integer *infrm, doublereal *et, doublereal *xform, integer *outfrm, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: tisbod_ 14 5 13 4 7 7 124 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: ckfxfm_ 14 5 4 7 7 4 12 */ -/*:ref: tkfram_ 14 4 4 7 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: failed_ 12 0 */ - -extern int zzftpchk_(char *string, logical *ftperr, ftnlen string_len); -/*:ref: zzftpstr_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: zzrbrkst_ 14 10 13 13 13 13 4 12 124 124 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: pos_ 4 5 13 13 4 124 124 */ - -extern int zzftpstr_(char *tstcom, char *lend, char *rend, char *delim, ftnlen tstcom_len, ftnlen lend_len, ftnlen rend_len, ftnlen delim_len); -/*:ref: suffix_ 14 5 13 4 13 124 124 */ - -extern int zzgapool_(char *varnam, char *wtvars, integer *wtptrs, integer *wtpool, char *wtagnt, char *agtset, ftnlen varnam_len, ftnlen wtvars_len, ftnlen wtagnt_len, ftnlen agtset_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: scardc_ 14 3 4 13 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: cardc_ 4 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: validc_ 14 4 4 4 13 124 */ -/*:ref: sizec_ 4 2 13 124 */ - -extern int zzgetbff_(integer *bffid); - -extern int zzgetelm_(integer *frstyr, char *lines, doublereal *epoch, doublereal *elems, logical *ok, char *error, ftnlen lines_len, ftnlen error_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: rpd_ 7 0 */ -/*:ref: twopi_ 7 0 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ -/*:ref: repmd_ 14 8 13 13 7 4 13 124 124 124 */ -/*:ref: ttrans_ 14 5 13 13 7 124 124 */ - -extern int zzgfcoq_(char *vecdef, char *method, integer *trgid, doublereal *et, char *ref, char *abcorr, integer *obsid, char *dref, doublereal *dvec, char *crdsys, integer *ctrid, doublereal *re, doublereal *f, char *crdnam, doublereal *value, logical *found, ftnlen vecdef_len, ftnlen method_len, ftnlen ref_len, ftnlen abcorr_len, ftnlen dref_len, ftnlen crdsys_len, ftnlen crdnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: bodc2s_ 14 3 4 13 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: subpnt_ 14 14 13 13 7 13 13 13 7 7 7 124 124 124 124 124 */ -/*:ref: sincpt_ 14 18 13 13 7 13 13 13 13 7 7 7 7 12 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: reclat_ 14 4 7 7 7 7 */ -/*:ref: recrad_ 14 4 7 7 7 7 */ -/*:ref: recsph_ 14 4 7 7 7 7 */ -/*:ref: reccyl_ 14 4 7 7 7 7 */ -/*:ref: recgeo_ 14 6 7 7 7 7 7 7 */ -/*:ref: recpgr_ 14 8 13 7 7 7 7 7 7 124 */ - -extern int zzgfcost_(char *vecdef, char *method, integer *trgid, doublereal *et, char *ref, char *abcorr, integer *obsid, char *dref, integer *dctr, doublereal *dvec, doublereal *radii, doublereal *state, logical *found, ftnlen vecdef_len, ftnlen method_len, ftnlen ref_len, ftnlen abcorr_len, ftnlen dref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: zzgfssob_ 14 11 13 4 7 13 13 4 7 7 124 124 124 */ -/*:ref: zzgfssin_ 14 16 13 4 7 13 13 4 13 4 7 7 7 12 124 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzgfcou_(char *vecdef, char *method, char *target, doublereal *et, char *ref, char *abcorr, char *obsrvr, char *dref, doublereal *dvec, char *crdsys, char *crdnam, logical *decres, doublereal *crdval, logical *crdfnd, U_fp udfunc, ftnlen vecdef_len, ftnlen method_len, ftnlen target_len, ftnlen ref_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen dref_len, ftnlen crdsys_len, ftnlen crdnam_len); -extern int zzgfcoin_(char *vecdef, char *method, char *target, char *ref, char *abcorr, char *obsrvr, char *dref, doublereal *dvec, char *crdsys, char *crdnam, ftnlen vecdef_len, ftnlen method_len, ftnlen target_len, ftnlen ref_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen dref_len, ftnlen crdsys_len, ftnlen crdnam_len); -extern int zzgfcog_(doublereal *et, doublereal *crdval); -extern int zzgfcodc_(U_fp udfunc, doublereal *et, logical *decres); -extern int zzgfcoex_(U_fp udfunc, doublereal *et, logical *crdfnd); -extern int zzgfcocg_(doublereal *et, doublereal *crdval); -extern int zzgfcosg_(doublereal *et, doublereal *crdval); -extern int zzgfcocd_(U_fp udfunc, doublereal *et, logical *decres); -extern int zzgfcosd_(U_fp udfunc, doublereal *et, logical *decres); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: bodfnd_ 12 3 4 13 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: bodc2s_ 14 3 4 13 124 */ -/*:ref: recpgr_ 14 8 13 7 7 7 7 7 7 124 */ -/*:ref: pi_ 7 0 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: zzgfcoq_ 14 23 13 13 4 7 13 13 4 13 7 13 4 7 7 13 7 12 124 124 124 124 124 124 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: zzgfcost_ 14 18 13 13 4 7 13 13 4 13 4 7 7 7 12 124 124 124 124 124 */ -/*:ref: zzgfcprx_ 14 7 7 13 7 7 4 4 124 */ -/*:ref: reclat_ 14 4 7 7 7 7 */ -/*:ref: recrad_ 14 4 7 7 7 7 */ -/*:ref: recsph_ 14 4 7 7 7 7 */ -/*:ref: reccyl_ 14 4 7 7 7 7 */ -/*:ref: recgeo_ 14 6 7 7 7 7 7 7 */ - -extern int zzgfcprx_(doublereal *state, char *corsys, doublereal *re, doublereal *f, integer *sense, integer *cdsign, ftnlen corsys_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: recgeo_ 14 6 7 7 7 7 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: latrec_ 14 4 7 7 7 7 */ -/*:ref: vpack_ 14 4 7 7 7 7 */ -/*:ref: vhatip_ 14 1 7 */ -/*:ref: zzrtnmat_ 14 2 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ - -extern int zzgfcslv_(char *vecdef, char *method, char *target, char *ref, char *abcorr, char *obsrvr, char *dref, doublereal *dvec, char *crdsys, char *crdnam, char *relate, doublereal *refval, doublereal *tol, doublereal *adjust, U_fp udstep, U_fp udrefn, logical *rpt, S_fp udrepi, U_fp udrepu, S_fp udrepf, logical *bail, L_fp udbail, integer *mw, integer *nw, doublereal *work, doublereal *cnfine, doublereal *result, ftnlen vecdef_len, ftnlen method_len, ftnlen target_len, ftnlen ref_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen dref_len, ftnlen crdsys_len, ftnlen crdnam_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: ssized_ 14 2 4 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: zzgfcoin_ 14 19 13 13 13 13 13 13 13 7 13 13 124 124 124 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: wncard_ 4 1 7 */ -/*:ref: wnfetd_ 14 4 7 4 7 7 */ -/*:ref: zzgfsolvx_ 14 14 200 200 200 200 12 212 12 7 7 7 7 12 200 7 */ -/*:ref: wncond_ 14 3 7 7 7 */ -/*:ref: copyd_ 14 2 7 7 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: zzgflong_ 14 37 13 13 13 13 13 13 13 7 13 13 13 7 7 7 200 200 12 214 200 214 12 212 4 4 7 7 7 124 124 124 124 124 124 124 124 124 124 */ -/*:ref: zzgfrelx_ 14 25 200 200 200 200 200 13 7 7 7 7 4 4 7 12 214 200 214 13 13 12 212 7 124 124 124 */ - -extern int zzgfdiq_(integer *targid, doublereal *et, char *abcorr, integer *obsid, doublereal *dist, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vnorm_ 7 1 7 */ - -extern int zzgfdiu_(char *target, char *abcorr, char *obsrvr, U_fp udfunc, doublereal *et, logical *decres, doublereal *dist, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len); -extern int zzgfdiin_(char *target, char *abcorr, char *obsrvr, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len); -extern int zzgfdidc_(U_fp udfunc, doublereal *et, logical *decres); -extern int zzgfdigq_(doublereal *et, doublereal *dist); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: zzgfdiq_ 14 6 4 7 13 4 7 124 */ - -extern int zzgfdsps_(integer *nlead, char *string, char *fmt, integer *ntrail, ftnlen string_len, ftnlen fmt_len); -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzgffvu_(char *inst, char *tshape, doublereal *raydir, char *target, char *tframe, char *abcorr, char *obsrvr, doublereal *time, logical *vistat, ftnlen inst_len, ftnlen tshape_len, ftnlen target_len, ftnlen tframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -extern int zzgffvin_(char *inst, char *tshape, doublereal *raydir, char *target, char *tframe, char *abcorr, char *obsrvr, ftnlen inst_len, ftnlen tshape_len, ftnlen target_len, ftnlen tframe_len, ftnlen abcorr_len, ftnlen obsrvr_len); -extern int zzgffvst_(doublereal *time, logical *vistat); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: getfov_ 14 9 4 4 13 13 7 4 7 124 124 */ -/*:ref: zzfovaxi_ 14 5 13 4 7 7 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: dpr_ 7 0 */ -/*:ref: nvc2pl_ 14 3 7 7 7 */ -/*:ref: vrotv_ 14 4 7 7 7 7 */ -/*:ref: inrypl_ 14 5 7 7 7 4 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: frame_ 14 3 7 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: zzcorepc_ 14 5 13 7 7 7 124 */ -/*:ref: pxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: edlimb_ 14 5 7 7 7 7 7 */ -/*:ref: el2cgv_ 14 4 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: cgv2el_ 14 4 7 7 7 7 */ -/*:ref: zzelvupy_ 14 6 7 7 7 4 7 12 */ -/*:ref: zzocced_ 4 5 7 7 7 7 7 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ -/*:ref: mtxv_ 14 3 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: zzwind2d_ 4 3 4 7 7 */ - -extern int zzgfilu_(char *method, char *angtyp, char *target, char *illum, char *fixref, char *abcorr, char *obsrvr, doublereal *spoint, doublereal *et, U_fp udfunc, logical *decres, doublereal *angle, ftnlen method_len, ftnlen angtyp_len, ftnlen target_len, ftnlen illum_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len); -extern int zzgfilin_(char *method, char *angtyp, char *target, char *illum, char *fixref, char *abcorr, char *obsrvr, doublereal *spoint, ftnlen method_len, ftnlen angtyp_len, ftnlen target_len, ftnlen illum_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len); -extern int zzgfildc_(U_fp udfunc, doublereal *et, logical *decres); -extern int zzgfilgq_(doublereal *et, doublereal *angle); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: bodvrd_ 14 7 13 13 4 4 7 124 124 */ -/*:ref: surfnm_ 14 5 7 7 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: esrchc_ 4 5 13 4 13 124 124 */ -/*:ref: zzilusta_ 14 18 13 13 13 7 13 13 13 7 7 7 7 7 124 124 124 124 124 124 */ -/*:ref: illumg_ 14 19 13 13 13 7 13 13 13 7 7 7 7 7 7 124 124 124 124 124 124 */ - -extern int zzgflong_(char *vecdef, char *method, char *target, char *ref, char *abcorr, char *obsrvr, char *dref, doublereal *dvec, char *crdsys, char *crdnam, char *relate, doublereal *refval, doublereal *tol, doublereal *adjust, U_fp udstep, U_fp udrefn, logical *rpt, U_fp udrepi, U_fp udrepu, U_fp udrepf, logical *bail, L_fp udbail, integer *mw, integer *nw, doublereal *work, doublereal *cnfine, doublereal *result, ftnlen vecdef_len, ftnlen method_len, ftnlen target_len, ftnlen ref_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen dref_len, ftnlen crdsys_len, ftnlen crdnam_len, ftnlen relate_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ssized_ 14 2 4 7 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: zzgfcoin_ 14 19 13 13 13 13 13 13 13 7 13 13 124 124 124 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: wncard_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: copyd_ 14 2 7 7 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: bodc2s_ 14 3 4 13 124 */ -/*:ref: recpgr_ 14 8 13 7 7 7 7 7 7 124 */ -/*:ref: pi_ 7 0 */ -/*:ref: twopi_ 7 0 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: zzgfrelx_ 14 25 200 200 200 200 214 13 7 7 7 7 4 4 7 12 200 200 200 13 13 12 212 7 124 124 124 */ -/*:ref: zzgfcosg_ 14 2 7 7 */ -/*:ref: zzgfcocg_ 14 2 7 7 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: smsgnd_ 12 2 7 7 */ -/*:ref: wninsd_ 14 3 7 7 7 */ -/*:ref: wndifd_ 14 3 7 7 7 */ -/*:ref: zzgfcog_ 14 2 7 7 */ -/*:ref: wnunid_ 14 3 7 7 7 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: lnkila_ 14 3 4 4 4 */ -/*:ref: wnintd_ 14 3 7 7 7 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: lnknxt_ 4 2 4 4 */ -/*:ref: elemi_ 12 2 4 4 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ - -extern int zzgfocu_(char *occtyp, char *front, char *fshape, char *fframe, char *back, char *bshape, char *bframe, char *obsrvr, char *abcorr, doublereal *time, logical *ocstat, ftnlen occtyp_len, ftnlen front_len, ftnlen fshape_len, ftnlen fframe_len, ftnlen back_len, ftnlen bshape_len, ftnlen bframe_len, ftnlen obsrvr_len, ftnlen abcorr_len); -extern int zzgfocin_(char *occtyp, char *front, char *fshape, char *fframe, char *back, char *bshape, char *bframe, char *obsrvr, char *abcorr, ftnlen occtyp_len, ftnlen front_len, ftnlen fshape_len, ftnlen fframe_len, ftnlen back_len, ftnlen bshape_len, ftnlen bframe_len, ftnlen obsrvr_len, ftnlen abcorr_len); -extern int zzgfocst_(doublereal *time, logical *ocstat); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: minad_ 14 4 7 4 7 4 */ -/*:ref: maxad_ 14 4 7 4 7 4 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: zzcorepc_ 14 5 13 7 7 7 124 */ -/*:ref: pxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: zzocced_ 4 5 7 7 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: dasine_ 7 2 7 7 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: sincpt_ 14 18 13 13 7 13 13 13 13 7 7 7 7 12 124 124 124 124 124 124 */ - -extern int zzgfpaq_(doublereal *et, integer *targ, integer *illmn, integer *obs, char *abcorr, doublereal *value, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: pi_ 7 0 */ - -extern int zzgfpau_(char *target, char *illmn, char *abcorr, char *obsrvr, U_fp udfunc, doublereal *et, logical *decres, doublereal *rvl, integer *xtarg, integer *xillmn, char *xabcor, integer *xobs, logical *xablk, ftnlen target_len, ftnlen illmn_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen xabcor_len); -extern int zzgfpain_(char *target, char *illmn, char *abcorr, char *obsrvr, ftnlen target_len, ftnlen illmn_len, ftnlen abcorr_len, ftnlen obsrvr_len); -extern int zzgfpadc_(U_fp udfunc, doublereal *et, logical *decres); -extern int zzgfpagq_(doublereal *et, doublereal *rvl); -extern int zzgfpax_(integer *xtarg, integer *xillmn, char *xabcor, integer *xobs, logical *xablk, ftnlen xabcor_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: dvsep_ 7 2 7 7 */ -/*:ref: zzgfpaq_ 14 7 7 4 4 4 13 7 124 */ - -extern int zzgfref_(doublereal *refval); -/*:ref: zzholdd_ 14 4 4 4 12 7 */ - -extern int zzgfrel_(U_fp udstep, U_fp udrefn, U_fp udqdec, U_fp udcond, S_fp udfunc, S_fp udqref, char *relate, doublereal *refval, doublereal *tol, doublereal *adjust, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, logical *rpt, S_fp udrepi, U_fp udrepu, S_fp udrepf, char *rptpre, char *rptsuf, logical *bail, L_fp udbail, doublereal *result, ftnlen relate_len, ftnlen rptpre_len, ftnlen rptsuf_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: ssized_ 14 2 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: copyd_ 14 2 7 7 */ -/*:ref: wnexpd_ 14 3 7 7 7 */ -/*:ref: wncard_ 4 1 7 */ -/*:ref: wnfetd_ 14 4 7 4 7 7 */ -/*:ref: zzgfsolv_ 14 13 200 200 200 12 212 12 7 7 7 7 12 200 7 */ -/*:ref: wnextd_ 14 3 13 7 124 */ -/*:ref: zzgfwsts_ 14 5 7 7 13 7 124 */ -/*:ref: wnintd_ 14 3 7 7 7 */ -/*:ref: wndifd_ 14 3 7 7 7 */ -/*:ref: zzwninsd_ 14 5 7 7 13 7 124 */ -/*:ref: swapi_ 14 2 4 4 */ - -extern int zzgfrelx_(U_fp udstep, U_fp udrefn, U_fp udqdec, U_fp udcond, S_fp udfunc, char *relate, doublereal *refval, doublereal *tol, doublereal *adjust, doublereal *cnfine, integer *mw, integer *nw, doublereal *work, logical *rpt, S_fp udrepi, U_fp udrepu, S_fp udrepf, char *rptpre, char *rptsuf, logical *bail, L_fp udbail, doublereal *result, ftnlen relate_len, ftnlen rptpre_len, ftnlen rptsuf_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: ssized_ 14 2 4 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: copyd_ 14 2 7 7 */ -/*:ref: wnexpd_ 14 3 7 7 7 */ -/*:ref: zzgfref_ 14 1 7 */ -/*:ref: wncard_ 4 1 7 */ -/*:ref: wnfetd_ 14 4 7 4 7 7 */ -/*:ref: zzgfsolvx_ 14 14 214 200 200 200 12 212 12 7 7 7 7 12 200 7 */ -/*:ref: wnextd_ 14 3 13 7 124 */ -/*:ref: zzgfwsts_ 14 5 7 7 13 7 124 */ -/*:ref: wnintd_ 14 3 7 7 7 */ -/*:ref: wndifd_ 14 3 7 7 7 */ -/*:ref: zzwninsd_ 14 5 7 7 13 7 124 */ -/*:ref: swapi_ 14 2 4 4 */ - -extern int zzgfrpwk_(integer *unit, doublereal *total, doublereal *freq, integer *tcheck, char *begin, char *end, doublereal *incr, ftnlen begin_len, ftnlen end_len); -extern int zzgftswk_(doublereal *total, doublereal *freq, integer *tcheck, char *begin, char *end, ftnlen begin_len, ftnlen end_len); -extern int zzgfwkin_(doublereal *incr); -extern int zzgfwkad_(doublereal *freq, integer *tcheck, char *begin, char *end, ftnlen begin_len, ftnlen end_len); -extern int zzgfwkun_(integer *unit); -extern int zzgfwkmo_(integer *unit, doublereal *total, doublereal *freq, integer *tcheck, char *begin, char *end, doublereal *incr, ftnlen begin_len, ftnlen end_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: stdio_ 14 3 13 4 124 */ -/*:ref: zzcputim_ 14 1 7 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: zzgfdsps_ 14 6 4 13 13 4 124 124 */ -/*:ref: writln_ 14 3 13 4 124 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: dpfmt_ 14 5 7 13 13 124 124 */ - -extern int zzgfrrq_(doublereal *et, integer *targ, integer *obs, char *abcorr, doublereal *value, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dvnorm_ 7 1 7 */ - -extern int zzgfrru_(char *target, char *abcorr, char *obsrvr, doublereal *dt, U_fp udfunc, doublereal *et, logical *decres, doublereal *rvl, integer *xtarg, char *xabcor, integer *xobs, doublereal *xdt, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len, ftnlen xabcor_len); -extern int zzgfrrin_(char *target, char *abcorr, char *obsrvr, doublereal *dt, ftnlen target_len, ftnlen abcorr_len, ftnlen obsrvr_len); -extern int zzgfrrdc_(U_fp udfunc, doublereal *et, logical *decres); -extern int zzgfrrgq_(doublereal *et, doublereal *rvl); -extern int zzgfrrx_(integer *xtarg, char *xabcor, integer *xobs, doublereal *xdt, ftnlen xabcor_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: dvhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: zzgfrrq_ 14 6 7 4 4 13 7 124 */ - -extern int zzgfsolv_(S_fp udcond, S_fp udstep, S_fp udrefn, logical *bail, L_fp udbail, logical *cstep, doublereal *step, doublereal *start, doublereal *finish, doublereal *tol, logical *rpt, S_fp udrepu, doublereal *result); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: zzwninsd_ 14 5 7 7 13 7 124 */ - -extern int zzgfsolvx_(U_fp udfuns, S_fp udfunb, S_fp udstep, S_fp udrefn, logical *bail, L_fp udbail, logical *cstep, doublereal *step, doublereal *start, doublereal *finish, doublereal *tol, logical *rpt, S_fp udrepu, doublereal *result); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: brcktd_ 7 3 7 7 7 */ -/*:ref: zzwninsd_ 14 5 7 7 13 7 124 */ - -extern int zzgfspq_(doublereal *et, integer *targ1, integer *targ2, doublereal *r1, doublereal *r2, integer *obs, char *abcorr, char *ref, doublereal *value, ftnlen abcorr_len, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: spkezp_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: dasine_ 7 2 7 7 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: vsep_ 7 2 7 7 */ - -extern int zzgfspu_(char *of, char *from, char *shape, char *frame, doublereal *et, U_fp udfunc, char *abcorr, logical *decres, doublereal *sep, char *xabcr, integer *xbod, char *yref, char *xref, integer *xobs, doublereal *xrad, integer *xshp, ftnlen of_len, ftnlen from_len, ftnlen shape_len, ftnlen frame_len, ftnlen abcorr_len, ftnlen xabcr_len, ftnlen yref_len, ftnlen xref_len); -extern int zzgfspin_(char *of, char *from, char *shape, char *frame, char *abcorr, ftnlen of_len, ftnlen from_len, ftnlen shape_len, ftnlen frame_len, ftnlen abcorr_len); -extern int zzgfspdc_(U_fp udfunc, doublereal *et, logical *decres); -extern int zzgfspgq_(doublereal *et, doublereal *sep); -extern int zzgfspx_(char *xabcr, integer *xbod, char *yref, char *xref, integer *xobs, doublereal *xrad, integer *xshp, ftnlen xabcr_len, ftnlen yref_len, ftnlen xref_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: return_ 12 0 */ -/*:ref: bods2c_ 14 4 13 4 12 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: zzgftreb_ 14 2 4 7 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: spkez_ 14 9 4 7 13 13 4 7 7 124 124 */ -/*:ref: dvsep_ 7 2 7 7 */ -/*:ref: dhfa_ 7 2 7 7 */ -/*:ref: zzgfspq_ 14 11 7 4 4 7 7 4 13 13 7 124 124 */ - -extern int zzgfssin_(char *method, integer *trgid, doublereal *et, char *fixref, char *abcorr, integer *obsid, char *dref, integer *dctr, doublereal *dvec, doublereal *radii, doublereal *state, logical *found, ftnlen method_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen dref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bodc2s_ 14 3 4 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: sxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: vminug_ 14 3 7 4 7 */ -/*:ref: surfpv_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: spkacs_ 14 10 4 7 13 13 4 7 7 7 124 124 */ -/*:ref: zzcorsxf_ 14 4 12 7 7 7 */ -/*:ref: sincpt_ 14 18 13 13 7 13 13 13 13 7 7 7 7 12 124 124 124 124 124 124 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: zzstelab_ 14 6 12 7 7 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: clight_ 7 0 */ - -extern int zzgfssob_(char *method, integer *trgid, doublereal *et, char *fixref, char *abcorr, integer *obsid, doublereal *radii, doublereal *state, ftnlen method_len, ftnlen fixref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bodc2s_ 14 3 4 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: vminug_ 14 3 7 4 7 */ -/*:ref: dnearp_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: surfpv_ 14 7 7 7 7 7 7 7 12 */ -/*:ref: subpnt_ 14 14 13 13 7 13 13 13 7 7 7 124 124 124 124 124 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: sxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: vscl_ 14 3 7 7 7 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: zzcorsxf_ 14 4 12 7 7 7 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: zzstelab_ 14 6 12 7 7 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: clight_ 7 0 */ - -extern int zzgftreb_(integer *body, doublereal *axes); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: bodvcd_ 14 6 4 13 4 4 7 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzgfudb_(U_fp udfuns, U_fp udfunb, doublereal *tol, U_fp udstep, U_fp udrefn, logical *rpt, S_fp udrepi, U_fp udrepu, S_fp udrepf, logical *bail, L_fp udbail, doublereal *cnfine, doublereal *result); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: wncard_ 4 1 7 */ -/*:ref: wnfetd_ 14 4 7 4 7 7 */ -/*:ref: zzgfsolvx_ 14 14 200 200 200 200 12 212 12 7 7 7 7 12 200 7 */ -/*:ref: failed_ 12 0 */ - -extern int zzgfudlt_(S_fp udfunc, doublereal *et, logical *isless); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzholdd_ 14 4 4 4 12 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzgfwsts_(doublereal *wndw1, doublereal *wndw2, char *inclsn, doublereal *wndw3, ftnlen inclsn_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: ssized_ 14 2 4 7 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: cmprss_ 14 7 13 4 13 13 124 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: scardd_ 14 2 4 7 */ - -extern int zzgpnm_(integer *namlst, integer *nmpool, char *names, integer *datlst, integer *dppool, doublereal *dpvals, integer *chpool, char *chvals, char *varnam, logical *found, integer *lookat, integer *nameat, ftnlen names_len, ftnlen chvals_len, ftnlen varnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzhash_ 4 2 13 124 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: lnkila_ 14 3 4 4 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer zzhashi_(integer *n, integer *m); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzholdd_(integer *op, integer *id, logical *ok, doublereal *value); -/*:ref: return_ 12 0 */ -/*:ref: brckti_ 4 3 4 4 4 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzhsc_(integer *hashsz, integer *hedlst, integer *collst, char *items, char *item, integer *itemat, logical *new__, integer *avail, ftnlen items_len, ftnlen item_len); -extern int zzhscini_(integer *hashsz, integer *hedlst, integer *collst); -extern int zzhscadd_(integer *hedlst, integer *collst, char *items, char *item, integer *itemat, logical *new__, ftnlen items_len, ftnlen item_len); -extern int zzhscchk_(integer *hedlst, integer *collst, char *items, char *item, integer *itemat, ftnlen items_len, ftnlen item_len); -extern int zzhscavl_(integer *collst, integer *avail); -extern int zzhscinf_(integer *hedlst, integer *collst, char *items, char *item, integer *avail, ftnlen items_len, ftnlen item_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzhash2_ 4 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int zzhsi_(integer *hashsz, integer *hedlst, integer *collst, integer *items, integer *item, char *param, integer *itemat, logical *new__, integer *avail, ftnlen param_len); -extern int zzhsiini_(integer *hashsz, integer *hedlst, integer *collst); -extern int zzhsiadd_(integer *hedlst, integer *collst, integer *items, integer *item, integer *itemat, logical *new__); -extern int zzhsichk_(integer *hedlst, integer *collst, integer *items, integer *item, integer *itemat); -extern int zzhsiavl_(integer *collst, integer *avail); -extern int zzhsiinf_(integer *hedlst, integer *collst, integer *items, char *param, integer *avail, ftnlen param_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zzhashi_ 4 2 4 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int zzhullax_(char *inst, integer *n, doublereal *bounds, doublereal *axis, ftnlen inst_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vcrss_ 14 3 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: pi_ 7 0 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vhatip_ 14 1 7 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: reclat_ 14 4 7 7 7 7 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: vrotv_ 14 4 7 7 7 7 */ - -extern int zzidmap_(integer *bltcod, char *bltnam, ftnlen bltnam_len); - -extern int zzilusta_(char *method, char *target, char *illum, doublereal *et, char *fixref, char *abcorr, char *obsrvr, doublereal *spoint, doublereal *normal, doublereal *phssta, doublereal *incsta, doublereal *emista, ftnlen method_len, ftnlen target_len, ftnlen illum_len, ftnlen fixref_len, ftnlen abcorr_len, ftnlen obsrvr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: spkcpt_ 14 16 7 13 13 7 13 13 13 13 7 7 124 124 124 124 124 124 */ -/*:ref: zzcorepc_ 14 5 13 7 7 7 124 */ -/*:ref: spkcpo_ 14 16 13 7 13 13 13 7 13 13 7 7 124 124 124 124 124 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: sxform_ 14 6 13 13 7 7 124 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: zzcorsxf_ 14 4 12 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: vminug_ 14 3 7 4 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: dvsep_ 7 2 7 7 */ - -extern int zzinssub_(char *in, char *sub, integer *loc, char *out, ftnlen in_len, ftnlen sub_len, ftnlen out_len); - -extern int zzldker_(char *file, char *nofile, char *filtyp, integer *handle, ftnlen file_len, ftnlen nofile_len, ftnlen filtyp_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: exists_ 12 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: getfat_ 14 6 13 13 13 124 124 124 */ -/*:ref: spklef_ 14 3 13 4 124 */ -/*:ref: cklpf_ 14 3 13 4 124 */ -/*:ref: pcklof_ 14 3 13 4 124 */ -/*:ref: tkvrsn_ 14 4 13 13 124 124 */ -/*:ref: eklef_ 14 3 13 4 124 */ -/*:ref: ldpool_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzbodkik_ 14 0 */ - -extern int zzmkpc_(char *pictur, integer *b, integer *e, char *mark, char *pattrn, ftnlen pictur_len, ftnlen mark_len, ftnlen pattrn_len); -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: zzrepsub_ 14 8 13 4 4 13 13 124 124 124 */ - -extern int zzmobliq_(doublereal *et, doublereal *mob, doublereal *dmob); -/*:ref: jyear_ 7 0 */ -/*:ref: rpd_ 7 0 */ - -extern int zzmsxf_(doublereal *matrix, integer *n, doublereal *output); - -extern doublereal zzmult_(doublereal *a, doublereal *b); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: dpmax_ 7 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zznamfrm_(integer *usrctr, char *savnam, integer *savcde, char *frname, integer *frcode, ftnlen savnam_len, ftnlen frname_len); -/*:ref: return_ 12 0 */ -/*:ref: zzpctrck_ 14 2 4 12 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zznofcon_(doublereal *et, integer *frame1, integer *endp1, integer *frame2, integer *endp2, char *errmsg, ftnlen errmsg_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: frmnam_ 14 3 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: repmf_ 14 10 13 13 7 4 13 13 124 124 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: ckmeta_ 14 4 4 13 4 124 */ -/*:ref: zzsclk_ 12 2 4 4 */ - -extern int zznrddp_(doublereal *ao, doublereal *elems, doublereal *em, doublereal *omgasm, doublereal *omgdot, doublereal *t, doublereal *xinc, doublereal *xll, doublereal *xlldot, doublereal *xn, doublereal *xnodes, doublereal *xnodot, doublereal *xnodp); -extern int zzdpinit_(doublereal *ao, doublereal *xlldot, doublereal *omgdot, doublereal *xnodot, doublereal *xnodp, doublereal *elems); -extern int zzdpsec_(doublereal *xll, doublereal *omgasm, doublereal *xnodes, doublereal *em, doublereal *xinc, doublereal *xn, doublereal *t, doublereal *elems, doublereal *omgdot); -extern int zzdpper_(doublereal *t, doublereal *em, doublereal *xinc, doublereal *omgasm, doublereal *xnodes, doublereal *xll); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: pi_ 7 0 */ -/*:ref: twopi_ 7 0 */ -/*:ref: j2000_ 7 0 */ -/*:ref: spd_ 7 0 */ -/*:ref: j1950_ 7 0 */ -/*:ref: zzsecprt_ 14 12 4 7 7 7 7 7 7 7 7 7 7 7 */ - -extern int zznwpool_(char *varnam, char *wtvars, integer *wtptrs, integer *wtpool, char *wtagnt, char *agtwrk, char *notify, char *agents, ftnlen varnam_len, ftnlen wtvars_len, ftnlen wtagnt_len, ftnlen agtwrk_len, ftnlen notify_len, ftnlen agents_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzgapool_ 14 10 13 13 4 4 13 13 124 124 124 124 */ -/*:ref: unionc_ 14 6 13 13 13 124 124 124 */ -/*:ref: copyc_ 14 4 13 13 124 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern integer zzocced_(doublereal *viewpt, doublereal *centr1, doublereal *semax1, doublereal *centr2, doublereal *semax2); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: unorm_ 14 3 7 7 7 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: isrot_ 12 3 7 7 7 */ -/*:ref: det_ 7 1 7 */ -/*:ref: mtxv_ 14 3 7 7 7 */ -/*:ref: dasine_ 7 2 7 7 */ -/*:ref: failed_ 12 0 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: edlimb_ 14 5 7 7 7 7 7 */ -/*:ref: el2cgv_ 14 4 7 7 7 7 */ -/*:ref: psv2pl_ 14 4 7 7 7 7 */ -/*:ref: vprjp_ 14 3 7 7 7 */ -/*:ref: vdist_ 7 2 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: halfpi_ 7 0 */ -/*:ref: xpose_ 14 2 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: mxm_ 14 3 7 7 7 */ -/*:ref: saelgv_ 14 4 7 7 7 7 */ -/*:ref: cgv2el_ 14 4 7 7 7 7 */ -/*:ref: zzasryel_ 14 7 13 7 7 7 7 7 124 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: pi_ 7 0 */ - -extern integer zzphsh_(char *word, integer *m, integer *m2, ftnlen word_len); -extern integer zzshsh_(integer *m); -extern integer zzhash_(char *word, ftnlen word_len); -extern integer zzhash2_(char *word, integer *m2, ftnlen word_len); -/*:ref: intmax_ 4 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int zzpini_(logical *first, integer *maxvar, integer *maxval, integer *maxlin, char *begdat, char *begtxt, integer *nmpool, integer *dppool, integer *chpool, integer *namlst, integer *datlst, integer *maxagt, integer *mxnote, char *wtvars, integer *wtptrs, integer *wtpool, char *wtagnt, char *agents, char *active, char *notify, integer *subctr, ftnlen begdat_len, ftnlen begtxt_len, ftnlen wtvars_len, ftnlen wtagnt_len, ftnlen agents_len, ftnlen active_len, ftnlen notify_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzshsh_ 4 1 4 */ -/*:ref: touchi_ 4 1 4 */ -/*:ref: lnkini_ 14 2 4 4 */ -/*:ref: ssizec_ 14 3 4 13 124 */ -/*:ref: cleari_ 14 2 4 4 */ -/*:ref: clearc_ 14 3 4 13 124 */ -/*:ref: zzctrsin_ 14 1 4 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzplatfm_(char *key, char *value, ftnlen key_len, ftnlen value_len); -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: ljust_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ - -extern int zzpltchk_(logical *ok); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: zzgetbff_ 14 1 4 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzprscor_(char *abcorr, logical *attblk, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: orderc_ 14 4 13 4 4 124 */ -/*:ref: reordc_ 14 4 4 4 13 124 */ -/*:ref: reordl_ 14 3 4 4 12 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: bsrchc_ 4 5 13 4 13 124 124 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzrbrkst_(char *string, char *lftend, char *rgtend, char *substr, integer *length, logical *bkpres, ftnlen string_len, ftnlen lftend_len, ftnlen rgtend_len, ftnlen substr_len); -/*:ref: posr_ 4 5 13 13 4 124 124 */ - -extern int zzrefch0_(integer *frame1, integer *frame2, doublereal *et, doublereal *rotate); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ident_ 14 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzrotgt0_ 14 5 4 7 7 4 12 */ -/*:ref: zzrxr_ 14 3 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zznofcon_ 14 7 7 4 4 4 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: xpose_ 14 2 7 7 */ - -extern int zzrefch1_(integer *frame1, integer *frame2, doublereal *et, doublereal *rotate); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ident_ 14 1 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzrotgt1_ 14 5 4 7 7 4 12 */ -/*:ref: zzrxr_ 14 3 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: zznofcon_ 14 7 7 4 4 4 4 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: xpose_ 14 2 7 7 */ - -extern int zzrepsub_(char *in, integer *left, integer *right, char *string, char *out, ftnlen in_len, ftnlen string_len, ftnlen out_len); -/*:ref: sumai_ 4 2 4 4 */ - -extern logical zzrept_(char *sub, char *replac, logical *l2r, ftnlen sub_len, ftnlen replac_len); -/*:ref: zzsubt_ 12 5 13 13 12 124 124 */ -/*:ref: zzremt_ 12 2 13 124 */ - -extern int zzrotgt0_(integer *infrm, doublereal *et, doublereal *rotate, integer *outfrm, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: tipbod_ 14 5 13 4 7 7 124 */ -/*:ref: xpose_ 14 2 7 7 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ckfrot_ 14 5 4 7 7 4 12 */ -/*:ref: tkfram_ 14 4 4 7 4 12 */ -/*:ref: zzdynrt0_ 14 5 4 4 7 7 4 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzrotgt1_(integer *infrm, doublereal *et, doublereal *rotate, integer *outfrm, logical *found); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: tipbod_ 14 5 13 4 7 7 124 */ -/*:ref: xpose_ 14 2 7 7 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: ckfrot_ 14 5 4 7 7 4 12 */ -/*:ref: tkfram_ 14 4 4 7 4 12 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ - -extern int zzrtnmat_(doublereal *v, doublereal *m); -/*:ref: return_ 12 0 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: vhat_ 14 2 7 7 */ - -extern int zzrvar_(integer *namlst, integer *nmpool, char *names, integer *datlst, integer *dppool, doublereal *dpvals, integer *chpool, char *chvals, char *varnam, logical *eof, ftnlen names_len, ftnlen chvals_len, ftnlen varnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: rdkdat_ 14 3 13 12 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: rdklin_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: lastpc_ 4 2 13 124 */ -/*:ref: zzhash_ 4 2 13 124 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: lnkila_ 14 3 4 4 4 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: zzcln_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: tparse_ 14 5 13 7 13 124 124 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ - -extern int zzrvbf_(char *buffer, integer *bsize, integer *linnum, integer *namlst, integer *nmpool, char *names, integer *datlst, integer *dppool, doublereal *dpvals, integer *chpool, char *chvals, char *varnam, logical *eof, ftnlen buffer_len, ftnlen names_len, ftnlen chvals_len, ftnlen varnam_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: lastpc_ 4 2 13 124 */ -/*:ref: zzhash_ 4 2 13 124 */ -/*:ref: lnknfn_ 4 1 4 */ -/*:ref: lnkan_ 14 2 4 4 */ -/*:ref: lnkila_ 14 3 4 4 4 */ -/*:ref: lnkfsl_ 14 3 4 4 4 */ -/*:ref: zzcln_ 14 7 4 4 4 4 4 4 4 */ -/*:ref: tparse_ 14 5 13 7 13 124 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ - -extern int zzrxr_(doublereal *matrix, integer *n, doublereal *output); -/*:ref: ident_ 14 1 7 */ - -extern logical zzsclk_(integer *ckid, integer *sclkid); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ssizei_ 14 2 4 4 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: elemi_ 12 2 4 4 */ -/*:ref: cvpool_ 14 3 13 12 124 */ -/*:ref: cardi_ 4 1 4 */ -/*:ref: sizei_ 4 1 4 */ -/*:ref: insrti_ 14 2 4 4 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: swpool_ 14 5 13 4 13 124 124 */ -/*:ref: dtpool_ 14 6 13 12 4 13 124 124 */ -/*:ref: removi_ 14 2 4 4 */ - -extern int zzsecprt_(integer *isynfl, doublereal *dg, doublereal *del, doublereal *xni, doublereal *omegao, doublereal *atime, doublereal *omgdot, doublereal *xli, doublereal *xfact, doublereal *xldot, doublereal *xndot, doublereal *xnddt); - -extern int zzsizeok_(integer *size, integer *psize, integer *dsize, integer *offset, logical *ok, integer *n); -/*:ref: rmaini_ 14 4 4 4 4 4 */ - -extern int zzspkac0_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzspkgo0_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: zzspkas0_ 14 11 4 7 13 13 7 7 7 7 7 124 124 */ - -extern int zzspkac1_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzspkgo1_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: zzspkas1_ 14 11 4 7 13 13 7 7 7 7 7 124 124 */ - -extern int zzspkap0_(integer *targ, doublereal *et, char *ref, doublereal *sobs, char *abcorr, doublereal *starg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: zzspksb0_ 14 5 4 7 13 7 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ - -extern int zzspkap1_(integer *targ, doublereal *et, char *ref, doublereal *sobs, char *abcorr, doublereal *starg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: zzspksb1_ 14 5 4 7 13 7 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ - -extern int zzspkas0_(integer *targ, doublereal *et, char *ref, char *abcorr, doublereal *stobs, doublereal *accobs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: zzspklt0_ 14 10 4 7 13 13 7 7 7 7 124 124 */ -/*:ref: zzstelab_ 14 6 12 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int zzspkas1_(integer *targ, doublereal *et, char *ref, char *abcorr, doublereal *stobs, doublereal *accobs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: zzspklt1_ 14 10 4 7 13 13 7 7 7 7 124 124 */ -/*:ref: zzstelab_ 14 6 12 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int zzspkez0_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *starg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: zzspkgo0_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: zzspkac0_ 14 10 4 7 13 13 4 7 7 7 124 124 */ -/*:ref: zzspksb0_ 14 5 4 7 13 7 124 */ -/*:ref: zzspklt0_ 14 10 4 7 13 13 7 7 7 7 124 124 */ -/*:ref: zzfrmch0_ 14 4 4 4 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ - -extern int zzspkez1_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *starg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: zzspkgo1_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: zzspkac1_ 14 10 4 7 13 13 4 7 7 7 124 124 */ -/*:ref: zzspksb1_ 14 5 4 7 13 7 124 */ -/*:ref: zzspklt1_ 14 10 4 7 13 13 7 7 7 7 124 124 */ -/*:ref: zzfrmch1_ 14 4 4 4 7 7 */ -/*:ref: vsclip_ 14 2 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ - -extern int zzspkfao_(integer *targ, doublereal *et, char *ref, char *abcorr, S_fp obssub, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: spkaps_ 14 11 4 7 13 13 7 7 7 7 7 124 124 */ - -extern int zzspkfap_(U_fp trgsub, doublereal *et, char *ref, char *abcorr, doublereal *stobs, doublereal *accobs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzspkflt_ 14 10 200 7 13 13 7 7 7 7 124 124 */ -/*:ref: zzstelab_ 14 6 12 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ - -extern int zzspkfat_(U_fp trgsub, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: zzspkfap_ 14 11 200 7 13 13 7 7 7 7 7 124 124 */ - -extern int zzspkflt_(S_fp trgsub, doublereal *et, char *ref, char *abcorr, doublereal *stobs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int zzspkfzo_(integer *targ, doublereal *et, char *ref, char *abcorr, S_fp obssub, doublereal *starg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: zzspkfao_ 14 10 4 7 13 13 214 7 7 7 124 124 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: spkltc_ 14 10 4 7 13 13 7 7 7 7 124 124 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: zzcorsxf_ 14 4 12 7 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ - -extern int zzspkfzt_(S_fp trgsub, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *starg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: spkgeo_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: zzspkfat_ 14 10 214 7 13 13 4 7 7 7 124 124 */ -/*:ref: spkssb_ 14 5 4 7 13 7 124 */ -/*:ref: spkltc_ 14 10 4 7 13 13 7 7 7 7 124 124 */ -/*:ref: frmchg_ 14 4 4 4 7 7 */ -/*:ref: zzcorsxf_ 14 4 12 7 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ - -extern int zzspkgo0_(integer *targ, doublereal *et, char *ref, integer *obs, doublereal *state, doublereal *lt, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: frstnp_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spksfs_ 14 7 4 7 4 7 13 12 124 */ -/*:ref: spkpvn_ 14 6 4 7 7 4 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: zzfrmch0_ 14 4 4 4 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ - -extern int zzspkgo1_(integer *targ, doublereal *et, char *ref, integer *obs, doublereal *state, doublereal *lt, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: frstnp_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spksfs_ 14 7 4 7 4 7 13 12 124 */ -/*:ref: spkpvn_ 14 6 4 7 7 4 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: zzfrmch1_ 14 4 4 4 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: vaddg_ 14 4 7 7 4 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ - -extern int zzspkgp0_(integer *targ, doublereal *et, char *ref, integer *obs, doublereal *pos, doublereal *lt, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: frstnp_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spksfs_ 14 7 4 7 4 7 13 12 124 */ -/*:ref: spkpvn_ 14 6 4 7 7 4 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: zzrefch0_ 14 4 4 4 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ - -extern int zzspkgp1_(integer *targ, doublereal *et, char *ref, integer *obs, doublereal *pos, doublereal *lt, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: frstnp_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: spksfs_ 14 7 4 7 4 7 13 12 124 */ -/*:ref: spkpvn_ 14 6 4 7 7 4 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: irfrot_ 14 3 4 4 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ -/*:ref: zzrefch1_ 14 4 4 4 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: isrchi_ 4 3 4 4 4 */ -/*:ref: bodc2n_ 14 4 4 13 12 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: intstr_ 14 3 4 13 124 */ -/*:ref: etcal_ 14 3 7 13 124 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ - -extern int zzspklt0_(integer *targ, doublereal *et, char *ref, char *abcorr, doublereal *stobs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzspkgo0_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int zzspklt1_(integer *targ, doublereal *et, char *ref, char *abcorr, doublereal *stobs, doublereal *starg, doublereal *lt, doublereal *dlt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzvalcor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: zzspkgo1_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: touchd_ 7 1 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ - -extern int zzspkpa0_(integer *targ, doublereal *et, char *ref, doublereal *sobs, char *abcorr, doublereal *ptarg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: zzspkgp0_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ - -extern int zzspkpa1_(integer *targ, doublereal *et, char *ref, doublereal *sobs, char *abcorr, doublereal *ptarg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: ljucrs_ 14 5 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: odd_ 12 1 4 */ -/*:ref: irfnum_ 14 3 13 4 124 */ -/*:ref: zzspkgp1_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: stlabx_ 14 3 7 7 7 */ -/*:ref: stelab_ 14 3 7 7 7 */ - -extern int zzspksb0_(integer *targ, doublereal *et, char *ref, doublereal *starg, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzspkgo0_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzspksb1_(integer *targ, doublereal *et, char *ref, doublereal *starg, ftnlen ref_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzspkgo1_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern int zzspkzp0_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *ptarg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: ltrim_ 4 2 13 124 */ -/*:ref: eqchr_ 12 4 13 13 124 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: zzspkgp0_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzspksb0_ 14 5 4 7 13 7 124 */ -/*:ref: zzspkpa0_ 14 9 4 7 13 7 13 7 7 124 124 */ -/*:ref: zzrefch0_ 14 4 4 4 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ - -extern int zzspkzp1_(integer *targ, doublereal *et, char *ref, char *abcorr, integer *obs, doublereal *ptarg, doublereal *lt, ftnlen ref_len, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: namfrm_ 14 3 13 4 124 */ -/*:ref: zzctruin_ 14 1 4 */ -/*:ref: ltrim_ 4 2 13 124 */ -/*:ref: eqchr_ 12 4 13 13 124 124 */ -/*:ref: eqstr_ 12 4 13 13 124 124 */ -/*:ref: zzspkgp1_ 14 7 4 7 13 4 7 7 124 */ -/*:ref: zznamfrm_ 14 7 4 13 4 13 4 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: frinfo_ 14 5 4 4 4 4 12 */ -/*:ref: failed_ 12 0 */ -/*:ref: zzspksb1_ 14 5 4 7 13 7 124 */ -/*:ref: zzspkpa1_ 14 9 4 7 13 7 13 7 7 124 124 */ -/*:ref: zzrefch1_ 14 4 4 4 7 7 */ -/*:ref: mxv_ 14 3 7 7 7 */ - -extern int zzstelab_(logical *xmit, doublereal *accobs, doublereal *vobs, doublereal *starg, doublereal *scorr, doublereal *dscorr); -/*:ref: return_ 12 0 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: dvhat_ 14 2 7 7 */ -/*:ref: vperp_ 14 3 7 7 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vnorm_ 7 1 7 */ -/*:ref: clight_ 7 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: vhat_ 14 2 7 7 */ -/*:ref: vlcom_ 14 5 7 7 7 7 7 */ -/*:ref: vlcom3_ 14 7 7 7 7 7 7 7 7 */ -/*:ref: vadd_ 14 3 7 7 7 */ -/*:ref: qderiv_ 14 5 4 7 7 7 7 */ - -extern int zzteme_(doublereal *et, doublereal *mt); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzeprc76_ 14 2 7 7 */ -/*:ref: invstm_ 14 2 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: zzenut80_ 14 2 7 7 */ -/*:ref: mxvg_ 14 5 7 7 4 4 7 */ -/*:ref: zztwovxf_ 14 5 7 4 7 4 7 */ -/*:ref: chkout_ 14 2 13 124 */ - -extern logical zztime_(char *string, char *transl, char *letter, char *error, char *pic, doublereal *tvec, integer *b, integer *e, logical *l2r, logical *yabbrv, ftnlen string_len, ftnlen transl_len, ftnlen letter_len, ftnlen error_len, ftnlen pic_len); -extern logical zzcmbt_(char *string, char *letter, logical *l2r, ftnlen string_len, ftnlen letter_len); -extern logical zzgrep_(char *string, ftnlen string_len); -extern logical zzispt_(char *string, integer *b, integer *e, ftnlen string_len); -extern logical zzist_(char *letter, ftnlen letter_len); -extern logical zznote_(char *letter, integer *b, integer *e, ftnlen letter_len); -extern logical zzremt_(char *letter, ftnlen letter_len); -extern logical zzsubt_(char *string, char *transl, logical *l2r, ftnlen string_len, ftnlen transl_len); -extern logical zztokns_(char *string, char *error, ftnlen string_len, ftnlen error_len); -extern logical zzunpck_(char *string, logical *yabbrv, doublereal *tvec, integer *e, char *transl, char *pic, char *error, ftnlen string_len, ftnlen transl_len, ftnlen pic_len, ftnlen error_len); -extern logical zzvalt_(char *string, integer *b, integer *e, char *letter, ftnlen string_len, ftnlen letter_len); -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: pos_ 4 5 13 13 4 124 124 */ -/*:ref: posr_ 4 5 13 13 4 124 124 */ -/*:ref: zzrepsub_ 14 8 13 4 4 13 13 124 124 124 */ -/*:ref: cpos_ 4 5 13 13 4 124 124 */ -/*:ref: repmi_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: rtrim_ 4 2 13 124 */ -/*:ref: lx4uns_ 14 5 13 4 4 4 124 */ -/*:ref: zztknerr_ 14 9 13 13 13 13 12 124 124 124 124 */ -/*:ref: zzinssub_ 14 7 13 13 4 13 124 124 124 */ -/*:ref: prefix_ 14 5 13 4 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: samsbi_ 12 8 13 4 4 13 4 4 124 124 */ -/*:ref: samchi_ 12 6 13 4 13 4 124 124 */ -/*:ref: suffix_ 14 5 13 4 13 124 124 */ -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: zzmkpc_ 14 8 13 4 4 13 13 124 124 124 */ -/*:ref: nparsi_ 14 6 13 4 13 4 124 124 */ - -extern int zztknerr_(char *templt, char *string, char *token, char *error, logical *status, ftnlen templt_len, ftnlen string_len, ftnlen token_len, ftnlen error_len); -/*:ref: repmc_ 14 8 13 13 13 13 124 124 124 124 */ - -extern logical zztpats_(integer *room, integer *nknown, char *known, char *meanng, ftnlen known_len, ftnlen meanng_len); -/*:ref: orderc_ 14 4 13 4 4 124 */ -/*:ref: reordc_ 14 4 4 4 13 124 */ - -extern int zztwovxf_(doublereal *axdef, integer *indexa, doublereal *plndef, integer *indexp, doublereal *xform); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: dvhat_ 14 2 7 7 */ -/*:ref: ducrss_ 14 3 7 7 7 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: cleard_ 14 2 4 7 */ -/*:ref: vzero_ 12 1 7 */ - -extern int zzutcpm_(char *string, integer *start, doublereal *hoff, doublereal *moff, integer *last, logical *succes, ftnlen string_len); -/*:ref: lx4uns_ 14 5 13 4 4 4 124 */ -/*:ref: nparsd_ 14 6 13 7 13 4 124 124 */ -/*:ref: samch_ 12 6 13 4 13 4 124 124 */ - -extern int zzvalcor_(char *abcorr, logical *attblk, ftnlen abcorr_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzprscor_ 14 3 13 12 124 */ -/*:ref: failed_ 12 0 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ - -extern int zzvstrng_(doublereal *x, char *fill, integer *from, integer *to, logical *rnd, integer *expont, char *substr, logical *did, ftnlen fill_len, ftnlen substr_len); -extern int zzvststr_(doublereal *x, char *fill, integer *expont, ftnlen fill_len); -extern int zzvsbstr_(integer *from, integer *to, logical *rnd, char *substr, logical *did, ftnlen substr_len); -/*:ref: dpstr_ 14 4 7 4 13 124 */ - -extern int zzwahr_(doublereal *et, doublereal *dvnut); -/*:ref: pi_ 7 0 */ -/*:ref: twopi_ 7 0 */ -/*:ref: spd_ 7 0 */ - -extern integer zzwind_(doublereal *plane, integer *n, doublereal *vertcs, doublereal *point); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: pl2nvc_ 14 3 7 7 7 */ -/*:ref: vzero_ 12 1 7 */ -/*:ref: vdot_ 7 2 7 7 */ -/*:ref: vminus_ 14 2 7 7 */ -/*:ref: vequ_ 14 2 7 7 */ -/*:ref: vsub_ 14 3 7 7 7 */ -/*:ref: vperp_ 14 3 7 7 7 */ -/*:ref: vsep_ 7 2 7 7 */ -/*:ref: ucrss_ 14 3 7 7 7 */ -/*:ref: twopi_ 7 0 */ - -extern integer zzwind2d_(integer *n, doublereal *vertcs, doublereal *point); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: vsubg_ 14 4 7 7 4 7 */ -/*:ref: vsepg_ 7 3 7 7 4 */ -/*:ref: vdotg_ 7 3 7 7 4 */ -/*:ref: moved_ 14 3 7 4 7 */ -/*:ref: twopi_ 7 0 */ - -extern int zzwninsd_(doublereal *left, doublereal *right, char *context, doublereal *window, ftnlen context_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: sized_ 4 1 7 */ -/*:ref: cardd_ 4 1 7 */ -/*:ref: lastnb_ 4 2 13 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errdp_ 14 3 13 7 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: scardd_ 14 2 4 7 */ -/*:ref: errint_ 14 3 13 4 124 */ - -extern int zzxlated_(integer *inbff, char *input, integer *space, doublereal *output, ftnlen input_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: intmin_ 4 0 */ -/*:ref: errint_ 14 3 13 4 124 */ -/*:ref: moved_ 14 3 7 4 7 */ - -extern int zzxlatei_(integer *inbff, char *input, integer *space, integer *output, ftnlen input_len); -/*:ref: return_ 12 0 */ -/*:ref: chkin_ 14 2 13 124 */ -/*:ref: zzddhgsd_ 14 5 13 4 13 124 124 */ -/*:ref: zzplatfm_ 14 4 13 13 124 124 */ -/*:ref: ucase_ 14 4 13 13 124 124 */ -/*:ref: isrchc_ 4 5 13 4 13 124 124 */ -/*:ref: setmsg_ 14 2 13 124 */ -/*:ref: errch_ 14 4 13 13 124 124 */ -/*:ref: sigerr_ 14 2 13 124 */ -/*:ref: chkout_ 14 2 13 124 */ -/*:ref: intmin_ 4 0 */ -/*:ref: errint_ 14 3 13 4 124 */ - - -#ifdef __cplusplus - } -#endif - -#endif - diff --git a/ext/spice/include/SpiceZim.h b/ext/spice/include/SpiceZim.h deleted file mode 100644 index 7d55214ae3..0000000000 --- a/ext/spice/include/SpiceZim.h +++ /dev/null @@ -1,1450 +0,0 @@ -/* - --Header_File SpiceZim.h ( CSPICE interface macros ) - --Abstract - - Define interface macros to be called in place of CSPICE - user-interface-level functions. These macros are generally used - to compensate for compiler deficiencies. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Literature_References - - None. - --Particulars - - This header file defines interface macros to be called in place of - CSPICE user-interface-level functions. Currently, the sole purpose - of these macros is to implement automatic type casting under some - environments that generate compile-time warnings without the casts. - The typical case that causes a problem is a function argument list - containing an input formal argument of type - - const double [3][3] - - Under some compilers, a non-const actual argument supplied in a call - to such a function will generate a spurious warning due to the - "mismatched" type. These macros generate type casts that will - make such compilers happy. - - Examples of compilers that generate warnings of this type are - - gcc version 2.2.2, hosted on NeXT workstations running - NeXTStep 3.3 - - Sun C compiler, version 4.2, running under Solaris. - --Author_and_Institution - - N.J. Bachman (JPL) - E.D. Wright (JPL) - --Version - - -CSPICE Version 12.0.0, 03-DEC-2013 (NJB) (EDW) (SCK) - - Added include for SpiceZrnm.h to eliminate symbol conflict - encountered from Icy and JNISpice under OS X 10.7. - - Added macros for - - eqncpv_c - fovray_c - spkcpo_c - spkcpt_c - spkcvo_c - spkcvt_c - spkpnv_c - spkw20_c - - -CSPICE Version 11.0.0, 09-MAR-2009 (NJB) (EDW) - - Added macros for - - dvsep_c - gfevnt_c - gffove_c - gfrfov_c - gfsntc_c - surfpv_c - - - -CSPICE Version 10.0.0, 19-FEB-2008 (NJB) (EDW) - - Added macros for - - ilumin_c - spkaps_c - spkltc_c - - -CSPICE Version 9.0.0, 31-OCT-2005 (NJB) - - Added macros for - - qdq2av_c - qxq_c - - -CSPICE Version 8.0.0, 23-FEB-2004 (NJB) - - Added macro for - - dafrs_c - - - -CSPICE Version 7.0.0, 23-FEB-2004 (EDW) - - Added macro for - - srfxpt_c - - -CSPICE Version 6.0.1, 25-FEB-2003 (EDW) (NJB) - - Remove duplicate macro definitions for ekaced_c and - ekacei_c. Visual Studio errored out when compiling - code that included SpiceZim.h. - - Added macro for - - dasac_c - - -CSPICE Version 6.0.0, 17-AUG-2002 (NJB) - - Added macros for - - bschoc_c - bschoi_c - bsrchc_c - bsrchd_c - bsrchi_c - esrchc_c - isordv_c - isrchc_c - isrchd_c - isrchi_c - lstltc_c - lstltd_c - lstlti_c - lstlec_c - lstled_c - lstlei_c - orderc_c - orderd_c - orderi_c - reordc_c - reordd_c - reordi_c - reordl_c - spkw18_c - - -CSPICE Version 5.0.0, 28-AUG-2001 (NJB) - - Added macros for - - conics_c - illum_c - invort_c - pdpool_c - prop2b_c - q2m_c - spkuds_c - xposeg_c - - -CSPICE Version 4.0.0, 22-MAR-2000 (NJB) - - Added macros for - - spkw12_c - spkw13_c - - -CSPICE Version 3.0.0, 27-AUG-1999 (NJB) (EDW) - - Fixed cut & paste error in macro nvp2pl_c. - - Added macros for - - axisar_c - cgv2el_c - dafps_c - dafus_c - diags2_c - dvdot_c - dvhat_c - edlimb_c - ekacli_c - ekacld_c - ekacli_c - eul2xf_c - el2cgv_c - getelm_c - inedpl_c - isrot_c - mequ_c - npedln_c - nplnpt_c - rav2xf_c - raxisa_c - saelgv_c - spk14a_c - spkapo_c - spkapp_c - spkw02_c - spkw03_c - spkw05_c - spkw08_c - spkw09_c - spkw10_c - spkw15_c - spkw17_c - sumai_c - trace_c - vadd_g - vhatg_c - vlcomg_c - vminug_c - vrel_c - vrelg_c - vsepg_c - vtmv_c - vtmvg_c - vupack_c - vzerog_c - xf2eul_c - xf2rav_c - - -CSPICE Version 2.0.0, 07-MAR-1999 (NJB) - - Added macros for - - inrypl_c - nvc2pl_c - nvp2pl_c - pl2nvc_c - pl2nvp_c - pl2psv_c - psv2pl_c - vprjp_c - vprjpi_c - - -CSPICE Version 1.0.0, 24-JAN-1999 (NJB) (EDW) - - --Index_Entries - - interface macros for CSPICE functions - -*/ - - -/* -Include Files: -*/ - - -/* -Include the type definitions prior to defining the interface macros. -The macros reference the types. -*/ -#ifndef HAVE_SPICEDEFS_H -#include "SpiceZdf.h" -#endif - - -/* -Include those rename assignments for routines whose symbols will -collide with other libraries. -*/ -#ifndef HAVE_SPICERENAME_H -#include "SpiceZrnm.h" -#endif - - -#ifndef HAVE_SPICEIFMACROS_H -#define HAVE_SPICEIFMACROS_H - - -/* -Macros used to abbreviate type casts: -*/ - - #define CONST_BOOL ( ConstSpiceBoolean * ) - #define CONST_ELLIPSE ( ConstSpiceEllipse * ) - #define CONST_IVEC ( ConstSpiceInt * ) - #define CONST_MAT ( ConstSpiceDouble (*) [3] ) - #define CONST_MAT2 ( ConstSpiceDouble (*) [2] ) - #define CONST_MAT6 ( ConstSpiceDouble (*) [6] ) - #define CONST_PLANE ( ConstSpicePlane * ) - #define CONST_VEC3 ( ConstSpiceDouble (*) [3] ) - #define CONST_VEC4 ( ConstSpiceDouble (*) [4] ) - #define CONST_STR ( ConstSpiceChar * ) - #define CONST_VEC ( ConstSpiceDouble * ) - #define CONST_VOID ( const void * ) - -/* -Macros that substitute for function calls: -*/ - - #define axisar_c( axis, angle, r ) \ - \ - ( axisar_c( CONST_VEC(axis), (angle), (r) ) ) - - - #define bschoc_c( value, ndim, lenvals, array, order ) \ - \ - ( bschoc_c ( CONST_STR(value), (ndim), (lenvals), \ - CONST_VOID(array), CONST_IVEC(order) ) ) - - - #define bschoi_c( value, ndim, array, order ) \ - \ - ( bschoi_c ( (value) , (ndim), \ - CONST_IVEC(array), CONST_IVEC(order) ) ) - - - #define bsrchc_c( value, ndim, lenvals, array ) \ - \ - ( bsrchc_c ( CONST_STR(value), (ndim), (lenvals), \ - CONST_VOID(array) ) ) - - - #define bsrchd_c( value, ndim, array ) \ - \ - ( bsrchd_c( (value), (ndim), CONST_VEC(array) ) ) - - - #define bsrchi_c( value, ndim, array ) \ - \ - ( bsrchi_c( (value), (ndim), CONST_IVEC(array) ) ) - - - #define ckw01_c( handle, begtim, endtim, inst, ref, avflag, \ - segid, nrec, sclkdp, quats, avvs ) \ - \ - ( ckw01_c ( (handle), (begtim), (endtim), \ - (inst), CONST_STR(ref), (avflag), \ - CONST_STR(segid), (nrec), \ - CONST_VEC(sclkdp), CONST_VEC4(quats), \ - CONST_VEC3(avvs) ) ) - - - #define ckw02_c( handle, begtim, endtim, inst, ref, segid, \ - nrec, start, stop, quats, avvs, rates ) \ - \ - ( ckw02_c ( (handle), (begtim), (endtim), \ - (inst), CONST_STR(ref), \ - CONST_STR(segid), (nrec), \ - CONST_VEC(start), CONST_VEC(stop), \ - CONST_VEC4(quats), CONST_VEC3(avvs), \ - CONST_VEC(rates) ) ) - - - #define ckw03_c( handle, begtim, endtim, inst, ref, avflag, \ - segid, nrec, sclkdp, quats, avvs, nints, \ - starts ) \ - \ - ( ckw03_c ( (handle), (begtim), (endtim), \ - (inst), CONST_STR(ref), (avflag), \ - CONST_STR(segid), (nrec), \ - CONST_VEC(sclkdp), CONST_VEC4(quats), \ - CONST_VEC3(avvs), (nints), \ - CONST_VEC(starts) ) ) - - - #define ckw05_c( handle, subtyp, degree, begtim, endtim, inst, \ - ref, avflag, segid, n, sclkdp, packts, \ - rate, nints, starts ) \ - \ - ( ckw05_c ( (handle), (subtyp), (degree), \ - (begtim), (endtim), \ - (inst), CONST_STR(ref), (avflag), \ - CONST_STR(segid), (n), \ - CONST_VEC(sclkdp), CONST_VOID(packts), \ - (rate), (nints), \ - CONST_VEC(starts) ) ) - - - #define cgv2el_c( center, vec1, vec2, ellipse ) \ - \ - ( cgv2el_c( CONST_VEC(center), CONST_VEC(vec1), \ - CONST_VEC(vec2), (ellipse) ) ) - - - #define conics_c( elts, et, state ) \ - \ - ( conics_c( CONST_VEC(elts), (et), (state) ) ) - - - #define dafps_c( nd, ni, dc, ic, sum ) \ - \ - ( dafps_c ( (nd), (ni), CONST_VEC(dc), CONST_IVEC(ic), \ - (sum) ) ) - - - #define dafrs_c( sum ) \ - \ - ( dafrs_c ( CONST_VEC( sum ) ) ) - - - #define dafus_c( sum, nd, ni, dc, ic ) \ - \ - ( dafus_c ( CONST_VEC(sum), (nd), (ni), (dc), (ic) ) ) - - - #define dasac_c( handle, n, buflen, buffer ) \ - \ - ( dasac_c ( (handle), (n), (buflen), CONST_VOID(buffer) ) ) - - - #define det_c( m1 ) \ - \ - ( det_c ( CONST_MAT(m1) ) ) - - - #define diags2_c( symmat, diag, rotate ) \ - \ - ( diags2_c ( CONST_MAT2(symmat), (diag), (rotate) ) ) - - - - #define dvdot_c( s1, s2 ) \ - \ - ( dvdot_c ( CONST_VEC(s1), CONST_VEC(s2) ) ) - - - #define dvhat_c( v1, v2 ) \ - \ - ( dvhat_c ( CONST_VEC(v1), (v2) ) ) - - - #define dvsep_c( s1, s2 ) \ - \ - ( dvsep_c ( CONST_VEC(s1), CONST_VEC(s2) ) ) - - - #define edlimb_c( a, b, c, viewpt, limb ) \ - \ - ( edlimb_c( (a), (b), (c), CONST_VEC(viewpt), (limb) ) ) - - - #define ekacec_c( handle, segno, recno, column, nvals, vallen, \ - cvals, isnull ) \ - \ - ( ekacec_c( (handle), (segno), (recno), CONST_STR(column), \ - (nvals), (vallen), CONST_VOID(cvals), \ - (isnull) ) ) - - - #define ekaced_c( handle, segno, recno, column, nvals, \ - dvals, isnull ) \ - \ - ( ekaced_c( (handle), (segno), (recno), CONST_STR(column), \ - (nvals), CONST_VEC(dvals), (isnull) ) ) - - - #define ekacei_c( handle, segno, recno, column, nvals, \ - ivals, isnull ) \ - \ - ( ekacei_c( (handle), (segno), (recno), CONST_STR(column), \ - (nvals), CONST_IVEC(ivals), (isnull) ) ) - - - #define ekaclc_c( handle, segno, column, vallen, cvals, entszs, \ - nlflgs, rcptrs, wkindx ) \ - \ - ( ekaclc_c( (handle), (segno), (column), (vallen), \ - CONST_VOID(cvals), CONST_IVEC(entszs), \ - CONST_BOOL(nlflgs), CONST_IVEC(rcptrs), \ - (wkindx) ) ) - - - #define ekacld_c( handle, segno, column, dvals, entszs, nlflgs, \ - rcptrs, wkindx ) \ - \ - ( ekacld_c( (handle), (segno), (column), \ - CONST_VEC(dvals), CONST_IVEC(entszs), \ - CONST_BOOL(nlflgs), CONST_IVEC(rcptrs), \ - (wkindx) ) ) - - - #define ekacli_c( handle, segno, column, ivals, entszs, nlflgs, \ - rcptrs, wkindx ) \ - \ - ( ekacli_c( (handle), (segno), (column), \ - CONST_IVEC(ivals), CONST_IVEC(entszs), \ - CONST_BOOL(nlflgs), CONST_IVEC(rcptrs), \ - (wkindx) ) ) - - - #define ekbseg_c( handle, tabnam, ncols, cnmlen, cnames, declen, \ - decls, segno ) \ - \ - ( ekbseg_c( (handle), (tabnam), (ncols), (cnmlen), \ - CONST_VOID(cnames), (declen), \ - CONST_VOID(decls), (segno) ) ) - - - #define ekifld_c( handle, tabnam, ncols, nrows, cnmlen, cnames, \ - declen, decls, segno, rcptrs ) \ - \ - ( ekifld_c( (handle), (tabnam), (ncols), (nrows), (cnmlen), \ - CONST_VOID(cnames), (declen), \ - CONST_VOID(decls), (segno), (rcptrs) ) ) - - - #define ekucec_c( handle, segno, recno, column, nvals, vallen, \ - cvals, isnull ) \ - \ - ( ekucec_c( (handle), (segno), (recno), CONST_STR(column), \ - (nvals), (vallen), CONST_VOID(cvals), \ - (isnull) ) ) - - #define ekuced_c( handle, segno, recno, column, nvals, \ - dvals, isnull ) \ - \ - ( ekuced_c( (handle), (segno), (recno), CONST_STR(column), \ - (nvals), CONST_VOID(dvals), (isnull) ) ) - - - #define ekucei_c( handle, segno, recno, column, nvals, \ - ivals, isnull ) \ - \ - ( ekucei_c( (handle), (segno), (recno), CONST_STR(column), \ - (nvals), CONST_VOID(ivals), (isnull) ) ) - - - #define el2cgv_c( ellipse, center, smajor, sminor ) \ - \ - ( el2cgv_c( CONST_ELLIPSE(ellipse), (center), \ - (smajor), (sminor) ) ) - - - #define eqncpv_c( et, epoch, eqel, rapol, decpol, state ) \ - \ - ( eqncpv_c ( (et), (epoch), CONST_VEC(eqel), (rapol), \ - (decpol), (state) ) ) - - - #define esrchc_c( value, ndim, lenvals, array ) \ - \ - ( esrchc_c ( CONST_STR(value), (ndim), (lenvals), \ - CONST_VOID(array) ) ) - - - #define eul2xf_c( eulang, axisa, axisb, axisc, xform ) \ - \ - ( eul2xf_c ( CONST_VEC(eulang), (axisa), (axisb), (axisc), \ - (xform) ) ) - - #define fovray_c( inst, raydir, rframe, abcorr, observer, \ - et, visible ) \ - \ - ( fovray_c( (inst), CONST_VEC(raydir), (rframe), \ - (abcorr), (observer), (et), (visible) ) ) - - #define getelm_c( frstyr, lineln, lines, epoch, elems ) \ - \ - ( getelm_c ( (frstyr), (lineln), CONST_VOID(lines), \ - (epoch), (elems) ) ) - - - #define gfevnt_c( udstep, udrefn, gquant, qnpars, lenvals, \ - qpnams, qcpars, qdpars, qipars, qlpars, \ - op, refval, tol, adjust, rpt, \ - udrepi, udrepu, udrepf, nintvls, \ - bail, udbail, cnfine, result ) \ - \ - ( gfevnt_c( (udstep), (udrefn), (gquant), \ - (qnpars), (lenvals), CONST_VOID(qpnams),\ - CONST_VOID(qcpars), (qdpars), (qipars), \ - (qlpars), (op), (refval), \ - (tol), (adjust), (rpt), \ - (udrepi), (udrepu), (udrepf), \ - (nintvls), (bail), \ - (udbail), (cnfine), (result) ) ) - - - #define gffove_c( inst, tshape, raydir, target, tframe, \ - abcorr, obsrvr, tol, udstep, udrefn, \ - rpt, udrepi, udrepu, udrepf, bail, \ - udbail, cnfine, result ) \ - \ - ( gffove_c( (inst), (tshape), CONST_VEC(raydir), \ - (target), (tframe), (abcorr), \ - (obsrvr), (tol), (udstep), \ - (udrefn), (rpt), (udrepi), \ - (udrepu), (udrepf), (bail), \ - (udbail), (cnfine), (result) ) ) - - - #define gfrfov_c( inst, raydir, rframe, abcorr, obsrvr, \ - step, cnfine, result ) \ - \ - ( gfrfov_c( (inst), CONST_VEC(raydir), (rframe), \ - (abcorr), (obsrvr), (step), \ - (cnfine), (result) ) ) - - - #define gfsntc_c( target, fixref, method, abcorr, obsrvr, \ - dref, dvec, crdsys, coord, relate, \ - refval, adjust, step, nintvls, cnfine, \ - result ) \ - \ - ( gfsntc_c( (target), (fixref), (method), \ - (abcorr), (obsrvr), (dref), \ - CONST_VEC(dvec), (crdsys), (coord), \ - (relate), (refval), (adjust), \ - (step), (nintvls), (cnfine), (result) ) ) - - - #define illum_c( target, et, abcorr, obsrvr, \ - spoint, phase, solar, emissn ) \ - \ - ( illum_c ( (target), (et), (abcorr), (obsrvr), \ - CONST_VEC(spoint), (phase), (solar), (emissn) ) ) - - - #define ilumin_c( method, target, et, fixref, \ - abcorr, obsrvr, spoint, trgepc, \ - srfvec, phase, solar, emissn ) \ - \ - ( ilumin_c ( (method), (target), (et), (fixref), \ - (abcorr), (obsrvr), CONST_VEC(spoint), (trgepc), \ - (srfvec), (phase), (solar), (emissn) ) ) - - - #define inedpl_c( a, b, c, plane, ellipse, found ) \ - \ - ( inedpl_c ( (a), (b), (c), \ - CONST_PLANE(plane), (ellipse), (found) ) ) - - - #define inrypl_c( vertex, dir, plane, nxpts, xpt ) \ - \ - ( inrypl_c ( CONST_VEC(vertex), CONST_VEC(dir), \ - CONST_PLANE(plane), (nxpts), (xpt) ) ) - - - #define invert_c( m1, m2 ) \ - \ - ( invert_c ( CONST_MAT(m1), (m2) ) ) - - - #define invort_c( m, mit ) \ - \ - ( invort_c ( CONST_MAT(m), (mit) ) ) - - - #define isordv_c( array, n ) \ - \ - ( isordv_c ( CONST_IVEC(array), (n) ) ) - - - #define isrchc_c( value, ndim, lenvals, array ) \ - \ - ( isrchc_c ( CONST_STR(value), (ndim), (lenvals), \ - CONST_VOID(array) ) ) - - #define isrchd_c( value, ndim, array ) \ - \ - ( isrchd_c( (value), (ndim), CONST_VEC(array) ) ) - - - #define isrchi_c( value, ndim, array ) \ - \ - ( isrchi_c( (value), (ndim), CONST_IVEC(array) ) ) - - - #define isrot_c( m, ntol, dtol ) \ - \ - ( isrot_c ( CONST_MAT(m), (ntol), (dtol) ) ) - - - #define lmpool_c( cvals, lenvals, n ) \ - \ - ( lmpool_c( CONST_VOID(cvals), (lenvals), (n) ) ) - - - #define lstltc_c( value, ndim, lenvals, array ) \ - \ - ( lstltc_c ( CONST_STR(value), (ndim), (lenvals), \ - CONST_VOID(array) ) ) - - - #define lstled_c( value, ndim, array ) \ - \ - ( lstled_c( (value), (ndim), CONST_VEC(array) ) ) - - - #define lstlei_c( value, ndim, array ) \ - \ - ( lstlei_c( (value), (ndim), CONST_IVEC(array) ) ) - - - #define lstlec_c( value, ndim, lenvals, array ) \ - \ - ( lstlec_c ( CONST_STR(value), (ndim), (lenvals), \ - CONST_VOID(array) ) ) - - - #define lstltd_c( value, ndim, array ) \ - \ - ( lstltd_c( (value), (ndim), CONST_VEC(array) ) ) - - - #define lstlti_c( value, ndim, array ) \ - \ - ( lstlti_c( (value), (ndim), CONST_IVEC(array) ) ) - - - #define m2eul_c( r, axis3, axis2, axis1, \ - angle3, angle2, angle1 ) \ - \ - ( m2eul_c ( CONST_MAT(r), (axis3), (axis2), (axis1), \ - (angle3), (angle2), (angle1) ) ) - - #define m2q_c( r, q ) \ - \ - ( m2q_c ( CONST_MAT(r), (q) ) ) - - - #define mequ_c( m1, m2 ) \ - \ - ( mequ_c ( CONST_MAT(m1), m2 ) ) - - - #define mequg_c( m1, nr, nc, mout ) \ - \ - ( mequg_c ( CONST_MAT(m1), (nr), (nc), mout ) ) - - - #define mtxm_c( m1, m2, mout ) \ - \ - ( mtxm_c ( CONST_MAT(m1), CONST_MAT(m2), (mout) ) ) - - - #define mtxmg_c( m1, m2, ncol1, nr1r2, ncol2, mout ) \ - \ - ( mtxmg_c ( CONST_MAT(m1), CONST_MAT(m2), \ - (ncol1), (nr1r2), (ncol2), (mout) ) ) - - - #define mtxv_c( m1, vin, vout ) \ - \ - ( mtxv_c ( CONST_MAT(m1), CONST_VEC(vin), (vout) ) ) - - - #define mtxvg_c( m1, v2, nrow1, nc1r2, vout ) \ - \ - ( mtxvg_c( CONST_VOID(m1), CONST_VOID(v2), \ - (nrow1), (nc1r2), (vout) ) ) - - #define mxm_c( m1, m2, mout ) \ - \ - ( mxm_c ( CONST_MAT(m1), CONST_MAT(m2), (mout) ) ) - - - #define mxmg_c( m1, m2, row1, col1, col2, mout ) \ - \ - ( mxmg_c ( CONST_VOID(m1), CONST_VOID(m2), \ - (row1), (col1), (col2), (mout) ) ) - - - #define mxmt_c( m1, m2, mout ) \ - \ - ( mxmt_c ( CONST_MAT(m1), CONST_MAT(m2), (mout) ) ) - - - #define mxmtg_c( m1, m2, nrow1, nc1c2, nrow2, mout ) \ - \ - ( mxmtg_c ( CONST_VOID(m1), CONST_VOID(m2), \ - (nrow1), (nc1c2), \ - (nrow2), (mout) ) ) - - - #define mxv_c( m1, vin, vout ) \ - \ - ( mxv_c ( CONST_MAT(m1), CONST_VEC(vin), (vout) ) ) - - - #define mxvg_c( m1, v2, nrow1, nc1r2, vout ) \ - \ - ( mxvg_c( CONST_VOID(m1), CONST_VOID(v2), \ - (nrow1), (nc1r2), (vout) ) ) - - #define nearpt_c( positn, a, b, c, npoint, alt ) \ - \ - ( nearpt_c ( CONST_VEC(positn), (a), (b), (c), \ - (npoint), (alt) ) ) - - - #define npedln_c( a, b, c, linept, linedr, pnear, dist ) \ - \ - ( npedln_c ( (a), (b), (c), \ - CONST_VEC(linept), CONST_VEC(linedr), \ - (pnear), (dist) ) ) - - - #define nplnpt_c( linpt, lindir, point, pnear, dist ) \ - \ - ( nplnpt_c ( CONST_VEC(linpt), CONST_VEC(lindir), \ - CONST_VEC(point), (pnear), (dist ) ) ) - - - #define nvc2pl_c( normal, constant, plane ) \ - \ - ( nvc2pl_c ( CONST_VEC(normal), (constant), (plane) ) ) - - - #define nvp2pl_c( normal, point, plane ) \ - \ - ( nvp2pl_c( CONST_VEC(normal), CONST_VEC(point), (plane) ) ) - - - #define orderc_c( lenvals, array, ndim, iorder ) \ - \ - ( orderc_c ( (lenvals), CONST_VOID(array), (ndim), (iorder)) ) - - - #define orderd_c( array, ndim, iorder ) \ - \ - ( orderd_c ( CONST_VEC(array), (ndim), (iorder) ) ) - - - #define orderi_c( array, ndim, iorder ) \ - \ - ( orderi_c ( CONST_IVEC(array), (ndim), (iorder) ) ) - - - #define oscelt_c( state, et, mu, elts ) \ - \ - ( oscelt_c ( CONST_VEC(state), (et), (mu), (elts) ) ) - - - #define pcpool_c( name, n, lenvals, cvals ) \ - \ - ( pcpool_c ( (name), (n), (lenvals), CONST_VOID(cvals) ) ) - - - #define pdpool_c( name, n, dvals ) \ - \ - ( pdpool_c ( (name), (n), CONST_VEC(dvals) ) ) - - - #define pipool_c( name, n, ivals ) \ - \ - ( pipool_c ( (name), (n), CONST_IVEC(ivals) ) ) - - - #define pl2nvc_c( plane, normal, constant ) \ - \ - ( pl2nvc_c ( CONST_PLANE(plane), (normal), (constant) ) ) - - - #define pl2nvp_c( plane, normal, point ) \ - \ - ( pl2nvp_c ( CONST_PLANE(plane), (normal), (point) ) ) - - - #define pl2psv_c( plane, point, span1, span2 ) \ - \ - ( pl2psv_c( CONST_PLANE(plane), (point), (span1), (span2) ) ) - - - #define prop2b_c( gm, pvinit, dt, pvprop ) \ - \ - ( prop2b_c ( (gm), CONST_VEC(pvinit), (dt), (pvprop) ) ) - - - #define psv2pl_c( point, span1, span2, plane ) \ - \ - ( psv2pl_c ( CONST_VEC(point), CONST_VEC(span1), \ - CONST_VEC(span2), (plane) ) ) - - - #define qdq2av_c( q, dq, av ) \ - \ - ( qdq2av_c ( CONST_VEC(q), CONST_VEC(dq), (av) ) ) - - - #define q2m_c( q, r ) \ - \ - ( q2m_c ( CONST_VEC(q), (r) ) ) - - - #define qxq_c( q1, q2, qout ) \ - \ - ( qxq_c ( CONST_VEC(q1), CONST_VEC(q2), (qout) ) ) - - - #define rav2xf_c( rot, av, xform ) \ - \ - ( rav2xf_c ( CONST_MAT(rot), CONST_VEC(av), (xform) ) ) - - - #define raxisa_c( matrix, axis, angle ) \ - \ - ( raxisa_c ( CONST_MAT(matrix), (axis), (angle) ) ); - - - #define reccyl_c( rectan, r, lon, z ) \ - \ - ( reccyl_c ( CONST_VEC(rectan), (r), (lon), (z) ) ) - - - #define recgeo_c( rectan, re, f, lon, lat, alt ) \ - \ - ( recgeo_c ( CONST_VEC(rectan), (re), (f), \ - (lon), (lat), (alt) ) ) - - #define reclat_c( rectan, r, lon, lat ) \ - \ - ( reclat_c ( CONST_VEC(rectan), (r), (lon), (lat) ) ) - - - #define recrad_c( rectan, radius, ra, dec ) \ - \ - ( recrad_c ( CONST_VEC(rectan), (radius), (ra), (dec) ) ) - - - #define recsph_c( rectan, r, colat, lon ) \ - \ - ( recsph_c ( CONST_VEC(rectan), (r), (colat), (lon) ) ) - - - #define reordd_c( iorder, ndim, array ) \ - \ - ( reordd_c ( CONST_IVEC(iorder), (ndim), (array) ) ) - - - #define reordi_c( iorder, ndim, array ) \ - \ - ( reordi_c ( CONST_IVEC(iorder), (ndim), (array) ) ) - - - #define reordl_c( iorder, ndim, array ) \ - \ - ( reordl_c ( CONST_IVEC(iorder), (ndim), (array) ) ) - - - #define rotmat_c( m1, angle, iaxis, mout ) \ - \ - ( rotmat_c ( CONST_MAT(m1), (angle), (iaxis), (mout) ) ) - - - #define rotvec_c( v1, angle, iaxis, vout ) \ - \ - ( rotvec_c ( CONST_VEC(v1), (angle), (iaxis), (vout) ) ) - - - #define saelgv_c( vec1, vec2, smajor, sminor ) \ - \ - ( saelgv_c ( CONST_VEC(vec1), CONST_VEC(vec2), \ - (smajor), (sminor) ) ) - - - #define spk14a_c( handle, ncsets, coeffs, epochs ) \ - \ - ( spk14a_c ( (handle), (ncsets), \ - CONST_VEC(coeffs), CONST_VEC(epochs) ) ) - - - #define spkapo_c( targ, et, ref, sobs, abcorr, ptarg, lt ) \ - \ - ( spkapo_c ( (targ), (et), (ref), CONST_VEC(sobs), \ - (abcorr), (ptarg), (lt) ) ) - - - #define spkapp_c( targ, et, ref, sobs, abcorr, starg, lt ) \ - \ - ( spkapp_c ( (targ), (et), (ref), CONST_VEC(sobs), \ - (abcorr), (starg), (lt) ) ) - - - #define spkaps_c( targ, et, ref, abcorr, sobs, \ - accobs, starg, lt, dlt ) \ - \ - ( spkaps_c ( (targ), (et), (ref), (abcorr), \ - CONST_VEC(sobs), CONST_VEC(accobs), \ - (starg), (lt), (dlt) ) ) - - - #define spkcpo_c( target, et, outref, refloc, \ - abcorr, obspos, obsctr, \ - obsref, state, lt ) \ - \ - ( spkcpo_c( (target), (et), (outref), (refloc), \ - (abcorr), CONST_VEC(obspos), (obsctr), \ - (obsref), (state), (lt) ) ) - - - #define spkcpt_c( trgpos, trgctr, trgref, \ - et, outref, refloc, abcorr, \ - obsrvr, state, lt ) \ - \ - ( spkcpt_c( CONST_VEC(trgpos), (trgctr), (trgref), \ - (et), (outref), (refloc), (abcorr), \ - (obsrvr), (state), (lt) ) ) - - - #define spkcvo_c( target, et, outref, refloc, \ - abcorr, obssta, obsepc, obsctr, \ - obsref, state, lt ) \ - \ - ( spkcvo_c( (target), (et), (outref), (refloc), \ - (abcorr), CONST_VEC(obssta), (obsepc), \ - (obsctr), (obsref), (state), (lt) ) ) - - - #define spkcvt_c( trgsta, trgepc, trgctr, trgref, \ - et, outref, refloc, abcorr, \ - obsrvr, state, lt ) \ - \ - ( spkcvt_c( CONST_VEC(trgsta), (trgepc), (trgctr), \ - (trgref), (et), (outref), (refloc), \ - (abcorr), (obsrvr), (state), (lt) ) ) - - - #define spkltc_c( targ, et, ref, abcorr, sobs, starg, lt, dlt ) \ - \ - ( spkltc_c ( (targ), (et), (ref), (abcorr), \ - CONST_VEC(sobs), (starg), (lt), (dlt) ) ) - - - #define spkpvn_c( handle, descr, et, ref, state, center ) \ - \ - ( spkpvn_c ( (handle), CONST_VEC(descr), (et), \ - (ref), (state), (center) ) ) - - #define spkuds_c( descr, body, center, frame, type, \ - first, last, begin, end ) \ - \ - ( spkuds_c ( CONST_VEC(descr), (body), (center), (frame), \ - (type), (first), (last), (begin), (end) ) ) - - - #define spkw02_c( handle, body, center, frame, first, last, \ - segid, intlen, n, polydg, cdata, btime ) \ - \ - ( spkw02_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (intlen), \ - (n), (polydg), CONST_VEC(cdata), (btime) ) ) - - - #define spkw03_c( handle, body, center, frame, first, last, \ - segid, intlen, n, polydg, cdata, btime ) \ - \ - ( spkw03_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (intlen), \ - (n), (polydg), CONST_VEC(cdata), (btime) ) ) - - - - #define spkw05_c( handle, body, center, frame, first, last, \ - segid, gm, n, states, epochs ) \ - \ - ( spkw05_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (gm), \ - (n), \ - CONST_MAT6(states), CONST_VEC(epochs) ) ) - - - #define spkw08_c( handle, body, center, frame, first, last, \ - segid, degree, n, states, epoch1, step ) \ - \ - ( spkw08_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (degree), \ - (n), CONST_MAT6(states), (epoch1), \ - (step) ) ) - - - #define spkw09_c( handle, body, center, frame, first, last, \ - segid, degree, n, states, epochs ) \ - \ - ( spkw09_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (degree), (n), \ - CONST_MAT6(states), CONST_VEC(epochs) ) ) - - - #define spkw10_c( handle, body, center, frame, first, last, \ - segid, consts, n, elems, epochs ) \ - \ - ( spkw10_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), CONST_VEC(consts), \ - (n), CONST_VEC(elems), CONST_VEC(epochs)) ) - - - #define spkw12_c( handle, body, center, frame, first, last, \ - segid, degree, n, states, epoch0, step ) \ - \ - ( spkw12_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (degree), \ - (n), CONST_MAT6(states), (epoch0), \ - (step) ) ) - - - #define spkw13_c( handle, body, center, frame, first, last, \ - segid, degree, n, states, epochs ) \ - \ - ( spkw13_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (degree), (n), \ - CONST_MAT6(states), CONST_VEC(epochs) ) ) - - - - - - #define spkw15_c( handle, body, center, frame, first, last, \ - segid, epoch, tp, pa, p, ecc, \ - j2flg, pv, gm, j2, radius ) \ - \ - ( spkw15_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (epoch), \ - CONST_VEC(tp), CONST_VEC(pa), \ - (p), (ecc), (j2flg), CONST_VEC(pv), \ - (gm), (j2), (radius) ) ) - - - #define spkw17_c( handle, body, center, frame, first, last, \ - segid, epoch, eqel, rapol, decpol ) \ - \ - ( spkw17_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (epoch), \ - CONST_VEC(eqel), (rapol), (decpol) ) ) - - - - #define spkw18_c( handle, subtyp, body, center, frame, first, \ - last, segid, degree, n, packts, epochs ) \ - \ - ( spkw18_c ( (handle), (subtyp), (body), (center), (frame), \ - (first), (last), (segid), (degree), (n), \ - CONST_VOID(packts), CONST_VEC(epochs) ) ) - - - #define spkw20_c( handle, body, center, frame, first, last, \ - segid, intlen, n, polydg, cdata, dscale, \ - tscale, initjd, initfr ) \ - \ - ( spkw20_c ( (handle), (body), (center), (frame), \ - (first), (last), (segid), (intlen), \ - (n), (polydg), CONST_VEC(cdata), (dscale), \ - (tscale), (initjd), (initfr) ) ) - - - - #define srfxpt_c( method, target, et, abcorr, obsrvr, dref, \ - dvec, spoint, dist, trgepc, obspos, found ) \ - \ - ( srfxpt_c ( (method), (target), (et), (abcorr), (obsrvr), \ - (dref), CONST_VEC(dvec), (spoint), (dist), \ - (trgepc), (obspos), (found) ) ) - - - #define stelab_c( pobj, vobj, appobj ) \ - \ - ( stelab_c ( CONST_VEC(pobj), CONST_VEC(vobj), (appobj) ) ) - - - #define sumad_c( array, n ) \ - \ - ( sumad_c ( CONST_VEC(array), (n) ) ) - - - #define sumai_c( array, n ) \ - \ - ( sumai_c ( CONST_IVEC(array), (n) ) ) - - - #define surfnm_c( a, b, c, point, normal ) \ - \ - ( surfnm_c ( (a), (b), (c), CONST_VEC(point), (normal) ) ) - - - #define surfpt_c( positn, u, a, b, c, point, found ) \ - \ - ( surfpt_c ( CONST_VEC(positn), CONST_VEC(u), \ - (a), (b), (c), \ - (point), (found) ) ) - - - #define surfpv_c( stvrtx, stdir, a, b, c, stx, found ) \ - \ - ( surfpv_c ( CONST_VEC(stvrtx), CONST_VEC(stdir), \ - (a), (b), (c), \ - (stx), (found) ) ) - - - #define swpool_c( agent, nnames, lenvals, names ) \ - \ - ( swpool_c( CONST_STR(agent), (nnames), \ - (lenvals), CONST_VOID(names) ) ) - - - #define trace_c( m1 ) \ - \ - ( trace_c ( CONST_MAT(m1) ) ) - - - #define twovec_c( axdef, indexa, plndef, indexp, mout ) \ - \ - ( twovec_c ( CONST_VEC(axdef), (indexa), \ - CONST_VEC(plndef), (indexp), (mout) ) ) - - - #define ucrss_c( v1, v2, vout ) \ - \ - ( ucrss_c ( CONST_VEC(v1), CONST_VEC(v2), (vout) ) ) - - - #define unorm_c( v1, vout, vmag ) \ - \ - ( unorm_c ( CONST_VEC(v1), (vout), (vmag) ) ) - - - #define unormg_c( v1, ndim, vout, vmag ) \ - \ - ( unormg_c ( CONST_VEC(v1), (ndim), (vout), (vmag) ) ) - - - #define vadd_c( v1, v2, vout ) \ - \ - ( vadd_c ( CONST_VEC(v1), CONST_VEC(v2), (vout) ) ) - - - #define vaddg_c( v1, v2, ndim,vout ) \ - \ - ( vaddg_c ( CONST_VEC(v1), CONST_VEC(v2), (ndim), (vout) ) ) - - - #define vcrss_c( v1, v2, vout ) \ - \ - ( vcrss_c ( CONST_VEC(v1), CONST_VEC(v2), (vout) ) ) - - - #define vdist_c( v1, v2 ) \ - \ - ( vdist_c ( CONST_VEC(v1), CONST_VEC(v2) ) ) - - - #define vdistg_c( v1, v2, ndim ) \ - \ - ( vdistg_c ( CONST_VEC(v1), CONST_VEC(v2), (ndim) ) ) - - - #define vdot_c( v1, v2 ) \ - \ - ( vdot_c ( CONST_VEC(v1), CONST_VEC(v2) ) ) - - - #define vdotg_c( v1, v2, ndim ) \ - \ - ( vdotg_c ( CONST_VEC(v1), CONST_VEC(v2), (ndim) ) ) - - - #define vequ_c( vin, vout ) \ - \ - ( vequ_c ( CONST_VEC(vin), (vout) ) ) - - - #define vequg_c( vin, ndim, vout ) \ - \ - ( vequg_c ( CONST_VEC(vin), (ndim), (vout) ) ) - - - #define vhat_c( v1, vout ) \ - \ - ( vhat_c ( CONST_VEC(v1), (vout) ) ) - - - #define vhatg_c( v1, ndim, vout ) \ - \ - ( vhatg_c ( CONST_VEC(v1), (ndim), (vout) ) ) - - - #define vlcom3_c( a, v1, b, v2, c, v3, sum ) \ - \ - ( vlcom3_c ( (a), CONST_VEC(v1), \ - (b), CONST_VEC(v2), \ - (c), CONST_VEC(v3), (sum) ) ) - - - #define vlcom_c( a, v1, b, v2, sum ) \ - \ - ( vlcom_c ( (a), CONST_VEC(v1), \ - (b), CONST_VEC(v2), (sum) ) ) - - - #define vlcomg_c( n, a, v1, b, v2, sum ) \ - \ - ( vlcomg_c ( (n), (a), CONST_VEC(v1), \ - (b), CONST_VEC(v2), (sum) ) ) - - - #define vminug_c( v1, ndim, vout ) \ - \ - ( vminug_c ( CONST_VEC(v1), (ndim), (vout) ) ) - - - #define vminus_c( v1, vout ) \ - \ - ( vminus_c ( CONST_VEC(v1), (vout) ) ) - - - #define vnorm_c( v1 ) \ - \ - ( vnorm_c ( CONST_VEC(v1) ) ) - - - #define vnormg_c( v1, ndim ) \ - \ - ( vnormg_c ( CONST_VEC(v1), (ndim) ) ) - - - #define vperp_c( a, b, p ) \ - \ - ( vperp_c ( CONST_VEC(a), CONST_VEC(b), (p) ) ) - - - #define vprjp_c( vin, plane, vout ) \ - \ - ( vprjp_c ( CONST_VEC(vin), CONST_PLANE(plane), (vout) ) ) - - - #define vprjpi_c( vin, projpl, invpl, vout, found ) \ - \ - ( vprjpi_c( CONST_VEC(vin), CONST_PLANE(projpl), \ - CONST_PLANE(invpl), (vout), (found) ) ) - - - #define vproj_c( a, b, p ) \ - \ - ( vproj_c ( CONST_VEC(a), CONST_VEC(b), (p) ) ) - - - #define vrel_c( v1, v2 ) \ - \ - ( vrel_c ( CONST_VEC(v1), CONST_VEC(v2) ) ) - - - #define vrelg_c( v1, v2, ndim ) \ - \ - ( vrelg_c ( CONST_VEC(v1), CONST_VEC(v2), (ndim) ) ) - - - #define vrotv_c( v, axis, theta, r ) \ - \ - ( vrotv_c ( CONST_VEC(v), CONST_VEC(axis), (theta), (r) ) ) - - - #define vscl_c( s, v1, vout ) \ - \ - ( vscl_c ( (s), CONST_VEC(v1), (vout) ) ) - - - #define vsclg_c( s, v1, ndim, vout ) \ - \ - ( vsclg_c ( (s), CONST_VEC(v1), (ndim), (vout) ) ) - - - #define vsep_c( v1, v2 ) \ - \ - ( vsep_c ( CONST_VEC(v1), CONST_VEC(v2) ) ) - - - #define vsepg_c( v1, v2, ndim) \ - \ - ( vsepg_c ( CONST_VEC(v1), CONST_VEC(v2), ndim ) ) - - - #define vsub_c( v1, v2, vout ) \ - \ - ( vsub_c ( CONST_VEC(v1), CONST_VEC(v2), (vout) ) ) - - - #define vsubg_c( v1, v2, ndim, vout ) \ - \ - ( vsubg_c ( CONST_VEC(v1), CONST_VEC(v2), \ - (ndim), (vout) ) ) - - #define vtmv_c( v1, mat, v2 ) \ - \ - ( vtmv_c ( CONST_VEC(v1), CONST_MAT(mat), CONST_VEC(v2) ) ) - - - #define vtmvg_c( v1, mat, v2, nrow, ncol ) \ - \ - ( vtmvg_c ( CONST_VOID(v1), CONST_VOID(mat), CONST_VOID(v2), \ - (nrow), (ncol) ) ) - - - #define vupack_c( v, x, y, z ) \ - \ - ( vupack_c ( CONST_VEC(v), (x), (y), (z) ) ) - - - #define vzero_c( v1 ) \ - \ - ( vzero_c ( CONST_VEC(v1) ) ) - - - #define vzerog_c( v1, ndim ) \ - \ - ( vzerog_c ( CONST_VEC(v1), (ndim) ) ) - - - #define xf2eul_c( xform, axisa, axisb, axisc, eulang, unique ) \ - \ - ( xf2eul_c( CONST_MAT6(xform), (axisa), (axisb), (axisc), \ - (eulang), (unique) ) ) - - - #define xf2rav_c( xform, rot, av ) \ - \ - ( xf2rav_c( CONST_MAT6(xform), (rot), (av) ) ) - - - #define xpose6_c( m1, mout ) \ - \ - ( xpose6_c ( CONST_MAT6(m1), (mout) ) ) - - - #define xpose_c( m1, mout ) \ - \ - ( xpose_c ( CONST_MAT(m1), (mout) ) ) - - - #define xposeg_c( matrix, nrow, ncol, mout ) \ - \ - ( xposeg_c ( CONST_VOID(matrix), (nrow), (ncol), (mout) ) ) - - -#endif diff --git a/ext/spice/include/SpiceZmc.h b/ext/spice/include/SpiceZmc.h deleted file mode 100644 index 8533b6939d..0000000000 --- a/ext/spice/include/SpiceZmc.h +++ /dev/null @@ -1,980 +0,0 @@ -/* - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - -*/ - -/* - CSPICE private macro file. - --Particulars - - Current list of macros (spelling counts) - - BLANK - C2F_MAP_CELL - C2F_MAP_CELL2 - C2F_MAP_CELL3 - CELLINIT - CELLINIT2 - CELLINIT3 - CELLISSETCHK - CELLISSETCHK2 - CELLISSETCHK2_VAL - CELLISSETCHK3 - CELLISSETCHK3_VAL - CELLISSETCHK_VAL - CELLMATCH2 - CELLMATCH2_VAL - CELLMATCH3 - CELLMATCH3_VAL - CELLTYPECHK - CELLTYPECHK2 - CELLTYPECHK2_VAL - CELLTYPECHK3 - CELLTYPECHK3_VAL - CELLTYPECHK_VAL - CHKFSTR - CHKFSTR_VAL - CHKOSTR - CHKOSTR_VAL - CHKPTR - Constants - Even - F2C_MAP_CELL - Index values - MOVED - MOVEI - MaxAbs - MaxVal - MinAbs - MinVal - Odd - SpiceError - TolOrFail - --Restrictions - - This is a private macro file for use within CSPICE. - Do not use or alter any entry. Or else! - --Author_and_Institution - - N.J. Bachman (JPL) - E.D. Wright (JPL) - --Version - - -CSPICE Version 4.3.0, 18-SEP-2013 (NJB) - - Bug fix: missing comma was added to argument list - in body of macro CELLTYPECHK3_VAL. - - -CSPICE Version 4.2.0, 16-FEB-2005 (NJB) - - Bug fix: in the macro C2F_MAP_CELL, error checking has been - added after the sequence of calls to ssizec_ and scardc_. - If either of these routines signals an error, the dynamically - allocated memory for the "Fortran cell" is freed. - - -CSPICE Version 4.1.0, 06-DEC-2002 (NJB) - - Bug fix: added previous missing, bracketing parentheses to - references to input cell pointer argument in macro - CELLINIT. - - Changed CELLINIT macro so it no longer initializes to zero - length all strings in data array of a character cell. Instead, - strings are terminated with a null in their final element. - - -CSPICE Version 4.0.0, 22-AUG-2002 (NJB) - - Added macro definitions to support CSPICE cells and sets: - - C2F_MAP_CELL - C2F_MAP_CELL2 - C2F_MAP_CELL3 - CELLINIT - CELLINIT2 - CELLINIT3 - CELLISSETCHK - CELLISSETCHK2 - CELLISSETCHK2_VAL - CELLISSETCHK3 - CELLISSETCHK3_VAL - CELLISSETCHK_VAL - CELLMATCH2 - CELLMATCH2_VAL - CELLMATCH3 - CELLMATCH3_VAL - CELLTYPECHK - CELLTYPECHK2 - CELLTYPECHK2_VAL - CELLTYPECHK3 - CELLTYPECHK3_VAL - CELLTYPECHK_VAL - F2C_MAP_CELL - - -CSPICE Version 3.0.0, 09-JAN-1998 (NJB) - - Added output string check macros CHKOSTR and CHKOSTR_VAL. - Removed variable name arguments from macros - - CHKPTR - CHKPTR_VAL - CHKFSTR - CHKRSTR_VAL - - The strings containing names of the checked variables are now - generated from the variables themselves via the # operator. - - -CSPICE Version 2.0.0, 03-DEC-1997 (NJB) - - Added pointer check macro CHKPTR and Fortran string check macro - CHKFSTR. - - -CSPICE Version 1.0.0, 25-OCT-1997 (EDW) -*/ - - - -#include -#include -#include "SpiceZdf.h" - - -#define MOVED( arrfrm, ndim, arrto ) \ - \ - ( memmove ( (void*) (arrto) , \ - (void*) (arrfrm), \ - sizeof (SpiceDouble) * (ndim) ) ) - - - - - -#define MOVEI( arrfrm, ndim, arrto ) \ - \ - ( memmove ( (void*) (arrto) , \ - (void*) (arrfrm), \ - sizeof (SpiceInt) * (ndim) ) ) - - - - - -/* -Define a tolerance test for those pesky double precision reals. -True if the difference is less than the tolerance, false otherwise. -The tolerance refers to a percentage. x, y and tol should be declared -double. All values are assumed to be non-zero. Okay? -*/ - -#define TolOrFail( x, y, tol ) \ - \ - ( fabs( x-y ) < ( tol * fabs(x) ) ) - - - - - -/* -Simple error output through standard SPICE error system . Set the error -message and the type -*/ - -#define SpiceError( errmsg, errtype ) \ - \ - { \ - setmsg_c ( errmsg ); \ - sigerr_c ( errtype ); \ - } - - - - - - -/* -Return a value which is the maximum/minimum of the absolute values of -two values. -*/ - -#define MaxAbs(a,b) ( fabs(a) >= fabs(b) ? fabs(a) : fabs(b) ) -#define MinAbs(a,b) ( fabs(a) < fabs(b) ? fabs(a) : fabs(b) ) - - - - - -/* -Return a value which is the maximum/minimum value of two values. -*/ - -#define MaxVal(A,B) ( (A) >= (B) ? (A) : (B) ) -#define MinVal(A,B) ( (A) < (B) ? (A) : (B) ) - - - - - -/* -Determine whether a value is even or odd -*/ -#define Even( x ) ( ( (x) & 1 ) == 0 ) -#define Odd ( x ) ( ( (x) & 1 ) != 0 ) - - - - - -/* -Array indexes for vectors. -*/ - -#define SpiceX 0 -#define SpiceY 1 -#define SpiceZ 2 -#define SpiceVx 3 -#define SpiceVy 4 -#define SpiceVz 5 - - - - -/* -Physical constants and dates. -*/ - -#define B1900 2415020.31352 -#define J1900 2415020.0 -#define JYEAR 31557600.0 -#define TYEAR 31556925.9747 -#define J1950 2433282.5 -#define SPD 86400.0 -#define B1950 2433282.42345905 -#define J2100 2488070.0 -#define CLIGHT 299792.458 -#define J2000 2451545.0 - - - - - -/* -Common literal values. -*/ - -#define NULLCHAR ( (SpiceChar ) 0 ) -#define NULLCPTR ( (SpiceChar * ) 0 ) -#define BLANK ( (SpiceChar ) ' ' ) - - - -/* -Macro CHKPTR is used for checking for a null pointer. CHKPTR uses -the constants - - CHK_STANDARD - CHK_DISCOVER - CHK_REMAIN - -to control tracing behavior. Values and meanings are: - - CHK_STANDARD Standard tracing. If an error - is found, signal it, check out - and return. - - CHK_DISCOVER Discovery check-in. If an - error is found, check in, signal - the error, check out, and return. - - CHK_REMAIN If an error is found, signal it. - Do not check out or return. This - would allow the caller to clean up - before returning, if necessary. - In such cases the caller must test - failed_c() after the macro call. - -CHKPTR should be used in void functions. In non-void functions, -use CHKPTR_VAL, which is defined below. - -*/ - -#define CHK_STANDARD 1 -#define CHK_DISCOVER 2 -#define CHK_REMAIN 3 - -#define CHKPTR( errHandling, modname, pointer ) \ - \ - if ( (void *)(pointer) == (void *)0 ) \ - { \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "Pointer \"#\" is null; a non-null " \ - "pointer is required." ); \ - errch_c ( "#", (#pointer) ); \ - sigerr_c ( "SPICE(NULLPOINTER)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return; \ - } \ - } - - -#define CHKPTR_VAL( errHandling, modname, pointer, retval ) \ - \ - if ( (void *)(pointer) == (void *)0 ) \ - { \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "Pointer \"#\" is null; a non-null " \ - "pointer is required." ); \ - errch_c ( "#", (#pointer) ); \ - sigerr_c ( "SPICE(NULLPOINTER)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return ( retval ); \ - } \ - } - - -/* -Macro CHKFSTR checks strings that are to be passed to Fortran or -f2c'd Fortran routines. Such strings must have non-zero length, -and their pointers must be non-null. - -CHKFSTR should be used in void functions. In non-void functions, -use CHKFSTR_VAL, which is defined below. -*/ - -#define CHKFSTR( errHandling, modname, string ) \ - \ - CHKPTR ( errHandling, modname, string ); \ - \ - if ( ( (void *)string != (void *)0 ) \ - && ( strlen(string) == 0 ) ) \ - { \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "String \"#\" has length zero." ); \ - errch_c ( "#", (#string) ); \ - sigerr_c ( "SPICE(EMPTYSTRING)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return; \ - } \ - } - -#define CHKFSTR_VAL( errHandling, modname, string, retval ) \ - \ - CHKPTR_VAL( errHandling, modname, string, retval); \ - \ - if ( ( (void *)string != (void *)0 ) \ - && ( strlen(string) == 0 ) ) \ - { \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "String \"#\" has length zero." ); \ - errch_c ( "#", (#string) ); \ - sigerr_c ( "SPICE(EMPTYSTRING)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return ( retval ); \ - } \ - } - - -/* -Macro CHKOSTR checks output string pointers and the associated -string length values supplied as input arguments. Output string -pointers must be non-null, and the string lengths must be at -least 2, so Fortran routine can write at least one character to -the output string, and so a null terminator can be appended. -CHKOSTR should be used in void functions. In non-void functions, -use CHKOSTR_VAL, which is defined below. -*/ - -#define CHKOSTR( errHandling, modname, string, length ) \ - \ - CHKPTR ( errHandling, modname, string ); \ - \ - if ( ( (void *)string != (void *)0 ) \ - && ( length < 2 ) ) \ - { \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "String \"#\" has length #; must be >= 2." ); \ - errch_c ( "#", (#string) ); \ - errint_c ( "#", (length) ); \ - sigerr_c ( "SPICE(STRINGTOOSHORT)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return; \ - } \ - } - - -#define CHKOSTR_VAL( errHandling, modname, string, length, retval ) \ - \ - CHKPTR_VAL( errHandling, modname, string, retval ); \ - \ - if ( ( (void *)string != (void *)0 ) \ - && ( length < 2 ) ) \ - { \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "String \"#\" has length #; must be >= 2." ); \ - errch_c ( "#", (#string) ); \ - errint_c ( "#", (length) ); \ - sigerr_c ( "SPICE(STRINGTOOSHORT)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return ( retval ); \ - } \ - } - - - /* - Definitions for Cells and Sets - */ - - - /* - Cell initialization macros - */ - #define CELLINIT( cellPtr ) \ - \ - if ( !( (cellPtr)->init ) ) \ - { \ - if ( (cellPtr)->dtype == SPICE_CHR ) \ - { \ - /* \ - Make sure all elements of the data array, including \ - the control area, start off null-terminated. We place \ - the null character in the final element of each string, \ - so as to avoid wiping out data that may have been \ - assigned to the data array prior to initialization. \ - */ \ - SpiceChar * sPtr; \ - SpiceInt i; \ - SpiceInt nmax; \ - \ - nmax = SPICE_CELL_CTRLSZ + (cellPtr)->size; \ - \ - for ( i = 1; i <= nmax; i++ ) \ - { \ - sPtr = (SpiceChar *)((cellPtr)->base) \ - + i * (cellPtr)->length \ - - 1; \ - \ - *sPtr = NULLCHAR; \ - } \ - } \ - else \ - { \ - zzsynccl_c ( C2F, (cellPtr) ); \ - } \ - \ - (cellPtr)->init = SPICETRUE; \ - } - - - #define CELLINIT2( cellPtr1, cellPtr2 ) \ - \ - CELLINIT ( cellPtr1 ); \ - CELLINIT ( cellPtr2 ); - - - #define CELLINIT3( cellPtr1, cellPtr2, cellPtr3 ) \ - \ - CELLINIT ( cellPtr1 ); \ - CELLINIT ( cellPtr2 ); \ - CELLINIT ( cellPtr3 ); - - - /* - Data type checking macros: - */ - #define CELLTYPECHK( errHandling, modname, dType, cellPtr1 ) \ - \ - if ( (cellPtr1)->dtype != (dType) ) \ - { \ - SpiceChar * typstr[3] = \ - { \ - "character", "double precision", "integer" \ - }; \ - \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "Data type of # is #; expected type " \ - "is #." ); \ - errch_c ( "#", (#cellPtr1) ); \ - errch_c ( "#", typstr[ (cellPtr1)->dtype ] ); \ - errch_c ( "#", typstr[ dType ] ); \ - sigerr_c ( "SPICE(TYPEMISMATCH)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return; \ - } \ - } - - - #define CELLTYPECHK_VAL( errHandling, modname, \ - dType, cellPtr1, retval ) \ - \ - if ( (cellPtr1)->dtype != (dType) ) \ - { \ - SpiceChar * typstr[3] = \ - { \ - "character", "double precision", "integer" \ - }; \ - \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "Data type of # is #; expected type " \ - "is #." ); \ - errch_c ( "#", (#cellPtr1) ); \ - errch_c ( "#", typstr[ (cellPtr1)->dtype ] ); \ - errch_c ( "#", typstr[ dType ] ); \ - sigerr_c ( "SPICE(TYPEMISMATCH)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return (retval); \ - } \ - } - - - #define CELLTYPECHK2( errHandling, modname, dtype, \ - cellPtr1, cellPtr2 ) \ - \ - CELLTYPECHK( errHandling, modname, dtype, cellPtr1 ); \ - CELLTYPECHK( errHandling, modname, dtype, cellPtr2 ); - - - - #define CELLTYPECHK2_VAL( errHandling, modname, dtype, \ - cellPtr1, cellPtr2, retval ) \ - \ - CELLTYPECHK_VAL( errHandling, modname, dtype, cellPtr1, \ - retval ); \ - CELLTYPECHK_VAL( errHandling, modname, dtype, cellPtr2, \ - retval ); - - - - #define CELLTYPECHK3( errHandling, modname, dtype, \ - cellPtr1, cellPtr2, cellPtr3 ) \ - \ - CELLTYPECHK( errHandling, modname, dtype, cellPtr1 ); \ - CELLTYPECHK( errHandling, modname, dtype, cellPtr2 ); \ - CELLTYPECHK( errHandling, modname, dtype, cellPtr3 ); - - - #define CELLTYPECHK3_VAL( errHandling, modname, dtype, \ - cellPtr1, cellPtr2, cellPtr3, \ - retval ) \ - \ - CELLTYPECHK_VAL( errHandling, modname, dtype, cellPtr1, \ - retval ); \ - CELLTYPECHK_VAL( errHandling, modname, dtype, cellPtr2, \ - retval ); \ - CELLTYPECHK_VAL( errHandling, modname, dtype, cellPtr3, \ - retval ); - - - - #define CELLMATCH2( errHandling, modname, cellPtr1, cellPtr2 ) \ - \ - if ( (cellPtr1)->dtype != (cellPtr2)->dtype ) \ - { \ - SpiceChar * typstr[3] = \ - { \ - "character", "double precision", "integer" \ - }; \ - \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "Data type of # is #; data type of # " \ - "is #, but types must match." ); \ - errch_c ( "#", (#cellPtr1) ); \ - errch_c ( "#", typstr[ (cellPtr1)->dtype ] ); \ - errch_c ( "#", (#cellPtr2) ); \ - errch_c ( "#", typstr[ (cellPtr2)->dtype ] ); \ - sigerr_c ( "SPICE(TYPEMISMATCH)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return; \ - } \ - } - - #define CELLMATCH2_VAL( errHandling, modname, \ - cellPtr1, cellPtr2, retval ) \ - \ - if ( (cellPtr1)->dtype != (cellPtr2)->dtype ) \ - { \ - SpiceChar * typstr[3] = \ - { \ - "character", "double precision", "integer" \ - }; \ - \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "Data type of # is #; data type of # " \ - "is #, but types must match." ); \ - errch_c ( "#", (#cellPtr1) ); \ - errch_c ( "#", typstr [ (cellPtr1)->dtype ] ); \ - errch_c ( "#", (#cellPtr2) ); \ - errch_c ( "#", typstr [ (cellPtr2)->dtype ] ); \ - sigerr_c ( "SPICE(TYPEMISMATCH)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return ( retval ); \ - } \ - } - - - #define CELLMATCH3( errHandling, modname, \ - cellPtr1, cellPtr2, cellPtr3 ) \ - \ - CELLMATCH2 ( errHandling, modname, cellPtr1, cellPtr2 ); \ - CELLMATCH2 ( errHandling, modname, cellPtr2, cellPtr3 ); - - - - - #define CELLMATCH3_VAL( errHandling, modname, cellPtr1, \ - cellPtr2, cellPtr3, retval ) \ - \ - CELLMATCH2_VAL ( errHandling, modname, \ - cellPtr1, cellPtr2, retval ); \ - \ - CELLMATCH2_VAL ( errHandling, modname, \ - cellPtr2, cellPtr3, retval ); - - /* - Set checking macros: - */ - #define CELLISSETCHK( errHandling, modname, cellPtr1 ) \ - \ - if ( !(cellPtr1)->isSet ) \ - { \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "Cell # must be sorted and have unique " \ - "values in order to be a CSPICE set. " \ - "The isSet flag in this cell is SPICEFALSE, " \ - "indicating the cell may have been modified " \ - "by a routine that doesn't preserve these " \ - "properties." ); \ - errch_c ( "#", (#cellPtr1) ); \ - sigerr_c ( "SPICE(NOTASET)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return; \ - } \ - } - - - #define CELLISSETCHK_VAL( errHandling, modname, \ - cellPtr1, retval ) \ - \ - if ( !(cellPtr1)->isSet ) \ - { \ - if ( (errHandling) == CHK_DISCOVER ) \ - { \ - chkin_c ( modname ); \ - } \ - \ - setmsg_c ( "Cell # must be sorted and have unique " \ - "values in order to be a CSPICE set. " \ - "The isSet flag in this cell is SPICEFALSE, " \ - "indicating the cell may have been modified " \ - "by a routine that doesn't preserve these " \ - "properties." ); \ - errch_c ( "#", (#cellPtr1) ); \ - sigerr_c ( "SPICE(NOTASET)" ); \ - \ - if ( ( (errHandling) == CHK_DISCOVER ) \ - || ( (errHandling) == CHK_STANDARD ) ) \ - { \ - chkout_c ( modname ); \ - return (retval); \ - } \ - } - - - #define CELLISSETCHK2( errHandling, modname, \ - cellPtr1, cellPtr2 ) \ - \ - CELLISSETCHK( errHandling, modname, cellPtr1 ); \ - CELLISSETCHK( errHandling, modname, cellPtr2 ); - - - - #define CELLISSETCHK2_VAL( errHandling, modname, \ - cellPtr1, cellPtr2, retval ) \ - \ - CELLISSETCHK_VAL( errHandling, modname, cellPtr1, retval ); \ - CELLISSETCHK_VAL( errHandling, modname, cellPtr2, retval ); \ - - - - #define CELLISSETCHK3( errHandling, modname, \ - cellPtr1, cellPtr2, cellPtr3 ) \ - \ - CELLISSETCHK ( errHandling, modname, cellPtr1 ); \ - CELLISSETCHK ( errHandling, modname, cellPtr2 ); \ - CELLISSETCHK ( errHandling, modname, cellPtr3 ); - - - #define CELLISSETCHK3_VAL( errHandling, modname, cellPtr1, \ - cellPtr2, cellPtr3, retval ) \ - \ - CELLISSETCHK_VAL ( errHandling, modname, cellPtr1, retval ); \ - CELLISSETCHK_VAL ( errHandling, modname, cellPtr2, retval ); \ - CELLISSETCHK_VAL ( errHandling, modname, cellPtr3, retval ); - - - /* - C-to-Fortran and Fortran-to-C character cell translation macros: - */ - - /* - Macros that map one or more character C cells to dynamically - allocated Fortran-style character cells: - */ - #define C2F_MAP_CELL( caller, CCell, fCell, fLen ) \ - \ - { \ - /* \ - fCell and fLen are to be passed by reference, as if this \ - macro were a function. \ - \ - \ - Caution: dynamically allocates array fCell, which is to be \ - freed by caller! \ - */ \ - SpiceInt ndim; \ - SpiceInt lenvals; \ - \ - \ - ndim = (CCell)->size + SPICE_CELL_CTRLSZ; \ - lenvals = (CCell)->length; \ - \ - C2F_MapFixStrArr ( (caller), ndim, lenvals, \ - (CCell)->base, (fLen), (fCell) ); \ - \ - if ( !failed_c() ) \ - { \ - /* \ - Explicitly set the control area info in the Fortran cell.\ - */ \ - ssizec_ ( ( integer * ) &((CCell)->size), \ - ( char * ) *(fCell), \ - ( ftnlen ) *(fLen) ); \ - \ - scardc_ ( ( integer * ) &((CCell)->card), \ - ( char * ) *(fCell), \ - ( ftnlen ) *(fLen) ); \ - \ - if ( failed_c() ) \ - { \ - /* \ - Setting size or cardinality of the Fortran cell \ - can fail, for example if the cell's string length \ - is too short. \ - */ \ - free ( *(fCell) ); \ - } \ - } \ - } - - - #define C2F_MAP_CELL2( caller, CCell1, fCell1, fLen1, \ - CCell2, fCell2, fLen2 ) \ - \ - { \ - C2F_MAP_CELL( caller, CCell1, fCell1, fLen1 ); \ - \ - if ( !failed_c() ) \ - { \ - C2F_MAP_CELL( caller, CCell2, fCell2, fLen2 ); \ - \ - if ( failed_c() ) \ - { \ - free ( *(fCell1) ); \ - } \ - } \ - } - - - #define C2F_MAP_CELL3( caller, CCell1, fCell1, fLen1, \ - CCell2, fCell2, fLen2, \ - CCell3, fCell3, fLen3 ) \ - \ - { \ - C2F_MAP_CELL2( caller, CCell1, fCell1, fLen1, \ - CCell2, fCell2, fLen2 ); \ - \ - if ( !failed_c() ) \ - { \ - C2F_MAP_CELL( caller, CCell3, fCell3, fLen3 ); \ - \ - if ( failed_c() ) \ - { \ - free ( *(fCell1) ); \ - free ( *(fCell2) ); \ - } \ - } \ - } - - - - /* - Macro that maps a Fortran-style character cell to a C cell - (Note: this macro frees the Fortran cell): - */ - - #define F2C_MAP_CELL( fCell, fLen, CCell ) \ - \ - { \ - SpiceInt card; \ - SpiceInt lenvals; \ - SpiceInt ndim; \ - SpiceInt nBytes; \ - SpiceInt size; \ - void * array; \ - \ - ndim = (CCell)->size + SPICE_CELL_CTRLSZ; \ - lenvals = (CCell)->length; \ - array = (CCell)->base; \ - \ - /* \ - Capture the size and cardinality of the Fortran cell. \ - */ \ - if ( !failed_c() ) \ - { \ - size = sizec_ ( ( char * ) (fCell), \ - ( ftnlen ) fLen ); \ - \ - card = cardc_ ( ( char * ) (fCell), \ - ( ftnlen ) fLen ); \ - } \ - \ - \ - /* \ - Copy the Fortran array into the output array. \ - */ \ - \ - nBytes = ndim * fLen * sizeof(SpiceChar); \ - memmove ( array, fCell, nBytes ); \ - /* \ - Convert the output array from Fortran to C style. \ - */ \ - F2C_ConvertTrStrArr ( ndim, lenvals, (SpiceChar *)array ); \ - \ - /* \ - Sync the size and cardinality of the C cell. \ - */ \ - if ( !failed_c() ) \ - { \ - (CCell)->size = size; \ - (CCell)->card = card; \ - } \ - } - - - -/* - End of header SpiceZmc.h -*/ diff --git a/ext/spice/include/SpiceZpl.h b/ext/spice/include/SpiceZpl.h deleted file mode 100644 index a8b193139c..0000000000 --- a/ext/spice/include/SpiceZpl.h +++ /dev/null @@ -1,117 +0,0 @@ -/* - --Header_File SpiceZpl.h ( CSPICE platform macros ) - --Abstract - - Define macros identifying the host platform for which this - version of CSPICE is targeted. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Literature_References - - None. - --Particulars - - This header file defines macros that enable CSPICE code to be - compiled conditionally based on the identity of the host platform. - - The macros defined here ARE visible in the macro name space of - any file that includes SpiceUsr.h. The names are prefixed with - the string CSPICE_ to help prevent conflicts with macros defined - by users' applications. - --Author_and_Institution - - N.J. Bachman (JPL) - B.V. Semenov (JPL) - E.D. Wright (JPL) - --Version - - -CSPICE Version 2.1.0, 10-MAR-2014 (BVS) - - Updated for the: - - PC-CYGWIN-64BIT-GCC_C - - environment. - - -CSPICE Version 2.2.0, 14-MAY-2010 (EDW)(BVS) - - Updated for the: - - MAC-OSX-64BIT-INTEL_C - PC-64BIT-MS_C - SUN-SOLARIS-64BIT-NATIVE_C - SUN-SOLARIS-INTEL-64BIT-CC_C - SUN-SOLARIS-INTEL-CC_C - - environments. - - -CSPICE Version 2.1.0, 15-NOV-2006 (BVS) - - Updated for MAC-OSX-INTEL_C environment. - - -CSPICE Version 2.0.0, 21-FEB-2006 (NJB) - - Updated for PC-LINUX-64BIT-GCC_C environment. - - -CSPICE Version 1.3.0, 06-MAR-2005 (NJB) - - Updated for SUN-SOLARIS-64BIT-GCC_C environment. - - -CSPICE Version 1.2.0, 03-JAN-2005 (BVS) - - Updated for PC-CYGWIN_C environment. - - -CSPICE Version 1.1.0, 27-JUL-2002 (BVS) - - Updated for MAC-OSX-NATIVE_C environment. - - -CSPICE Version 1.0.0, 26-FEB-1999 (NJB) (EDW) - --Index_Entries - - platform ID defines for CSPICE - -*/ - - -#ifndef HAVE_PLATFORM_MACROS_H -#define HAVE_PLATFORM_MACROS_H - - - #define CSPICE_MAC_OSX_INTEL_64BIT_GCC - -#endif - diff --git a/ext/spice/include/SpiceZpr.h b/ext/spice/include/SpiceZpr.h deleted file mode 100644 index b3290f82b7..0000000000 --- a/ext/spice/include/SpiceZpr.h +++ /dev/null @@ -1,4135 +0,0 @@ -/* - --Header_File SpiceZpr.h ( CSPICE prototypes ) - --Abstract - - Define prototypes for CSPICE user-interface-level functions. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Literature_References - - None. - --Particulars - - This C header file contains prototypes for CSPICE user-level - C routines. Prototypes for the underlying f2c'd SPICELIB routines - are contained in the separate header file SpiceZfc. However, those - routines are not part of the official CSPICE API. - --Author_and_Institution - - N.J. Bachman (JPL) - K.R. Gehringer (JPL) - W.L. Taber (JPL) - F.S. Turner (JPL) - E.D. Wright (JPL) - --Version - - -CSPICE Version 12.13.0, 03-DEC-2013 (NJB) (SCK) (EDW) - - Correction to argument order for gfsep_c.c prototype. - - Added prototypes for - - bltfrm_c - ccifrm_c - edterm_c - eqncpv_c - fovray_c - fovtrg_c - gfilum_c - gfpa_c - gfstol_c - gfudb_c - illumg_c - kplfrm_c - occult_c - phaseq_c - pxfrm2_c - qcktrc_c - trcdep_c - trcnam_c - spkcpo_c - spkcpt_c - spkcvo_c - spkcvt_c - spkpvn_c - spksfs_c - spkw20_c - xfmsta_c - udf_c - - -CSPICE Version 12.12.0, 19-FEB-2010 (EDW) (NJB) - - Added prototypes for - - bodc2s_c - dafgsr_c - dafrfr_c - dp2hx_c - ducrss_c - dvcrss_c - dvnorm_c - gfrr_c - gfuds_c - hx2dp_c - uddc_c - uddf_c - - -CSPICE Version 12.11.0, 29-MAR-2009 (EDW) (NJB) - - Added prototypes for - - dvsep_c - gfbail_c - gfclrh_c - gfdist_c - gfevnt_c - gffove_c - gfinth_c - gfocce_c - gfoclt_c - gfposc_c - gfrefn_c - gfrepf_c - gfrepi_c - gfrepu_c - gfrfov_c - gfsep_c - gfseth_c - gfsntc_c - gfsstp_c - gfstep_c - gfsubc_c - gftfov_c - surfpv_c - zzgfgeth_c - zzgfsavh_c - - -CSPICE Version 12.10.0, 30-JAN-2008 (EDW) (NJB) - - Added prototypes for: - - ilumin_c - pckcov_c - pckfrm_c - sincpt_c - spkacs_c - spkaps_c - spkltc_c - subpnt_c - subslr_c - wncard_c - - -CSPICE Version 12.9.0, 16-NOV-2006 (NJB) - - Bug fix: corrected prototype for vhatg_c. - - Renamed wnfild_c and wnfltd_c arguments `small' to 'smal' for - compatibility with MS Visual C++. - - Added prototypes for - - dafac_c - dafdc_c - dafec_c - dafgda_c - dascls_c - dasopr_c - kclear_c - - -CSPICE Version 12.8.0, 07-NOV-2005 (NJB) - - Added prototypes for - - bodvcd_c - qdq2av_c - qxq_c - srfrec_c - - -CSPICE Version 12.7.0, 06-JAN-2004 (NJB) - - Added prototypes for - - bods2c_c - ckcov_c - ckobj_c - dafopw_c - dafrs_c - dpgrdr_c - drdpgr_c - lspcn_c - pgrrec_c - recpgr_c - spkcov_c - spkobj_c - - -CSPICE Version 12.6.0, 24-FEB-2003 (NJB) - - Added prototype for - - bodvrd_c - deltet_c - srfxpt_c - - -CSPICE Version 12.5.0, 14-MAY-2003 (NJB) - - Removed prototype for getcml_. - - - -CSPICE Version 12.4.0, 25-FEB-2003 (NJB) - - Added prototypes for - - dasac_c - dasec_c - et2lst_c - - -CSPICE Version 12.3.0, 03-SEP-2002 (NJB) - - Added prototypes for - - appndc_c - appndd_c - appndi_c - bschoc_c - bschoi_c - bsrchc_c - bsrchd_c - bsrchi_c - card_c - ckw05_c - copy_c - cpos_c - cposr_c - diff_c - elemc_c - elemd_c - elemi_c - esrchc_c - insrtc_c - insrtd_c - insrti_c - inter_c - isordv_c - isrchc_c - isrchd_c - isrchi_c - lparss_c - lstlec_c - lstled_c - lstlei_c - lstltc_c - lstltd_c - lstlti_c - lx4dec_c - lx4num_c - lx4sgn_c - lx4uns_c - lxqstr_c - ncpos_c - ncposr_c - ordc_c - ordd_c - orderc_c - orderd_c - orderi_c - ordi_c - pos_c - posr_c - prefix_c - removc_c - removd_c - remove_c - removi_c - reordc_c - reordd_c - reordi_c - reordl_c - repmc_c - repmct_c - repmd_c - repmf_c - repmi_c - repmot_c - scard_c - sdiff_c - set_c - shellc_c - shelld_c - shelli_c - size_c - spkw18_c - ssize_c - union_c - valid_c - wncomd_c - wncond_c - wndifd_c - wnelmd_c - wnexpd_c - wnextd_c - wnfetd_c - wnfild_c - wnfltd_c - wnincd_c - wninsd_c - wnintd_c - wnreld_c - wnsumd_c - wnunid_c - wnvald_c - zzsynccl_c - - -CSPICE Version 12.2.0, 23-OCT-2001 (NJB) - - Added prototypes for - - badkpv_c - dcyldr_c - dgeodr_c - dlatdr_c - drdcyl_c - drdgeo_c - drdlat_c - drdsph_c - dsphdr_c - ekacec_c - ekaced_c - ekacei_c - ekappr_c - ekbseg_c - ekccnt_c - ekcii_c - ekdelr_c - ekinsr_c - ekntab_c - ekrcec_c - ekrced_c - ekrcei_c - ektnam_c - ekucec_c - ekuced_c - ekucei_c - inelpl_c - invort_c - kxtrct_c - - Added const qualifier to input array arguments of - - conics_c - illum_c - pdpool_c - prop2b_c - q2m_c - spkuds_c - xposeg_c - - Added const qualifier to the return value of - - tkvrsn_c - - -CSPICE Version 12.1.0, 12-APR-2000 (FST) - - Added prototype for - - getfov_c - - -CSPICE Version 12.0.0, 22-MAR-2000 (NJB) - - Added prototypes for - - lparse_c - lparsm_c - spkw12_c - spkw13_c - - - -CSPICE Version 11.1.0, 17-DEC-1999 (WLT) - - Added prototype for - - dafrda_c - - -CSPICE Version 11.0.0, 07-OCT-1999 (NJB) (EDW) - - Changed ekaclc_c, ekacld_c, ekacli_c prototypes to make input - pointers const-qualified where appropriate. - - Changed prompt_c prototype to accommodate memory leak bug fix. - - Changed ekpsel_c prototype to be consistent with other interfaces - having string array outputs. - - Added prototypes for - - axisar_c - brcktd_c - brckti_c - cgv2el_c - cidfrm_c - clpool_c - cmprss_c - cnmfrm_c - convrt_c - cvpool_c - dafbbs_c - dafbfs_c - dafcls_c - dafcs_c - daffna_c - daffpa_c - dafgh_c - dafgn_c - dafgs_c - dafopr_c - dafps_c - dafus_c - diags2_c - dtpool_c - dvdot_c - dvhat_c - dvpool_c - edlimb_c - ekops_c - ekopw_c - eul2xf_c - ftncls_c - furnsh_c - getelm_c - getmsg_c - gnpool_c - ident_c - illum_c - inedpl_c - kdata_c - kinfo_c - ktotal_c - lmpool_c - matchi_c - matchw_c - maxd_c - maxi_c - mequ_c - mind_c - mini_c - moved_ - npedln_c - npelpt_c - nplnpt_c - pcpool_c - pdpool_c - pipool_c - pjelpl_c - pxform_c - rav2xf_c - raxisa_c - rquad_c - saelgv_c - spk14a_c - spk14b_c - spk14e_c - spkapo_c - spkapp_c - spkcls_c - spkezp_c - spkgps_c - spkopn_c - spkpds_c - spkpos_c - spkssb_c - spksub_c - spkuds_c - spkw02_c - spkw03_c - spkw05_c - spkw08_c - spkw09_c - spkw10_c - spkw15_c - spkw17_c - stpool_c - subpt_c - subsol_c - swpool_c - szpool_c - tparse_c - trace_c - unload_c - vaddg_c - vhatg_c - vlcomg_c - vminug_c - vrel_c - vrelg_c - vsepg_c - vtmv_c - vtmvg_c - vzerog_c - xf2eul_c - xf2rav_c - xposeg_c - - -CSPICE Version 10.0.0, 09-MAR-1999 (NJB) - - Added prototypes for - - frame_c - inrypl_c - nvc2pl_c - nvp2pl_c - pl2nvc_c - pl2nvp_c - pl2psv_c - psv2pl_c - sce2c_c - vprjp_c - vprjpi_c - - Now conditionally includes SpiceEll.h and SpicePln.h. - - - -CSPICE Version 9.0.0, 25-FEB-1999 (NJB) - - Added prototypes for - - eknseg_c - eknelt_c - ekpsel_c - ekssum_c - - Now conditionally includes SpiceEK.h. - - - -CSPICE Version 8.0.0, 20-OCT-1998 (NJB) - - Added const qualifier to all input matrix and vector arguments. - - Added prototypes for - - det_c - dpmax_c - dpmax_ - dpmin_c - dpmin_ - frinfo_c - frmnam_c - getfat_c - intmax_c - intmax_ - intmin_c - intmin_ - invert_c - namfrm_c - vrotv_c - vsclg_c - - - -CSPICE Version 7.0.0, 02-APR-1998 (EDW) - - Added prototypes for - - mequg_c - unormg_g - vdistg_c - vdotg_c - vequg_c - vnormg_c - - -CSPICE Version 6.0.0, 31-MAR-1998 (NJB) - - Added prototypes for - - ekaclc_c - ekacld_c - ekacli_c - ekcls_c - ekffld_c - ekfind_c - ekgc_c - ekgd_c - ekgi_c - ekifld_c - eklef_c - ekopr_c - ekopn_c - ekuef_c - - -CSPICE Version 5.0.1, 05-MAR-1998 (EDW) - - Remove some non printing characters. - - -CSPICE Version 5.0.0, 03-MAR-1998 (NJB) - - Added prototypes for - - etcal_c - ltime_c - stelab_c - tpictr_c - twovec_c - vsubg_c - - -CSPICE Version 4.0.0, 11-FEB-1998 (EDW) - - Added prototypes for - - timdef_c - tsetyr_c - - - -CSPICE Version 3.0.0, 02-FEB-1998 (NJB) - - Added prototypes for - - pckuof_c - tipbod_c - - Type SpiceVoid was replaced with void. - - -CSPICE Version 2.0.0, 06-JAN-1998 (NJB) - - Changed all input-only character pointers to type ConstSpiceChar. - - -CSPICE Version 1.0.0, 25-OCT-1997 (NJB) (KRG) (EDW) - --Index_Entries - - prototypes of CSPICE functions - -*/ - - -/* -Include Files: -*/ - - -#ifndef HAVE_SPICEDEFS_H -#include "SpiceZdf.h" -#endif - -#ifndef HAVE_SPICE_EK_H -#include "SpiceEK.h" -#endif - -#ifndef HAVE_SPICE_PLANES_H -#include "SpicePln.h" -#endif - -#ifndef HAVE_SPICE_ELLIPSES_H -#include "SpiceEll.h" -#endif - -#ifndef HAVE_SPICE_CELLS_H -#include "SpiceCel.h" -#endif - -#ifndef HAVE_SPICE_SPK_H -#include "SpiceSPK.h" -#endif - -#ifndef HAVE_SPICEWRAPPERS_H -#define HAVE_SPICEWRAPPERS_H - - - - -/* - Function prototypes for CSPICE functions are listed below. - Each prototype is accompanied by a function abstract and brief I/O - description. - - See the headers of the C wrappers for detailed descriptions of the - routines' interfaces. - - The list below should be maintained in alphabetical order. -*/ - - void appndc_c ( ConstSpiceChar * item, - SpiceCell * cell ); - - - void appndd_c ( SpiceDouble item, - SpiceCell * cell ); - - - void appndi_c ( SpiceInt item, - SpiceCell * cell ); - - - void axisar_c ( ConstSpiceDouble axis [3], - SpiceDouble angle, - SpiceDouble r [3][3] ); - - - SpiceBoolean badkpv_c ( ConstSpiceChar *caller, - ConstSpiceChar *name, - ConstSpiceChar *comp, - SpiceInt size, - SpiceInt divby, - SpiceChar type ); - - - void bltfrm_c ( SpiceInt frmcls, - SpiceCell * idset ); - - - void bodc2n_c ( SpiceInt code, - SpiceInt namelen, - SpiceChar * name, - SpiceBoolean * found ); - - - void bodc2s_c ( SpiceInt code, - SpiceInt lenout, - SpiceChar * name ); - - void boddef_c ( ConstSpiceChar * name, - SpiceInt code ); - - - SpiceBoolean bodfnd_c ( SpiceInt body, - ConstSpiceChar * item ); - - - void bodn2c_c ( ConstSpiceChar * name, - SpiceInt * code, - SpiceBoolean * found ); - - - void bods2c_c ( ConstSpiceChar * name, - SpiceInt * code, - SpiceBoolean * found ); - - - void bodvar_c ( SpiceInt body, - ConstSpiceChar * item, - SpiceInt * dim , - SpiceDouble * values ); - - - void bodvcd_c ( SpiceInt body, - ConstSpiceChar * item, - SpiceInt maxn, - SpiceInt * dim , - SpiceDouble * values ); - - - void bodvrd_c ( ConstSpiceChar * body, - ConstSpiceChar * item, - SpiceInt maxn, - SpiceInt * dim , - SpiceDouble * values ); - - - SpiceDouble brcktd_c ( SpiceDouble number, - SpiceDouble end1, - SpiceDouble end2 ); - - - SpiceInt brckti_c ( SpiceInt number, - SpiceInt end1, - SpiceInt end2 ); - - - SpiceInt bschoc_c ( ConstSpiceChar * value, - SpiceInt ndim, - SpiceInt lenvals, - const void * array, - ConstSpiceInt * order ); - - - SpiceInt bschoi_c ( SpiceInt value, - SpiceInt ndim, - ConstSpiceInt * array, - ConstSpiceInt * order ); - - - SpiceInt bsrchc_c ( ConstSpiceChar * value, - SpiceInt ndim, - SpiceInt lenvals, - const void * array ); - - - SpiceInt bsrchd_c ( SpiceDouble value, - SpiceInt ndim, - ConstSpiceDouble * array ); - - - SpiceInt bsrchi_c ( SpiceInt value, - SpiceInt ndim, - ConstSpiceInt * array ); - - - SpiceDouble b1900_c ( void ); - - - SpiceDouble b1950_c ( void ); - - - SpiceInt card_c ( SpiceCell * cell ); - - - void ccifrm_c ( SpiceInt frclss, - SpiceInt clssid, - SpiceInt lenout, - SpiceInt * frcode, - SpiceChar * frname, - SpiceInt * center, - SpiceBoolean * found ); - - - void cgv2el_c ( ConstSpiceDouble center[3], - ConstSpiceDouble vec1 [3], - ConstSpiceDouble vec2 [3], - SpiceEllipse * ellipse ); - - - void chkin_c ( ConstSpiceChar * module ); - - - void chkout_c ( ConstSpiceChar * module ); - - - void cidfrm_c ( SpiceInt cent, - SpiceInt lenout, - SpiceInt * frcode, - SpiceChar * frname, - SpiceBoolean * found ); - - - void ckcls_c ( SpiceInt handle ); - - - void ckcov_c ( ConstSpiceChar * ck, - SpiceInt idcode, - SpiceBoolean needav, - ConstSpiceChar * level, - SpiceDouble tol, - ConstSpiceChar * timsys, - SpiceCell * cover ); - - - void ckobj_c ( ConstSpiceChar * ck, - SpiceCell * ids ); - - - void ckgp_c ( SpiceInt inst, - SpiceDouble sclkdp, - SpiceDouble tol, - ConstSpiceChar * ref, - SpiceDouble cmat[3][3], - SpiceDouble * clkout, - SpiceBoolean * found ); - - - void ckgpav_c ( SpiceInt inst, - SpiceDouble sclkdp, - SpiceDouble tol, - ConstSpiceChar * ref, - SpiceDouble cmat[3][3], - SpiceDouble av[3], - SpiceDouble * clkout, - SpiceBoolean * found ); - - - void cklpf_c ( ConstSpiceChar * fname, - SpiceInt * handle ); - - - void ckopn_c ( ConstSpiceChar * name, - ConstSpiceChar * ifname, - SpiceInt ncomch, - SpiceInt * handle ); - - - void ckupf_c ( SpiceInt handle ); - - - void ckw01_c ( SpiceInt handle, - SpiceDouble begtime, - SpiceDouble endtime, - SpiceInt inst, - ConstSpiceChar * ref, - SpiceBoolean avflag, - ConstSpiceChar * segid, - SpiceInt nrec, - ConstSpiceDouble sclkdp [], - ConstSpiceDouble quats [][4], - ConstSpiceDouble avvs [][3] ); - - - void ckw02_c ( SpiceInt handle, - SpiceDouble begtim, - SpiceDouble endtim, - SpiceInt inst, - ConstSpiceChar * ref, - ConstSpiceChar * segid, - SpiceInt nrec, - ConstSpiceDouble start [], - ConstSpiceDouble stop [], - ConstSpiceDouble quats [][4], - ConstSpiceDouble avvs [][3], - ConstSpiceDouble rates [] ); - - - void ckw03_c ( SpiceInt handle, - SpiceDouble begtim, - SpiceDouble endtim, - SpiceInt inst, - ConstSpiceChar * ref, - SpiceBoolean avflag, - ConstSpiceChar * segid, - SpiceInt nrec, - ConstSpiceDouble sclkdp [], - ConstSpiceDouble quats [][4], - ConstSpiceDouble avvs [][3], - SpiceInt nints, - ConstSpiceDouble starts [] ); - - - void ckw05_c ( SpiceInt handle, - SpiceCK05Subtype subtyp, - SpiceInt degree, - SpiceDouble begtim, - SpiceDouble endtim, - SpiceInt inst, - ConstSpiceChar * ref, - SpiceBoolean avflag, - ConstSpiceChar * segid, - SpiceInt n, - ConstSpiceDouble sclkdp[], - const void * packets, - SpiceDouble rate, - SpiceInt nints, - ConstSpiceDouble starts[] ); - - - SpiceDouble clight_c ( void ); - - - void clpool_c ( void ); - - - void cmprss_c ( SpiceChar delim, - SpiceInt n, - ConstSpiceChar * input, - SpiceInt lenout, - SpiceChar * output ); - - - void cnmfrm_c ( ConstSpiceChar * cname, - SpiceInt lenout, - SpiceInt * frcode, - SpiceChar * frname, - SpiceBoolean * found ); - - - void conics_c ( ConstSpiceDouble elts[8], - SpiceDouble et, - SpiceDouble state[6] ); - - - void convrt_c ( SpiceDouble x, - ConstSpiceChar * in, - ConstSpiceChar * out, - SpiceDouble * y ); - - - void copy_c ( SpiceCell * a, - SpiceCell * b ); - - - - SpiceInt cpos_c ( ConstSpiceChar * str, - ConstSpiceChar * chars, - SpiceInt start ); - - - SpiceInt cposr_c ( ConstSpiceChar * str, - ConstSpiceChar * chars, - SpiceInt start ); - - - void cvpool_c ( ConstSpiceChar * agent, - SpiceBoolean * update ); - - - void cyllat_c ( SpiceDouble r, - SpiceDouble lonc, - SpiceDouble z, - SpiceDouble * radius, - SpiceDouble * lon, - SpiceDouble * lat ); - - - void cylrec_c ( SpiceDouble r, - SpiceDouble lon, - SpiceDouble z, - SpiceDouble rectan[3] ); - - - void cylsph_c ( SpiceDouble r, - SpiceDouble lonc, - SpiceDouble z, - SpiceDouble * radius, - SpiceDouble * colat, - SpiceDouble * lon ); - - - void dafac_c ( SpiceInt handle, - SpiceInt n, - SpiceInt lenvals, - const void * buffer ); - - - void dafbbs_c ( SpiceInt handle ); - - - void dafbfs_c ( SpiceInt handle ); - - - void dafcls_c ( SpiceInt handle ); - - - void dafcs_c ( SpiceInt handle ); - - - void dafdc_c ( SpiceInt handle ); - - - void dafec_c ( SpiceInt handle, - SpiceInt bufsiz, - SpiceInt lenout, - SpiceInt * n, - void * buffer, - SpiceBoolean * done ); - - - void daffna_c ( SpiceBoolean * found ); - - - void daffpa_c ( SpiceBoolean * found ); - - - void dafgda_c ( SpiceInt handle, - SpiceInt begin, - SpiceInt end, - SpiceDouble * data ); - - - void dafgh_c ( SpiceInt * handle ); - - - void dafgn_c ( SpiceInt lenout, - SpiceChar * name ); - - - void dafgs_c ( SpiceDouble sum[] ); - - - void dafgsr_c ( SpiceInt handle, - SpiceInt recno, - SpiceInt begin, - SpiceInt end, - SpiceDouble * data, - SpiceBoolean * found ); - - - void dafopr_c ( ConstSpiceChar * fname, - SpiceInt * handle ); - - - void dafopw_c ( ConstSpiceChar * fname, - SpiceInt * handle ); - - - void dafps_c ( SpiceInt nd, - SpiceInt ni, - ConstSpiceDouble dc [], - ConstSpiceInt ic [], - SpiceDouble sum [] ); - - - void dafrda_c ( SpiceInt handle, - SpiceInt begin, - SpiceInt end, - SpiceDouble * data ); - - - - void dafrfr_c ( SpiceInt handle, - SpiceInt lenout, - SpiceInt * nd, - SpiceInt * ni, - SpiceChar * ifname, - SpiceInt * fward, - SpiceInt * bward, - SpiceInt * free ); - - - - void dafrs_c ( ConstSpiceDouble * sum ); - - - void dafus_c ( ConstSpiceDouble sum [], - SpiceInt nd, - SpiceInt ni, - SpiceDouble dc [], - SpiceInt ic [] ); - - - void dasac_c ( SpiceInt handle, - SpiceInt n, - SpiceInt buflen, - const void * buffer ); - - - void dascls_c ( SpiceInt handle ); - - - void dasec_c ( SpiceInt handle, - SpiceInt bufsiz, - SpiceInt buflen, - SpiceInt * n, - void * buffer, - SpiceBoolean * done ); - - - void dasopr_c ( ConstSpiceChar * fname, - SpiceInt * handle ); - - - void dcyldr_c ( SpiceDouble x, - SpiceDouble y, - SpiceDouble z, - SpiceDouble jacobi[3][3] ); - - - void deltet_c ( SpiceDouble epoch, - ConstSpiceChar * eptype, - SpiceDouble * delta ); - - - SpiceDouble det_c ( ConstSpiceDouble m1[3][3] ); - - - void diags2_c ( ConstSpiceDouble symmat [2][2], - SpiceDouble diag [2][2], - SpiceDouble rotate [2][2] ); - - - void diff_c ( SpiceCell * a, - SpiceCell * b, - SpiceCell * c ); - - - void dgeodr_c ( SpiceDouble x, - SpiceDouble y, - SpiceDouble z, - SpiceDouble re, - SpiceDouble f, - SpiceDouble jacobi[3][3] ); - - - void dlatdr_c ( SpiceDouble x, - SpiceDouble y, - SpiceDouble z, - SpiceDouble jacobi[3][3] ); - - void dp2hx_c ( SpiceDouble number, - SpiceInt lenout, - SpiceChar * string, - SpiceInt * length - ); - - void dpgrdr_c ( ConstSpiceChar * body, - SpiceDouble x, - SpiceDouble y, - SpiceDouble z, - SpiceDouble re, - SpiceDouble f, - SpiceDouble jacobi[3][3] ); - - - SpiceDouble dpmax_c ( void ); - - - SpiceDouble dpmax_ ( void ); - - - SpiceDouble dpmin_c ( void ); - - - SpiceDouble dpmin_ ( void ); - - - SpiceDouble dpr_c ( void ); - - - void drdcyl_c ( SpiceDouble r, - SpiceDouble lon, - SpiceDouble z, - SpiceDouble jacobi[3][3] ); - - - void drdgeo_c ( SpiceDouble lon, - SpiceDouble lat, - SpiceDouble alt, - SpiceDouble re, - SpiceDouble f, - SpiceDouble jacobi[3][3] ); - - - void drdlat_c ( SpiceDouble r, - SpiceDouble lon, - SpiceDouble lat, - SpiceDouble jacobi[3][3] ); - - - void drdpgr_c ( ConstSpiceChar * body, - SpiceDouble lon, - SpiceDouble lat, - SpiceDouble alt, - SpiceDouble re, - SpiceDouble f, - SpiceDouble jacobi[3][3] ); - - - void drdsph_c ( SpiceDouble r, - SpiceDouble colat, - SpiceDouble lon, - SpiceDouble jacobi[3][3] ); - - - void dsphdr_c ( SpiceDouble x, - SpiceDouble y, - SpiceDouble z, - SpiceDouble jacobi[3][3] ); - - - void dtpool_c ( ConstSpiceChar * name, - SpiceBoolean * found, - SpiceInt * n, - SpiceChar type [1] ); - - - void ducrss_c ( ConstSpiceDouble s1 [6], - ConstSpiceDouble s2 [6], - SpiceDouble sout[6] ); - - - void dvcrss_c ( ConstSpiceDouble s1 [6], - ConstSpiceDouble s2 [6], - SpiceDouble sout[6] ); - - - SpiceDouble dvdot_c ( ConstSpiceDouble s1 [6], - ConstSpiceDouble s2 [6] ); - - - void dvhat_c ( ConstSpiceDouble s1 [6], - SpiceDouble sout[6] ); - - SpiceDouble dvnorm_c ( ConstSpiceDouble state[6] ); - - void dvpool_c ( ConstSpiceChar * name ); - - - SpiceDouble dvsep_c ( ConstSpiceDouble * s1, - ConstSpiceDouble * s2 ); - - - void edlimb_c ( SpiceDouble a, - SpiceDouble b, - SpiceDouble c, - ConstSpiceDouble viewpt[3], - SpiceEllipse * limb ); - - - void edterm_c ( ConstSpiceChar * trmtyp, - ConstSpiceChar * source, - ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * fixfrm, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceInt npts, - SpiceDouble * trgepc, - SpiceDouble obspos [3], - SpiceDouble termpts [ ][3] ); - - - void ekacec_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt nvals, - SpiceInt vallen, - const void * cvals, - SpiceBoolean isnull ); - - - void ekaced_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt nvals, - ConstSpiceDouble * dvals, - SpiceBoolean isnull ); - - - void ekacei_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt nvals, - ConstSpiceInt * ivals, - SpiceBoolean isnull ); - - - void ekaclc_c ( SpiceInt handle, - SpiceInt segno, - ConstSpiceChar * column, - SpiceInt vallen, - const void * cvals, - ConstSpiceInt * entszs, - ConstSpiceBoolean * nlflgs, - ConstSpiceInt * rcptrs, - SpiceInt * wkindx ); - - - void ekacld_c ( SpiceInt handle, - SpiceInt segno, - ConstSpiceChar * column, - ConstSpiceDouble * dvals, - ConstSpiceInt * entszs, - ConstSpiceBoolean * nlflgs, - ConstSpiceInt * rcptrs, - SpiceInt * wkindx ); - - - void ekacli_c ( SpiceInt handle, - SpiceInt segno, - ConstSpiceChar * column, - ConstSpiceInt * ivals, - ConstSpiceInt * entszs, - ConstSpiceBoolean * nlflgs, - ConstSpiceInt * rcptrs, - SpiceInt * wkindx ); - - - void ekappr_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt * recno ); - - - void ekbseg_c ( SpiceInt handle, - ConstSpiceChar * tabnam, - SpiceInt ncols, - SpiceInt cnmlen, - const void * cnames, - SpiceInt declen, - const void * decls, - SpiceInt * segno ); - - - void ekccnt_c ( ConstSpiceChar * table, - SpiceInt * ccount ); - - - void ekcii_c ( ConstSpiceChar * table, - SpiceInt cindex, - SpiceInt lenout, - SpiceChar * column, - SpiceEKAttDsc * attdsc ); - - - void ekcls_c ( SpiceInt handle ); - - - void ekdelr_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno ); - - - void ekffld_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt * rcptrs ); - - - void ekfind_c ( ConstSpiceChar * query, - SpiceInt lenout, - SpiceInt * nmrows, - SpiceBoolean * error, - SpiceChar * errmsg ); - - - void ekgc_c ( SpiceInt selidx, - SpiceInt row, - SpiceInt elment, - SpiceInt lenout, - SpiceChar * cdata, - SpiceBoolean * null, - SpiceBoolean * found ); - - - void ekgd_c ( SpiceInt selidx, - SpiceInt row, - SpiceInt elment, - SpiceDouble * ddata, - SpiceBoolean * null, - SpiceBoolean * found ); - - - void ekgi_c ( SpiceInt selidx, - SpiceInt row, - SpiceInt elment, - SpiceInt * idata, - SpiceBoolean * null, - SpiceBoolean * found ); - - - void ekifld_c ( SpiceInt handle, - ConstSpiceChar * tabnam, - SpiceInt ncols, - SpiceInt nrows, - SpiceInt cnmlen, - const void * cnames, - SpiceInt declen, - const void * decls, - SpiceInt * segno, - SpiceInt * rcptrs ); - - - void ekinsr_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno ); - - - void eklef_c ( ConstSpiceChar * fname, - SpiceInt * handle ); - - - SpiceInt eknelt_c ( SpiceInt selidx, - SpiceInt row ); - - - SpiceInt eknseg_c ( SpiceInt handle ); - - - void ekntab_c ( SpiceInt * n ); - - - void ekopn_c ( ConstSpiceChar * fname, - ConstSpiceChar * ifname, - SpiceInt ncomch, - SpiceInt * handle ); - - - void ekopr_c ( ConstSpiceChar * fname, - SpiceInt * handle ); - - - void ekops_c ( SpiceInt * handle ); - - - void ekopw_c ( ConstSpiceChar * fname, - SpiceInt * handle ); - - - void ekpsel_c ( ConstSpiceChar * query, - SpiceInt msglen, - SpiceInt tablen, - SpiceInt collen, - SpiceInt * n, - SpiceInt * xbegs, - SpiceInt * xends, - SpiceEKDataType * xtypes, - SpiceEKExprClass * xclass, - void * tabs, - void * cols, - SpiceBoolean * error, - SpiceChar * errmsg ); - - - void ekrcec_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt lenout, - SpiceInt * nvals, - void * cvals, - SpiceBoolean * isnull ); - - - void ekrced_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt * nvals, - SpiceDouble * dvals, - SpiceBoolean * isnull ); - - - void ekrcei_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt * nvals, - SpiceInt * ivals, - SpiceBoolean * isnull ); - - - void ekssum_c ( SpiceInt handle, - SpiceInt segno, - SpiceEKSegSum * segsum ); - - - void ektnam_c ( SpiceInt n, - SpiceInt lenout, - SpiceChar * table ); - - - void ekucec_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt nvals, - SpiceInt vallen, - const void * cvals, - SpiceBoolean isnull ); - - - void ekuced_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt nvals, - ConstSpiceDouble * dvals, - SpiceBoolean isnull ); - - - void ekucei_c ( SpiceInt handle, - SpiceInt segno, - SpiceInt recno, - ConstSpiceChar * column, - SpiceInt nvals, - ConstSpiceInt * ivals, - SpiceBoolean isnull ); - - - void ekuef_c ( SpiceInt handle ); - - - SpiceBoolean elemc_c ( ConstSpiceChar * item, - SpiceCell * set ); - - - SpiceBoolean elemd_c ( SpiceDouble item, - SpiceCell * set ); - - - SpiceBoolean elemi_c ( SpiceInt item, - SpiceCell * set ); - - - void eqncpv_c ( SpiceDouble et, - SpiceDouble epoch, - ConstSpiceDouble eqel[9], - SpiceDouble rapol, - SpiceDouble decpol, - SpiceDouble state[6] ); - - - SpiceBoolean eqstr_c ( ConstSpiceChar * a, - ConstSpiceChar * b ); - - - void el2cgv_c ( ConstSpiceEllipse * ellipse, - SpiceDouble center[3], - SpiceDouble smajor[3], - SpiceDouble sminor[3] ); - - - void erract_c ( ConstSpiceChar * operation, - SpiceInt lenout, - SpiceChar * action ); - - - void errch_c ( ConstSpiceChar * marker, - ConstSpiceChar * string ); - - - void errdev_c ( ConstSpiceChar * operation, - SpiceInt lenout, - SpiceChar * device ); - - - void errdp_c ( ConstSpiceChar * marker, - SpiceDouble number ); - - - void errint_c ( ConstSpiceChar * marker, - SpiceInt number ); - - - void errprt_c ( ConstSpiceChar * operation, - SpiceInt lenout, - SpiceChar * list ); - - - SpiceInt esrchc_c ( ConstSpiceChar * value, - SpiceInt ndim, - SpiceInt lenvals, - const void * array ); - - - void etcal_c ( SpiceDouble et, - SpiceInt lenout, - SpiceChar * string ); - - - void et2lst_c ( SpiceDouble et, - SpiceInt body, - SpiceDouble lon, - ConstSpiceChar * type, - SpiceInt timlen, - SpiceInt ampmlen, - SpiceInt * hr, - SpiceInt * mn, - SpiceInt * sc, - SpiceChar * time, - SpiceChar * ampm ); - - - void et2utc_c ( SpiceDouble et , - ConstSpiceChar * format, - SpiceInt prec, - SpiceInt lenout, - SpiceChar * utcstr ); - - - void eul2m_c ( SpiceDouble angle3, - SpiceDouble angle2, - SpiceDouble angle1, - SpiceInt axis3, - SpiceInt axis2, - SpiceInt axis1, - SpiceDouble r [3][3] ); - - - void eul2xf_c ( ConstSpiceDouble eulang[6], - SpiceInt axisa, - SpiceInt axisb, - SpiceInt axisc, - SpiceDouble xform [6][6] ); - - - SpiceBoolean exists_c ( ConstSpiceChar * name ); - - - void expool_c ( ConstSpiceChar * name, - SpiceBoolean * found ); - - - SpiceBoolean failed_c ( void ); - - void fovray_c ( ConstSpiceChar * inst, - ConstSpiceDouble raydir [3], - ConstSpiceChar * rframe, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble * et, - SpiceBoolean * visible ); - - void fovtrg_c ( ConstSpiceChar * inst, - ConstSpiceChar * target, - ConstSpiceChar * tshape, - ConstSpiceChar * tframe, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble * et, - SpiceBoolean * visible ); - - - void frame_c ( SpiceDouble x[3], - SpiceDouble y[3], - SpiceDouble z[3] ); - - - void frinfo_c ( SpiceInt frcode, - SpiceInt * cent, - SpiceInt * clss, - SpiceInt * clssid, - SpiceBoolean * found ); - - - void frmnam_c ( SpiceInt frcode, - SpiceInt lenout, - SpiceChar * frname ); - - - void ftncls_c ( SpiceInt unit ); - - - void furnsh_c ( ConstSpiceChar * file ); - - - void gcpool_c ( ConstSpiceChar * name, - SpiceInt start, - SpiceInt room, - SpiceInt lenout, - SpiceInt * n, - void * cvals, - SpiceBoolean * found ); - - - void gdpool_c ( ConstSpiceChar * name, - SpiceInt start, - SpiceInt room, - SpiceInt * n, - SpiceDouble * values, - SpiceBoolean * found ); - - - void georec_c ( SpiceDouble lon, - SpiceDouble lat, - SpiceDouble alt, - SpiceDouble re, - SpiceDouble f, - SpiceDouble rectan[3] ); - - - void getcml_c ( SpiceInt * argc, - SpiceChar *** argv ); - - - void getelm_c ( SpiceInt frstyr, - SpiceInt lineln, - const void * lines, - SpiceDouble * epoch, - SpiceDouble * elems ); - - - void getfat_c ( ConstSpiceChar * file, - SpiceInt arclen, - SpiceInt typlen, - SpiceChar * arch, - SpiceChar * type ); - - - void getfov_c ( SpiceInt instid, - SpiceInt room, - SpiceInt shapelen, - SpiceInt framelen, - SpiceChar * shape, - SpiceChar * frame, - SpiceDouble bsight [3], - SpiceInt * n, - SpiceDouble bounds [][3] ); - - - void getmsg_c ( ConstSpiceChar * option, - SpiceInt lenout, - SpiceChar * msg ); - - - SpiceBoolean gfbail_c ( void ); - - - void gfclrh_c ( void ); - - - void gfdist_c ( ConstSpiceChar * target, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - - void gfevnt_c ( void ( * udstep ) ( SpiceDouble et, - SpiceDouble * step ), - - void ( * udrefn ) ( SpiceDouble t1, - SpiceDouble t2, - SpiceBoolean s1, - SpiceBoolean s2, - SpiceDouble * t ), - ConstSpiceChar * gquant, - SpiceInt qnpars, - SpiceInt lenvals, - const void * qpnams, - const void * qcpars, - ConstSpiceDouble * qdpars, - ConstSpiceInt * qipars, - ConstSpiceBoolean * qlpars, - ConstSpiceChar * op, - SpiceDouble refval, - SpiceDouble tol, - SpiceDouble adjust, - SpiceBoolean rpt, - - void ( * udrepi ) ( SpiceCell * cnfine, - ConstSpiceChar * srcpre, - ConstSpiceChar * srcsuf ), - - void ( * udrepu ) ( SpiceDouble ivbeg, - SpiceDouble ivend, - SpiceDouble et ), - - void ( * udrepf ) ( void ), - SpiceInt nintvls, - SpiceBoolean bail, - SpiceBoolean ( * udbail ) ( void ), - SpiceCell * cnfine, - SpiceCell * result ); - - - - void gffove_c ( ConstSpiceChar * inst, - ConstSpiceChar * tshape, - ConstSpiceDouble raydir [3], - ConstSpiceChar * target, - ConstSpiceChar * tframe, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble tol, - void ( * udstep ) ( SpiceDouble et, - SpiceDouble * step ), - void ( * udrefn ) ( SpiceDouble t1, - SpiceDouble t2, - SpiceBoolean s1, - SpiceBoolean s2, - SpiceDouble * t ), - SpiceBoolean rpt, - void ( * udrepi ) ( SpiceCell * cnfine, - ConstSpiceChar * srcpre, - ConstSpiceChar * srcsuf ), - void ( * udrepu ) ( SpiceDouble ivbeg, - SpiceDouble ivend, - SpiceDouble et ), - void ( * udrepf ) ( void ), - SpiceBoolean bail, - SpiceBoolean ( * udbail ) ( void ), - SpiceCell * cnfine, - SpiceCell * result ); - - - void gfilum_c ( ConstSpiceChar * method, - ConstSpiceChar * angtyp, - ConstSpiceChar * target, - ConstSpiceChar * illum, - ConstSpiceChar * fixref, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceDouble spoint [3], - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gfinth_c ( int sigcode ); - - - void gfocce_c ( ConstSpiceChar * occtyp, - ConstSpiceChar * front, - ConstSpiceChar * fshape, - ConstSpiceChar * fframe, - ConstSpiceChar * back, - ConstSpiceChar * bshape, - ConstSpiceChar * bframe, - ConstSpiceChar * obsrvr, - ConstSpiceChar * abcorr, - SpiceDouble tol, - void ( * udstep ) ( SpiceDouble et, - SpiceDouble * step ), - void ( * udrefn ) ( SpiceDouble t1, - SpiceDouble t2, - SpiceBoolean s1, - SpiceBoolean s2, - SpiceDouble * t ), - SpiceBoolean rpt, - void ( * udrepi ) ( SpiceCell * cnfine, - ConstSpiceChar * srcpre, - ConstSpiceChar * srcsuf ), - void ( * udrepu ) ( SpiceDouble ivbeg, - SpiceDouble ivend, - SpiceDouble et ), - void ( * udrepf ) ( void ), - SpiceBoolean bail, - SpiceBoolean ( * udbail ) ( void ), - SpiceCell * cnfine, - SpiceCell * result ); - - - - void gfoclt_c ( ConstSpiceChar * occtyp, - ConstSpiceChar * front, - ConstSpiceChar * fshape, - ConstSpiceChar * fframe, - ConstSpiceChar * back, - ConstSpiceChar * bshape, - ConstSpiceChar * bframe, - ConstSpiceChar * obsrvr, - ConstSpiceChar * abcorr, - SpiceDouble step, - SpiceCell * cnfine, - SpiceCell * result ); - - - - void gfpa_c ( ConstSpiceChar * target, - ConstSpiceChar * illum, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - - void gfposc_c ( ConstSpiceChar * target, - ConstSpiceChar * frame, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * crdsys, - ConstSpiceChar * coord, - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gfrefn_c ( SpiceDouble t1, - SpiceDouble t2, - SpiceBoolean s1, - SpiceBoolean s2, - SpiceDouble * t ); - - - void gfrepf_c ( void ); - - - void gfrepi_c ( SpiceCell * window, - ConstSpiceChar * begmss, - ConstSpiceChar * endmss ); - - - void gfrepu_c ( SpiceDouble ivbeg, - SpiceDouble ivend, - SpiceDouble time ); - - - void gfrfov_c ( ConstSpiceChar * inst, - ConstSpiceDouble raydir [3], - ConstSpiceChar * rframe, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble step, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gfrr_c ( ConstSpiceChar * target, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gfsep_c ( ConstSpiceChar * targ1, - ConstSpiceChar * shape1, - ConstSpiceChar * frame1, - ConstSpiceChar * targ2, - ConstSpiceChar * shape2, - ConstSpiceChar * frame2, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gfsntc_c ( ConstSpiceChar * target, - ConstSpiceChar * fixref, - ConstSpiceChar * method, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * dref, - ConstSpiceDouble dvec [3], - ConstSpiceChar * crdsys, - ConstSpiceChar * coord, - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gfsstp_c ( SpiceDouble step ); - - - void gfstep_c ( SpiceDouble time, - SpiceDouble * step ); - - - void gfstol_c ( SpiceDouble value ); - - - void gfsubc_c ( ConstSpiceChar * target, - ConstSpiceChar * fixref, - ConstSpiceChar * method, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * crdsys, - ConstSpiceChar * coord, - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gftfov_c ( ConstSpiceChar * inst, - ConstSpiceChar * target, - ConstSpiceChar * tshape, - ConstSpiceChar * tframe, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble step, - SpiceCell * cnfine, - SpiceCell * result ); - - - - void gfudb_c ( void ( * udfuns ) ( SpiceDouble et, - SpiceDouble * value ), - - void ( * udfunb ) ( void ( * udfuns ) - ( SpiceDouble et, - SpiceDouble * value ), - - SpiceDouble et, - SpiceBoolean * xbool ), - - SpiceDouble step, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gfuds_c ( void ( * udfuns ) ( SpiceDouble et, - SpiceDouble * value ), - - void ( * udfunb ) ( void ( * udfuns ) - ( SpiceDouble et, - SpiceDouble * value ), - - SpiceDouble x, - SpiceBoolean * xbool ), - - ConstSpiceChar * relate, - SpiceDouble refval, - SpiceDouble adjust, - SpiceDouble step, - SpiceInt nintvls, - SpiceCell * cnfine, - SpiceCell * result ); - - - void gipool_c ( ConstSpiceChar * name, - SpiceInt start, - SpiceInt room, - SpiceInt * n, - SpiceInt * ivals, - SpiceBoolean * found ); - - - void gnpool_c ( ConstSpiceChar * name, - SpiceInt start, - SpiceInt room, - SpiceInt lenout, - SpiceInt * n, - void * kvars, - SpiceBoolean * found ); - - - SpiceDouble halfpi_c ( void ); - - void hx2dp_c ( ConstSpiceChar * string, - SpiceInt lenout, - SpiceDouble * number, - SpiceBoolean * error, - SpiceChar * errmsg - ); - - - void ident_c ( SpiceDouble matrix[3][3] ); - - - void ilumin_c ( ConstSpiceChar * method, - ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * fixref, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceDouble spoint [3], - SpiceDouble * trgepc, - SpiceDouble srfvec [3], - SpiceDouble * phase, - SpiceDouble * solar, - SpiceDouble * emissn ); - - - void illum_c ( ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceDouble spoint [3], - SpiceDouble * phase, - SpiceDouble * solar, - SpiceDouble * emissn ); - - - void illumg_c ( ConstSpiceChar * method, - ConstSpiceChar * target, - ConstSpiceChar * illum, - SpiceDouble et, - ConstSpiceChar * fixref, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceDouble spoint [3], - SpiceDouble * trgepc, - SpiceDouble srfvec [3], - SpiceDouble * phase, - SpiceDouble * solar, - SpiceDouble * emissn ); - - - void inedpl_c ( SpiceDouble a, - SpiceDouble b, - SpiceDouble c, - ConstSpicePlane * plane, - SpiceEllipse * ellipse, - SpiceBoolean * found ); - - - void inelpl_c ( ConstSpiceEllipse * ellips, - ConstSpicePlane * plane, - SpiceInt * nxpts, - SpiceDouble xpt1[3], - SpiceDouble xpt2[3] ); - - - void insrtc_c ( ConstSpiceChar * item, - SpiceCell * set ); - - - void insrtd_c ( SpiceDouble item, - SpiceCell * set ); - - - void insrti_c ( SpiceInt item, - SpiceCell * set ); - - - void inter_c ( SpiceCell * a, - SpiceCell * b, - SpiceCell * c ); - - - void inrypl_c ( ConstSpiceDouble vertex [3], - ConstSpiceDouble dir [3], - ConstSpicePlane * plane, - SpiceInt * nxpts, - SpiceDouble xpt [3] ); - - - SpiceInt intmax_c ( void ); - - - SpiceInt intmax_ ( void ); - - - SpiceInt intmin_c ( void ); - - - SpiceInt intmin_ ( void ); - - - void invert_c ( ConstSpiceDouble m1[3][3], - SpiceDouble m2[3][3] ); - - - void invort_c ( ConstSpiceDouble m [3][3], - SpiceDouble mit[3][3] ); - - - SpiceBoolean isordv_c ( ConstSpiceInt * array, - SpiceInt n ); - - - SpiceBoolean isrot_c ( ConstSpiceDouble m [3][3], - SpiceDouble ntol, - SpiceDouble dtol ); - - - - SpiceInt isrchc_c ( ConstSpiceChar * value, - SpiceInt ndim, - SpiceInt lenvals, - const void * array ); - - - SpiceInt isrchd_c ( SpiceDouble value, - SpiceInt ndim, - ConstSpiceDouble * array ); - - - SpiceInt isrchi_c ( SpiceInt value, - SpiceInt ndim, - ConstSpiceInt * array ); - - - SpiceBoolean iswhsp_c ( ConstSpiceChar * string ); - - - SpiceDouble j1900_c ( void ); - - - SpiceDouble j1950_c ( void ); - - - SpiceDouble j2000_c ( void ); - - - SpiceDouble j2100_c ( void ); - - - SpiceDouble jyear_c ( void ); - - - void kclear_c ( void ); - - - void kdata_c ( SpiceInt which, - ConstSpiceChar * kind, - SpiceInt fillen, - SpiceInt typlen, - SpiceInt srclen, - SpiceChar * file, - SpiceChar * filtyp, - SpiceChar * source, - SpiceInt * handle, - SpiceBoolean * found ); - - - void kinfo_c ( ConstSpiceChar * file, - SpiceInt typlen, - SpiceInt srclen, - SpiceChar * filtyp, - SpiceChar * source, - SpiceInt * handle, - SpiceBoolean * found ); - - - void kplfrm_c ( SpiceInt frmcls, - SpiceCell * idset ); - - - void ktotal_c ( ConstSpiceChar * kind, - SpiceInt * count ); - - - void kxtrct_c ( ConstSpiceChar * keywd, - SpiceInt termlen, - const void * terms, - SpiceInt nterms, - SpiceInt stringlen, - SpiceInt substrlen, - SpiceChar * string, - SpiceBoolean * found, - SpiceChar * substr ); - - - SpiceInt lastnb_c ( ConstSpiceChar * string ); - - - void latcyl_c ( SpiceDouble radius, - SpiceDouble lon, - SpiceDouble lat, - SpiceDouble * r, - SpiceDouble * lonc, - SpiceDouble * z ); - - - void latrec_c ( SpiceDouble radius, - SpiceDouble longitude, - SpiceDouble latitude, - SpiceDouble rectan [3] ); - - - void latsph_c ( SpiceDouble radius, - SpiceDouble lon, - SpiceDouble lat, - SpiceDouble * rho, - SpiceDouble * colat, - SpiceDouble * lons ); - - - void lcase_c ( SpiceChar * in, - SpiceInt lenout, - SpiceChar * out ); - - - void ldpool_c ( ConstSpiceChar * filename ); - - - void lmpool_c ( const void * cvals, - SpiceInt lenvals, - SpiceInt n ); - - - void lparse_c ( ConstSpiceChar * list, - ConstSpiceChar * delim, - SpiceInt nmax, - SpiceInt lenout, - SpiceInt * n, - void * items ); - - - void lparsm_c ( ConstSpiceChar * list, - ConstSpiceChar * delims, - SpiceInt nmax, - SpiceInt lenout, - SpiceInt * n, - void * items ); - - - void lparss_c ( ConstSpiceChar * list, - ConstSpiceChar * delims, - SpiceCell * set ); - - - SpiceDouble lspcn_c ( ConstSpiceChar * body, - SpiceDouble et, - ConstSpiceChar * abcorr ); - - - SpiceInt lstlec_c ( ConstSpiceChar * string, - SpiceInt n, - SpiceInt lenvals, - const void * array ); - - - SpiceInt lstled_c ( SpiceDouble x, - SpiceInt n, - ConstSpiceDouble * array ); - - - SpiceInt lstlei_c ( SpiceInt x, - SpiceInt n, - ConstSpiceInt * array ); - - - SpiceInt lstltc_c ( ConstSpiceChar * string, - SpiceInt n, - SpiceInt lenvals, - const void * array ); - - - SpiceInt lstltd_c ( SpiceDouble x, - SpiceInt n, - ConstSpiceDouble * array ); - - - SpiceInt lstlti_c ( SpiceInt x, - SpiceInt n, - ConstSpiceInt * array ); - - - void ltime_c ( SpiceDouble etobs, - SpiceInt obs, - ConstSpiceChar * dir, - SpiceInt targ, - SpiceDouble * ettarg, - SpiceDouble * elapsd ); - - - void lx4dec_c ( ConstSpiceChar * string, - SpiceInt first, - SpiceInt * last, - SpiceInt * nchar ); - - - void lx4num_c ( ConstSpiceChar * string, - SpiceInt first, - SpiceInt * last, - SpiceInt * nchar ); - - - void lx4sgn_c ( ConstSpiceChar * string, - SpiceInt first, - SpiceInt * last, - SpiceInt * nchar ); - - - void lx4uns_c ( ConstSpiceChar * string, - SpiceInt first, - SpiceInt * last, - SpiceInt * nchar ); - - - void lxqstr_c ( ConstSpiceChar * string, - SpiceChar qchar, - SpiceInt first, - SpiceInt * last, - SpiceInt * nchar ); - - - void m2eul_c ( ConstSpiceDouble r[3][3], - SpiceInt axis3, - SpiceInt axis2, - SpiceInt axis1, - SpiceDouble * angle3, - SpiceDouble * angle2, - SpiceDouble * angle1 ); - - - void m2q_c ( ConstSpiceDouble r[3][3], - SpiceDouble q[4] ); - - - - SpiceBoolean matchi_c ( ConstSpiceChar * string, - ConstSpiceChar * templ, - SpiceChar wstr, - SpiceChar wchr ); - - - SpiceBoolean matchw_c ( ConstSpiceChar * string, - ConstSpiceChar * templ, - SpiceChar wstr, - SpiceChar wchr ); - - - SpiceDouble maxd_c ( SpiceInt n, - ... ); - - - SpiceInt maxi_c ( SpiceInt n, - ... ); - - - void mequ_c ( ConstSpiceDouble m1 [3][3], - SpiceDouble mout[3][3] ); - - - void mequg_c ( const void * m1, - SpiceInt nr, - SpiceInt nc, - void * mout ); - - - SpiceDouble mind_c ( SpiceInt n, - ... ); - - - SpiceInt mini_c ( SpiceInt n, - ... ); - - - int moved_ ( SpiceDouble * arrfrm, - SpiceInt * ndim, - SpiceDouble * arrto ); - - - void mtxm_c ( ConstSpiceDouble m1 [3][3], - ConstSpiceDouble m2 [3][3], - SpiceDouble mout[3][3] ); - - - void mtxmg_c ( const void * m1, - const void * m2, - SpiceInt row1, - SpiceInt col1, - SpiceInt col2, - void * mout ); - - - void mtxv_c ( ConstSpiceDouble m1 [3][3], - ConstSpiceDouble vin [3], - SpiceDouble vout[3] ); - - - void mtxvg_c ( const void * m1, - const void * v2, - SpiceInt ncol1, - SpiceInt nr1r2, - void * vout ); - - - void mxm_c ( ConstSpiceDouble m1 [3][3], - ConstSpiceDouble m2 [3][3], - SpiceDouble mout[3][3] ); - - - void mxmg_c ( const void * m1, - const void * m2, - SpiceInt row1, - SpiceInt col1, - SpiceInt col2, - void * mout ); - - - void mxmt_c ( ConstSpiceDouble m1 [3][3], - ConstSpiceDouble m2 [3][3], - SpiceDouble mout[3][3] ); - - - void mxmtg_c ( const void * m1, - const void * m2, - SpiceInt nrow1, - SpiceInt nc1c2, - SpiceInt nrow2, - void * mout ); - - - void mxv_c ( ConstSpiceDouble m1[3][3], - ConstSpiceDouble vin[3], - SpiceDouble vout[3] ); - - - void mxvg_c ( const void * m1, - const void * v2, - SpiceInt nrow1, - SpiceInt nc1r2, - void * vout ); - - - void namfrm_c ( ConstSpiceChar * frname, - SpiceInt * frcode ); - - - SpiceInt ncpos_c ( ConstSpiceChar * str, - ConstSpiceChar * chars, - SpiceInt start ); - - - SpiceInt ncposr_c ( ConstSpiceChar * str, - ConstSpiceChar * chars, - SpiceInt start ); - - - void nearpt_c ( ConstSpiceDouble positn[3], - SpiceDouble a, - SpiceDouble b, - SpiceDouble c, - SpiceDouble npoint[3], - SpiceDouble * alt ); - - - void npedln_c ( SpiceDouble a, - SpiceDouble b, - SpiceDouble c, - ConstSpiceDouble linept[3], - ConstSpiceDouble linedr[3], - SpiceDouble pnear[3], - SpiceDouble * dist ); - - - void npelpt_c ( ConstSpiceDouble point[3], - ConstSpiceEllipse * ellips, - SpiceDouble pnear[3], - SpiceDouble * dist ); - - - void nplnpt_c ( ConstSpiceDouble linpt [3], - ConstSpiceDouble lindir [3], - ConstSpiceDouble point [3], - SpiceDouble pnear [3], - SpiceDouble * dist ); - - - void nvc2pl_c ( ConstSpiceDouble normal[3], - SpiceDouble constant, - SpicePlane * plane ); - - - void nvp2pl_c ( ConstSpiceDouble normal[3], - ConstSpiceDouble point[3], - SpicePlane * plane ); - - void occult_c ( ConstSpiceChar * target1, - ConstSpiceChar * shape1, - ConstSpiceChar * frame1, - ConstSpiceChar * target2, - ConstSpiceChar * shape2, - ConstSpiceChar * frame2, - ConstSpiceChar * abcorr, - ConstSpiceChar * observer, - SpiceDouble time, - SpiceInt * occult_code ); - - SpiceInt ordc_c ( ConstSpiceChar * item, - SpiceCell * set ); - - - SpiceInt ordd_c ( SpiceDouble item, - SpiceCell * set ); - - - SpiceInt ordi_c ( SpiceInt item, - SpiceCell * set ); - - - void orderc_c ( SpiceInt lenvals, - const void * array, - SpiceInt ndim, - SpiceInt * iorder ); - - - void orderd_c ( ConstSpiceDouble * array, - SpiceInt ndim, - SpiceInt * iorder ); - - - void orderi_c ( ConstSpiceInt * array, - SpiceInt ndim, - SpiceInt * iorder ); - - - void oscelt_c ( ConstSpiceDouble state[6], - SpiceDouble et , - SpiceDouble mu , - SpiceDouble elts[8] ); - - - void pckcov_c ( ConstSpiceChar * pck, - SpiceInt idcode, - SpiceCell * cover ); - - - void pckfrm_c ( ConstSpiceChar * pck, - SpiceCell * ids ); - - - void pcklof_c ( ConstSpiceChar * fname, - SpiceInt * handle ); - - - void pckuof_c ( SpiceInt handle ); - - - void pcpool_c ( ConstSpiceChar * name, - SpiceInt n, - SpiceInt lenvals, - const void * cvals ); - - - void pdpool_c ( ConstSpiceChar * name, - SpiceInt n, - ConstSpiceDouble * dvals ); - - - void pgrrec_c ( ConstSpiceChar * body, - SpiceDouble lon, - SpiceDouble lat, - SpiceDouble alt, - SpiceDouble re, - SpiceDouble f, - SpiceDouble rectan[3] ); - - - SpiceDouble phaseq_c ( SpiceDouble et, - ConstSpiceChar * target, - ConstSpiceChar * illumn, - ConstSpiceChar * obsrvr, - ConstSpiceChar * abcorr ); - - - SpiceDouble pi_c ( void ); - - - void pipool_c ( ConstSpiceChar * name, - SpiceInt n, - ConstSpiceInt * ivals ); - - - void pjelpl_c ( ConstSpiceEllipse * elin, - ConstSpicePlane * plane, - SpiceEllipse * elout ); - - - void pl2nvc_c ( ConstSpicePlane * plane, - SpiceDouble normal[3], - SpiceDouble * constant ); - - - void pl2nvp_c ( ConstSpicePlane * plane, - SpiceDouble normal[3], - SpiceDouble point[3] ); - - - void pl2psv_c ( ConstSpicePlane * plane, - SpiceDouble point[3], - SpiceDouble span1[3], - SpiceDouble span2[3] ); - - - SpiceInt pos_c ( ConstSpiceChar * str, - ConstSpiceChar * substr, - SpiceInt start ); - - - SpiceInt posr_c ( ConstSpiceChar * str, - ConstSpiceChar * substr, - SpiceInt start ); - - - void prefix_c ( ConstSpiceChar * pref, - SpiceInt spaces, - SpiceInt lenout, - SpiceChar * string ); - - - SpiceChar * prompt_c ( ConstSpiceChar * prmptStr, - SpiceInt lenout, - SpiceChar * buffer ); - - - void prop2b_c ( SpiceDouble gm, - ConstSpiceDouble pvinit[6], - SpiceDouble dt, - SpiceDouble pvprop[6] ); - - - void prsdp_c ( ConstSpiceChar * string, - SpiceDouble * dpval ); - - - void prsint_c ( ConstSpiceChar * string, - SpiceInt * intval ); - - - void psv2pl_c ( ConstSpiceDouble point[3], - ConstSpiceDouble span1[3], - ConstSpiceDouble span2[3], - SpicePlane * plane ); - - - void putcml_c ( SpiceInt argc , - SpiceChar ** argv ); - - - void pxform_c ( ConstSpiceChar * from, - ConstSpiceChar * to, - SpiceDouble et, - SpiceDouble rotate[3][3] ); - - - void pxfrm2_c ( ConstSpiceChar * from, - ConstSpiceChar * to, - SpiceDouble etfrom, - SpiceDouble etto, - SpiceDouble rotate[3][3] ); - - - void q2m_c ( ConstSpiceDouble q[4], - SpiceDouble r[3][3] ); - - - void qcktrc_c ( SpiceInt tracelen, - SpiceChar * trace ); - - - void qdq2av_c ( ConstSpiceDouble q[4], - ConstSpiceDouble dq[4], - SpiceDouble av[3] ); - - - void qxq_c ( ConstSpiceDouble q1[4], - ConstSpiceDouble q2[4], - SpiceDouble qout[4] ); - - - - void radrec_c ( SpiceDouble range, - SpiceDouble ra, - SpiceDouble dec, - SpiceDouble rectan[3] ); - - - void rav2xf_c ( ConstSpiceDouble rot [3][3], - ConstSpiceDouble av [3], - SpiceDouble xform [6][6] ); - - - void raxisa_c ( ConstSpiceDouble matrix[3][3], - SpiceDouble axis [3], - SpiceDouble * angle ); - - - void rdtext_c ( ConstSpiceChar * file, - SpiceInt lenout, - SpiceChar * line, - SpiceBoolean * eof ); - - - void reccyl_c ( ConstSpiceDouble rectan[3], - SpiceDouble * r, - SpiceDouble * lon, - SpiceDouble * z ); - - - void recgeo_c ( ConstSpiceDouble rectan[3], - SpiceDouble re, - SpiceDouble f, - SpiceDouble * lon, - SpiceDouble * lat, - SpiceDouble * alt ); - - - void reclat_c ( ConstSpiceDouble rectan[3], - SpiceDouble * radius, - SpiceDouble * longitude, - SpiceDouble * latitude ); - - - void recpgr_c ( ConstSpiceChar * body, - SpiceDouble rectan[3], - SpiceDouble re, - SpiceDouble f, - SpiceDouble * lon, - SpiceDouble * lat, - SpiceDouble * alt ); - - - void recrad_c ( ConstSpiceDouble rectan[3], - SpiceDouble * radius, - SpiceDouble * ra, - SpiceDouble * dec ); - - - - void reordc_c ( ConstSpiceInt * iorder, - SpiceInt ndim, - SpiceInt lenvals, - void * array ); - - - void reordd_c ( ConstSpiceInt * iorder, - SpiceInt ndim, - SpiceDouble * array ); - - - void reordi_c ( ConstSpiceInt * iorder, - SpiceInt ndim, - SpiceInt * array ); - - - void reordl_c ( ConstSpiceInt * iorder, - SpiceInt ndim, - SpiceBoolean * array ); - - - void removc_c ( ConstSpiceChar * item, - SpiceCell * set ); - - - void removd_c ( SpiceDouble item, - SpiceCell * set ); - - - void removi_c ( SpiceInt item, - SpiceCell * set ); - - - void repmc_c ( ConstSpiceChar * in, - ConstSpiceChar * marker, - ConstSpiceChar * value, - SpiceInt lenout, - SpiceChar * out ); - - - void repmct_c ( ConstSpiceChar * in, - ConstSpiceChar * marker, - SpiceInt value, - SpiceChar strCase, - SpiceInt lenout, - SpiceChar * out ); - - - void repmd_c ( ConstSpiceChar * in, - ConstSpiceChar * marker, - SpiceDouble value, - SpiceInt sigdig, - SpiceInt lenout, - SpiceChar * out ); - - - void repmf_c ( ConstSpiceChar * in, - ConstSpiceChar * marker, - SpiceDouble value, - SpiceInt sigdig, - SpiceChar format, - SpiceInt lenout, - SpiceChar * out ); - - - void repmi_c ( ConstSpiceChar * in, - ConstSpiceChar * marker, - SpiceInt value, - SpiceInt lenout, - SpiceChar * out ); - - - void repmot_c ( ConstSpiceChar * in, - ConstSpiceChar * marker, - SpiceInt value, - SpiceChar strCase, - SpiceInt lenout, - SpiceChar * out ); - - - void reset_c ( void ); - - - SpiceBoolean return_c ( void ); - - - void recsph_c ( ConstSpiceDouble rectan[3], - SpiceDouble * r, - SpiceDouble * colat, - SpiceDouble * lon ); - - - void rotate_c ( SpiceDouble angle, - SpiceInt iaxis, - SpiceDouble mout[3][3] ); - - - void rotmat_c ( ConstSpiceDouble m1[3][3], - SpiceDouble angle, - SpiceInt iaxis, - SpiceDouble mout[3][3] ); - - - void rotvec_c ( ConstSpiceDouble v1[3], - SpiceDouble angle, - SpiceInt iaxis, - SpiceDouble vout[3] ); - - - SpiceDouble rpd_c ( void ); - - - void rquad_c ( SpiceDouble a, - SpiceDouble b, - SpiceDouble c, - SpiceDouble root1[2], - SpiceDouble root2[2] ); - - - void saelgv_c ( ConstSpiceDouble vec1 [3], - ConstSpiceDouble vec2 [3], - SpiceDouble smajor[3], - SpiceDouble sminor[3] ); - - - void scard_c ( SpiceInt card, - SpiceCell * cell ); - - - void scdecd_c ( SpiceInt sc, - SpiceDouble sclkdp, - SpiceInt sclklen, - SpiceChar * sclkch ); - - - void sce2s_c ( SpiceInt sc, - SpiceDouble et, - SpiceInt sclklen, - SpiceChar * sclkch ); - - - void sce2c_c ( SpiceInt sc, - SpiceDouble et, - SpiceDouble * sclkdp ); - - - void sce2t_c ( SpiceInt sc, - SpiceDouble et, - SpiceDouble * sclkdp ); - - - void scencd_c ( SpiceInt sc, - ConstSpiceChar * sclkch, - SpiceDouble * sclkdp ); - - - void scfmt_c ( SpiceInt sc, - SpiceDouble ticks, - SpiceInt clkstrlen, - SpiceChar * clkstr ); - - - void scpart_c ( SpiceInt sc, - SpiceInt * nparts, - SpiceDouble * pstart, - SpiceDouble * pstop ); - - - void scs2e_c ( SpiceInt sc, - ConstSpiceChar * sclkch, - SpiceDouble * et ); - - - void sct2e_c ( SpiceInt sc, - SpiceDouble sclkdp, - SpiceDouble * et ); - - - void sctiks_c ( SpiceInt sc, - ConstSpiceChar * clkstr, - SpiceDouble * ticks ); - - - void sdiff_c ( SpiceCell * a, - SpiceCell * b, - SpiceCell * c ); - - - SpiceBoolean set_c ( SpiceCell * a, - ConstSpiceChar * op, - SpiceCell * b ); - - - void setmsg_c ( ConstSpiceChar * msg ); - - - void shellc_c ( SpiceInt ndim, - SpiceInt lenvals, - void * array ); - - - void shelld_c ( SpiceInt ndim, - SpiceDouble * array ); - - - void shelli_c ( SpiceInt ndim, - SpiceInt * array ); - - - void sigerr_c ( ConstSpiceChar * message ); - - - void sincpt_c ( ConstSpiceChar * method, - ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * fixref, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * dref, - ConstSpiceDouble dvec [3], - SpiceDouble spoint [3], - SpiceDouble * trgepc, - SpiceDouble srfvec [3], - SpiceBoolean * found ); - - - SpiceInt size_c ( SpiceCell * size ); - - - SpiceDouble spd_c ( void ); - - - void sphcyl_c ( SpiceDouble radius, - SpiceDouble colat, - SpiceDouble slon, - SpiceDouble * r, - SpiceDouble * lon, - SpiceDouble * z ); - - - void sphlat_c ( SpiceDouble r, - SpiceDouble colat, - SpiceDouble lons, - SpiceDouble * radius, - SpiceDouble * lon, - SpiceDouble * lat ); - - - void sphrec_c ( SpiceDouble r, - SpiceDouble colat, - SpiceDouble lon, - SpiceDouble rectan[3] ); - - - void spk14a_c ( SpiceInt handle, - SpiceInt ncsets, - ConstSpiceDouble coeffs [], - ConstSpiceDouble epochs [] ); - - - void spk14b_c ( SpiceInt handle, - ConstSpiceChar * segid, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - SpiceInt chbdeg ); - - - void spk14e_c ( SpiceInt handle ); - - - void spkapo_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - ConstSpiceDouble sobs[6], - ConstSpiceChar * abcorr, - SpiceDouble ptarg[3], - SpiceDouble * lt ); - - - void spkapp_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - ConstSpiceDouble sobs [6], - ConstSpiceChar * abcorr, - SpiceDouble starg [6], - SpiceDouble * lt ); - - - void spkacs_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - ConstSpiceChar * abcorr, - SpiceInt obs, - SpiceDouble starg[6], - SpiceDouble * lt, - SpiceDouble * dlt ); - - - void spkaps_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - ConstSpiceChar * abcorr, - ConstSpiceDouble stobs[6], - ConstSpiceDouble accobs[6], - SpiceDouble starg[6], - SpiceDouble * lt, - SpiceDouble * dlt ); - - - void spkcls_c ( SpiceInt handle ); - - - void spkcov_c ( ConstSpiceChar * spk, - SpiceInt idcode, - SpiceCell * cover ); - - - void spkcpo_c ( ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * outref, - ConstSpiceChar * refloc, - ConstSpiceChar * abcorr, - ConstSpiceDouble obssta [3], - ConstSpiceChar * obsctr, - ConstSpiceChar * obsref, - SpiceDouble state [6], - SpiceDouble * lt ); - - - void spkcpt_c ( ConstSpiceDouble trgpos [3], - ConstSpiceChar * trgctr, - ConstSpiceChar * trgref, - SpiceDouble et, - ConstSpiceChar * outref, - ConstSpiceChar * refloc, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble state [6], - SpiceDouble * lt ); - - - void spkcvo_c ( ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * outref, - ConstSpiceChar * refloc, - ConstSpiceChar * abcorr, - ConstSpiceDouble obssta [6], - SpiceDouble obsepc, - ConstSpiceChar * obsctr, - ConstSpiceChar * obsref, - SpiceDouble state [6], - SpiceDouble * lt ); - - - void spkcvt_c ( ConstSpiceDouble trgsta [6], - SpiceDouble trgepc, - ConstSpiceChar * trgctr, - ConstSpiceChar * trgref, - SpiceDouble et, - ConstSpiceChar * outref, - ConstSpiceChar * refloc, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble state [6], - SpiceDouble * lt ); - - - void spkez_c ( SpiceInt target, - SpiceDouble epoch, - ConstSpiceChar * frame, - ConstSpiceChar * abcorr, - SpiceInt observer, - SpiceDouble state[6], - SpiceDouble * lt ); - - - void spkezp_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - ConstSpiceChar * abcorr, - SpiceInt obs, - SpiceDouble ptarg[3], - SpiceDouble * lt ); - - - void spkezr_c ( ConstSpiceChar * target, - SpiceDouble epoch, - ConstSpiceChar * frame, - ConstSpiceChar * abcorr, - ConstSpiceChar * observer, - SpiceDouble state[6], - SpiceDouble * lt ); - - - void spkgeo_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - SpiceInt obs, - SpiceDouble state[6], - SpiceDouble * lt ); - - - void spkgps_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - SpiceInt obs, - SpiceDouble pos[3], - SpiceDouble * lt ); - - - void spklef_c ( ConstSpiceChar * filename, - SpiceInt * handle ); - - - void spkltc_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - ConstSpiceChar * abcorr, - ConstSpiceDouble stobs[6], - SpiceDouble starg[6], - SpiceDouble * lt, - SpiceDouble * dlt ); - - - void spkobj_c ( ConstSpiceChar * spk, - SpiceCell * ids ); - - - void spkopa_c ( ConstSpiceChar * file, - SpiceInt * handle ); - - - void spkopn_c ( ConstSpiceChar * name, - ConstSpiceChar * ifname, - SpiceInt ncomch, - SpiceInt * handle ); - - - void spkpds_c ( SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceInt type, - SpiceDouble first, - SpiceDouble last, - SpiceDouble descr[5] ); - - - void spkpos_c ( ConstSpiceChar * targ, - SpiceDouble et, - ConstSpiceChar * ref, - ConstSpiceChar * abcorr, - ConstSpiceChar * obs, - SpiceDouble ptarg[3], - SpiceDouble * lt ); - - - void spkpvn_c ( SpiceInt handle, - ConstSpiceDouble descr [5], - SpiceDouble et, - SpiceInt * ref, - SpiceDouble state [6], - SpiceInt * center ); - - - void spksfs_c ( SpiceInt body, - SpiceDouble et, - SpiceInt idlen, - SpiceInt * handle, - SpiceDouble descr [5], - SpiceChar * ident, - SpiceBoolean * found ); - - - void spkssb_c ( SpiceInt targ, - SpiceDouble et, - ConstSpiceChar * ref, - SpiceDouble starg[6] ); - - - void spksub_c ( SpiceInt handle, - SpiceDouble descr[5], - ConstSpiceChar * ident, - SpiceDouble begin, - SpiceDouble end, - SpiceInt newh ); - - - void spkuds_c ( ConstSpiceDouble descr [5], - SpiceInt * body, - SpiceInt * center, - SpiceInt * frame, - SpiceInt * type, - SpiceDouble * first, - SpiceDouble * last, - SpiceInt * begin, - SpiceInt * end ); - - - void spkuef_c ( SpiceInt handle ); - - - void spkw02_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceDouble intlen, - SpiceInt n, - SpiceInt polydg, - ConstSpiceDouble cdata [], - SpiceDouble btime ); - - - void spkw03_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceDouble intlen, - SpiceInt n, - SpiceInt polydg, - ConstSpiceDouble cdata [], - SpiceDouble btime ); - - - void spkw05_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceDouble gm, - SpiceInt n, - ConstSpiceDouble states [][6], - ConstSpiceDouble epochs [] ); - - - void spkw08_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceInt degree, - SpiceInt n, - ConstSpiceDouble states[][6], - SpiceDouble epoch1, - SpiceDouble step ); - - - void spkw09_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceInt degree, - SpiceInt n, - ConstSpiceDouble states[][6], - ConstSpiceDouble epochs[] ); - - - void spkw10_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - ConstSpiceDouble consts [8], - SpiceInt n, - ConstSpiceDouble elems [], - ConstSpiceDouble epochs [] ); - - - void spkw12_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceInt degree, - SpiceInt n, - ConstSpiceDouble states[][6], - SpiceDouble epoch0, - SpiceDouble step ); - - - void spkw13_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceInt degree, - SpiceInt n, - ConstSpiceDouble states[][6], - ConstSpiceDouble epochs[] ); - - - void spkw15_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceDouble epoch, - ConstSpiceDouble tp [3], - ConstSpiceDouble pa [3], - SpiceDouble p, - SpiceDouble ecc, - SpiceDouble j2flg, - ConstSpiceDouble pv [3], - SpiceDouble gm, - SpiceDouble j2, - SpiceDouble radius ); - - - void spkw17_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceDouble epoch, - ConstSpiceDouble eqel [9], - SpiceDouble rapol, - SpiceDouble decpol ); - - - void spkw18_c ( SpiceInt handle, - SpiceSPK18Subtype subtyp, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceInt degree, - SpiceInt n, - const void * packts, - ConstSpiceDouble epochs[] ); - - - void spkw20_c ( SpiceInt handle, - SpiceInt body, - SpiceInt center, - ConstSpiceChar * frame, - SpiceDouble first, - SpiceDouble last, - ConstSpiceChar * segid, - SpiceDouble intlen, - SpiceInt n, - SpiceInt polydg, - ConstSpiceDouble cdata[], - SpiceDouble dscale, - SpiceDouble tscale, - SpiceDouble initjd, - SpiceDouble initfr ); - - - - void srfrec_c ( SpiceInt body, - SpiceDouble lon, - SpiceDouble lat, - SpiceDouble rectan[3] ); - - - void srfxpt_c ( ConstSpiceChar * method, - ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - ConstSpiceChar * dref, - ConstSpiceDouble dvec [3], - SpiceDouble spoint [3], - SpiceDouble * dist, - SpiceDouble * trgepc, - SpiceDouble obspos [3], - SpiceBoolean * found ); - - - void ssize_c ( SpiceInt size, - SpiceCell * cell ); - - - void stelab_c ( ConstSpiceDouble pobj[3], - ConstSpiceDouble vobs[3], - SpiceDouble appobj[3] ); - - - void stpool_c ( ConstSpiceChar * item, - SpiceInt nth, - ConstSpiceChar * contin, - SpiceInt lenout, - SpiceChar * string, - SpiceInt * size, - SpiceBoolean * found ); - - - void str2et_c ( ConstSpiceChar * date, - SpiceDouble * et ); - - - void subpnt_c ( ConstSpiceChar * method, - ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * fixref, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble spoint [3], - SpiceDouble * trgepc, - SpiceDouble srfvec [3] ); - - - void subpt_c ( ConstSpiceChar * method, - ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble spoint [3], - SpiceDouble * alt ); - - - void subslr_c ( ConstSpiceChar * method, - ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * fixref, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble spoint [3], - SpiceDouble * trgepc, - SpiceDouble srfvec [3] ); - - - void subsol_c ( ConstSpiceChar * method, - ConstSpiceChar * target, - SpiceDouble et, - ConstSpiceChar * abcorr, - ConstSpiceChar * obsrvr, - SpiceDouble spoint[3] ); - - - SpiceDouble sumad_c ( ConstSpiceDouble array[], - SpiceInt n ); - - - SpiceInt sumai_c ( ConstSpiceInt array[], - SpiceInt n ); - - - void surfnm_c ( SpiceDouble a, - SpiceDouble b, - SpiceDouble c, - ConstSpiceDouble point[3], - SpiceDouble normal[3] ); - - - void surfpt_c ( ConstSpiceDouble positn[3], - ConstSpiceDouble u[3], - SpiceDouble a, - SpiceDouble b, - SpiceDouble c, - SpiceDouble point[3], - SpiceBoolean * found ); - - - void surfpv_c ( ConstSpiceDouble stvrtx[6], - ConstSpiceDouble stdir [6], - SpiceDouble a, - SpiceDouble b, - SpiceDouble c, - SpiceDouble stx [6], - SpiceBoolean * found ); - - - void swpool_c ( ConstSpiceChar * agent, - SpiceInt nnames, - SpiceInt lenvals, - const void * names ); - - - void sxform_c ( ConstSpiceChar * from, - ConstSpiceChar * to, - SpiceDouble et, - SpiceDouble xform[6][6] ); - - - void szpool_c ( ConstSpiceChar * name, - SpiceInt * n, - SpiceBoolean * found ); - - - void timdef_c ( ConstSpiceChar * action, - ConstSpiceChar * item, - SpiceInt lenout, - SpiceChar * value ); - - - void timout_c ( SpiceDouble et, - ConstSpiceChar * pictur, - SpiceInt lenout, - SpiceChar * output ); - - - void tipbod_c ( ConstSpiceChar * ref, - SpiceInt body, - SpiceDouble et, - SpiceDouble tipm[3][3] ); - - - void tisbod_c ( ConstSpiceChar * ref, - SpiceInt body, - SpiceDouble et, - SpiceDouble tsipm[6][6] ); - - - ConstSpiceChar * tkvrsn_c ( ConstSpiceChar * item ); - - - void tparse_c ( ConstSpiceChar * string, - SpiceInt lenout, - SpiceDouble * sp2000, - SpiceChar * errmsg ); - - - void tpictr_c ( ConstSpiceChar * sample, - SpiceInt lenpictur, - SpiceInt lenerror, - SpiceChar * pictur, - SpiceBoolean * ok, - SpiceChar * error ); - - - SpiceDouble trace_c ( ConstSpiceDouble matrix[3][3] ); - - - void trcdep_c ( SpiceInt * depth ); - - - void trcnam_c ( SpiceInt index, - SpiceInt namelen, - SpiceChar * name ); - - - void trcoff_c ( void ); - - - void tsetyr_c ( SpiceInt year ); - - - SpiceDouble twopi_c ( void ); - - - void twovec_c ( ConstSpiceDouble axdef [3], - SpiceInt indexa, - ConstSpiceDouble plndef [3], - SpiceInt indexp, - SpiceDouble mout [3][3] ); - - - SpiceDouble tyear_c ( void ); - - - void ucase_c ( SpiceChar * in, - SpiceInt lenout, - SpiceChar * out ); - - - void ucrss_c ( ConstSpiceDouble v1[3], - ConstSpiceDouble v2[3], - SpiceDouble vout[3] ); - - - void uddc_c ( void ( * udfunc ) ( SpiceDouble x, - SpiceDouble * value ), - - SpiceDouble x, - SpiceDouble dx, - SpiceBoolean * isdecr ); - - - void uddf_c ( void ( * udfunc ) ( SpiceDouble x, - SpiceDouble * value ), - SpiceDouble x, - SpiceDouble dx, - SpiceDouble * deriv ); - - - void udf_c ( SpiceDouble x, - SpiceDouble * value ); - - - void union_c ( SpiceCell * a, - SpiceCell * b, - SpiceCell * c ); - - - SpiceDouble unitim_c ( SpiceDouble epoch, - ConstSpiceChar * insys, - ConstSpiceChar * outsys ); - - - void unload_c ( ConstSpiceChar * file ); - - - void unorm_c ( ConstSpiceDouble v1[3], - SpiceDouble vout[3], - SpiceDouble * vmag ); - - - void unormg_c ( ConstSpiceDouble * v1, - SpiceInt ndim, - SpiceDouble * vout, - SpiceDouble * vmag ); - - - void utc2et_c ( ConstSpiceChar * utcstr, - SpiceDouble * et ); - - - void vadd_c ( ConstSpiceDouble v1[3], - ConstSpiceDouble v2[3], - SpiceDouble vout[3] ) ; - - - void vaddg_c ( ConstSpiceDouble * v1, - ConstSpiceDouble * v2, - SpiceInt ndim, - SpiceDouble * vout ); - - - void valid_c ( SpiceInt size, - SpiceInt n, - SpiceCell * a ); - - - void vcrss_c ( ConstSpiceDouble v1[3], - ConstSpiceDouble v2[3], - SpiceDouble vout[3] ); - - - SpiceDouble vdist_c ( ConstSpiceDouble v1[3], - ConstSpiceDouble v2[3] ); - - - SpiceDouble vdistg_c ( ConstSpiceDouble * v1, - ConstSpiceDouble * v2, - SpiceInt ndim ); - - - SpiceDouble vdot_c ( ConstSpiceDouble v1[3], - ConstSpiceDouble v2[3] ); - - SpiceDouble vdotg_c ( ConstSpiceDouble * v1, - ConstSpiceDouble * v2, - SpiceInt ndim ); - - void vequ_c ( ConstSpiceDouble vin[3], - SpiceDouble vout[3] ); - - - void vequg_c ( ConstSpiceDouble * vin, - SpiceInt ndim, - SpiceDouble * vout ); - - - void vhat_c ( ConstSpiceDouble v1 [3], - SpiceDouble vout[3] ); - - - void vhatg_c ( ConstSpiceDouble * v1, - SpiceInt ndim, - SpiceDouble * vout ); - - - void vlcom_c ( SpiceDouble a, - ConstSpiceDouble v1[3], - SpiceDouble b, - ConstSpiceDouble v2[3], - SpiceDouble sum[3] ); - - - void vlcom3_c ( SpiceDouble a, - ConstSpiceDouble v1[3], - SpiceDouble b, - ConstSpiceDouble v2[3], - SpiceDouble c, - ConstSpiceDouble v3[3], - SpiceDouble sum[3] ); - - - void vlcomg_c ( SpiceInt n, - SpiceDouble a, - ConstSpiceDouble * v1, - SpiceDouble b, - ConstSpiceDouble * v2, - SpiceDouble * sum ); - - - void vminug_c ( ConstSpiceDouble * vin, - SpiceInt ndim, - SpiceDouble * vout ); - - - void vminus_c ( ConstSpiceDouble v1[3], - SpiceDouble vout[3] ); - - - SpiceDouble vnorm_c ( ConstSpiceDouble v1[3] ); - - - SpiceDouble vnormg_c ( ConstSpiceDouble * v1, - SpiceInt ndim ); - - - void vpack_c ( SpiceDouble x, - SpiceDouble y, - SpiceDouble z, - SpiceDouble v[3] ); - - - void vperp_c ( ConstSpiceDouble a[3], - ConstSpiceDouble b[3], - SpiceDouble p[3] ); - - - void vprjp_c ( ConstSpiceDouble vin [3], - ConstSpicePlane * plane, - SpiceDouble vout [3] ); - - - void vprjpi_c ( ConstSpiceDouble vin [3], - ConstSpicePlane * projpl, - ConstSpicePlane * invpl, - SpiceDouble vout [3], - SpiceBoolean * found ); - - - void vproj_c ( ConstSpiceDouble a[3], - ConstSpiceDouble b[3], - SpiceDouble p[3] ); - - - SpiceDouble vrel_c ( ConstSpiceDouble v1[3], - ConstSpiceDouble v2[3] ); - - - SpiceDouble vrelg_c ( ConstSpiceDouble * v1, - ConstSpiceDouble * v2, - SpiceInt ndim ); - - - void vrotv_c ( ConstSpiceDouble v[3], - ConstSpiceDouble axis[3], - SpiceDouble theta, - SpiceDouble r[3] ); - - - void vscl_c ( SpiceDouble s, - ConstSpiceDouble v1[3], - SpiceDouble vout[3] ); - - - void vsclg_c ( SpiceDouble s, - ConstSpiceDouble * v1, - SpiceInt ndim, - SpiceDouble * vout ); - - - SpiceDouble vsep_c ( ConstSpiceDouble v1[3], - ConstSpiceDouble v2[3] ); - - - void vsub_c ( ConstSpiceDouble v1[3], - ConstSpiceDouble v2[3], - SpiceDouble vout[3] ); - - - void vsubg_c ( ConstSpiceDouble * v1, - ConstSpiceDouble * v2, - SpiceInt ndim, - SpiceDouble * vout ); - - - SpiceDouble vsepg_c ( ConstSpiceDouble * v1, - ConstSpiceDouble * v2, - SpiceInt ndim ); - - - SpiceDouble vtmv_c ( ConstSpiceDouble v1 [3], - ConstSpiceDouble matrix [3][3], - ConstSpiceDouble v2 [3] ); - - - SpiceDouble vtmvg_c ( const void * v1, - const void * matrix, - const void * v2, - SpiceInt nrow, - SpiceInt ncol ); - - - void vupack_c ( ConstSpiceDouble v[3], - SpiceDouble * x, - SpiceDouble * y, - SpiceDouble * z ); - - SpiceBoolean vzero_c ( ConstSpiceDouble v[3] ); - - - SpiceBoolean vzerog_c ( ConstSpiceDouble * v, - SpiceInt ndim ); - - SpiceInt wncard_c ( SpiceCell * window ); - - void wncomd_c ( SpiceDouble left, - SpiceDouble right, - SpiceCell * window, - SpiceCell * result ); - - - void wncond_c ( SpiceDouble left, - SpiceDouble right, - SpiceCell * window ); - - - void wndifd_c ( SpiceCell * a, - SpiceCell * b, - SpiceCell * c ); - - - SpiceBoolean wnelmd_c ( SpiceDouble point, - SpiceCell * window ); - - - void wnexpd_c ( SpiceDouble left, - SpiceDouble right, - SpiceCell * window ); - - - void wnextd_c ( SpiceChar side, - SpiceCell * window ); - - - void wnfetd_c ( SpiceCell * window, - SpiceInt n, - SpiceDouble * left, - SpiceDouble * right ); - - - void wnfild_c ( SpiceDouble sml, - SpiceCell * window ); - - - void wnfltd_c ( SpiceDouble sml, - SpiceCell * window ); - - - SpiceBoolean wnincd_c ( SpiceDouble left, - SpiceDouble right, - SpiceCell * window ); - - - void wninsd_c ( SpiceDouble left, - SpiceDouble right, - SpiceCell * window ); - - - void wnintd_c ( SpiceCell * a, - SpiceCell * b, - SpiceCell * c ); - - - SpiceBoolean wnreld_c ( SpiceCell * a, - ConstSpiceChar * op, - SpiceCell * b ); - - - void wnsumd_c ( SpiceCell * window, - SpiceDouble * meas, - SpiceDouble * avg, - SpiceDouble * stddev, - SpiceInt * shortest, - SpiceInt * longest ); - - - void wnunid_c ( SpiceCell * a, - SpiceCell * b, - SpiceCell * c ); - - - void wnvald_c ( SpiceInt size, - SpiceInt n, - SpiceCell * window ); - - - - void xf2eul_c ( ConstSpiceDouble xform [6][6], - SpiceInt axisa, - SpiceInt axisb, - SpiceInt axisc, - SpiceDouble eulang [6], - SpiceBoolean * unique ); - - - void xf2rav_c ( ConstSpiceDouble xform [6][6], - SpiceDouble rot [3][3], - SpiceDouble av [3] ); - - void xfmsta_c ( ConstSpiceDouble input_state [6], - ConstSpiceChar * input_coord_sys, - ConstSpiceChar * output_coord_sys, - ConstSpiceChar * body, - SpiceDouble output_state [6] ); - - void xpose_c ( ConstSpiceDouble m1 [3][3], - SpiceDouble mout[3][3] ); - - - void xpose6_c ( ConstSpiceDouble m1 [6][6], - SpiceDouble mout[6][6] ); - - - void xposeg_c ( const void * matrix, - SpiceInt nrow, - SpiceInt ncol, - void * xposem ); - - - void zzgetcml_c( SpiceInt * argc, - SpiceChar *** argv, - SpiceBoolean init ); - - - SpiceBoolean zzgfgeth_c ( void ); - - - void zzgfsavh_c( SpiceBoolean status ); - - - void zzsynccl_c( SpiceTransDir xdir, - SpiceCell * cell ); - - -#endif diff --git a/ext/spice/include/SpiceZrnm.h b/ext/spice/include/SpiceZrnm.h deleted file mode 100644 index 2542b343c0..0000000000 --- a/ext/spice/include/SpiceZrnm.h +++ /dev/null @@ -1,82 +0,0 @@ -/* - --Header_File SpiceZrnm.h ( CSPICE rename assignments ) - --Abstract - - Reassign CSPICE symbol names to prevent symbol collisions. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Literature_References - - None. - --Particulars - - Compiled symbol names in CSPICE may collide with symbols in other, - non-SPICE libraries. This file redefines names which have or may - cause a collision. - --Author_and_Institution - - N.J. Bachman (JPL) - E.D. Wright (JPL) - --Version - - -CSPICE Version 1.0.0, 17-OCT-2011 (EDW) - --Index_Entries - - Rename assignments for CSPICE functions - -*/ - - -#ifndef HAVE_SPICERENAME_H - -/* -Redefine names causing symbol conflicts: -*/ -#define HAVE_SPICERENAME_H - - /* dpstrf_ may exist in the LAPACK library. */ - - #define dpstrf_ zz_dpstrf_ - - /* Just in case. */ - - #define pi_ zz_pi_ - #define vnorm_ zz_vnorm_ - #define vdist_ zz_vdist_ - -#endif - diff --git a/ext/spice/include/SpiceZst.h b/ext/spice/include/SpiceZst.h deleted file mode 100644 index ba48b16c1c..0000000000 --- a/ext/spice/include/SpiceZst.h +++ /dev/null @@ -1,199 +0,0 @@ -/* - --Header_File SpiceZst.h ( Fortran/C string conversion utilities ) - --Abstract - - Define prototypes for CSPICE Fortran/C string conversion utilities. - - Caution: these prototypes are subject to revision without notice. - - These are private routines and are not part of the official CSPICE - user interface. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - None. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - K.R. Gehringer (JPL) - E.D. Wright (JPL) - --Version - - -CSPICE Version 6.0.0, 10-JUL-2002 (NJB) - - Added prototype for new functions C2F_MapStrArr and - C2F_MapFixStrArr. - - -CSPICE Version 5.0.0, 18-MAY-2001 (WLT) - - Added #ifdef's to add namespace specification for C++ compilation. - - -CSPICE Version 4.0.0, 14-FEB-2000 (NJB) - - Added prototype for new function C2F_CreateStrArr_Sig. - - -CSPICE Version 3.0.0, 12-JUL-1999 (NJB) - - Added prototype for function C2F_CreateFixStrArr. - Added prototype for function F2C_ConvertTrStrArr. - Removed reference in comments to C2F_CreateStrArr_Sig, which - does not exist. - - -CSPICE Version 2.0.1, 06-MAR-1998 (NJB) - - Type SpiceVoid was changed to void. - - -CSPICE Version 2.0.1, 09-FEB-1998 (EDW) - - Added prototype for F2C_ConvertStrArr. - - -CSPICE Version 2.0.0, 04-JAN-1998 (NJB) - - Added prototype for F2C_ConvertStr. - - -CSPICE Version 1.0.0, 25-OCT-1997 (NJB) (KRG) (EDW) - --Index_Entries - - protoypes of CSPICE Fortran/C string conversion utilities - -*/ - -#include -#include -#include "SpiceZdf.h" - -#ifndef HAVE_FCSTRINGS_H -#define HAVE_FCSTRINGS_H - -#ifdef __cplusplus -namespace Jpl_NAIF_CSpice { -#endif - - SpiceStatus C2F_CreateStr ( ConstSpiceChar *, - SpiceInt *, - SpiceChar ** ); - - void C2F_CreateStr_Sig ( ConstSpiceChar *, - SpiceInt *, - SpiceChar ** ); - - void C2F_CreateFixStrArr ( SpiceInt nStr, - SpiceInt cStrDim, - ConstSpiceChar ** cStrArr, - SpiceInt * fStrLen, - SpiceChar ** fStrArr ); - - SpiceStatus C2F_CreateStrArr ( SpiceInt, - ConstSpiceChar **, - SpiceInt *, - SpiceChar ** ); - - void C2F_CreateStrArr_Sig ( SpiceInt nStr, - ConstSpiceChar ** cStrArr, - SpiceInt * fStrLen, - SpiceChar ** fStrArr ); - - void C2F_MapFixStrArr ( ConstSpiceChar * caller, - SpiceInt nStr, - SpiceInt cStrLen, - const void * cStrArr, - SpiceInt * fStrLen, - SpiceChar ** fStrArr ); - - void C2F_MapStrArr ( ConstSpiceChar * caller, - SpiceInt nStr, - SpiceInt cStrLen, - const void * cStrArr, - SpiceInt * fStrLen, - SpiceChar ** fStrArr ); - - SpiceStatus C2F_StrCpy ( ConstSpiceChar *, - SpiceInt, - SpiceChar * ); - - void F_Alloc ( SpiceInt, - SpiceChar** ); - - void F2C_ConvertStr ( SpiceInt, - SpiceChar * ); - - void F2C_ConvertStrArr ( SpiceInt n, - SpiceInt lenout, - SpiceChar * cvals ); - - void F2C_ConvertTrStrArr ( SpiceInt n, - SpiceInt lenout, - SpiceChar * cvals ); - - SpiceStatus F2C_CreateStr ( SpiceInt, - ConstSpiceChar *, - SpiceChar ** ); - - void F2C_CreateStr_Sig ( SpiceInt, - ConstSpiceChar *, - SpiceChar ** ); - - SpiceStatus F2C_CreateStrArr ( SpiceInt, - SpiceInt, - ConstSpiceChar *, - SpiceChar *** ); - - void F2C_CreateStrArr_Sig ( SpiceInt, - SpiceInt, - ConstSpiceChar *, - SpiceChar *** ); - - void F2C_FreeStrArr ( SpiceChar **cStrArr ); - - - SpiceStatus F2C_StrCpy ( SpiceInt, - ConstSpiceChar *, - SpiceInt, - SpiceChar * ); - - SpiceInt F_StrLen ( SpiceInt, - ConstSpiceChar * ); - -#ifdef __cplusplus -} -#endif - -#endif diff --git a/ext/spice/include/f2c.h b/ext/spice/include/f2c.h deleted file mode 100644 index bc831d8cd3..0000000000 --- a/ext/spice/include/f2c.h +++ /dev/null @@ -1,683 +0,0 @@ -/* - --Header_File f2c.h ( CSPICE version of the f2c standard header file ) - --Abstract - - Perform standard f2c declarations, customized for the host - environment. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - The standard f2c header file f2c.h must be included by every function - generated by running f2c on Fortran source code. The header f2c.h - includes typedefs used to provide a level of indirection in mapping - Fortran data types to native C data types. For example, Fortran - INTEGER variables are mapped to variables of type integer, where - integer is a C typedef. In the standard f2c.h header, the typedef - integer translates to the C type long. - - Because the standard version of f2c.h does not work on all platforms, - this header file contains two platform-dependent versions of it, - meant to be selected at build time via precompiler switches. The - precompiler switches reference macros defined in SpiceZpl.h to - determine for which host platform the code is targeted. The first - version of f2c.h, which works on most platforms, is copied directly - from the standard version of f2c.h. The second version is intended - for use on the DEC Alpha running Digital Unix and the Sun/Solaris - platform using 64 bit mode and running gcc. On those systems, longs - occupy 8 bytes, as do doubles. Because the Fortran standard requires - that INTEGERS occupy half the storage of DOUBLE PRECISION numbers, - INTEGERS should be mapped to 4-byte ints rather than 8-byte longs - on the platforms having 8-byte longs. In order to achieve this, the - header f2c.h was transformed using the sed command - - sed 's/long //' f2c.h - - The high-level structure of this file is then: - - # if ( defined(CSPICE_ALPHA_DIGITAL_UNIX ) \ - || defined(CSPICE_SUN_SOLARIS_64BIT_GCC ) ) - - - [ Alpha/Digital Unix and Sun Solaris 64 bit mode/gcc - version of f2c.h source code ] - - # else - - [ Standard version of f2c.h source code ] - - # endif - - --Restrictions - - 1) This header file must be updated whenever the f2c processor - or the f2c libraries libI77 and libF77 are updated. - - 2) This header may need to be updated to support new platforms. - The supported platforms at the time of the 31-JAN-1999 release - are: - - ALPHA-DIGITAL-UNIX - HP - NEXT - PC-LINUX - PC-MS - SGI-IRIX-N32 - SGI-IRIX-NO2 - SUN-SOLARIS - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - B.V. Semenov (JPL) - E.D. Wright (JPL) - --Version - - -CSPICE Version 4.2.0, 09-APR-2014 (EDW) (BVS) - - Added include for SpiceZrnm.h to eliminate symbol conflict - encountered from Icy and JNISpice under OS X 10.7. - - Minor text format correction to eliminate error signal from - OS X cpp. The edit removes leading whitespace from the - final "#endif". - - Updated for: - - PC-CYGWIN-64BIT-GCC_C - - environment. Added the corresponding tag: - - CSPICE_PC_CYGWIN_64BIT_GCC - - tag to the #ifdefs set. - - -CSPICE Version 4.1.0, 14-MAY-2010 (EDW)(BVS) - - Updated for: - - MAC-OSX-64BIT-INTEL_C - SUN-SOLARIS-64BIT-NATIVE_C - SUN-SOLARIS-INTEL-64BIT-CC_C - - environments. Added the corresponding tags: - - CSPICE_MAC_OSX_INTEL_64BIT_GCC - CSPICE_SUN_SOLARIS_64BIT_NATIVE - CSPICE_SUN_SOLARIS_INTEL_64BIT_CC - - tag to the #ifdefs set. - - -CSPICE Version 4.0.0, 21-FEB-2006 (NJB) - - Updated to support the PC Linux 64 bit mode/gcc platform. - - -CSPICE Version 3.0.0, 27-JAN-2003 (NJB) - - Updated to support the Sun Solaris 64 bit mode/gcc platform. - - -CSPICE Version 2.0.0, 19-DEC-2001 (NJB) - - Updated to support linking CSPICE into executables that - also link in objects compiled from Fortran, in particular - ones that perform Fortran I/O. To enable this odd mix, - one defines the preprocessor flag - - MIX_C_AND_FORTRAN - - This macro is undefined by default, since the action it invokes - is usually not desirable. See the header - - f2cMang.h - - for further information. - - -CSPICE Version 1.0.0, 07-FEB-1999 (NJB) - -*/ - - -/* -Include those rename assignments for routines whose symbols will -collide with other libraries. -*/ -#ifndef HAVE_SPICERENAME_H -#include "SpiceZrnm.h" -#endif - - -/* -Optionally include name-mangling macros for f2c external symbols. -*/ -#ifdef MIX_C_AND_FORTRAN -#include "f2cMang.h" -#endif - - - /* - Include CSPICE platform macro definitions. - */ - #include "SpiceZpl.h" - - -#if ( defined(CSPICE_ALPHA_DIGITAL_UNIX ) \ - || defined(CSPICE_SUN_SOLARIS_64BIT_GCC ) \ - || defined(CSPICE_SUN_SOLARIS_64BIT_NATIVE ) \ - || defined(CSPICE_MAC_OSX_INTEL_64BIT_GCC ) \ - || defined(CSPICE_SUN_SOLARIS_INTEL_64BIT_CC ) \ - || defined(CSPICE_PC_CYGWIN_64BIT_GCC ) \ - || defined(CSPICE_PC_LINUX_64BIT_GCC ) ) - - - /* - MODIFICATION - - The following code is intended to be used on the platforms where - a long is the size of a double and an int is half the - size of a double. - - Note that the comment line below indicating that the header is - "Standard" has been retained from the original, but is no longer - true. - */ - - - - - -/* f2c.h -- Standard Fortran to C header file */ - -#ifndef F2C_INCLUDE -#define F2C_INCLUDE - -typedef int integer; -typedef unsigned uinteger; -typedef char *address; -typedef short int shortint; -typedef float real; -typedef double doublereal; -typedef struct { real r, i; } complex; -typedef struct { doublereal r, i; } doublecomplex; -typedef int logical; -typedef short int shortlogical; -typedef char logical1; -typedef char integer1; -#if 0 /* Adjust for integer*8. */ -typedef long longint; /* system-dependent */ -typedef unsigned long ulongint; /* system-dependent */ -#define qbit_clear(a,b) ((a) & ~((ulongint)1 << (b))) -#define qbit_set(a,b) ((a) | ((ulongint)1 << (b))) -#endif - -#define TRUE_ (1) -#define FALSE_ (0) - -/* Extern is for use with -E */ -#ifndef Extern -#define Extern extern -#endif - -/* I/O stuff */ - -#ifdef f2c_i2 -/* for -i2 */ -typedef short flag; -typedef short ftnlen; -typedef short ftnint; -#else -typedef int flag; -typedef int ftnlen; -typedef int ftnint; -#endif - -/*external read, write*/ -typedef struct -{ flag cierr; - ftnint ciunit; - flag ciend; - char *cifmt; - ftnint cirec; -} cilist; - -/*internal read, write*/ -typedef struct -{ flag icierr; - char *iciunit; - flag iciend; - char *icifmt; - ftnint icirlen; - ftnint icirnum; -} icilist; - -/*open*/ -typedef struct -{ flag oerr; - ftnint ounit; - char *ofnm; - ftnlen ofnmlen; - char *osta; - char *oacc; - char *ofm; - ftnint orl; - char *oblnk; -} olist; - -/*close*/ -typedef struct -{ flag cerr; - ftnint cunit; - char *csta; -} cllist; - -/*rewind, backspace, endfile*/ -typedef struct -{ flag aerr; - ftnint aunit; -} alist; - -/* inquire */ -typedef struct -{ flag inerr; - ftnint inunit; - char *infile; - ftnlen infilen; - ftnint *inex; /*parameters in standard's order*/ - ftnint *inopen; - ftnint *innum; - ftnint *innamed; - char *inname; - ftnlen innamlen; - char *inacc; - ftnlen inacclen; - char *inseq; - ftnlen inseqlen; - char *indir; - ftnlen indirlen; - char *infmt; - ftnlen infmtlen; - char *inform; - ftnint informlen; - char *inunf; - ftnlen inunflen; - ftnint *inrecl; - ftnint *innrec; - char *inblank; - ftnlen inblanklen; -} inlist; - -#define VOID void - -union Multitype { /* for multiple entry points */ - integer1 g; - shortint h; - integer i; - /* longint j; */ - real r; - doublereal d; - complex c; - doublecomplex z; - }; - -typedef union Multitype Multitype; - -/*typedef int Long;*/ /* No longer used; formerly in Namelist */ - -struct Vardesc { /* for Namelist */ - char *name; - char *addr; - ftnlen *dims; - int type; - }; -typedef struct Vardesc Vardesc; - -struct Namelist { - char *name; - Vardesc **vars; - int nvars; - }; -typedef struct Namelist Namelist; - -#define abs(x) ((x) >= 0 ? (x) : -(x)) -#define dabs(x) (doublereal)abs(x) -#define min(a,b) ((a) <= (b) ? (a) : (b)) -#define max(a,b) ((a) >= (b) ? (a) : (b)) -#define dmin(a,b) (doublereal)min(a,b) -#define dmax(a,b) (doublereal)max(a,b) -#define bit_test(a,b) ((a) >> (b) & 1) -#define bit_clear(a,b) ((a) & ~((uinteger)1 << (b))) -#define bit_set(a,b) ((a) | ((uinteger)1 << (b))) - -/* procedure parameter types for -A and -C++ */ - -#define F2C_proc_par_types 1 -#ifdef __cplusplus -typedef int /* Unknown procedure type */ (*U_fp)(...); -typedef shortint (*J_fp)(...); -typedef integer (*I_fp)(...); -typedef real (*R_fp)(...); -typedef doublereal (*D_fp)(...), (*E_fp)(...); -typedef /* Complex */ VOID (*C_fp)(...); -typedef /* Double Complex */ VOID (*Z_fp)(...); -typedef logical (*L_fp)(...); -typedef shortlogical (*K_fp)(...); -typedef /* Character */ VOID (*H_fp)(...); -typedef /* Subroutine */ int (*S_fp)(...); -#else -typedef int /* Unknown procedure type */ (*U_fp)(); -typedef shortint (*J_fp)(); -typedef integer (*I_fp)(); -typedef real (*R_fp)(); -typedef doublereal (*D_fp)(), (*E_fp)(); -typedef /* Complex */ VOID (*C_fp)(); -typedef /* Double Complex */ VOID (*Z_fp)(); -typedef logical (*L_fp)(); -typedef shortlogical (*K_fp)(); -typedef /* Character */ VOID (*H_fp)(); -typedef /* Subroutine */ int (*S_fp)(); -#endif -/* E_fp is for real functions when -R is not specified */ -typedef VOID C_f; /* complex function */ -typedef VOID H_f; /* character function */ -typedef VOID Z_f; /* double complex function */ -typedef doublereal E_f; /* real function with -R not specified */ - -/* undef any lower-case symbols that your C compiler predefines, e.g.: */ - -#ifndef Skip_f2c_Undefs -#undef cray -#undef gcos -#undef mc68010 -#undef mc68020 -#undef mips -#undef pdp11 -#undef sgi -#undef sparc -#undef sun -#undef sun2 -#undef sun3 -#undef sun4 -#undef u370 -#undef u3b -#undef u3b2 -#undef u3b5 -#undef unix -#undef vax -#endif -#endif - - - /* - This marks the end of the MODIFICATION section version of f2c.h. - */ - -#else - - /* - The following code is the standard f2c.h header. In this - header, an "integer" is defined to be of type long. - - Because the code is copied verbatim, it does not follow the usual - CSPICE indentation pattern. - */ - - -/* f2c.h -- Standard Fortran to C header file */ - - -#ifndef F2C_INCLUDE -#define F2C_INCLUDE - -typedef long int integer; -typedef unsigned long uinteger; -typedef char *address; -typedef short int shortint; -typedef float real; -typedef double doublereal; -typedef struct { real r, i; } complex; -typedef struct { doublereal r, i; } doublecomplex; -typedef long int logical; -typedef short int shortlogical; -typedef char logical1; -typedef char integer1; -#if 0 /* Adjust for integer*8. */ -typedef long long longint; /* system-dependent */ -typedef unsigned long long ulongint; /* system-dependent */ -#define qbit_clear(a,b) ((a) & ~((ulongint)1 << (b))) -#define qbit_set(a,b) ((a) | ((ulongint)1 << (b))) -#endif - -#define TRUE_ (1) -#define FALSE_ (0) - -/* Extern is for use with -E */ -#ifndef Extern -#define Extern extern -#endif - -/* I/O stuff */ - -#ifdef f2c_i2 -/* for -i2 */ -typedef short flag; -typedef short ftnlen; -typedef short ftnint; -#else -typedef long int flag; -typedef long int ftnlen; -typedef long int ftnint; -#endif - -/*external read, write*/ -typedef struct -{ flag cierr; - ftnint ciunit; - flag ciend; - char *cifmt; - ftnint cirec; -} cilist; - -/*internal read, write*/ -typedef struct -{ flag icierr; - char *iciunit; - flag iciend; - char *icifmt; - ftnint icirlen; - ftnint icirnum; -} icilist; - -/*open*/ -typedef struct -{ flag oerr; - ftnint ounit; - char *ofnm; - ftnlen ofnmlen; - char *osta; - char *oacc; - char *ofm; - ftnint orl; - char *oblnk; -} olist; - -/*close*/ -typedef struct -{ flag cerr; - ftnint cunit; - char *csta; -} cllist; - -/*rewind, backspace, endfile*/ -typedef struct -{ flag aerr; - ftnint aunit; -} alist; - -/* inquire */ -typedef struct -{ flag inerr; - ftnint inunit; - char *infile; - ftnlen infilen; - ftnint *inex; /*parameters in standard's order*/ - ftnint *inopen; - ftnint *innum; - ftnint *innamed; - char *inname; - ftnlen innamlen; - char *inacc; - ftnlen inacclen; - char *inseq; - ftnlen inseqlen; - char *indir; - ftnlen indirlen; - char *infmt; - ftnlen infmtlen; - char *inform; - ftnint informlen; - char *inunf; - ftnlen inunflen; - ftnint *inrecl; - ftnint *innrec; - char *inblank; - ftnlen inblanklen; -} inlist; - -#define VOID void - -union Multitype { /* for multiple entry points */ - integer1 g; - shortint h; - integer i; - /* longint j; */ - real r; - doublereal d; - complex c; - doublecomplex z; - }; - -typedef union Multitype Multitype; - -/*typedef long int Long;*/ /* No longer used; formerly in Namelist */ - -struct Vardesc { /* for Namelist */ - char *name; - char *addr; - ftnlen *dims; - int type; - }; -typedef struct Vardesc Vardesc; - -struct Namelist { - char *name; - Vardesc **vars; - int nvars; - }; -typedef struct Namelist Namelist; - -#define abs(x) ((x) >= 0 ? (x) : -(x)) -#define dabs(x) (doublereal)abs(x) -#define min(a,b) ((a) <= (b) ? (a) : (b)) -#define max(a,b) ((a) >= (b) ? (a) : (b)) -#define dmin(a,b) (doublereal)min(a,b) -#define dmax(a,b) (doublereal)max(a,b) -#define bit_test(a,b) ((a) >> (b) & 1) -#define bit_clear(a,b) ((a) & ~((uinteger)1 << (b))) -#define bit_set(a,b) ((a) | ((uinteger)1 << (b))) - -/* procedure parameter types for -A and -C++ */ - -#define F2C_proc_par_types 1 -#ifdef __cplusplus -typedef int /* Unknown procedure type */ (*U_fp)(...); -typedef shortint (*J_fp)(...); -typedef integer (*I_fp)(...); -typedef real (*R_fp)(...); -typedef doublereal (*D_fp)(...), (*E_fp)(...); -typedef /* Complex */ VOID (*C_fp)(...); -typedef /* Double Complex */ VOID (*Z_fp)(...); -typedef logical (*L_fp)(...); -typedef shortlogical (*K_fp)(...); -typedef /* Character */ VOID (*H_fp)(...); -typedef /* Subroutine */ int (*S_fp)(...); -#else -typedef int /* Unknown procedure type */ (*U_fp)(); -typedef shortint (*J_fp)(); -typedef integer (*I_fp)(); -typedef real (*R_fp)(); -typedef doublereal (*D_fp)(), (*E_fp)(); -typedef /* Complex */ VOID (*C_fp)(); -typedef /* Double Complex */ VOID (*Z_fp)(); -typedef logical (*L_fp)(); -typedef shortlogical (*K_fp)(); -typedef /* Character */ VOID (*H_fp)(); -typedef /* Subroutine */ int (*S_fp)(); -#endif -/* E_fp is for real functions when -R is not specified */ -typedef VOID C_f; /* complex function */ -typedef VOID H_f; /* character function */ -typedef VOID Z_f; /* double complex function */ -typedef doublereal E_f; /* real function with -R not specified */ - -/* undef any lower-case symbols that your C compiler predefines, e.g.: */ - -#ifndef Skip_f2c_Undefs -#undef cray -#undef gcos -#undef mc68010 -#undef mc68020 -#undef mips -#undef pdp11 -#undef sgi -#undef sparc -#undef sun -#undef sun2 -#undef sun3 -#undef sun4 -#undef u370 -#undef u3b -#undef u3b2 -#undef u3b5 -#undef unix -#undef vax -#endif -#endif - - -#endif - diff --git a/ext/spice/include/f2cMang.h b/ext/spice/include/f2cMang.h deleted file mode 100644 index f18fded688..0000000000 --- a/ext/spice/include/f2cMang.h +++ /dev/null @@ -1,390 +0,0 @@ -/* - --Header_File f2cMang.h ( f2c external symbol mangling ) - --Abstract - - Define macros that mangle the external symbols in the f2c F77 and I77 - libraries. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header supports linking CSPICE into executables that - also link in objects compiled from Fortran, in particular - ones that perform Fortran I/O. To enable this odd mix, - one defines the preprocessor flag - - MIX_C_AND_FORTRAN - - This macro is undefined by default, since the action it invokes - is usually not desirable. When the flag is defined, this header - defines macros that mangle the f2c library external symbols: - the symbol - - xxx - - gets mapped to - - xxx_f2c - - This mangling prevents name collisions between the f2c - implementations of the F77 and I77 library routines and those - in the corresponding Fortran libraries on a host system. - - The set of external symbols defined in the f2c libraries can - be determined by combining objects from both F77 and I77 into - a single Unix archive libarary, then running the Unix utility - nm on the that archive. If available, an nm option that selects - only external symbols should be invoked. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - 1) It is recommended that use of the features implemented by this - header be avoided if at all possible. There are robustness and - portability problems associated with linking Fortran and C objects - together in one executable. - - 2) When f2c external symbol name mangling is invoked, objects - derived from C code translated from Fortran by f2c won't - link against CSPICE any longer, if these objects reference - the standard f2c external symbols. - - 3) The features implemented by this header have been tested only - under the Sun Solaris GCC, Sun Solaris native ANSI C, and - PC/Linux/gcc environments. - --Version - - -CSPICE Version 2.0.1, 07-MAR-2009 (NJB) - - Restrictions header section was updated to note successful - testing on the PC/Linux/gcc platform. - - -CSPICE Version 2.0.0, 19-DEC-2001 (NJB) - -*/ - - - /* - Define masking macros for f2c external symbols. - */ - #ifdef MIX_C_AND_FORTRAN - - /* - Define the macros only once, if they need to be defined. - */ - #ifndef F2C_MANGLING_DONE - - #define F77_aloc F77_aloc_f2c - #define F_err F_err_f2c - #define L_len L_len_f2c - #define abort_ abort__f2c - #define b_char b_char_f2c - #define c_abs c_abs_f2c - #define c_cos c_cos_f2c - #define c_dfe c_dfe_f2c - #define c_div c_div_f2c - #define c_due c_due_f2c - #define c_exp c_exp_f2c - #define c_le c_le_f2c - #define c_log c_log_f2c - #define c_sfe c_sfe_f2c - #define c_si c_si_f2c - #define c_sin c_sin_f2c - #define c_sqrt c_sqrt_f2c - #define c_sue c_sue_f2c - #define d_abs d_abs_f2c - #define d_acos d_acos_f2c - #define d_asin d_asin_f2c - #define d_atan d_atan_f2c - #define d_atn2 d_atn2_f2c - #define d_cnjg d_cnjg_f2c - #define d_cos d_cos_f2c - #define d_cosh d_cosh_f2c - #define d_dim d_dim_f2c - #define d_exp d_exp_f2c - #define d_imag d_imag_f2c - #define d_int d_int_f2c - #define d_lg10 d_lg10_f2c - #define d_log d_log_f2c - #define d_mod d_mod_f2c - #define d_nint d_nint_f2c - #define d_prod d_prod_f2c - #define d_sign d_sign_f2c - #define d_sin d_sin_f2c - #define d_sinh d_sinh_f2c - #define d_sqrt d_sqrt_f2c - #define d_tan d_tan_f2c - #define d_tanh d_tanh_f2c - #define derf_ derf__f2c - #define derfc_ derfc__f2c - #define do_fio do_fio_f2c - #define do_lio do_lio_f2c - #define do_ud do_ud_f2c - #define do_uio do_uio_f2c - #define do_us do_us_f2c - #define dtime_ dtime__f2c - #define e_rdfe e_rdfe_f2c - #define e_rdue e_rdue_f2c - #define e_rsfe e_rsfe_f2c - #define e_rsfi e_rsfi_f2c - #define e_rsle e_rsle_f2c - #define e_rsli e_rsli_f2c - #define e_rsue e_rsue_f2c - #define e_wdfe e_wdfe_f2c - #define e_wdue e_wdue_f2c - #define e_wsfe e_wsfe_f2c - #define e_wsfi e_wsfi_f2c - #define e_wsle e_wsle_f2c - #define e_wsli e_wsli_f2c - #define e_wsue e_wsue_f2c - #define ef1asc_ ef1asc__f2c - #define ef1cmc_ ef1cmc__f2c - #define en_fio en_fio_f2c - #define erf_ erf__f2c - #define erfc_ erfc__f2c - #define err__fl err__fl_f2c - #define etime_ etime__f2c - #define exit_ exit__f2c - #define f__Aquote f__Aquote_f2c - #define f__buflen f__buflen_f2c - #define f__cabs f__cabs_f2c - #define f__canseek f__canseek_f2c - #define f__cblank f__cblank_f2c - #define f__cf f__cf_f2c - #define f__cnt f__cnt_f2c - #define f__cp f__cp_f2c - #define f__cplus f__cplus_f2c - #define f__cursor f__cursor_f2c - #define f__curunit f__curunit_f2c - #define f__doed f__doed_f2c - #define f__doend f__doend_f2c - #define f__doned f__doned_f2c - #define f__donewrec f__donewrec_f2c - #define f__dorevert f__dorevert_f2c - #define f__elist f__elist_f2c - #define f__external f__external_f2c - #define f__fatal f__fatal_f2c - #define f__fmtbuf f__fmtbuf_f2c - #define f__formatted f__formatted_f2c - #define f__getn f__getn_f2c - #define f__hiwater f__hiwater_f2c - #define f__icend f__icend_f2c - #define f__icnum f__icnum_f2c - #define f__icptr f__icptr_f2c - #define f__icvt f__icvt_f2c - #define f__init f__init_f2c - #define f__inode f__inode_f2c - #define f__lchar f__lchar_f2c - #define f__lcount f__lcount_f2c - #define f__lioproc f__lioproc_f2c - #define f__lquit f__lquit_f2c - #define f__ltab f__ltab_f2c - #define f__ltype f__ltype_f2c - #define f__lx f__lx_f2c - #define f__ly f__ly_f2c - #define f__nonl f__nonl_f2c - #define f__nowreading f__nowreading_f2c - #define f__nowwriting f__nowwriting_f2c - #define f__parenlvl f__parenlvl_f2c - #define f__pc f__pc_f2c - #define f__putbuf f__putbuf_f2c - #define f__putn f__putn_f2c - #define f__r_mode f__r_mode_f2c - #define f__reading f__reading_f2c - #define f__reclen f__reclen_f2c - #define f__recloc f__recloc_f2c - #define f__recpos f__recpos_f2c - #define f__ret f__ret_f2c - #define f__revloc f__revloc_f2c - #define f__rp f__rp_f2c - #define f__scale f__scale_f2c - #define f__sequential f__sequential_f2c - #define f__svic f__svic_f2c - #define f__typesize f__typesize_f2c - #define f__units f__units_f2c - #define f__w_mode f__w_mode_f2c - #define f__workdone f__workdone_f2c - #define f_back f_back_f2c - #define f_clos f_clos_f2c - #define f_end f_end_f2c - #define f_exit f_exit_f2c - #define f_init f_init_f2c - #define f_inqu f_inqu_f2c - #define f_open f_open_f2c - #define f_rew f_rew_f2c - #define fk_open fk_open_f2c - #define flush_ flush__f2c - #define fmt_bg fmt_bg_f2c - #define fseek_ fseek__f2c - #define ftell_ ftell__f2c - #define g_char g_char_f2c - #define getenv_ getenv__f2c - #define h_abs h_abs_f2c - #define h_dim h_dim_f2c - #define h_dnnt h_dnnt_f2c - #define h_indx h_indx_f2c - #define h_len h_len_f2c - #define h_mod h_mod_f2c - #define h_nint h_nint_f2c - #define h_sign h_sign_f2c - #define hl_ge hl_ge_f2c - #define hl_gt hl_gt_f2c - #define hl_le hl_le_f2c - #define hl_lt hl_lt_f2c - #define i_abs i_abs_f2c - #define i_dim i_dim_f2c - #define i_dnnt i_dnnt_f2c - #define i_indx i_indx_f2c - #define i_len i_len_f2c - #define i_mod i_mod_f2c - #define i_nint i_nint_f2c - #define i_sign i_sign_f2c - #define iw_rev iw_rev_f2c - #define l_eof l_eof_f2c - #define l_ge l_ge_f2c - #define l_getc l_getc_f2c - #define l_gt l_gt_f2c - #define l_le l_le_f2c - #define l_lt l_lt_f2c - #define l_read l_read_f2c - #define l_ungetc l_ungetc_f2c - #define l_write l_write_f2c - #define lbit_bits lbit_bits_f2c - #define lbit_cshift lbit_cshift_f2c - #define lbit_shift lbit_shift_f2c - #define mk_hashtab mk_hashtab_f2c - #define nml_read nml_read_f2c - #define pars_f pars_f_f2c - #define pow_ci pow_ci_f2c - #define pow_dd pow_dd_f2c - #define pow_di pow_di_f2c - #define pow_hh pow_hh_f2c - #define pow_ii pow_ii_f2c - #define pow_ri pow_ri_f2c - #define pow_zi pow_zi_f2c - #define pow_zz pow_zz_f2c - #define r_abs r_abs_f2c - #define r_acos r_acos_f2c - #define r_asin r_asin_f2c - #define r_atan r_atan_f2c - #define r_atn2 r_atn2_f2c - #define r_cnjg r_cnjg_f2c - #define r_cos r_cos_f2c - #define r_cosh r_cosh_f2c - #define r_dim r_dim_f2c - #define r_exp r_exp_f2c - #define r_imag r_imag_f2c - #define r_int r_int_f2c - #define r_lg10 r_lg10_f2c - #define r_log r_log_f2c - #define r_mod r_mod_f2c - #define r_nint r_nint_f2c - #define r_sign r_sign_f2c - #define r_sin r_sin_f2c - #define r_sinh r_sinh_f2c - #define r_sqrt r_sqrt_f2c - #define r_tan r_tan_f2c - #define r_tanh r_tanh_f2c - #define rd_ed rd_ed_f2c - #define rd_ned rd_ned_f2c - #define s_cat s_cat_f2c - #define s_cmp s_cmp_f2c - #define s_copy s_copy_f2c - #define s_paus s_paus_f2c - #define s_rdfe s_rdfe_f2c - #define s_rdue s_rdue_f2c - #define s_rnge s_rnge_f2c - #define s_rsfe s_rsfe_f2c - #define s_rsfi s_rsfi_f2c - #define s_rsle s_rsle_f2c - #define s_rsli s_rsli_f2c - #define s_rsne s_rsne_f2c - #define s_rsni s_rsni_f2c - #define s_rsue s_rsue_f2c - #define s_stop s_stop_f2c - #define s_wdfe s_wdfe_f2c - #define s_wdue s_wdue_f2c - #define s_wsfe s_wsfe_f2c - #define s_wsfi s_wsfi_f2c - #define s_wsle s_wsle_f2c - #define s_wsli s_wsli_f2c - #define s_wsne s_wsne_f2c - #define s_wsni s_wsni_f2c - #define s_wsue s_wsue_f2c - #define sig_die sig_die_f2c - #define signal_ signal__f2c - #define system_ system__f2c - #define t_getc t_getc_f2c - #define t_runc t_runc_f2c - #define w_ed w_ed_f2c - #define w_ned w_ned_f2c - #define wrt_E wrt_E_f2c - #define wrt_F wrt_F_f2c - #define wrt_L wrt_L_f2c - #define x_endp x_endp_f2c - #define x_getc x_getc_f2c - #define x_putc x_putc_f2c - #define x_rev x_rev_f2c - #define x_rsne x_rsne_f2c - #define x_wSL x_wSL_f2c - #define x_wsne x_wsne_f2c - #define xrd_SL xrd_SL_f2c - #define y_getc y_getc_f2c - #define y_rsk y_rsk_f2c - #define z_abs z_abs_f2c - #define z_cos z_cos_f2c - #define z_div z_div_f2c - #define z_exp z_exp_f2c - #define z_getc z_getc_f2c - #define z_log z_log_f2c - #define z_putc z_putc_f2c - #define z_rnew z_rnew_f2c - #define z_sin z_sin_f2c - #define z_sqrt z_sqrt_f2c - #define z_wnew z_wnew_f2c - - #define F2C_MANGLING_DONE - - #endif - - - #endif - diff --git a/ext/spice/include/fio.h b/ext/spice/include/fio.h deleted file mode 100644 index bb20dd2ca0..0000000000 --- a/ext/spice/include/fio.h +++ /dev/null @@ -1,107 +0,0 @@ -#include "stdio.h" -#include "errno.h" -#ifndef NULL -/* ANSI C */ -#include "stddef.h" -#endif - -#ifndef SEEK_SET -#define SEEK_SET 0 -#define SEEK_CUR 1 -#define SEEK_END 2 -#endif - -#ifdef MSDOS -#ifndef NON_UNIX_STDIO -#define NON_UNIX_STDIO -#endif -#endif - -#ifdef UIOLEN_int -typedef int uiolen; -#else -typedef long uiolen; -#endif - -/*units*/ -typedef struct -{ FILE *ufd; /*0=unconnected*/ - char *ufnm; -#ifndef MSDOS - long uinode; - int udev; -#endif - int url; /*0=sequential*/ - flag useek; /*true=can backspace, use dir, ...*/ - flag ufmt; - flag urw; /* (1 for can read) | (2 for can write) */ - flag ublnk; - flag uend; - flag uwrt; /*last io was write*/ - flag uscrtch; -} unit; - -extern flag f__init; -extern cilist *f__elist; /*active external io list*/ -extern flag f__reading,f__external,f__sequential,f__formatted; -#undef Void -#ifdef KR_headers -#define Void /*void*/ -extern int (*f__getn)(); /* for formatted input */ -extern void (*f__putn)(); /* for formatted output */ -extern void x_putc(); -extern long f__inode(); -extern VOID sig_die(); -extern int (*f__donewrec)(), t_putc(), x_wSL(); -extern int c_sfe(), err__fl(), xrd_SL(), f__putbuf(); -#else -#define Void void -#ifdef __cplusplus -extern "C" { -#endif -extern int (*f__getn)(void); /* for formatted input */ -extern void (*f__putn)(int); /* for formatted output */ -extern void x_putc(int); -extern long f__inode(char*,int*); -extern void sig_die(char*,int); -extern void f__fatal(int,char*); -extern int t_runc(alist*); -extern int f__nowreading(unit*), f__nowwriting(unit*); -extern int fk_open(int,int,ftnint); -extern int en_fio(void); -extern void f_init(void); -extern int (*f__donewrec)(void), t_putc(int), x_wSL(void); -extern void b_char(char*,char*,ftnlen), g_char(char*,ftnlen,char*); -extern int c_sfe(cilist*), z_rnew(void); -extern int isatty(int); -extern int err__fl(int,int,char*); -extern int xrd_SL(void); -extern int f__putbuf(int); -#ifdef __cplusplus - } -#endif -#endif -extern int (*f__doend)(Void); -extern FILE *f__cf; /*current file*/ -extern unit *f__curunit; /*current unit*/ -extern unit f__units[]; -#define err(f,m,s) {if(f) errno= m; else f__fatal(m,s); return(m);} -#define errfl(f,m,s) return err__fl((int)f,m,s) - -/*Table sizes*/ -#define MXUNIT 100 - -extern int f__recpos; /*position in current record*/ -extern int f__cursor; /* offset to move to */ -extern int f__hiwater; /* so TL doesn't confuse us */ - -#define WRITE 1 -#define READ 2 -#define SEQ 3 -#define DIR 4 -#define FMT 5 -#define UNF 6 -#define EXT 7 -#define INT 8 - -#define buf_end(x) (x->_flag & _IONBF ? x->_ptr : x->_base + BUFSIZ) diff --git a/ext/spice/include/fmt.h b/ext/spice/include/fmt.h deleted file mode 100644 index 19065a2f04..0000000000 --- a/ext/spice/include/fmt.h +++ /dev/null @@ -1,100 +0,0 @@ -struct syl -{ int op; - int p1; - union { int i[2]; char *s;} p2; - }; -#define RET1 1 -#define REVERT 2 -#define GOTO 3 -#define X 4 -#define SLASH 5 -#define STACK 6 -#define I 7 -#define ED 8 -#define NED 9 -#define IM 10 -#define APOS 11 -#define H 12 -#define TL 13 -#define TR 14 -#define T 15 -#define COLON 16 -#define S 17 -#define SP 18 -#define SS 19 -#define P 20 -#define BN 21 -#define BZ 22 -#define F 23 -#define E 24 -#define EE 25 -#define D 26 -#define G 27 -#define GE 28 -#define L 29 -#define A 30 -#define AW 31 -#define O 32 -#define NONL 33 -#define OM 34 -#define Z 35 -#define ZM 36 -extern int f__pc,f__parenlvl,f__revloc; -typedef union -{ real pf; - doublereal pd; -} ufloat; -typedef union -{ short is; -#ifndef KR_headers - signed -#endif - char ic; - integer il; -#ifdef Allow_TYQUAD - longint ili; -#endif -} Uint; -#ifdef KR_headers -extern int (*f__doed)(),(*f__doned)(); -extern int (*f__dorevert)(); -extern int rd_ed(),rd_ned(); -extern int w_ed(),w_ned(); -#else -#ifdef __cplusplus -extern "C" { -#endif -extern int (*f__doed)(struct syl*, char*, ftnlen),(*f__doned)(struct syl*); -extern int (*f__dorevert)(void); -extern void fmt_bg(void); -extern int pars_f(char*); -extern int rd_ed(struct syl*, char*, ftnlen),rd_ned(struct syl*); -extern int w_ed(struct syl*, char*, ftnlen),w_ned(struct syl*); -extern int wrt_E(ufloat*, int, int, int, ftnlen); -extern int wrt_F(ufloat*, int, int, ftnlen); -extern int wrt_L(Uint*, int, ftnlen); -#ifdef __cplusplus - } -#endif -#endif -extern flag f__cblank,f__cplus,f__workdone, f__nonl; -extern char *f__fmtbuf; -extern int f__scale; -#define GET(x) if((x=(*f__getn)())<0) return(x) -#define VAL(x) (x!='\n'?x:' ') -#define PUT(x) (*f__putn)(x) -extern int f__cursor; - -#undef TYQUAD -#ifndef Allow_TYQUAD -#undef longint -#define longint long -#else -#define TYQUAD 14 -#endif - -#ifdef KR_headers -extern char *f__icvt(); -#else -extern char *f__icvt(longint, int*, int*, int); -#endif diff --git a/ext/spice/include/fp.h b/ext/spice/include/fp.h deleted file mode 100644 index 40743d79f7..0000000000 --- a/ext/spice/include/fp.h +++ /dev/null @@ -1,28 +0,0 @@ -#define FMAX 40 -#define EXPMAXDIGS 8 -#define EXPMAX 99999999 -/* FMAX = max number of nonzero digits passed to atof() */ -/* EXPMAX = 10^EXPMAXDIGS - 1 = largest allowed exponent absolute value */ - -#ifdef V10 /* Research Tenth-Edition Unix */ -#include "local.h" -#endif - -/* MAXFRACDIGS and MAXINTDIGS are for wrt_F -- bounds (not necessarily - tight) on the maximum number of digits to the right and left of - * the decimal point. - */ - -#ifdef VAX -#define MAXFRACDIGS 56 -#define MAXINTDIGS 38 -#else -#ifdef CRAY -#define MAXFRACDIGS 9880 -#define MAXINTDIGS 9864 -#else -/* values that suffice for IEEE double */ -#define MAXFRACDIGS 344 -#define MAXINTDIGS 308 -#endif -#endif diff --git a/ext/spice/include/lio.h b/ext/spice/include/lio.h deleted file mode 100644 index 012317206a..0000000000 --- a/ext/spice/include/lio.h +++ /dev/null @@ -1,74 +0,0 @@ -/* copy of ftypes from the compiler */ -/* variable types - * numeric assumptions: - * int < reals < complexes - * TYDREAL-TYREAL = TYDCOMPLEX-TYCOMPLEX - */ - -/* 0-10 retain their old (pre LOGICAL*1, etc.) */ -/* values to allow mixing old and new objects. */ - -#define TYUNKNOWN 0 -#define TYADDR 1 -#define TYSHORT 2 -#define TYLONG 3 -#define TYREAL 4 -#define TYDREAL 5 -#define TYCOMPLEX 6 -#define TYDCOMPLEX 7 -#define TYLOGICAL 8 -#define TYCHAR 9 -#define TYSUBR 10 -#define TYINT1 11 -#define TYLOGICAL1 12 -#define TYLOGICAL2 13 -#ifdef Allow_TYQUAD -#undef TYQUAD -#define TYQUAD 14 -#endif - -#define LINTW 24 -#define LINE 80 -#define LLOGW 2 -#ifdef Old_list_output -#define LLOW 1.0 -#define LHIGH 1.e9 -#define LEFMT " %# .8E" -#define LFFMT " %# .9g" -#else -#define LGFMT "%.9G" -#endif -/* LEFBL 20 should suffice; 24 overcomes a NeXT bug. */ -#define LEFBL 24 - -typedef union -{ - char flchar; - short flshort; - ftnint flint; -#ifdef Allow_TYQUAD - longint fllongint; -#endif - real flreal; - doublereal fldouble; -} flex; -extern int f__scale; -#ifdef KR_headers -extern int (*f__lioproc)(), (*l_getc)(), (*l_ungetc)(); -extern int l_read(), l_write(); -#else -#ifdef __cplusplus -extern "C" { -#endif -extern int (*f__lioproc)(ftnint*, char*, ftnlen, ftnint); -extern int l_write(ftnint*, char*, ftnlen, ftnint); -extern void x_wsne(cilist*); -extern int c_le(cilist*), (*l_getc)(void), (*l_ungetc)(int,FILE*); -extern int l_read(ftnint*,char*,ftnlen,ftnint); -extern integer e_rsle(void), e_wsle(void), s_wsne(cilist*); -extern int z_rnew(void); -#ifdef __cplusplus - } -#endif -#endif -extern ftnint L_len; diff --git a/ext/spice/include/rawio.h b/ext/spice/include/rawio.h deleted file mode 100644 index fd36a48260..0000000000 --- a/ext/spice/include/rawio.h +++ /dev/null @@ -1,41 +0,0 @@ -#ifndef KR_headers -#ifdef MSDOS -#include "io.h" -#ifndef WATCOM -#define close _close -#define creat _creat -#define open _open -#define read _read -#define write _write -#endif /*WATCOM*/ -#endif /*MSDOS*/ -#ifdef __cplusplus -extern "C" { -#endif -#ifndef MSDOS -#ifdef OPEN_DECL -extern int creat(const char*,int), open(const char*,int); -#endif -extern int close(int); -extern int read(int,void*,size_t), write(int,void*,size_t); -extern int unlink(const char*); -#ifndef _POSIX_SOURCE -#ifndef NON_UNIX_STDIO -extern FILE *fdopen(int, const char*); -#endif -#endif -#endif /*KR_HEADERS*/ - -extern char *mktemp(char*); - -#ifdef __cplusplus - } -#endif -#endif - -#include "fcntl.h" - -#ifndef O_WRONLY -#define O_RDONLY 0 -#define O_WRONLY 1 -#endif diff --git a/ext/spice/include/signal1.h b/ext/spice/include/signal1.h deleted file mode 100644 index 360d8d0118..0000000000 --- a/ext/spice/include/signal1.h +++ /dev/null @@ -1,118 +0,0 @@ -/* - --Header_File signal1.h (CSPICE version of the f2c signal1.h header file) - --Abstract - - Define macros associated with signal handling, customized for the - host environment. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Required_Reading - - None. - --Particulars - - This header defines the macro signal1 referenced in main.c, - which is a generic main routine used in CSPICE executables that - link to code generated by f2c. - --Literature_References - - None. - --Author_and_Institution - - N.J. Bachman (JPL) - --Restrictions - - 1) This header file must be updated whenever the f2c processor - or the f2c libraries libI77 and libF77 are updated. - - 2) This header may need to be updated to support new platforms. - The supported platforms at the time of the 03-FEB-2000 release - are: - - ALPHA-DIGITAL-UNIX_C - HP_C - NEXT_C - PC-LINUX_C - PC-MS_C - SGI-IRIX-N32_C - SGI-IRIX-NO2_C - SUN-SOLARIS-GCC_C - SUN-SOLARIS-NATIVE_C - --Version - - -CSPICE Version 1.0.0, 03-FEB-2000 (NJB) - -*/ - - - - -/* You may need to adjust the definition of signal1 to supply a */ -/* cast to the correct argument type. This detail is system- and */ -/* compiler-dependent. The #define below assumes signal.h declares */ -/* type SIG_PF for the signal function's second argument. */ - -#include - -#ifndef Sigret_t -#define Sigret_t void -#endif -#ifndef Sigarg_t -#ifdef KR_headers -#define Sigarg_t -#else -#ifdef __cplusplus -#define Sigarg_t ... -#else -#define Sigarg_t int -#endif -#endif -#endif /*Sigarg_t*/ - -#ifdef USE_SIG_PF /* compile with -DUSE_SIG_PF under IRIX */ -#define sig_pf SIG_PF -#else -typedef Sigret_t (*sig_pf)(Sigarg_t); -#endif - -#define signal1(a,b) signal(a,(sig_pf)b) - -#ifdef __cplusplus -#define Sigarg ... -#define Use_Sigarg -#else -#define Sigarg Int n -#define Use_Sigarg n = n /* shut up compiler warning */ -#endif - diff --git a/ext/spice/include/zzalloc.h b/ext/spice/include/zzalloc.h deleted file mode 100644 index 572268c8eb..0000000000 --- a/ext/spice/include/zzalloc.h +++ /dev/null @@ -1,125 +0,0 @@ -/* - --Abstract - - The memory allocation prototypes and macros for use in CSPICE. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Particulars - - The routines maintain a count of the number of mallocs vs. free, - signalling an error if any unreleased memory exists at the end - of an Icy interface call. - - The macro ALLOC_CHECK performs malloc/free test. If used, the macro - should exists at the end of any routine using these memory management - routines. - - Prototypes in this file: - - alloc_count - zzalloc_count - alloc_SpiceMemory - alloc_SpiceString_C_array - alloc_SpiceString_C_Copy_array - alloc_SpiceDouble_C_array - alloc_SpiceInt_C_array - alloc_SpiceString - alloc_SpiceString_Pointer_array - free_SpiceString_C_array - free_SpiceMemory - --Version - - CSPICE 1.0.3 02-MAY-2008 (EDW) - - Added alloc_count prototype. - - CSPICE 1.0.2 10-MAY-2007 (EDW) - - Minor edits to clarify 'size' in alloc_SpiceMemory as - size_t. - - CSPICE 1.0.1 23-JUN-2005 (EDW) - - Add prototype for alloc_SpiceString_Pointer_array, allocate - an array of pointers to SpiceChar. - - Icy 1.0.0 December 19, 2003 (EDW) - - Initial release. - -*/ - -#ifndef ZZALLOC_H -#define ZZALLOC_H - - /* - Allocation call prototypes: - */ - int alloc_count (); - - SpiceChar ** alloc_SpiceString_C_array ( int string_length, - int string_count ); - - SpiceChar ** alloc_SpiceString_C_Copy_array ( int array_len , - int string_len, - SpiceChar ** array ); - - SpiceDouble * alloc_SpiceDouble_C_array ( int rows, - int cols ); - - SpiceInt * alloc_SpiceInt_C_array ( int rows, - int cols ); - - SpiceChar * alloc_SpiceString ( int length ); - - SpiceChar ** alloc_SpiceString_Pointer_array( int array_len ); - - void free_SpiceString_C_array ( int dim, - SpiceChar ** array ); - - void * alloc_SpiceMemory ( size_t size ); - - void free_SpiceMemory ( void * ptr ); - - - /* - Simple macro to ensure a zero value alloc count at end of routine. - Note, the need to use this macro exists only in those routines - allocating/deallocating memory. - */ -#define ALLOC_CHECK if ( alloc_count() != 0 ) \ - { \ - setmsg_c ( "Malloc/Free count not zero at end of routine." \ - " Malloc count = #."); \ - errint_c ( "#", alloc_count() ); \ - sigerr_c ( "SPICE(MALLOCCOUNT)" ); \ - } - -#endif - diff --git a/ext/spice/include/zzerror.h b/ext/spice/include/zzerror.h deleted file mode 100644 index 3af69f2f46..0000000000 --- a/ext/spice/include/zzerror.h +++ /dev/null @@ -1,86 +0,0 @@ -/* - --Abstract - - The error control routine prototypes for use in CSPICE. - --Disclaimer - - THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE - CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S. - GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE - ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE - PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS" - TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY - WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A - PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC - SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE - SOFTWARE AND RELATED MATERIALS, HOWEVER USED. - - IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA - BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT - LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, - INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, - REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE - REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY. - - RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF - THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY - CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE - ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE. - --Particulars - - Routines prototyped in this file: - - zzerrorinit - zzerror - --Examples - - See the examples section in zzerror() and zzerrorinit(). - --Restrictions - - None. - --Exceptions - - None. - --Files - - None. - --Author_and_Institution - - E. D. Wright (JPL) - --Literature_References - - None. - --Version - - -CSPICE 1.1.0 14-JAN-2013 (EDW) - - Added parameter: - - SCALAR_OP - - -CSPICE 1.0.0 17-OCT-2005 (EDW) - - Initial release. - -*/ - -#ifndef ZZERROR_H -#define ZZERROR_H - - const char * zzerror( long cnt ); - void zzerrorinit(); - - #define SCALAR_OP -1 - -#endif - diff --git a/ext/spice/lib/gcc_linux/cspice.a b/ext/spice/lib/gcc_linux/cspice.a deleted file mode 100644 index 7a1646a993138fea8b38a9d6ecc88b61580253d3..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 9450500 zcmdpf3wTslx%SJg1PG9}6vCxtT0)z02}uYLS}q9$NFYE8p$(Kanam|KWHK|%Os-8^ z6lh5a7L|H9ii(Pg%CV^Yl`3j#(Nc>Zs^~#QMMb48tyr<5Qv1K(x7H5BK#r~F{O3H+ zzn^FC_gnA!*0j&bciccwY&y_YCl*O~A7!fbaDMep(3pCIq~G4*1Is^y-y? zUj28W*WjJ#b-fq8M&_c|O&8HC>j-+~r=!=B7W7(u2)(>}(W`zfdc~vY^*{o>-k*kE zA1z0(Pj#W!7f+(sR~Y`=wD;X}==I~Z=-sCUy$6?|cjgiFUUUGxmuI8*n#1T_djY+} zJJ7rB7Eu{G2F%g z`fN`}pIuS(*}D&Y_Sc}#mrtV4A^IOafIdH{K%WyA(dXyHKa9ER+4r_m^vw^U@9ZM< zEhF}D_KRhs-$Nnv+gyQupV@(ahlFT(f!~uJIkiHSq+ldDjJ8^EmmBL~+gM={}r+YyN#0`d?Fs{=*B<|K^?O zKWP*C7j8%Y`3KN{*%9<#eHQ&AQS^Uk7y3WC1^st~(0@-U`aebg7l<#PNB=j|kaqi7 zq`6Cx7MO&zEg49Aq6BGQJ%+UBhav6tGZ=tb7%=o028=DifQdUXU~K^gtV_dyeZw%| zi+eHP%Lg#v&=Cyy<_-)v61a4}co73moWX!ol^F198V3BW5(6`~VBm;77&!GD1{NL0 zz`H9j&{u$g;S(6hGCZ);g@Nzu#J~^NVBjbAVc_RCVBpgiG4NZ*F!0zg4EzcC-=4+5 zKb*qAi-$2NtrUZX?!%zrCopKtQ4G4}AO=ksgF$(P7&L?K*)q*TZo!~sdO3=E!}j=|HbFxbBbgBx~YaH11~ zcb&uFPn^c!&mO_xFYUnKue4zBA2(s}TV3z?9P*2c81g${$ZLHulMLJO{arUcg>q5msmaP6OJa9vhkT$j5A*WEGezkFW*u`XQy)F-!wy`3aVLglCNL~}JBH;R#ju%a7`BM`4$d2jF5rgPdED^w3Ec3P zix}QN4a0{G!|;jO7(VSRhR@!D;iVxAUw#C`ePb|u<0%Y(`~ZeOQHtRoJc;4EGco*= zYkNMwm5brWXJPnH_hb0W4EL7}7}57AM%-MA5qaepap!i7Sg;EtD#+h+5+my9ZkUA; z8}?&F=V6TabP+~$B{1S>7e;))6C+NX!-$_B!ie9vFyiIo7;$bpGVkj|W=k$IH>V@B zvkIB-3nBC4X~_IcJ2Jo6h0KG;k@@{>Wd1yX%->u<=2`0f{UAmT*oBc97cg?fd5j#l zA0wws!pLdaSDs~A7+H~qk#}Fj$h9tvbeCgffcnt{MmBX}qU(+J{k9bhGY{iqn6~d5rp( z-5B*r;(@&w_05YIbu<&Ben9`1yD;iv2&4N)F?!e-j2>Nz(YH*(=)zMNJ@+g|FV4p3 zyGk(neqeOy5JtBWHz`IEY8Ik_pWz*-n69#H+}FpZu-n_-1ODc zxaqn5xar4danmn1;HKY(aMK@;;iij+FgEQV#*W&7v6FH!c1}9RmeGB0JI2;!V{Dl2 zgbQQaN-*}_#P^=W*ni!Ev7h#0?2{Q7d+0RAzPSI=`LkUZE9a|Km(I5e;L1D)munJS zx1E8jfH?CYTyx9+cTe|DxMG!XZQ20Wjxlh3Y&TqAI0@I`G`Nl(g6m{1T&K^&^%~uO zorRnG?ZwSEU&PG?*|_Xx7>UXx4d4CTmGDjTi!g4aRawt-0-y+M}FLGH%cUbs_8SbY$Is z0a54s}$pJ>%{n#J2Bq32jkc8#`u;^82?ZW#&4Qs&TW+6KMdnP62SOR(C>>? z82|M#7|*fX_#f=R_@C^>_|plDKTlhKJ&s#%J%(FnwByzf1aRw~blm!6CT{&|0=GWD z8@GOM6K*|D_mB7C)>m6_TmO@|?SUHH_TkgG?ek}F+jqUV?YBFTea$XpUt59fTeFZ| znuhGV4|g9f_HV}^`;{}u{^Jt;EEM=P)s^6BB1-W8$pCm{^^GiCa!%;-`sEt;NI_(lGHSM=|ji z`!VtK4op0oi;3)?CcY8HM2@p2^{K+7v~o-uOuR0HN#oAFv$Ng6)`GQI5%LvN72^43nc>n7pY3 zlOM0Z&E-LGEwYBKK?*xvy_R?u84;eanlyeo^ENN|^K7 zoyZ&Bi9D8-yzI5eo0fsRBI=ZPA5%RX5M&7?t@3RMx_tX*OeXA0A zKRAcHpG`vEuc-H07V`c||F_zaKWIDh$8;ip(iY^;nT7mC$B)@m^u}hI`b%|mS$t> z(soQ;S%|4sn=tkMTuhBn|A8t@-Ea|8A1}Iee$tDn|3DQCfuA{5+Ej)JiP6x?wX1@nk^okqdxTom|-ar!^(ML}m53f{j11v`(R z;KOH8@QG6>_)I4Xo~%K^fr}{k%3c(7(av)&6dbKY!HX>@_>TesV1oX1Yf7=~##RAAcZS(ug;z_gr6m{w4QX?J)rt>hr4Ejx~BtAJ_u_Qf<` zE~Z7wF)gtL)7nCqwvo8464Q24|D$U$?UPYV`yA~)wI9S^+ zh3T^@Fuk)crawXVzn#Z)_IJ~d@4@ub8JPasVNAc!g&DmLV@7%|W(;4888@H7jL9XK zF|P_U?(t&A+M=G%hxcH{ru~@F!SL_hju{^-z>K{oFypCRnDI5bztfHxFJ@rIk4|I8 z&!U*|>k`a(nf5OnK;eiZD7@(`3d@LG2G#uggZhr~W>4RT*&OfAE-uIHMLRKjc@}2h9l-4SXJNLt0<(i_F`M~2 z`;h|7{+$c6Un{}vH}+#ruLGDfFdK7jm~`oM6=F{EnSTg#<^(XO?D(a#Vms#Cv*XfP zeFAfwGhB{2&e^ydb2icTdy6n<_esq8d@1JqpR<_r)h^8WHt|JZ&WRGt`NcWRd8sev z{Qd&w{J9cy-aLc3ecCa1KnCUx*@L;miZFN7B+MP#g}LJ^F?T`*=1w_{xdq2Cca|4( z=k3Pa(gMs~z87=v*@w9tqtEs1z}#Rq=7vvVZX$}gZGAEK;hmVfnRYsfJLvxK2F(2g z^_~h~?(=&v_awvfEb6`K%JZfuil!b$(JZ2K)*MGsqzXlCl_=U=gQCuhDB4kkqTL}B zeR@BN_8&sg(-kQCK>|g;*p8y#mZ0eD1r)u}7e#+>L9y!qiYEn7JYyG%=N&`wl07J1 zyBo#cqbQD@LUG$g6mPkJ;wSo|cvl*VKbJu97j~lftH)9N%n=kHCI2G*Po6~aud`A7 z>Uk9ZxdQY0Pr|%m=P++v2=gYjVBQ^@Fs~$lc`No{-n~)G3m(P1=IxmGNIK?y;0)${ zq!aV@WMbZD`(oacdohn|9`m}YFz-7BnD+zf{e*T-)nMLl%Q5dyr!eng3FZ$j#rzx7 zF@GE}ZwKZV?#KK&Ud%6XVSXjiQ`7U=dKB}WlWRcpo%87fnE#C`%zv&N^S_&c`QJZ@ z`RpU-zsh*dA3;g4vnUy|A0;=WqhvJQuJb72vS&%o(VoxWQ!nXU(Ca7`q-A2kbvv-& zMqt6Mhp`~H1q+s>W5GQcSl}+lfJ0T)cEH*pEf4IP-M{reu2^*x8Ofjdxk!)}z_=tbH1Y?MtN zgR(g-C|jJ4vQ>pBTXP&`yQ)z3`J*WNY5-+N5-9s&Cdz)0l^+lR%oYp{4l2^O!}aOvE99*aLp_b1D-_;Z<9{Dnza{N*An{uLrI7mNQ=h$YvQV9DSpmJIV^$@l=4p!|vBDBpDi|`9x1}IJ)Kzgh3#1O!X7L;u@}o;I*MhykL7nHuzaBl%ipyY%eSRr z`Ob7K|H5u8|M~$eKTiK&d$IfvXR!R@Syc2pfr{%6q2kskD)PsmVtx@SR_sGXO)e^0 z+flKh3l-Z+Q1O9GRD6W`U!?yt#Q&&41>2sAR}Z4%Pm^#Lx^UOv1GsB+ChjWq;;y$&;>wR(83)^wm$wRp7bP?`)vmw})+(&rxeqI!O2f)$XJO^{4r1j`&tm0UHKM(rEdo+TTh_!(MhQM^aWJ@pH5W1wiBzaPsb|PL9Cj$1FM#tz^WDJv8p4ARUbT# zReR20)suU$>gg)1dX{>>$i%91>A1VsLEJrj z`z7+{t8mYRv$*HZ6S(J|S-8i)7x#QkO)7OLJu_xlf^YUfT=eflt} zo~l6AvtCqvFBermENveR9)g)qpJ%_mDBv!93#A^QztPa!N z)Q;5;MX~zP60F{yfz>rtiG6q zH3N2H&4_fYnHa^IxfijfG7W2LJF#Yc2G%^Bz?v-^u;#s+u;znXu;$+?v8Idu-=Bpw zKi-ZtTwhspt_W-X)`@%jXJ3BKIf{Foll9=+DC!9uLvy9sN*oPo7nUaUP@i2M4K z7BeVixX_qp@9Z~qD0_w5qgcl-kGugJpvRW-Oj z(24sSqPRci#r>^&asR`!aR0U~xc~iQ-ro7`-MIf~39922sBTS1^+QKc{efAi{_uWO ze{vV9nQzrhWA(RlQT@V2RI{zB{*TkBKD`swuTlSvDpdb{5^DOLLCug#)C>n|Mx95^ z*b|qZlf9@Zqt3lV-v!h}ccA7Y#Lpc^&6l%L!}hS|*%s6s-G`bVGVIv`)cm>7oNtbS zySEGO{*&My8ijjUJKW>8z@0;!Spj!R7Tjf3a4)ZfdsPwK_tITk3OC1v?lAc{v4!C_ zoQ8Yz3Ai6S3itaM?t^FH-hB@4PZ9TL!u`}fxDV}w`<-6fsLku2)x8)+dk5$3@#3pz@ zRtoRG4TJX(!+$3W-XFD?^Of`P^*#gN4aecj?t*XXEcoWsz_;SirL%QEe9rlav+&9J zWrmUS*-7wycgv;oEW@1-!1vc3@Z%u-(>vi`xEuca3gEA;f}d@Vzk%-fS@>Ib!vFA5 z_&X}#f6r<7KadIkN6X>=B>nje{9O0*f8`|n-^_sjc`y7N&-+i%?k|qPf0lSYP0u=% zqptt%w|`D8Kpp2j$A0>A1+;AQ&%Y3)_dU|J1=8IvwQ#}*F`(q2%{pBd?`))w} z4Z~1BgSa*ep^04x{cSB8hHXc~KZeNP$`QS;2GQF$AzBnb^qygehD#Csmrg`Kx))K- z*P<_UA^I!wuN5KsMhMZ1`>{TKE!K}o!}=UA))y6G{fgsQ@2kT4F!^ogu>OOcSif%r z)_tDQp^}iT~^>3U*Y(N%b!!{r`dKhB2>_u$CEX4Av5Sx*XSaB4wrC!ADJ%-r2 z62w||BeuB`vG=7R_VIm)?Wh0O4j}d%!=GWezidE!e){F-b6XJq`544GmX32hKap01 z#K=8JOl(17b~+NvqDa&b*PlY7{WuaI+K$F&W})%#tz{P4w(LdQd%S4-2;KX~pzW&{(Dtna+K!RG zunTQ(W#WN;m3ZLB8a%Kxga__+;Q^NA2R3)%fqx@*<>G-Kti=OA-Hiu+eHst&`8{wx zaoO2^<9@W~WTAcW1+?GSiS|%7+FJ|IzOe=E+Y)I1)&{hH?>yRndJyfuJ%IK#-#mbahVI2fBhTWY?EQEse;*#2xf2hS9>+r; zD8)lxO~*q=cE7Fj;S~uy+^`o9f2afxbG`A3^N<%0KUa9!xnXfRt~lFw<6UKkEMPHUThpoyxPe* z?8XgIZ2ToV8k6pJ3kL8}hW6R6&SWOKci=4z`@2bFKAKHV* zzIYCgeJ>qbhgM;0#U5C+p2k?0Lh09ORCOrPJG(7%=zIePV8;}2J z7Pe;;E}Su=+8v5`IL3^`64h{fJich6I=5SbI~0mEd+82^60t^N*v(5c8uog+k->!! zErXT_S|V7jL@d%mBA$o^qr{eA+#Tyi4{Gyf<}zLb>YQer1P}bxwQf&6YTe%YXcM&z zQqAY}F(I|SV3^6T^@ST71RBF}LMY*niPIpJBVJE_n1n$~h^7#6Mnl2t^D7~!gs(BA zgg?w1q=KM&G`J=E@B8fn)J1!9h zYP~*Y5iwY2QJyE=O>PMg@YDyzV4yA-^Goq0=z}7L-F(J^^5}`Nh=x>6hNusQCF($Z zq%k2v&}$P@&x{aLp89~hNfJ>Xmr~;)uh1A}LGaXv42Uvao{;(p&{n-C!op}koW9&V zar$!e4NNsqU|^bo=>j&D_5Kz=Q|+m*i`uK0sf)VRtfCSzW4JD6EECl~=t)Y-KOcrUeH59WRf=a}rynA{Gdf?Ui&Z|^-g4Az9!fha&PnRdW zu1-KTcn#3u4L0y9ErYi@*x(j_Hp9Gz>hf|0*jjk28zNp_!^S5XQ&&7#C$>#Qyoxn# zPrTJ8R$j?Tf|yW67Co=q@6Kl-5agX2VDjkJugUyA#BsMR&7-n7Qqkan+gB*BP?T zkp8Gm5mO=|*`O*)g4AuCLTkjLuR@)@RY5~&VRHLv-?(kc>sY{*h(x=EX2V3|HXj>J zWOPfM1Pu@~amPF+^I|qeLF4bY9z;XfY~~Fcce9f(?wEO!F)|WGjH4R!2*Wl^v)75m zpd?!~>l|LjL3Af<8BCa>$dqeT%{GzEHj&LHZE<%#doZs%Zi=jcs1wyXQA=XnZJsYt zV zAn|~yAn`_13h1v-CLRiDxr;~4lOk$iirWf9w`McZ+@5rAj5Zi%qb(?d7Dbc#Ajc}= zW}Btxln{#O5%-|3|D;B&0fEc5EI~FjMuo~;)ZLjuJa{4XswRL>*1~QMKnT#v>RZ< zz!gk)T|B=VNeBJX6$?mw1j!46WEr~;wPBE2VfLa?dPJ&2!3ez3`~U~?2Iw30H^`kt z>tY(ppzsZDRTEGr2V%nNc+9KC!!!rcc+?}MBg&~kHQL&$Rg&!B!*7+`GDssaxj`ia zmC(+P9)e0R0jeRWgm!k+u$>*phtfZaQxj~Enu%b8BqL!vU~i*GM*$Y)S;V}J@+_JK z_$+vpXQ7~8-Xf)CrGCHUBtkXe8TQpqh^!UhS+^hAAZ zkdO@$l?O@>LD8s<`|5;H6vE@-h+c)D38F0;c^yjo>RA=kf}-g8{fx{(C4w>oqlcgn zb<&g)tjm}U+F**}9Slo5Zc&Jk&g^{kVOBmh5VmPm6pe7gU8_FYy7_eAE4(&p28@$! zqBx}o5Mz6#X`xHzX2N=yNdl5-#Dq?AY{KYn zlu4?&6M`Bh#_Xe3lo%;!9Ez4uyCh6*#RFbVbUZGzC&n)*ni``Bjn=55CDbShlkpVP zsG@3^3=ZXUqDP|!=@Ig2kyJ2FF+``@A&MCV@eL(p4Cf1b0-QBVC+1VhVUVbfHHKwn zz!&zyx84&_tuVFZajTmU_Q-mHMVei&jf??0rPbwy&ww-8aHN@?Ln0Wi6PL$txtNcA zvElq26olF?`^62uBIUz5*H>uW>qu*6*LiE_3iLfqpH`BZ2Ms{NoRnusy~ zVs34n3`(w=Qmmj(uTLHVdsd<$*t&^3YMlPCl)hLj;AS5|)YTk|svni^l!PD&sU}iy z43bFXhvK4PP>DvFYLO5Wf{7QmfH<|W=h{xb#H>J;*diUHuPHwy-4$~~t}W*NT0B0P z7ILx}Ph3K3bM`27G^EP54fnf)A*~^PMk=XQWQkW~QRhfN+F1c%2|}_nt<~}uHIFcA z9)Vn&Be8mURwBoIX7NSlTaju%`(={hNI1m$;W(r2m@gb^(jvtNE9-ou;?-I@gPtZ@ z2?V?JeKJ`M#h`G`hX#=rhZQ_S7kjZ9;tDG_5+Z;?dIE&Zqg>ueFz zb{)u>O*>05)C`9G?A1BN)@F_unQa>j970%sG1b5oAXQ|k?+zdy@kE&Yq9RL{U{tbJ zDi0yS)N`w=}ScHqa;-e@&5f3{+2ZfNCpkCDxk%0uAfH_=#+^5W=fqQ^5ny7sO4$%dwcC&lhF3({y7v6p__9s{)Sv zrCTwIs84X-N4vK1cft{)A>VqcsW$CJL)!aT6e1o8G0Ut05_UFb(F3iqyd)^GzVbqe zFS?{lvPdNo(kF4As*_ra;*rqa#-b8BWhG&ztf5+tFL=hGk|!Pr`Wb_;j@THKF+|9t zuTu=rkkg@s>e!vLu^{RkN|BE+v`*%@iqg-78f-%r3fId(jNp$m%ZO}=1cI_mqbRpV zcbEl(7?z$vP)aK?8e@hLEvLV~gTkx()uVZUUNsTP7o*`g&RmEs{S zFI%FJuBB_vvuO%(_|5**_#|4RIzkF@5~r#y2($B+VYWKgH*&;o-Jxne@eI$74~l5viJ@gvZw!FW+o zJS3<(m_u|(`zc_&2;vlT#+orER}bu{m_jYb64iue$!^YXvd&Iyl*JEX$fCY~rdwCd1Z8qz zk<&W+(phn;die5LImIoVDN#E$iyA;ItH9c&8oJm;jVOn=5<=hTDjJJ1Yf*;3;x9>5 z1M=oph-RZ;JCUeI3ux5ogt#87{hURH46wIi<+tdOrC%8e>s%u0jIN{WSpMV|3^G_K zpGAy>K})cAQ$hwJ6ryp-9)m)J_1%6n5^B}N%Y={F)7BRCaAlQK#J0AkMol-o%?9ht zsNPwVMZC@Mwv%KkjoaQI@85&MRY0CraCOf#JqyolR)nqwv$mk%UWh}rPA^LE}! z!^S3+U1~gUO5YpnRUB*{g9=`+0pkjApD6u;#uYQrW}yvHPU?c3W6OJ4X%iLY8N?zD zQpqhcf>8B4MH*{N$P$bgGm=c7bx}s9COS2zAgfDMp_i^VSw@0{8uUFQeME8?!FaciNDhN& zi>%nuZICHwVFi+6ZqS4EvT!69irlTEEy{W}BtaIu_1^XQvW3GUHKgOEyM@JFE*`{m ze#Wc3Q76c&aDu%37T`N~4szw4J3%${oqJ5@b1{AA9y9OU37p%-%sY1i-?_(hZWl9i zyO^2V35aQZ*-ntnJ28FPuGau!Zm(8Pi%g-rNfyH#6hiiF386@W6Gabeq9O~AA`1^2 zQ&~_X=(XMq&tu+tT~i}+=q_4ZfoJDVl)XO$-6j?DvV#+6f*qASPA*c2mq8H*F_YV0jeRW8af!KhZ&5s!ssGY%-5h3 zNkt7ox7@ssg9gbIgJOY%Q4q9*qbWTLHFP2w<9d_yUKYiJga%c#ga##Hf>My|5>1)+ zaw&#mSs|h!>6MAH=x#v08)U6k-6jX3Tz*%#Nn5l*o;gEF<1VPt2^gnL{e;%J9|fCo zR$<`pfS&O(SMBJ^|nLh`c2qK5+4I>k+3UJ!j!x`^>wi?a3*_iz&xD+$LWA_*o8 zCUi4e+~aSs?s|jf>gMYN6HX?2T-XoG`#V8d$`*`q>laZ6Mv8nwijrA&XJ6dIhF#r? zOtr_CuX+N;$wpOJ>9GXWx_~;vCN!H7c~p{E^%oFlsFA7Fy9;?ux&o;VAG^-F%_(1@5QtS>%4W6 z=3t%PzC{M)dZ?_>u#4h*rEV0DHho+Ku}hEy5F}b=l8pZq#T{wz%N|Xl&TlwB*F9r` z5;*Fql^s}$5=Yb{EiOS#M_EH9Tce(sUq^@{g(Xdf5!CHJacN-W!qi0r+U;0WLVFn! zrkA0>?nCqyRYT@n@o0UXY;LqDJPE1Q1}!1QO$g0{D5n~7dj?g*9px&Q5JXEvEg_>} z^|3+pO*IKS-=L)P4WhnLCd$ik38M22qRuxgsx6&(2%!u6BG~8!jfOrv@zAPBp~)mr z&}cMi*3-jkn6@fvcFxkKFL$b@!Y7+N)m>h4^6=wwdOLgL@+MG4bFw2?D5y{8xla1Ra8_zZ2 z<2L@djX!SVkK6d;HvYJcKW^iX+xX)){@nMtl`!|$%=^?>n(d7W8p7UjGtm+@7G{AZ zY%I(ROW0VL8I~~RyqURT2^%f5#}elG>Kt9t#e6azno-LP)COmZ(Lk7J;X$AQHlzVF&q}>GFEkbaUy4X?*=1+!jW+RsXmz#L+@^YMgtJ%_JK$W-w zQYXmV7o)>O1+mFNte6xKC%-@7e9)pHH2>&fnn4kyjvAy!vzrS=Bm|{15EPR{OIub+ z9ZoQmotIi9(aH@|qAw@`1SLc(cV`&6bc zIpJ5n(ZtKW4r-sMJW=(z!k|1+d7|Y_`t7i+)egT}Sw!VYw(wi87$C2rn;v$yFMzd3gDXT?mhC+)yE+8%xR9B_2vbaZ85J$5EWKR^o&aY~b>}W6b$b z$9}jYw5|x*oMRL+4v$m6S&NAQ(#>Yw-l8F7^@8tDbx5ZuH)UQY8qgO;GN6}642|aP znE?--y8Y7ton9%vdQ}H)(;<`OMqc&8jhd0_Mt<$Ut8SQ*c7+St;^qb&ZV}^{o%(`e zOOUs&$Ol7YIp{`F)EAl}=wg%s>*NDaw@eXOBeadQ$h`^G`aX*to4nR)(mmyR^{9hk z#U(-ceHG_77MUn@Gf|36l-<$lY-r^YZIjuQVt@g~DFzJ+Axi{$H4gRU)LmlHmos`b z4)L=uXUyJMyERro{1m84l#gGU_}-5>q`=O?BK?)ODB;Ad5%RSTU;UuTAT>l_`LU>r z&UPEF0jfxDOBjPBWJRBD1#$XhJG23D#@4A*z&a)4gqFU6LWFZ^1J)_lxzWmANz!3C zO|>j!h^GL3ITNN!uErs%bg3#)b4GW{*!{u+sv{slWT>N8<50iGTJ=jbNKA62A3^*S z=xnq%ZjeNqFUFR|fOU$#&|<9FtNT@(xn0uBKD{}t>jw_fKg`F%!e!AAQU!z{3c-oA z5{g1_!<7<>O0-BvK@UMgNKYUHQ3%sjSyVz_kCPBoB4mR21%=?8Q*9_3LZ)cqK{SL3 z!sS*&@R_NGqG)h5poF3jtkFs+3c*^XgdzzpRxH%(0$$Bxs-h@~o8?H};mRtfBHQ`q zm{})nj&U_r-@tk}@0QOiEJI9Gm!nzNV4GzLRyW?r+Ez0cvt&6z-*0yVSF2k5`cjsi zncV{EFb;Y|;EHgygF-aKWXY^e zm&Dt2y_+8a@Uzo4UFdGpMeR0Sz~)s}uG`w&Ufne(_1Eq7b0aYAiO3~*N7VglhUGe? zwA7+NQEH_XPxO@z1McF~7B0qwrRr!2RKZw3uUdjH_x0I{Au~zNos;^G0 z0gI`k1fJbF+Q?Qcc-6el3#ab<=TSPR3F7vCTA4sbtyOfN@ z?iX>4hub%8==z|(oFk_LCJm$CaI2(WUU%CuG0P{_lsxqX-h5Ucm4f+}^EAm^L^w+M z-4eSJ%N2A>oMBmRx{)|(QbFF1(}!C_W!$O~N8>7SNGcsTIgX$7w&bn?CY(He6ClAi z?Zya~sJbN$XFdQC3r(zCHn%BjO%t}ITT*{&I$x+6Nj{4*QrwZk4i|SMZ-7gys>knx z@;PK>2ydWH8ayK<9AEqN=o@U(d!*E0mPl1oKNnL;KO|ErD8o^ebpMq~9LiWuKP*#D zmzGr05t>S3+k|b9`IK@|)?FiUtmsG$CWZ30jY_TIT4`xj(p@M_;ufF_NE+TU- zD>)(9%~~#&a6&Y7>v5!HeVb%{*2dLG)>2J~dnpyVV2joeN;0Nb&a2CF;!DYfrDPL8$tHl3O#mgE0DjA5jQIEp#7f%LiaGAXu#s^C zMz<7nB#z2W2)`~VNCl66X(&WD^qXHb%+bO)%&r zBp7rO5)3*C;oemCXJVL=78UuLNM_5*h1YADCD$Ua;*@I%*#xX(qi(o$@%8q0)^V$; z#Q4*~ZMbu-(4S-I43|HBFhsA#VzdJ=0_e=VY~}#`x;{A=UH98jwo58^MH? z`MOB!`L5lO0VbqZe0snNQ%VZ67Ozg;!c5#>la}fS9j%Q z->B_9)7f2(x%JqID`v}4obz@YeVdb;@ir$nDcRgic;x#Gi6YTmz7x8ttz0b6+T${# zeL9KQRNDekvd@mI4mP$#tk&KmrS7m!#ZSm5O(wSPI+W0Fl}&6;3FTnGR_sKq-aeK@ z%z1W{x-B~`St2IOV#Z3$HZB}U*fL1THZB}e*asm85|)Oq+i7*K{>?Kk26KlG*H&cXbk?xx3sp>$<0My5eaiQ#(VP zbefhf+?XiL)v(c+XNE})CGG$gd$AZlXS2w9%3pD==GeBJt1S!jWh|>Z=E2#CHc(f9)UzpMD@yGow4a?UG6ge)x|Q0!2Enor^F+oF}yI? zVj~l7sXKZ(aart_LYW|H{W3DiFjcz!Y1T&4*5=m@IK)VkY?@_0a)9IsXl|>d<)2cW z84sysIPPIL<5_>g`Chw@FCIX1H{SjxCxm!w2!6lf++#50#KENqoA#jYi;`4{qJ{`X zI8{_B!e4UG2P5BWIdMchP8{N`dQrDcJ9n2j0iyB+zSw1l*zN1Y%DSfwnfO{8x`#mY zb#2ND)F%@Hd4%{Bo^yVXUus%v6z!i zej93YN4^HNMi@eEaE>mYv`MrqXpU$;(-2Z5o9uYhMi-BEM;DKFdpgnaRlbcb9(AIV z5GFc1U8CW6L>pXwDi-ruNxu=3SR1`&aL63c??cH&%_K&)2x&D7L_+fNqpdB#-dUe2 z1>4_IayMxsNXb?*;kpCZ;RrcnA?R3O5!Ff;hzGkZ1iLK+yDd=9q{0jY0*(CD4b6$5 zx50F8EPr->>3rPO))q4R^V-@P>dl0=AyOMMwWq;Od>eFIcUzm?qt5#aM_B#zv4#1% zN59PDq$?_4>d=>y0y9kYGP6xbXw)R6-51-|Cf_M)W<>)WbC}#>Mr!{hIVzUo;zd*y zL3@i)?!1tn9wEc`@217#R#nd0g^Sh3>P=PB-F#|Vr9Abuo7$)+KZYmzT)j3ep-M(8 z5!Ov;^woWfg0=b>Vl5g8hgMqnd8@j)m5JqBhKS*0`-Vo#RRy=1dx#Y6=As&jaPe*~ z?r^>~hx4^LoZqcgk|F%&S*oPT7s(V&k=nZT+8p1yh-0rV;@GR}PD@>PT0$lhXeE?z z^rCJjY}D;=@mhzA*E(EVx4kxN&%O#~zO-^1sjO|cwej7XPPMp>V&@ZFD%E5*hPlIB z9!4TkFE4-?tWka&N1l@G8j~_7y9L|Y_&&mbd3gNxDJpJHgHc!0bSJp|G^S6AFTUh^ zZc==UWR`OHCMBxHhtbx^_Dnf!ir3O5LC9W`#GhQVTYiFosM{P3=4(l|%gOX> zVF5LzTP4;@=eHPhBIaL*?SBo=D46MT73AmVxm!<(D7F3#oTFY%@$VWR}P^MiqNa|Oe$@$rG8$YYoR^lDpyUM(5DMyK~r z+s?F)Aup#K^>SJKNS}>;mkx1t_7)fai(~%$J6zd|maV$oRgg0^XDaxQWUURdJ(K@T z7Bd)dB=&Od9NAoq9Ql}#e_$4mBS&_^C)}c*my<`QDER`_`aL^x_yVJWU&$gzN?Q&i zn#=~1zfAexbGT?m9?>-^=8CL4HJ*$Vz0q{{P2t3O&>Gxs{RR;wo;2&uw0NuKZ3?cB*?4^~7ds`2ESolH}CzdGwQX}HJM z+`mH?QAkab_?7mTE8ygl?DWmb44vRLHqEJxl@l3N?d7Q=sw-K zcqx>$an~i?ms9V@lh3%M)-B!H13#|^zN`oSt{(VHofAJ$^flNv8#(3k`L{^UZwOZ} zDqlXYxV(D#!i6grR906O&nsWRZ+x_==k_gr8^bSbqa4jA{PrhPAnlbLlCOh#UVO_O z^M&LgIXQ%ic{+RzWjRD&N`u4ugybRmlAjLmqAZ8#%jq2E z=aHSBnSF0T?zEZHX7t=QPn$8_rN`Uvn{$&YLy<;o`)1R9vOiAyx~QBHzq~GXy=l)b zO)W2 z>YHl=zSBN*trKAiN*PQ(dg?>pZup-1P$&G2$&pcZik*WCESFsVCCCQ3@Nn+mxGwbp zj=P9L>OF~HhV28KzVe;+q5H)MkAJog{iX?i#nriQ$D^k{)CvF3_MuUmDTOvd>04yH z`*!=#y|(-nI0?0wn*J2;Zl~z|Z}g#(fOpbYnmK^I+3wUE;c9)QwD-wYz z>m?CMm9YDH;~Qd084=!2A7jQqV#DY=<=C0?IefWlm^`!Mf6u(`e{dq_V!|a~Y?If0 z8%0){)y)_owLJFJ2OYE3qQ-`oypwoR+mKr=@03lej&>{9rpTeMXs@M?h|SdS8@fYW zE~MIHMz5DHPWl~2`mj`+;+JbPwA3of{Y#cO;hnyvh@8ZqdYrPv zKk7rusCTvSucsQc?o{2L`Vc3)GhTJfrG^)GYTk)%h0PSF50O4p#=)ugFI?)gBZV!t z{45Yh(vcc}lGkOT=>5O!Lri(Tl=9>{JGtWEA?>>!wh`xd8SbV?eNNug+}x}Dsmj$m6`3f>jtCy|{N#`_ zAi3f69ZtDT<)yyMA^9a?9sNQfd8G0#WsUvha^~m@C#R!Vk)rS1HS|d{gVFVa!DsP$c2Yf_KfRN+vm8Y?@CRR_&IA>P9Gul zMD$YI&O6CT{He!&OE`7V@lVw)p+_nwy5DpHq+qIUPko0IzVaW07kjCBCqYiw2XexO zmo`rBJ@x*3>O1z^O#MgqZ_Qr;lCF2&cU>@E)!kPYkODr1rp+F^AgFI&IK{`i*zQQSfS{_&NK^L#j zm1Ly}mUjI6bA7Xf|1XBq7&J*=F?RoK4H^%Lq2njz9lyJheYw2j_sR}^N=GuYRt?=G z^>Wtyp-*%TeX46?S8p?ivHtdMO3f0Q-qTm)8JTgATH4$-^gR!fGE<&y(YH4Kz4yaY zHows_aa-T%PNwWE-BzG4yE-HV_uf~$w)noM#n4MU;otuBD+EV5>2;T-dUchmg;x#@ z9lJq7Jg2Fb8+~a7S3I|0EuHdIYziN$zASY&Gj%tnrtYQtXvmqbJ$;UW|8aU=x?RH* zC8g)9lBn`+<9Wp^GaY-+{I*}I=i6o5X7#lx?f9`iI!&KVTUD=(f9v0&t4j}0>G=7^ z*Lt-cu^Deu^7KU-)gaHD>Q}l`%)RoY_Sq&sq%a?p%S(^(GIVSalH(#!8iA83kJ`juK@%b(-q@712a6cKxK4@Hu0toOrdo8K7PasQidz4f%b7kX(E zC0nkpRQsW*^%u2QRc#ZkI(KOcyP6v+dP78S8l@}kY!m;R#Q&3&Zl(=cU+L*6UA|)F z0=9X}m&sLevcdUEkYBc7Y4z{6`gdFZyN&(=1Fi-4IN?@k zKuf!N%%25iDT6x_p)OU$N4-m(E+kC>E-(%T;c1sYR1}E|&%( zr-6u7)}Q&KDnt#!Xf>Tg4YIOgiE1t|;3~7Ya(=l=#mkDr?r^cI*yYxHa&eS*3yRC^ z-$8~kZ+^+5#Y-ygs=WK2)obA9>mGhfjN%1l%U4Mr^t3*dMZYnkz@tXS7xRW>Z0o&b zNM>iBvLUWV`Ys-ly|Le-Aw~bczt`7$*IY1{j3ima(LC+&>oTA1viQlP%MSM6={t$t z*62l6?Bv6h?4T@TYH4v(M_s#Zyp#SxcxOzXpJLYuKRJbW%sIG#{vs!juO!GZ8-I~F zk`760@=-*`)$*^xHe#7p`JKL#$gtzDe>5hpqJ8IHY*Y%jB#qya`BdGW<^)doKyqNp zso}4dcM{~7UFhht4>p~gtc5uF=j2OIbAs*ia+b$m4Rl{qmUrCFeMp{&ezql?vUIznZ+S;w*0yEez&T6UVv1RoeN}M}nvDPJ9lE-__O%JOp=B2VKV{YK-I@~88!m-!Kvh=mM7%$)(Z zz;yomM78iU%+P@1)B?Dzx!jrj?VakWQyIo#3WdqfH}B%O&xAYi%IB+dsz?QLnI@O% za+x8QLb=Q|Lz1hnu-aev;D%8BjZFUhy=)cb4@AlDGTOh#u)oV_{||xrA&2z8a!5Ir zN9wGvW(&zfI4L_0KSf9$srvF>L=NF)Oyua#7LteXGS6}N8p?8r{abiCe4UUyQtgKg zeTDtTBwo5a$BwBdSK9w*l7902N;#H8xN$rkI|qg2;iShI(@FW3BQ<}de9IyF$@w7V zSPs$8;_28wEhLXr`)?Y$o9}KvZ9C`aJ9Y-8@MEm|x+GrS2{`(y!2jYt-B?Om%i4C_u(XdWD>v0@)GZ@N&MC%{bc(ePvRwv%eudm!aMh+ zYw6UJe3QMFPI{iV`lHnhbHk-*PM8VSw8iCMJl){US966R3 z8_D)(CFv*IFYST9FNsgiH*XT3oNr;vi|yoku`x+M+0J80e6pP#J=pnDlD@>@=acLtw+}x^(ib~Uefet-{4JuyL-Idae_jv#I{SQ7mtmZAx+u#bcI=~8H~+3P z?Dbq)rv683)cOC!o|8aQghd)_5%+Ws(r*q<$u|dQI$n@(4$hTRzQASaLS4K5Q*p=f zGosEHd0E`3h`gIvQYQT=4m)g~0u10qCqNAfE zYnXa%t;`xW^VoxxcAf6)(l4urCCWQqE9v;9wuZ^{*JXZi8POftORIG$wFKDK){ntE zenJC7pZr^?hf9X-vz<`wS;IPhQrhvF8hPdE;);r8CG#->D=W(8FUX$1puD_t`SO)Z zi_6PpYN1DEfIB+*+q&G=8Rka^F1})p@ZT}``G_k)FMi#{pACzIT@k;!`HwFRt_e9k zuenG)aN3E!QeGB6(syIOiXlbYdUt9ud`Is&-`+PANuN}3l=eURNd;WIMY&CRRLMt? zb!Z+Wd8Ceuds=%rm1Y73Y@L(2vxt`N{#HQRBjIfor(}*28_sb%Xsfp4>~Zbo?S{{z zC5b9^?ZpW%?N;*PB+J1fdR{HObKf(P15;>~uS7J>`AT5T2>`FLUOr#b0F=AEkftks5!pU$QKE{~K#Jl7^nwCZq&h zdGyhpwwLp!_*}VWVU|==TMMT>?Wbid*^-RUWfxlN+JvxI`xfLT^2uuiPWvP6L~7e3 zHfHs}v#YtP{*oT}6+Q5)d*IzY@PQuqXb*f#54@}mUG08h2PJkNF6Z>gbARJmjjK=a zoj;!77r*iqxBUDdKbDs7ZUyW=ukt$-{c8pL`}5S*-(I!L0Q%ns)Yfr7lc;Tvq|+Ho ztrU`nR6BX*4u7AJJfy9XI`8n(e#jxbv^5Sd`67q#GOloVr#^~(DWeYmUdnQae)61o zr?MtJvVQI8@3p+>C$A|ynWQgmrlbFKl78|UL06J~^8J1%Nk4hc{QD$c+F-~2-;?;{ zIjzg`a=*4IQ^r2&?$N0;Hl3Dx_3vQ|^782;$J_trW`ksoJ&F{av1uslRCz~&<56y! z;K#8iWQ2OAtmE%8NIl0vYUvqK=jMUUzaTE<8`(|2V~e&PT;hSZ3Yrk|r@1D9EL366`SzbQRsMy1UhNcX8KUSuaQtv89EURo9A& zD67`XN@Eof1u7!_KhMm(=e%d~O`BA}vM~AOeDgi?&O4WHF7Lc^8?HS-KiTFz*-5Q4 zWsyWS_arvxnkePIm%BTg`#BJa;f-g5iM$Ujom~DzZfE~5CK%_MT5+EvYgJ-<8>+-c%YAc*gAi9X9Q#Onc`h zr!o$K$X%-JQw?KB=j^92Cp9!wE3cWMc{{WZH&3o1Z9ix{M;MHoC)c6H*t5AOG~0b2 z-C1i|s*&5C;Z%ECqNj5(5w7TJZtH=BZ!VU_of!#^2AtQ1x7XJ$sKbDvp*k}wJdSWjOGeXYOpn@n zq7Iz=a7NS=;lA*bXpg$=(UWw;`BHst-K{McK_n72*a;o+fMkv?X3%-Y84=E1ZAAoI ztOGGaOZwQc%0UJzt?k(F-_aYLNY5~A*Juv5@B3ml5*OS!@rIJOPpKcCv|(~T`sx?i zn8oCQ$tnBe_oJaP%S<--FtQeKyknM4x`DQ=%&%%j&HHTpmg3)+JICrjG-eV1qR%#g z;Rg+zG4f2~jdp*`Gu1`t6Nb9*!?@Cj|InD_cIUs+lIMTLzW|{ziwHdI7ipOPlvu^T z;Gr?gqb~fz9kWdIKNKSYBk8tpR(|on9o@wL;f`4(q01d}j#-#yKmC+5;=*4}0S9KM zedK@r_~#uw3+Z0SV-{O|OU&GhP8#J+yAwvEvPP>U;jgc-^I0W0C8XFy=JlwAU%sis zB>(fwv+!fv?GiKYETDyab!Lf)ormKf0X0--kKf}D2Bp`MdnJR}j6`^SE&HLyv zTGr9C{Alww^HL(!Pdmkq(Jlgo9-~Qn%lP?iEt#=Bio>rB;DZ5tD1hG_z&{qiKN-OP zJ%E29fZr9s^MZ`sEomlV%VK9^F?=%;Mqqahs~ba02g zH8>v;2mN8dhFkSk;Qm%z0AkK1;C0Oqpg8seRsI4sGu{JW2Yk5a#g6!zi^q6+zU$LS zHw~Lh))g7Ue32lGkKb!ygHyLE^baUp^Z8$eQ~xIP6J0|_{%=zFT!*v!)nl;J75*|s zU#oCECVZR1*_KGSmpGi^9;fgXik@w?(63VTk-|F^J#|q+->2}T!mm<%-mLI}0R3=) z{^kJvM-{H~ZF7LnzbJavXNmu(75#LD>v>e2|36iHG`?5y(fRyqMbEZe!u_41j}-m~ zMXz-Vlbn3U@Azg#|1yX3p>+*26t3erQ}NO9JXz6e9mG6EAE|K9Q1tq{>-pGMEBf;l zA07XNijUS!d`IQa48@0WprJSC)x4V)re*YeS4gK&aSBh`q8YnRp-cssHld16;ZkT0 z+#DCi*w~-(+r4zh;Qp0*f(wJ{ncG)lPrzApEzD=hupCcJXZdqk^+JC-JQ=+cBbDMU;bc!!*;+o>q{*nX92JuU^Q~^A?K}*adpn; z>xVVl@$}{RvHA~<0mVQ2O>HDv@=U{#c7F^g=j>RSv%o>pFaASgz%EBnR`6;+k|HB;v-fC2ZiNrG3PExKI z&%9Ns%jk8Cj52=wl~a+GbT8yFAp7aKu^#)^(X-srjz0VIR?_|)k5K)#hcWrTI&Wo% zDJ^nNOx*kwHt`>H2;;^mW_}8^oS)*OFh9jZUdw)etLSxl|54Gu7Iu-P?@>70Ucn=WGoG$VGKiHG8^=8VG?=O1&%`Ir+*q6HgTG;Q#{zBie3c^*r?d~#|p zeGgS1^H_4~F{z!^W*TW|$<)F7duI%8z4o}w(1kNI&AZ`R^UeJ$lXJFpzj9}_skQrF zX3lRl&JZiX?3iyt+{;xT139#;{JA$v?>#_KSYmVca&+0p{cOk^lAMpLg&qq$Uhr<~z+YrHJtjBQK)(E~Eb{f*_HC^8| zsFkPnJireX&he`7`KiOnN6*9jGC==Cfc}pGdRb%1`0IT53)kTJ;ZAip=~<2>p08H) ztn-3LieBfxp10BXS&EO&XIYcYaM>0K|2jpl^LeQXSC8S|rRb?A6F#kqUXSgDK|{lQ z(Bo3u0i&iMTa>p$y@Z#Ft1?8UBMr~XeH zkxgBbk_e3r{#527{W|U-2`Jb>=gdobb}R&d;aG}>avqyjktP3;AdD|FZnv<( zwQL(XJYHrThn{_2*|_(4ET7~8$0Kd5F>5j^^^%OFIZv?vjEQ}hK&yU6b*VY0Fgd^z zA%-rb@|}w!$`2Sx5ENSFo*ei#!r;M@U&Avqv}9&x(;4l5^>p&4yYcSy?jyI+?b+Qo zQBbFkd)vfJZtpNVsz(s7yuKeBKMF3}H`=u1X8%=xHFkwyQHb$GqHqzk1CI)pLm;knk&?11=l>EXw)hJ{&3Ls^=}-_M|B?Dw<7TsS5DVqC*w z(r$9d{`mbzNXA}kJL!bzaVg_58%4$x*)ODj{~C#7j4#j61`T~pn|^h@$WGWKRR!Z2m_k^dF{0xW{X&l9?pQ3(Vi`8-}3TlCh4D`Wq} z#oxxF@GI#SBqU>t|HGBB_c+z=UKbB$$9VMbyV#M!{F{B`fBpF99Xt!^UdS>w%S)V$ z&F@8ghItl#UhMjJX(tyTOZ+yHxzrrM+XFbueH@>V{(XIbeq#Wq%oxZ269L@G{C~P$ zp2ERFhX%Z4IDg;p_!RUUG%%xKq+j=C-)ieTO7`t{IGYPreUYKxuW+p&{*c18zWU<| zXB`qg(vC1bT0i_*Mb9=$=)dT2(rbM?_j}MVo?34&YiEdSz5RcY7>0bbKKxq-wR|-F z|2W*I|7n2!7Yf(u{dItk%nLA{EPs;TKPY;w$CmvTq}TZ``yqUMxoe>Pe3tzXq-Pr@ z;kGM!ozFcECq4T>q1XE%^!|_Q6}{Hm>-h++=a+pRjOQ4~VBMW-$F8?8KXu-?$6y(k z21F^5<_~^(4iuK>Bp*v&It8nej8xIXHB3hRvNCz`F4!mX=9W3zk{{f<-FS=tStqd6 z&4bC@vxS(?XK&3*b5AdiH?pT4;iVjhQ$BBp9YshAv)G??P6MMUN;BU5_BkYLM~-2c z;bQl!G8~Z=MFtGX+U?Gt|6tkFhVdiMNg9NGto}vT_GQX0$4}xb?B!jaXTyQ%^8K%K z9{l{0cX__e`DdNhW}|y4(;(~;uE1GX{5+vsy~}^e=VO4y>9a2ZuBsTl8ne|s{dD=X zEuix;dcEKI_a8nj+dco=(U17=^%(g6`R?Z(y~w>imCgej3Fd+1pX3Ys)wuAbLdcvJ z$c*vB7uOmd~^d8`)YpKuIe=*v&9XQzU({-D=Nw<&H=Kj zRDLTOep@a3Sef49y6=rh3`2Td9-6T2v#o0!eN^T6@5hug!5Ds;KluGiNCs6GS6zg| zUvL9X)zYel+T4z%ncUZxU;`Hx=$6(%36{y^UX`kGdaW9B{7O}B=U#HC%Hi04e+|xLdjNIzSUkpQ}wQ@Mjn4y13hB%GgY(Xb{})zpgC%$Cie>y zg?+maj|l&vzHuJhq<(CJo%b-DJ7wC9lWv-rnG&5lW#)#G;mI}FXLVG~l*<02c_V{0 z&tBh&uUkF`n*QglzhnX;{IhmYgh?cP}ZOP^Vh55Zc*zpj6DVH#-US?laRU8y6eH`Ik6NxvXzSo}26Z6-T7 z7-`#?fBZ(`U+_i1BrdS#%`yibs?S>nA94QQ9S6qHhWb45zd9cyYw_9g-OoExPIJ?b za>gRtP_~hN`a^x*I#;02B{OCG@Rd`Mm2^j5pEtTs3iWMF%%ps76_Un2PxoQloYQOZ z^y@aAP72^$pBG1eMgUK^&P(o=HeFe060@z5ryI1xOUDY#Qrgq$!5HR5`!IEeWkSY{ zl?vD6{7*TYWsGG<=)a`s^*BFrIO%n{Y+Bpa)6_kVzW3Dfao=UPRu#^)iANf8-e2IH z;C6fb+Me=X@klnD6MS`Qe_ieX&t==q^Vs&{raN@R%j$AZ)VV{0>xPe=oyq+;n|mya zZoB`UX@$+x*vb6xUh>cM|1s0|fZcg*C%JgK84fmUPo;UfStdJlb*dgc?y~J95A~fX zxJlnRK*9?)l-zJs_NIw9PHLF4e0XxdYs;RMapv=Ni71j0;h&!*)Hj;6!d;ACA3}ZO zqpoesIFGEu499QVLVe>73DA2^_TEE%<5>Nl3Vw{2t_KWa7k^;V=C|-8@fU=Bs~;!2 zRk{q7K8)#SmWY4B)4&+MZ=`QMRNqzyk8%EA9|y+JhWa+~|8_58K3l%~c}Fj6U8cx* zj(t1R?x#Q0x5@gZGs#RDKYZm>WF_67uWyr77DWktl{69soaI9IRRhk6-`%fkbeb8! zPY&QL-*J2ruCd2Gr>4~pc2g}lxvw#Cd3R^;<#^!OKs(-Jxu@Z0W*Vf=xqu)Haei~b zmlA{_uKTozAPmcpE=Mj_W8RlpKJT<~uQ8sc3R9YqKy7DVWQKe=z`g&M*!S3*D#eCF zoNu|81m=hgdu}GWjH#C#w9jCFA$Imv9Od4&<%&%YWLVd+r z*H@G|zbsGuG*XMCtqk=Q?arV7U|G|K@gq-v95q(|p}wNa1tRj9gemct_fTJPi%Y+x zlj$E%UvY~I;Bfm2*(W0Ll&7j51`72R;{R~_ifQgcMJ~Yc_7#;b|0tJhp z=;%Hna=732uPC2iR#q5>K>N8> zp>Y9mY2%AVuFpo>o}XfR{;t!AkRH~D(0HIIjiB?(U8s#;?zM5O;|xdINNM{*ZG0BA zab~P-{8;_7jb^<3wzS>_F7cJP$h$nNoqsLMkan5#Q0AWU5P$N{`6)k5bdx?(@`?G! zZzTQ&UjU5p_sx0-`04U#F9My9(d$Q?fB)grhWZHcztUsi`{%o#cl45WnIhvNwuNkC z{Pc&$6B$?j*j8%ehp*kVopgV`KEkh!HfC}2H@1Gd#OegV9;Yj#UP$*T`TA`eVW-M6 zFGlc}vdM46ychXCf}JL|EiWwleyJ@tYX_bmp*_O)V7c{6PZ}6a{#)DEm)dfd57MT* z)RvDPD=~|Xl(t;@JonjR`z>+P&lgHt&OSbFPM>I8TTWRl+?E%XUE0>XIWK37qb)z> zNRi8b|M1*XuiyBRT%KlOfO)AcxA`Ey(uT|PrMCRYZp&Yi%cbPn=fUK1G{ObB{FJi8 zmCNBXuU`MN%H=P$<@TGWT@iSxEq58=9@2)(^QE@@$ZpGDlFN(B@4@79(+C%}=7%Ad zH#J|@)78}6>U8G$I~2>~?@*jOckZ~??bM6n2T4ntAh4+@gNBTIDh*0 zzpM{;PCjfRSU3M3oGF|fcr8Q7?Q~}c@4MIe&;8ouhar_^Sy&i7Fo@_6^(APacRvy?A@OpGsabbZ`(35t3sjGSD)ZLf)Kue5=#fcZ`=k3F zxMdQb<8>QNICp^jz|I7JNB-4N;0%LPz%TI?Vg;I!4dVYUDhs~CAL9zv?}1Yx{|!1+ z>Db8ioI|f1xd3Df29btm`u>6!hYntj1eV{g;y4o&i4{_J84H-uJW~p8GS76*B)nX3 z!%_W5UoxehE6|1~Zz!Q>nrCm`>4;pbZPIR2YJSSxWup{${^!lXGaD+vx%N z>HwY%;EMw|%Vk`A+5&iY0KYPTzb}9f2k=72A-aH-jqFPT>orz3Ha7Ql_jR=OCSc{W zhnAJN`L{i>vX@s4uk2}Uh4)4rQrpql*xuRP)XVFL8|xM|u4?UVPV_dye=~h`bY9Wj z+SJn4u`02Wmc+`-8aunNnjPk?{DEO{XC0CG!TAJXi0ifM4FOJAJ6i%5z_*5xer+2x+b$qT+ICXHsXQRS3{ihVJ`EPePA3EQ@uITl5 z+^6u@sBkB^cHaM9FLSuh{}qZ}^Pi`19sdYn(U6aef_Y!j)N)zZ<%LB@hZ;kjI&WU( zc+a#gRh@U*gjzVCY_}UjeXB5r!lm>@!zk>0c&0A*wFS9*7UaIMm;ML08o9T3jvXEy zVtWGw^8pj8JCRG>IX7IBI-zE$CbgRDU85?qtuT}Ob;jQ7UXwaDGnB;*@435)*eg6h z9Z{Y)_mniGx|{^;yxJwQa34Ge1-lA6BhLVrSQ}--x^kX74Ug=Ck)7 zn7tz(Gb5>*JcqkJE0G^>-hmzg7qSVfpLHg39F6_Nic(j1G^(XmosPb9-t#wZPEs~^jfh|;F@Z9&x{FnYalLMbcl*dH=_lCS5 z3j;)T_V7SvZQuASvjFcQy8>fQmkdb9)Y z1J6hYLuFlT(=<=rSwx$*Bt)KukbY&ZS ztZuRat!QoSh}t`wT3TD8%iEfwrl`58y*=vfjLuuSc;S*v)Y)C&*xlLJ+t$$>>)~F~j*f|mNfX3xRbLW~aBp;EFAdPi5^&&Wx4NXW{bLXlK zUPFd_YVQLFlYc&JlYYXPC(MpcIP)z2+Mly&J^O@F;T|miTi15AHuoYxWWwsE%Uh8r z9erz7AZeW|BSyHh10SR(s;OHL_4GBbF656&4IO9T58tz4@zPpEJJWeZ>*cN8vrWdh z?;Fo}Wg!!0NX%V+#YP0t@`}c&GS!VuFm2s7O)FZXmbS~=Y{^-1WrQ$_BiGd2+t<_{ zA2+0DMs&sMHYD2>RV1nd<*gmUm;@`r!gfX1Thx{HFK(RICR%JSzy z*JYPn8`anIx9Hk^-w032L!tG0CNCTtd9DW&o1^$bS3%{=jw6uiihbE2xIRCPC`paI#B>m!_ zV^P}mxB#z-N)B3K(&o4DBmMG@8iGRU4=9RcOQuA2r!grrB z@8r|23iyA&^Pl(VEWUq^=e#U3l;ZyikAd%>?|$CV%X+I6N<8S8^Of^Ie)<{BxbT-V zVlWTcNB-9jKkwjKNO$Dv&YVKgi|Zt_s=XMr!^Y8-Floq25^pXhcXJ3wB`Up-@p?z^ zhkTsFt35t%G4FnBBqLZ8+w|{G4NcOA_xW zK*m;Ueve8#>ZR*KN8jVozs=Dv^9t3)j{Z`Q{+$j#!NXTL{6r6DePe4adlJOC-B?P@ zxe|iOGj7d(HypJNRNDEgfctGc`D_f}n*#Vh1n_?e;Qt=LzYxIh4B$Hg_}2pXw*xqI zoklt1rpa+Z*SrL8=`weERT!)NrPYAuX0LK{qW}))1F7|3;nNI)-W|AcHGp}aZ@@Aa zU}#UYcmF_3FNYrH439Nk`u>6D)r|>gQ)90oXnjxf>h4A)80HlFFntH>A_i5)NO@*) zXWJ>#}cA^pvF}KA%za z`a2q38R(dwY;%PETZ&%mG=HG@>-^uV=ym)bSM)mnrIYs4`I|6I$d3gUZ?9CMX%$zK0yDW0R83w{l5q3KOdmqrs#D! z{91tidx~Di|9=DYzgF~`{~r{+E{93i-_e;eqvZ3k4(IosuJH2}y`E!eQ1mkueVd}^ z7*6>2DO{KH>l7bd&i_WyzgqG6q@vg1Zc+4l&fq>pKSS~PwxZYN=f{d(=l?GQ^uG_# zmoOt?n9tPMNUdJYwY{%ryJPDM|dPUx>x^fMGbpy+iz{I#M_ zDf*8E=sy*p|AM0D7*ygD!A`^c;lCK$ofj4#A8M{;?kV%feYVFf?wc{pvfo_b|<*Upa%&`2Z>`VxB)ho8k*j44-|s@$Pv$ zjiCAO`}=r&%;Ao_8DdiY&Uzg;6aR3yNQ9KZgweNl=attBmu8`mty>7C8MM+kixk?| z=`*Gq{VWb_Th+Tdx~jFibB9uu#dQnMpOxrnTGN`K-V*%lJ0bQ#%}KvT z!Pee>Mg-+&XU9n$eNYN_Id`~;K5-5+m+dKyf37vxe#!c;5>}?#8%i2(oH#t`ZBv$S znB0HVbFuF0NY;g!JYYsSwqlcvTo*g&*-R>m$U4v^4TeJG<}y78ie0L+HU7Nx%4S08YD~+&vDc z6px;NfkV2mM=7YlNIoV!%XZ`UB~Ru?u}cQ((^l^D6)^Mdl`$1;)Nx+$$2 zl6LQ0;C|f6Z&?6e9>7^o;`nq1@U;Q_`T(8_;Q0<%majn@W7IQ7lVg-Po^HlybLQp! z1s1yHFMH|jMt3dLxOVO`%(vp8B6mGxGZiz?&j4s!1*;rkWb_?~vT67DHAI#@lOPP+ zc|BJ7TZ39$k4Zimz&{hf_b6PCB_4J-n+qMEM-)BVOo`_kTth&5t?P*#&iLyw#tDjE z>w4xWoOMq4%XyCEqsJax=0n49^;lHyIw!pz8|Za*I$d&~GU;`?niYSYuGJ3r)77cy zwGQRI3fFwr1^B#A(I*in$%hXrob^ZWO#wdtpy+iz|Fgn%KHsYN=zRX7qSrcR|HZ6mZD}p+ zUX2R-R|9*VDoz{!o~O-907#pFWzQ4ND$e}|1IA%C1sK~HY08~cEL)(eZfBB;R`6BU z<(}S4AA?(S+mi#Ige~`o>c| z!r+3ug&?wHK6@x~DTjwsIWnBakzvG<;Y@C-GWUdT#~97Tk>kgMla3%PTq&AnM61?a zJ^4V?`*+1*e~8PF_PyW48Sd-OL7cC^7;d<4Ld`6@j1Mt1R3lA=v0YXF0c6L|!MzsO zALM>i1$vi_$$`^AS2cVw7B-oWV05Y~xn{-T$g4n97^4>D*^^j&rv29Bo>JZiAB3}w zUSS=Ui{V#fogHGuDDC@!8;dfQDmGQaOL2?pkFqj6AKaS7ddTG9HSk}xt`d3BV>l&7 z{@XrlXFUme^I58g=bdbFKJ-<9Bc?uKa)J5bOJ8X^!kDyMtNHcipU~J*#4~B**^V|T9lz}wF!oj2 z`0umfNS>G22e5Z{fEYm;@_ud8ffHM>+F7TdmNA^u`-f=fzq(}VbE<8J6ss{ zH#E#Yek1WO_#$8u7g+Nqav5@{vEMTIi1T0JXQ<=s(}u==;(v8MM%Lo{=ewVGq}<~Q zr1ZV)@A>bipZ#=PRBv&F{usm$AKqgP>HZvJKc;7bN|7!blSb828}+!c5aj}n!FHd|~^ zi)-2MHic{1ufi2n^3nJ*g=?91Fn~+@%kQma_P>y`;%KLTSv+SU{$|yEl{BR5kzG8BA6rv1@zMf#hvR zudhiZug#qK*4|^!JgIjYod2n+-UY=Yu!DO4$aNv(Lsp>E}_XiI4<-qL55u(g=4k zetQ*^X&l4l&Lis+!*N|rzOO#s;eNlg2Y8&(Z9LsWGR>Yi&%k{DrvhWVbiJV0J^X>G zw2%C+#9x4NSbUyzTkg^?vIo=89!C5No(86>2;QubI({gbqz>e9{!fepV`$k<_<7G5 zi2t|qMH!zh-~GHJ`FfWrmCgfYGN#>6e@G_T>bm1I$V?eOeC1SRCEcGxCSfGvWCM#I z%}0@8`nAj;^^Nt+uWR(k`Vxn;9>n3)3&-K;?9qusN$NWD_-n6if4{QZUMA%_d~me7 zK0f)GbzjN&(Gb`AsEZ70amuFBhiW~i#v@11vZc${idO6?7)PH~QC3zt-u;x1szR1F z@euvYrJUo(F*Lc~vdh8*e|u^_do4`-?0$=0fg!m{~9C%o?GR={>z_{th>; z@0~N;eE=6XuDiMfx{WsvzXM&?_Uv$b35N04B%TWeZK{VM*z9Bl5`u)W}h$^9ku zQ_6-XZZK`iv(Xo-$>JmJen*pLn>FUwuVs4=J4K7e4nYT+>GmXSljv7`bE|GC}$L@vr;auPR5{#KX!2Rk+)^D)&Uy z(z@Iqs~VOrfiz%m^s31{fv&Z1jq{H3`!btq2Y-fH72M4{vv&T&X76)4`FA+(ES*RX z{HpJ*gZGhih|KQeZudnLgF(HGa*+yD0qfu5~F?Zf6r=C_hKM|Rv z;wK~nP`(u1|F=n8xcj+wN;EvVcFN4EDP>htDr=^s`;WfisQiIq|HowmlNZbnXZ-pd zk_{r)w{3L(#w#1VN|jRyn@_(V4ao*$^&gTA#J^jPm5+i%OP(RwV5TFe&-=8NQtv&D zcRx)ex%E$!4c5Bw4_7vjJs*sVHj-|^Lb8GQKU~>B?kqc8*sv}M+?cZOLyy+s?femn-M*r3ckO`6-&V?PT5}Zt7 zBGSy^-Jk>q(;6E%+f$hKojUl$+AgR!hL$F( z<~Ix`aCj`-pqNh%Tn~#qz!x#<-+yh+cun5)3-})HIxzSIc2M+Q`TBfR&H{a63)dc* zxaRH!Tbx~U18A++{%5YCmuok8UhXM)K{V*g#ANVth&wg{!^$(vC z_Du5wP|8#dz3OkOat#Bo8aWRh{d1Yp@Mq%XGRp{fIFv_YcfHCZDtyI}z2@MdbRp+$ za=%`P`$!*x-Iy6R*_0hNoov>=W$ar%-EQenO)BHaU8JzHV_Aea;91WnPu@xk3G6s> z)^I0YrtCA7JyP~*%05-uOY?TOd&J}dG+0rgq>L;_idP~%CZSS%-K)x&Z=m)UWZ1h< z1#CXcf*PJK)~hoeaqo4xZu3DMHdXXB*v%IK?EVZe@(u)=NL-8e>+p|n5H#mz8_rw2 zAivcErwyIAxN1Rdb+&5B5;=lsNo_;JqD4y~3l8PONNhZ|cFh ziOroYtqkP6Zfy973>fv`oSU|lZP@XFAgZ%VqAPGH(2O&1m<)D!nA3LTjF+CiuCC5* zoQX3>B5L{6)kIjFieraX;V>2)QdC!ixR`w>Jvg$5ykw(DWB~BR;Y95?t*95r&X5<2 zERC=KO92zv|N9&un!D?prrbKgF8#?b{CN&!eWeyW;?7esdBF^G#_zvFvVXlJeALNc z)a$U^l{!A6*E!zd%yMmxW#;R!THzyKfOez;gY_&z(o8DvIrJQs$hJkxj-65@|pR_;e_}X{9V8# zF0kg!au@!g#ty6CBhG)f^PgwvEIw^$>>&ORcMnOI6^avS7Y}wXC*t2vKgs;E$EeL!hb338h8fct$TnNGdhl*hs4I=Z2_F~ zMRD|N1NgcC&b3f+d^QH~O#$4=k9Go}EYStwv3ySX+_Je&poD#HnOWRdajKOnfs|J` zITQAZ`H9|6KFhJ9uaS;riFfl+o>q@9Cwtxrr4WYb?9D6|{G(A^qI>v|IYQpzl~?>F3Q$H1~ExCI-#C zxr}a48|@Wl@0MAl7`Jz;u(Qh?vty3rIVCS+$E!WOqjq|lo4Q-tu$B=LF&;)N=WAnk z$EsG@+Z8->=c=n#wlwuNCRR4#_{^3@vnGkDea; zK0pwL^mG$^13?&K6wn3#06`eiv$vr;&3*P^-cN>I=)dQ1;eV{_xArKUe1x9uB8|{L zeVToL#6I%4@Oj+FU4!wohYOzxDDO0kcNzXAT-(kS!hO{Bf3`g<;Js*D;RQ%tf@CrpgPvP?w zy{;G4ik?xI_$*QMk;31haLQal-=g^F@71H|nTDrbhkTWXAM48P^*-+8r1c&y<@qKL zKXW<)f%&k)S--@5Lg6Mp?t97E_;l9w@g9%<*vNAFrjI+h>IXjVcxeM zk8URyD|%htE>-lpyj`Z~PXK?3kDN=yFm-*oM)A?@ZBFq?DL!&u5&7tP^!JLMRtfi? z6t4Mv#^FAn+Z6pw#b>Lc*Y$CyqSyKJO+~NsCjw6zes1^4&AU@`<+oEFN+&vp zYxQLB5d%z{P_0gWNhbGO%*B`Gu1+1}G=qETJhWsQrq0ttlc*kll0bFoaMw|TPh9&J zGc7JU-Q2Fs(2}Ts+l1t2swdC?@64uqYbG8@T(fs)^)$As{bx)}4y=bow47GKXs$63 z2uet;9F0u)ZnC~8N|W3ht`FE@FF}Z*(msmp{X5Do*}gF|)B~+75^F*+KbU5iKbq3% z`Z4`qZcnp!DH@pt)v{W5ko)0Rm{7wBy4QVQz}YrdZHaX!tDCxU05w#XEuDQl+Z+d= zH{-BsTK{q}D*nLuI!LxX(*AH9kf@q6wSVIIQ_`>+^CHtdnmmxS?#;`5YhVn3Z9#OkV)4m)|{7W3zLl z?vZKn)6ZfW7yf=n_z}2kG2T6e_u zf%Hz)GjIHfjIG4T|HkTmDBqKw^;#S1jfwm9jPek1${W6k(;bmc>yD&-QuCzFvOV_ z!T*II4EeBb2!1O;7@z(Q3y-4T=5W&Mc&Hs3XvrQ2`bpbpA4GsD8U(AZm zmgb6%!s6aTjUmb_$A5p?Iu|E~nKl92wY}V<>h}A5wRpb|7W-m#PbT-By(Gt?h6*QW z7ZxpGH3QcFa`VqG4ACfpgY4n~&vO^mR97rCkr|WhdnHL;Z2$7%vJ>KEIym6=V=Rf?g*e8Zao8&kW$_1@MIHe42SY2Ija-R}|W0TK~-K{FXw26nTr7fHbVeTyD{@Tji<4TW*yGr-cM`rM$Hp(|YtJ8E zfaA7s*{4y0$>tVZ(s(Sd8~tIG9FkR}5W~@95l@1^v1BdoSh6B_cmA4MCRJnOH;Ti^a%kh^JJ7|lcdefi1wgpt}o0iTHG*;0Uz!;(eX!9 zLpLXvvz>ibR5534`Z%)=!JLngosxbw&&N=U|F|buy&iFE0qt50QxwdP-!6q@lx40t zmAfj~Ua;L~y{3^qHYB6ST&JZj{IV_4CM2Vb)qhAv5&zPLNtn{d$ukWH+I>BNoEy_9 z9^F&YFa8^xf7P5A%Ds-DGT>ie$|!!G&}|om8W_oE=Kpx~agmGAp=6wpK2GLJO(fKh zq+6hnj3fRJS07jAWE7d(WdFmkB>yE}SWJESmT|k?5&kV-l=0)QoQkZZJMv^4U*fh= zj$8Z1@)9TeFb^p$`{mN=<3{W0*glXC`+035^HO5w?=^1qaqitsgR*QKeo+9Y9y^YHO#r_LWsH5*$RFE zK^Wp%A9txiEw1%t%?@X?rTMQ`^ja_0ujo1Uk#N^5daa+jNzrS4--i{>IwO2Os`#+2 z5&RPY`cEnP*D3m26}^_Bzo6)~o=e8oem-nd^g18DrTA-E{6R&p^WjH|UgyKl6|VDP zpW>tQ;W0(8W%?%-y-wFNie7);Nv=U=Inn8g6us-p3}Q-j&p7mP^DD+ZHsE?lF==Bd z=;Q2}ak>1^U?z?}&g357OEOG&9~(H|Ewpd0A$1H@bos-QF<>|b>b$?qeP4l2hA-&$ z_WiBZ&vCK=hV_f)U~|($Brvk@h0pF;aZ30-($2>*X=b{e@!R{5?7P)PMtR|isl~1*?AjPfN2vCtJhnadmKyhzQyBlpvs$Eq!yzdZv$wl$2)C! zDfD=x$k|irjQVabITiWAu{f8!bGurvrqplY)pLi?+wrg+aOHVCMS%tNfTQ9y(kyyA z9HsC=)!Y4&xs7#nH%zRaGOd5o`BNgizsT0nnLJ=VIODf(A=#zUHM57Sx0@a4WLU?w znT;2=HNNaJR{tT{Mf@MG-fp#vzqD}@XU3IAk{8n3?Q#T%l6@$<_<2J9w@}!D5gF$g z*eMQ4_<~daAaQ}UU|jokDA{Kfe8l;Gg=+r_Oh?m(WFPT=h4vg17Q>DUYO0f64p(ot z$z{|_db{Ee!0+`!)Z0lr#`@&9VN6j-hNA2nM}K7M?a27S0^bY z{&c;av?HvmTJJ)cnTBnc*4t4wrXjBNcIOz>;#zNap2L0q7b<$K*J)PtT5q>n(KBu$ zOLi)HHm!nRu5h-of{U!m__M7Q{I3G^Ifs*8>+LowdM!JDNYQKk7UzL!{CxPhg-w3y zeE6KhNv~z_+ZDaehp#Aloe%daT<61A6(5}s_bYlW<9}Dt>va84(d+W_Q$?@S6)AeA zO$3Cv1YEO78PPF`Z!bGojxvl4(Fzy$EzF? z5ps%O$%z24S(A28spIZ-RQn#1Y1cZ2QYTsd8BVEV#PUsZJpPIMGU+XJj4`b9+RVla zc^0S)_IQc&8x8h{C z=UN{}v5B2bVZ9vQ#-n#L~GUrP?1{?+D%6R2+V2cYtDXTyM|1 zGZMXXaFr7FZ<;oQ=j0uO_uSp?mAh!1Q~!>sm*5_x!_<4B|AqI$8GVkwk!Fiosvwoh zZscmKH)9DnsNSr%yRBnYG=0W&bAlbNVqVp|I=ZU0yK_!riCGI*yP&?|?RG)jEF|u5 z*TIcNhWHwD&+Io{I3=Q;=0&C_GkIWBZhrlCCnQrm$chV-cIBFV0^4Z^=k+%snL^g1 zkcT#Y|2rFw z`FX;yrcsFF(>~062E`N!U+|EgOwJZLluWV;JS8nIDD(J992i3zl1aq>6`E;`e+HwP z&OG&=5^EJbE&B_G<)@!xF2C&1XT2j_&lhC^$x;;7O1dLYCUJtQ7u)f#ZyUWXjbl{K zH8MZ7Vf%2f^=+c}5I=7*7AFu2i06sMUJ@(!jAebBv}3GKej7&Cvy=Ht`91DE!%EV^g3Ptpy+kF{#oHVUH_)|=yZKn z(Q6s`i;7;S>n=sF)3sgE>+cmQdgh%N$l9%a?c>m6m7V4mpp9LRwVMfYCT*T+j028I zR9#$``)<`mb-eDSssReDrPB9$1t zFFANC`m^ltr&Eu@L*ZC#!*>h6!yOTRxFK~Q^)>J|zB34bFK)iP${c`Gb-Se;0dXdG zH&3+5?3|n;nD_K~$l)J~Ol2fNV zmVEh!)a_tWJYjzal43GpBN)0cM<>KO3^nk4bK^QX`o+;U;b(@jsWKPmx*QJeSJAc6 zWZ*m}fAGK2Ot=%_2U5416x&#^X*1c$4^?jy?V@Q0H?nep*}Kd5GeILb`Gj0<=rX6C zOuGDpmP!zaV2JgOL$O{))@43xRwgM7A=Y;mSlcL@tWvSI*YvuK-@^J_#L~UwS5-1Q z7lA4>RFhhr*$MLeH{Zg#CZ2Z=q;5yhG_W%7oRw*HR>qCS#(n7OR7OHG2!p!0w7{Ni zoUk_pLM@eq9_A_!Z2S)C;eM0>N&T2Ycn>@b*(A*$NHICd1@<{~bBaltzdM<|`wW}@ z0I^O$SYT26UVb!K3k>&l;$!V7A1s|1v<7*|@4 zh!I{`?BJ(1k-YH+h|g7Dro3BQ{ZxL{hS;O8k~0j9bC`3{#qt10O+t z@nd%}oM9I~tFU1=!)RpzGdkJfPo{RG?{>Y#az;ObHxq+=|6urLbH6|bhTBQAxl}5f zyU%9oP;Y8^Cii`bWbsWF3v$1y%VE{`kFvShsZ8#_jTign5w`i9w;-+pZ%Fa&vE-$@ zSjdwOzI4FElu7P_7nUO2bb;Rm$cj1JlJ9#PqQ^cdXWvDa*ex!#YB+BC$~M*{E&%-S0t{p)J(wtutpi0-1d=va|y^gctzMn{BY^RTzCUExwYOS};Mc()ZcevS)0RdrG zfdKWGZ}u~~Hq3I_T|~q;{jFV44;B&ejYO+$c*&`j)1D$Cz6p`d7xeDg92zUMFw8WY zSB#6XWzZpYfuz_y9~Vnw?&mG0FmcFpSRKoO5jFXOrW>J?+W0UHE^P*8&2)@RVZYSE ztf;8_VqpgB9EJ%=6@|7C>IC-Uu;>lMI_P5sDQ z@r}6F)#W)PjZJ_}DO!gp!IDkc^CANkiJ+IMR&XcHLl&x)CTxFj%wbhCG1&M`A z8yf2u*H$-HEj&M4yQJ_Ay1W}{^DpppqMLZQuy*mn+U!MDix)0xIB(I?g*CY6#|%~* z6TQuytt)Z3ct`K*L~~~kevPr|IX$ZD=;>RzvaPv|*Yn_J*A=+!2d83o^z}CN;!Mqx zdAeq650BT3nmSgsxAsIUJG&z=zcMO{|?V?Z!#CtMl9`GdGkBPp+9#cEeFMQ!3A&vav!g@Okd%H0&;>=APc?a|3^b zEMU3vwTWq9G$xO%)%;FXc3R(ne+W~f%w9Uc>|q|m@WF6O`2vGVX3X*UCC)Og&8^O# zAD$o9YnNhWP)gcyv$3l}4UvXZPneHc}AQa{eJn6`8$<2w#XVg~iVky6u`}DdambI~k^gEBIx=BrVp5{jKDf z7RFDPPumL`AEUnuoPXN2@o7VIBjSHRdxqWj&v!rX=w&0MJ(^ow#b9=_torHaxZf{( zfD)Blzy|YaFF^0r62<(I?ns&&p}v^++)y<@BV~rtIq#2=cX>tzFXW8iZ*lZ^7$dl? zhokS&ITciK_YBc<_-s)5N+yW>&!kZ|ohA}S`inWA>0INh#GEgfX8_Cj4rhF|$(olE zv(8@QZ*%xu4Z?nr!xwn?B@SQe;maM)xkznV%}a@CUp4-2hc{^u_AZCN$HOmo_%$AW zwZq@<;eTb`F|hH>dh=eA_)ibN(cxP>{AP!L#lt!F=A76)9=_SU`@K~n@y`Y?NqpF& z|Fpw5c{pF==Jcr3*JnOR|91y)zb_(>-2wc;0RE!@{%`>QO#t5?zz+m)-X9Vdf1X_# zhrc#}9~Zz+2;j2=czFOnC4kQl;OPLK3E+zYctZfcB!D*uaNd^^m!I7M{K^1+T>$6( zDslX83g90O;JkMwj?X^@a3{xOUE9jGZgaCy*=dQDoqZj=oT#kQ+=rBScLlHS1W;)J z+@93fh>eu?=r}pQ*PJL~ju7!KGBP(8nbUo76%(j&6BB3@{@1MKPlX9{ zbyNGwE`%YA{w{Cn>|KQc(-oaWTN>ANw#X!N{`w`HkT?8M`keO|8o2bpRW;wVVJY=FZe?QVMtGzQ*c?bPx_M-J{9Gh zhV)FA(6im6@zcfjhlYIS;9uy^3D95a;X==LgNFPmVhY};_@Auss}=pL6n>+k*ZJ@f zMX&SWc15rA!CY_wzJ5M@Rq@f^caP$u^WoqlqAy65 ziNsqKeVO8OdVv02ioRUYw<`MADEtaVuk)FTZW=yxd~Q(mIzAr?&~H)nIzC$!J?0Ve z`E$Rb*YWwDqSx{Hv7*=Uc{D(OjPuO=*YSC!!|9D@KrzpHa(bp?JdTqpw zieB^CtZ>ao?)hPSIMkB(Y*X}_kG{7@^Vy@~LzRW_c`U$ZqN@yiXg)7@IO9Y8lJJ?K z=yiPNDqQpFR5-^B!e^7>|3-y>4)ZfKbe@NQq5pxxPf_?Y3O`lhbDT)c_`gZvrzre5 zg`eYahI^XAKcsNoj(tq=(dFkq6ur(Lqecf`^4IzEbH#^llHN&fD8l$_oN8|xVwLz8 z`qLD>`_v>$obBO4zeMqwulO`8{B(uC+v7vtG@JydVLTbG@V`OvIYZ%pr|>fs{`mm@ zq~fpp_X)1!Wn$L0RD>rK7k4y7{=!u{7XDvt?;zMk5jm&KSkl1zFOg${$hn|`X+^I`YRN! z=|8A&T`&GMfPc&3Ea%hlFX{b(qOVf;&lLR(h5ts;pR4fwivAS}FZq9Xfnh#Z<6pu( z#^H=lO5v|j^fd~9qoUXK`UFL<>vdYu>vraCieC5ctqRxW?Mj8~?{c%k(<+`@9nN&= zdhty~ufvr)pM3fW$AAG0^G(x74)^KH1N4~y{mKCSW{+OJ*MA1+cPP9TaTWUSDO~sC zPbmC6MSmI<>@ZBP&gY8*ctm0t<^%u5U_gq2=-AhWR?Hj!T_I&Ez_batu*dnqOs+k( zr~IKT9*<_R6>EPc_eWkFvKL#kR&&{C{=$&t;BI)OSpKnoMiXLfj9s+3#XA0^$kEQsI|2?!GPxoG>r#^&0iMl0>HPMl=4FPnsdIRw zdL_cwiz^)oYh1#JDnpm1<{2>eAa`VEG62%tmR+C4>$0p_-_yTi^>%o`oacE9Ys|cC zq7m;L*U|WMm6Rj-Ps97eadu)!|53}PbZwY?`B`5!6dqYfBN8@9yBc!~mjig_&G%S9c=(g6$43baGKZ@PrU+_i1Bu=pA&8-e( zKd6mQy9|y#M*6$sz!=(>1M~A<`(Mo$Wqh`L_w$bAU2cpt)j6`sW;5)kpV<@_{yJCw zy5X*kAHH_ecGCSh=Kd(ca4t_w!NzpDftNVCXWYJ`q;YeZsOW7wH+qhYdH~M#xUNz8 zV7QX&1(@=`o}-a=g7w*NBj}6rVH{o)z%LBoiv##O0{Dsm{_X%yZ8AG=TrS(#SkRgq z<#vU09OG7Ur@fZ*8_n99wNNJaS~a$)nh_D0S@vPRJindDFw%ao8nCPje!ik-z6!q3 z;iP9-5`4MCS)N#D1@BTg+X}(2a5(wUkKn@&C#J_}H#^*?|ER**h6$hlaJbLs3yNNc zdtZS5mkMXu7XH6ge008PU9{GDMv9(k5MztOc=ps+R^qT4n6dBkS*rp}n}G9s>Unqc zRCVXfUOJl#XWj=3_tl>cvCG}1Y#n*|GS)Q~@2$^mH;xdD?EZRv4t2S#3#QIMWI@Nv z2v?)*!ba|Jwz8cg8#9-Y4!hT$lQzwXw%*n?SSV*V&lle*M@OJ@|xWJk>dmYGrLK~lU6&!tx^iRcsF|;9>Qv6Hb zM4mK0TfX~wN4ot^96H>+_N!e+ttT^O{P2}ik(G3R4w;gX2+NKv0i#Xax*V1l%80(< z_aZ*SbKo2varVF3uzeuzkF6qyQ}?3HTg;2!8vW^e?WG-Kee&Bd21!{e4!?sWlN#L}^!J!!k#_*EHl_GDqNJ*j17#KHF3+cAf&ds^nQV-DLUX_=Aj zEDhT#ExV-&!VuRo+W7_@&7a?ihV**gxY?kVUdzIi{b@-5TKtR5_#T2VY&*29y4Ii; zXB`mwYaC8KY&!)Xa5(vJ%qn=!;iT8|t{WXrdYx|{QuI1q|EB0!hlKyFie9Jdi;7;S z>n?@sbZu9Bbh`da(d#kFHx#{2*8_@Pr|Tg_uhSJNdfk3Q24BDJyI=0Lrz#cOv)iFNr4F?>^(b#+-d&e_oC?)FS;*%5vGe|xD3PekJ+PNP zvE{ys=R$rgwH9b*=+mincxHz_nObk2pH6Kw&(EhendhCU&3IyyKAGU`s&xq%t&%ld zYwRBITJ976B625#4Lccl$PSwZncJJzy%DduN1&EwPMOP+!wXpeeGck8kW;XW|v$;wXxkl#6GTetvq(-H0<_!&&B+3GA9>;U zgB#FQb6aT_Vv^rEI*?jz_}!dZW}YTn8Q(Oia=*bzp>pN`bm(0snRl>Hv{!JuWZPst zgaGa^+rivksKN;f)6vo8BW=Q{x}B6;;3c2EcWJ-H)LUkQ&TNy@8EpW>P-9ydIpcsB z>gc(TW1O}u2a)y_$LU}@@P32lsjye9IIgjKMWM&bH6W?DI6nVGGWM2^7x2{(2R3;sM*w6 zgPp^!#Oj!_rcBF64LeUOgYgQ-#~gYP7Zp?S*&dvL;*mchf;Cm*LfOvb5+kzP6jP~1 zrevXtx=)L}`o^D0o;o7p=cY9==Vzo%y$2IrRN^Y=DAt!AigiTRxB9Hv2go`> z_?p<7J(bIA&`r^Sl`Re7!5;1KEAMEB8f>=axej~qsmylY2aN^0WPxL!Hj5Z`Qx2qN zf)yAGeZstgV1F_Fqe4Fw1U4+5kzi0z-)^bxQ4TB~hIb`slQ+&q>ByhvKncg5Wx(?p z?!=oq%V9HWLH;aRm{iI;#M=89b=qE0&bm_dhJ5HcPgT+)TM4 zzZW^bt=S}ci_W`OfN&$X|Dz$hGZkUPk+*FV-Y4b+NRH^_`T?h zx^u?BxE5$xeCfOg;y#)3i~&PNhXNS`Ft7><<=s}6Vy1xU*JlEFG!uqwV(a$%Gd(U) z&6H#&qOoN8m>RJSr59d{8L3FS>@h^8h0t)k1=%=>DKmU?ijK^`G6S0q3w6o@XPinIYB@EY%q?qHJ0Dr^Ur6GQ5jSNh3aTHp+2k2%SN`h;48!=0J*VhU}cToy5@1#!>H_uV;8Wf3MC1 zU~vhCS7yS?rXt3SfuFnX{_c(&mGFWfuUIV`AZaC_D5E_Cb_pFx$ul_#xi zTie0!e6*jQvH;-FSaogH`m*;&`J4S_}P3`s77e*~jy-iVf>wEgz zx{=J@&ZxO_O;=xUYt*~CHR|l*;E3Zd=*LK)laqw%>!o zY{5rzFzJYhV~>!F@FAkx+q$+l9}5>*7tJe844H^R?3z1~b8Q`#DRb=LkwYXpqSiJL zbw|xj$h)|FP+uya9al8j+-UD?V$LGBn%djvpkyaTmEWkTr>C>It*IAuS0E@8rMepA zVM{CNtJ-@yXXC?|!X91L+TGFG9^uHzwho@-%=nMaQja4EP%73mT^V(>A{hJKZQN|6 z5YF>;hC&Kq$-1OlC{SK7Jo$#Bnx@=Zb<@NRCH+UsTK?x@Zt93UGr{BuvPF!qPkjR% zAOVju5u{9-wN9Cd7TUC{r3Nj`ogD9Qwzt~s<+p&L-b@=mEDqAi)Aw%_hR*F^{>$Mw z0ssCSllcFg_Uvd0(GN`;|8f5JGr=%h*`X*S=@8E@U7k>0cIKceg3($MD zL@~dlJCf$OsQ2gD1(58Fkut+<3ZI!ERE09e`bs|1jtE7$!wqx%2!5)=GQ z!*6i-`#gMu!{6`WA8`0bJbaVG|JlR;-r=9~@K2ie(ckx99sTz``dc0T6A!=5;nKc| z^OqdHR{;0i=I}>6e5ZLoDxudT5&F8pOA=o(&%)2Q9B%m)aN6SLkiQ39uN#zp`p3Yf zZqcupCt-=h4+QX|Q2yfRrv&iV1n@Tm@aX~k!~h;TW1%uYpAO*TJxk%@0H4MHzA}J! z1n|oP__YCieE{DWz&8c(%>n$D0RHa*{Idc4wg66DLtMGq7QlA}aH<^R_&gB6|0jU| zEP(F|;Ex4x4x~7_s?L-+wQ#1yX@%n?=AXh9vGe&;Va}A`QS%s~<6oCtFegm=1x zSw(Bkj0m1CQG9*`Pn0m{P1w^VDh&Gy!`~b+QDMj{>~RytM^e~yjd7_ij-D{O1UVtX z9u0xvcVXd!cNj%}6)y(l-8e_0wYRwmXH&=`Uw0t^&x&YX4cBg57X)2J{;UXhghk<~ z3pw0k+=p7Y^CsdBtdK)3+<6!7yb5c2CM7w98t8_d1+1CS_s42OUoOGKJfI z(#oWiE2WIv{>|d_BS!iWVw9nT|2>X?;c9xe-!y^?y{yUe@p+D(JSy-n^yeykuEOgS zf5uxC{Mz6}?^qGpy)ORrEJ2ddjZC=L?GdG==X_ z^g7@6D*8%A|44wogb9L?{IqY-H7K0b0Y{9hEG*C_ly6t4MyS@Gf2gYe%Gp#P?#KU>j1 z7@+@!qSyR?qv$ayk`H&k!gV~4cA3Sz)O@BmoZdA38x*~c=X6C+nN!j`ThX7R@VSa! zw+<;}MX&Si z$BJIp)4ht`SrJMi@oRR=#K+0$)7(edL5snQzjdi{OxP`LiSI|6)uqwuT>_l+;Z3k>r|<23>N5{2t> z+a17j0erK<7a(l;E?X47P~kfjuIcwET+=_Ia7{mvYp-CKUQIt$;hYPR_~^4hG=7?+ zXF1XB?LrTSvoR|b|9T+8zemx}QusBBUf0I~MSr5A|7%6B<+@FZUf0uqQuNdfOME`9 z=-;aF+Z4T)1HY{3wH&xp(Q7&I+X`Q-`2SAvVSc*moG5Vu9=}(OqJNFUCI5wfUVy$O zK;IXjzcE1n4*~iJaid{;_%8-(i;jxsajbQ(9RJxN>)hCnVWv&Mg|kEUaKZcD+*i4} z9cPEMV|9D~FK5=}{#cj$T_%5QNMD64w_!K7mptqu=iK+O65G6wBH)tvOH-vhnPVys z<(S4pIU?*wow*&}v6f_EMKu|X?JSNfNqE5xllx2Rr<4s(wBr18un+S{I*Y@kndx>$ zbS&~td7tIpHyinpU^d#vxX2}B12sGB9pWK)W#2AyJ~Wm&Fu&YxFB``h4;xj0X%i27#shbgVQbkR^2=P! zkzFme+s))2ugiUVFUifB4>!TWGaoJ(b>>3@&wTh1?>V)rVTWn}xFff6lg%AnSj>EB zYAU;5^t>&u=au!gHVnIi#rbm(2Titz*Z98A7VlFVum6!wd-elMOmm`x3s8^zvmc&j zR@C-SUN)s{!$e*uN%I`Y97pom4<-+6%FVCej)Y{8Qa7GVyL!O(fbDvz<0XCQ@ecR< zkuw9G1=|E|LNdr${fA@_@y{`cHWDp)rr}6?g(iZX^V~FStF@8zi~j~V(yp2dL(chR zno9e~|B8PB7Qy1@3EeVoyd?R|{HItW{sn&*Fo_GS1>+)gC>drIe8l;Gg`XhD*{2Q4 zFwXxKg%}x|@1O5+K}~fs@Zp~Qu+C-F`a^{8Ip<#)uOm-}@g-^--MDo-EH82E$N0U7 z&oIxz&ufhJ$UXZ(+A-EAzYSy5DXYfe7X|Ql2JqGZ-VwlAzT?8ZE`W=amY3Qfy4j@> z6ynTE39|^pEWMbQr%sIZ><2B<9qjA}*Swgz$EIFnt`zJvY?Ji7ca=dcuJuey6#i=1 zg%8^$8rE&ipY06|`LoOkeLq1M(o-%MTH3_a*Xi1>=(Q}oOVR6eeM8afbUmPOovw!z zADynBDEcJq690!4y-wF7ie9Jdw~Ah;D^m2#3o($*d&Z*=t0J9FLLD3H8_mJax;5p->DSUP68)Og6`MPw+u@LGEBc|W&Lis?i&Uw57uhN#+fG&G z&v`Kqwk_Js#tV5)(je?(^&gUL#lJ5NNVMb`(yvW(1nf(-k@O3ehQ&`4-S)VEC7+mo z6xYPR;ERAsTwu+cdIug#HeCiEasF4tfibip*;M?m&d11Fe71boZJUr!btqZ z(>?r!d)7`DXp>dE9m3! zcG&v36|H6oYDZU7cMt9~gGuoRhILZQ03w62tg;SDUoYj0^jfxAgLfL@S|)j~L2a4W zd9_u+uP}x?b6Ai_z!JjiPxK73EP>UPcWbuEjfb z-n=NPcuAl4Z0Yk@Kwr}5DFq(JUES*Sh&#(w#=)i{;m2GKM*R%wg#BE^q3N zS>G0r&F7Y#HtxChQl%hCo9`!c?fzM==J-}zh-J=nH3z!lEZ6n$lF2osO6zjpsLkE8 zmmHv$E4M1XWmNGkr;2YiReW8%RcdW^=+4wSkl_$l`liaS25(m1mmO|NO*P6q-mPWN zWRZoJ#JiOG z!>o19=AM!`VDUf}364hTAxD1iowarrVxG8*GLQ?-09XpRB?30;z^=mKT>JhJ?$AeG zRJB;{;F9_O3u_lItj)rqa0C@-X&P`!4+>9P6Aw?Cfunu;+FQ(NNjQGV9M6PfkIYd% z?sy;GvoZ(%Li)}W-2Oj%-vVD(Rpot4(-Nf98>DJQkOPg7LaBMRO$6cIHYqodK5SEH zrO>8H+D6i(qeaw7C}IZ` zDvEsTzxP`AuDkEqgEae z2GMa!LCP8Bj~XoT1^12d%bE|v^`ovLo{|?jO@*7n40XEe()xS?i9b@GU@P~7-obL9 zy+&GY{!vX;6G2xt#JK+6DgYl{`JLOTOVGWM`cYx^`}Y!K-IkKxo`jA4qmM3Z?BD9u z?6q1j4hVYGKONq0F8Cp-8bpy1m8QUE`hM=>&6i zXPddYVjt7qZ1LpIL~_XPk6_95_Guw=bhR(R5unk;y~yUF_#OJnYn-QhCHZ(#?ys^( z8)KLC{o*~v`|5^LwuNF`Y|vkLT??5|Y)PLjFY{$xzHVAm zn5S!xqWg!Mthq)ci{Rg^$mc7hj@E#l@+_7uaXZ zuYHZSd?7!#k=pVnDLp8%;wbqR%xB9>{E^!76WL7M%5tDxLSCf&r2e6rx^)M#?O?(I zT&Up6uWn_Wg6@rE%R{)M*}sqXP6yaOu-W;wPu+rk0FHKEhrnEni6k^g=O19)+Vtt0 zXPMJ%+y8@1A7)pF+4z-2uWfvz;|W8@Qy34QEf2jAM!&*?f6Rl!Mh)Y$$%Ak4;9_s5 zW_yr1ZYJ)gS5z|#q1mO*Ft^uC<|T8U#@lo4{0DU|8@Z8;0sSN3^+TNy+pGj21?X{Y zd&doGacyH?s&H*%`{wgDDSB;V_c9K7v@ft#(Q6y{7Dcapfln!1+vNYC_-NbsbBbQu z#$QzQ+BW`*qSvNZ!q9kai zw~2Mh|EN#a6c^PdA07l7>JzWDg8-{B2tZx`&FK37a`9%mS>ON7VpK*91#G7y4F!M^ z?dK+jI>rHl)Hp!Qu=I`t&@LQ26!05ONX~>a6hK1?i!&&!^&d7EK$}<4++t(V$cVsy zr$-9vidG6)l0jg(OuXj z7&n=01ny2jQvGf>pEwy_DrMLagt(bG+PfCP<5%B1f1C5uV8 zlOZ65T~K1Y$HERXG=yOybL(yAQ<}2itmEL?Kd>2HKM!>K(J)b%&o^<2`dkQ*0^UA^ zGw2_<6fZD@0tQ^(?)4O+1y47=j0?N;?zPXSl=urEj0%tyL5?v#cYVs`EReLBh=U;c zm-s%Paxn`UGqKV?5?_#cbmHa-_X0R;6r`L{{ul+2_=5Y!hi+x2BlRi26ebj4s0gpnizq@duf}6g&m2nEXH2kc>M__O_!4EkIi`Q&=5&nlIn$^;3-eiL(=F|@ivFBSxSJ-pG<)zi58ma$ zVV{KY|F{Rg$%B8wgMY?@f6jw{$%B8*gWu`Fjjv2j1dn6UI^^c-)>3%I=FIra#(Oq{ zS;lcrFB)#v39n`*uWf)!Rsm0~-o5%tvM*?z@0RX0U8~Hx-&p=z2D)S!aLN~gtzTAG zL-&dg_SfdF)nVGlyM=MQkJ^{>`LwqwdhN^Ip>VX-lJ55zhwelgfvFzX@jq43 z|AV5}KJdRN`asctSeR_uF`@&Wz3LC%d zdm_4}mlDDF>iO>YDn5rUj3;;1B?ryM@Up|T@vx0*I`sE?zt}XMIi1pwa!*9o`Orsb zTr_%WO!^p@Am?$}p%ZvqwW*ojYRbUWZ~NogS3ci&KAZ{) zi}^i)D}mxH1V}-AFQ4zb6vQC`IzWdhbOD}d|8&STei=nVQr1>ZbCCE8(vUe5vE&#d zG%Wt@Ofb^%RN2R(%1K|!PvCiU;+6^S-3A3pLCP8BpO5bw@N+}Eri0{LuvK*8Vz^hX z^rO(?=+gRpUx`0b-&fX4*W;;3OUh5m#pnCp!GwRKg%6S6xt+R1KHo^bF9gfSmqmRE z^JP(nz+o5YfPMww{Mx5(K|cV8{is7=F2+PI&>)@L@ziXe^(>}$^$*}MAM}HSYadkf z7~ZEa9zNgnQV;zy55Cfaw|j8Z?=X2bd+@CuT--Z7p8D$RBGIsvcPO>9rMsuIoo>^Y zQ>{35b$7P4v`Zp6j;WHU{5-9W(l+eHxJdzO0(C}g%=rK*K&NS&vDKg!*W;~Q6plJ5 zeEJ!8`EOVB?@{!hSM=y75)Luk-aAMX&Sqg2Hvaw2!Ovbqp(dlz)`|C0+4-Q4Ts^ zdcP~3uM?RM=ykpVx<&wh{7ZoC-$GVV)6McpdCZyIr_@u-B%HSW_hUWr12uL* z@q<`UoK`!1xt@ksX?5{UG>h{3XHcc+8?3tIzt<%n#DHswc^EX>dcGZPU7tvev3{X= zD^X+26%`j_uD6=wcZ+w>k;YuXjK*9y(?M+W^x$AWYE-1}zG&YrD#rSOO~uWLftupg zi2=MqL~rhAx&d>Nzb8+ER%tETTT@(E3^EciNXV+H{SC#d`yP#Mc@J?+3}DSCSw(ee z@qDvu&36J5$&Ta7_g(eLS4=LMS`F&b0_x<_=$q_>s3BchWWE39;@gej#;mdgbWeZd z72q4Mj?9tWpUc-}G_1QC!@AhLl7@9V=0^MQqQz+;s`$AD#nGEvQBM8!SksE0i)1bN z8}h8`lTW|;=;9R8MAbH0qzmHe?81eG;w<#RKrIZc*+enZdDAZWPnwl_8A zKUD0di+(oE@XmmM(4?V}HKj`WDoWa^S15E%?dJ=PqA3;M_h$3m=ujKJR7zQ6$YEp6 zJg#h)0nVXFKTVp5(xc~`Ws72*c|lFuF`d`2AU=0teY~M=-rUJD{A|aVLq6KeeefCM z$E2q=1Xu?+a6ato?rd!DYHRFnX%4zOg2rHOyl!?-S3_U_HMdL+0>o``M|GnS#%&185QC7~^v{{%S6iej!983X&gzAs^1QT?4u!Ty8O3s37qL znnx#L<-gUm`ss2;`5#OF5?{*SHy&QacF#!r1TIo`lgNsr>fTke6q`k_PUvT#bx!y>90w@lQdrMuBBdQ6; z$!j=@qqDSK2|fH;A<)8TE-bprGJsZ(oXZ3T=$uXp8q?-T^$b||K`EJ;laP-!SD9q4|s6+ zx?%D>;lZEs;D0Tk{RqahaBhs~QMRRNO)Ut|-YC5Nn z&dP8;-QewO=)4kmQ+KDqXJD7|QoCO{%?>bA1o#8jjL8CKb^uQdpd0CZ%TpVbTSq#_ z=>ldq6tmQh=gZhUCk|}fNEzy(o~P7K;#BmJ58;Ob^nxBI?KP-vFYz3tuL1QL0rUa= z3;wrsj)3+xt!*NaFB{b2h!f*$)Mo_H1Fy#g1=ME*!NpeGW#JTF!`Dyp5j;+#f05_+ zjDru_KEaDd*&CogUEzVkCn@|)#zh|C^I=6_tmtbz^cO1}ZN2ch!o#Oc(L+|Dm+xSK z>2&`|@qsQA`X4DicrJnuDSFt3f*)4&`nkWP=+9L2$D?2<;BX@S3!ir}4mnE{uJ-_k zlP>gUEBeU_moW?6MjI;h=PCNL6h4b_9JKs%6up+eNzp^r8u~|At?19DYe`qe{c&5D zXRqR;`%DKEA6*WgRP?$W{vDKP(Zgny{QgqW zYx$p1^jiKuDS9pc7*-0nt@|{ijHB$e{O?xuTK+)MYx(uw;3p~h_1@rG{u;$!%YTXD zujRkoLoa)SLw@*3Qf^my=&x1$HGQ9=hp#7mZc+5Qd_JYYiU)K=e;(53Cn~8VZv3^4nLgrvX2z~JKtK`YN zA(r}3eyGt*=#V~Rjyuh8Q)J%xAgBB1gB-dm{f$fBeD61%nXxdr4&6o4Ngcq+hW4W~ zi^NPvLCz`sPkx`@hj!_rn+t9jvt)d%ckH%f2B@;V&H9c^8JLo`KhOs{`1+0x9>-Mt zevYF{6lWpB(s$wOJCgmRm^^iWF4O^f4m_0_Ft>A!@9R5~_}14zbFDW)zMO$7T&N)N1@iSB9YldskaEW5vGgzT1^4wG$vPvj zCv_0H1zSZYE{1zwax=scTv}h>k;ETq-_dQ{ceR7%_$x{ud2#cPYUGJ@4Y55ClcH+%3aJ$RP~N8eGHJbfM< zzH=CTssW~63h7`7n`dIaK}c`HMPu?KnruSRa+_>oN3g7au5IMYC?5!TZSe|!6#Y9CevomwSt|=POY3I$ydE1KsT+ zk6z;|s_-fgp9@sFx_o9UT$hjZdAQ}XK+)rU5P2?D>FV;4J`%TlEa6umB=fMi2Jy7-r{qOQB~{)7h~rqa_c}{|}#w?%sC{o&0!ZwBeDJ(M1PVMlX4s$e!vdCv*?5C(JP(B)FzVlj_#JJ7tURDPFHth6ZG_J4X9rzVt4o~#*8!aM3}3$ zPa_QRUAyGV9N#^lj_PnGUBJ#6X?(GXb-e`t+wnu8)E-j5Vp9n)g-%?VaPJ6%VtYcr z1CscHpG%mkqI6}$K|T&=lhzPjSp4TWzI$+KeKx7YZ*Um6@p0{z9ikL+{ts|`=vU<3 z&A-nkJ;?Eg%RjTvIzX=cZPKuupl-Rf%O;l|oy<($Z+p6LiCsTO+i0oxg_UDd#GYVI zFG65`eY!OF?~2OG^Z%~sFsF?}%$!?YN=lBDWXUd4c@JD&NN2mBi(bCx`8~PlJb4cc zySIqW%g7UDELWYk*c3wc55Eej8$O+vYkZ&1llUXmc{^B8$$!2&Z!70;xOcvW=v+O7 zsGs5Z?!l$?={$))Qk{1@tBC_FK)yO}E0-T^ejQx-^*wzKx;KN)8%J_#ohS80R2{w( zV6E4L`~~=-0PUvE0n({&QRG&A{>k0!9s z$CYqvQ}v|SS(Wx&rf zOV@QZt?o$8u%JDIWsU_|bzyr6mrc)qzp_D9d16M6810>MTqJ&JZE|n?lK7%{Lv8ZG zMGI+C#l)Ka=?VI7uE=aqmPn2(uI+mvx~-pL#lHtOhfYj?A5}BZ^Ga>?@2*=rYhc3E z1g-vARFix%xqsK-sRL7r68#g3A9*>^bWfspa8zR8hJ1@IDzBGP${EGN8?!W9GjT;I! zdG+h?O1dxoluv?o=J=vpj;S3#apw47=J=AE#|#u~8(lNLG(NtnX8io#V{eeIj=Xfd z>9+jyb!Jkw0{X|Z6Y=TPgcu)9-uWDdB6W^a^oP3o8+eQvimpZbk8}!glY;2bGw2*R zs}|fcLG~AsYdN}UL05z4NaIhZxJY07S#%jG0Z2jG411N9U#`*CxH941TF$@Z6Zs!Q z|8D+cgmF@ImJTxJFkD+vM^VD!-xLOh(E99RiN7Q*k~wqP;@T}c5Ds#o1RMe5KFGV9 ze_wxSA(vkTn5p2VuWn_Wf-Zl%*sVpDrN7@3Pc%D>PUSN5URXb=YZpJsQSjW|cMZ2n zJor=(9$8@<5o&SFiEk1)%@tp>Hqy4NtsALCBE9xt>NaGQv9{Y3uE+8M#>3mN5PRLz zhE-JN-)FI1J+_#U!_E_oUs{)Z#kOIK7ABuZ6V~?vO$($3tR9O$(MQJHke@`~E72`w zRAUmon~Dn~(JdWxPNzkq>|UDDZRjamxqT44YX+`-g+9WbP+RtkLs5IbW}u1Mo@cIG zMs3{`tj=9%8@iKiL-&V7)1LZ)%8%1m%th3|jZNH|7Z;h>yezzL`y6x=aSZA&}^#gu7F z#ElgJ6T(^*v&T!Lb2My;4vdmcr8Pt7n-m%+RhRV1$?G<3YRV-*+0Z|$c7x$3#%HE% z_#6jU|M_eU`IbJk<8($Utt0VAIv=qJnWeCU%Q4^ih_}NCqVP$3 zNd3C`0;zub3R~I7DuB>&MS^&$gaNL9s z5^0HJbEKX6uryXHZNz|GiHH=7Avckvk;q5Pul3W=MvE=G!-IcK;d(yeA;$5VqizVF z!-`(dQ+!d;Ya9BHieArC9L+C0_-or5->xD6$GalwMj1yt1syB+Ngn!B6}_Ivc7~$Y z^A68e^d~9)<%(XH!wf}_cTwbN@z8%v(d%-%O3|b5O!(+MK6Satw~Z(tJ#TM|;-kwg zsnXTuwq4PqeoMN4r|5M#d{)uxa`}ybM)hC7OGKIVgC2P) z(X_j!zvlWs)-~;n_t*6Pv3hUM^g}h)2O8*nrKbAfO%?Hh31!yHnowk7)KA`D(_e5s z#i6r!e?f2ck?x}Ey_+7c8MtT^MY-mo+OnNB$({VI)*d5^-)4uNkp92xnbsWgvdRB^ zU3;i^D0;Vbi~WpcMqxzs@Z;66Z(4Kj|0z%~^ZBrA)rT|r$@15^4CCDHWqpgH#Kq|aBo7xfnum)%$PXy49jPbI~> z#c(C9I-z&hsNS8Uk_9IwdUqF8k1M|J=>#ohSdd8mDuI31p0-SqKO0!hYYg_@U6>rS z9aek%ojj&TD*3Dt(z5V$9Ub}#_XAOxrh0&|k=VRhv*UI3wKbC?k=eBURuAp@MGLI0 zX>4ojXrfixXgghBpi=ECt4Z>ABW;D&I~!ZqkwIT=FmR(I((rsRI*Z2NT51Rr*Kb3*zhF8AM}1 zLE1)?KQyVt7u?ssbCA;?uFY6QJS8u5nhMW_fpph}eQl=1zdFUyp1ARG?Uo%V53|h> zcsN3m;;t1cIBSBu!>(5ukx z;y?G$IRbFJqk?aya|Gbf4T66XAO*Z`r~`t38XyJGpGg0L@1S!8(CdDde=(?~M_VoQ zUuGQi+E2bi(d&Mn?<;!LW#MzTqJOu-A5ipK{{4zx`|W|EXBA_R6`61dN7hAlr~R0`_-(XGx-T}`F3^&VHq*@R!NeZS^eM69ay+}|sID*j zdVQ=&*$U_%?T4$yV}v1?yxUXro2yM0FhhCg@!laFw@o~Qakn)p0C7mbyRE|%x&Y6S z#-C1ck(7R~=rU5s>CeZ73L?Kiu<2ZxaBn{6Uu+-bA1$cF7d%E-SXLJ^IGjyX=ZPkhx&=J)JE<|*L0yYCwC5)Xck z2dC!RG!p2Kz=>~ukD1wHhf$DBBw>DS-PUd9c7^M0;k$#sr)l@4r+#J=4iYn?| zM#%k}q}8ed#f%)e%I=%r#%*={zg9U;9*7JdMB3?<-5e|KR7*>bAAvN<&J#XiW&~ty8w}VQV3Nb!2Ws^d)^_s6= zCxGHX;P)H0HHz77Lwq)bp1Te<65RIMXG7!~A2tBwDwhQKDDh(s4q5~`#`xTgFYAac z1F;H{e~Itw*V)R7csLuz*RK;qy~PulsL)spz$B{IsIi{Wt%u=(Wv!MB&h_lJ3ij4|I&+;*&y7P5)P{5RqR! zZwG7FBY+;dOZdE3(d+pt;;Xsk@Bu}ScTxD9ulVb7o2BS=xm~2_(LXMH<|%qzZkH%} zU2c~vT$jUY#YdN0hoXlLk#xHiy)FmYlie+c&5B-^gUlCl>9;9*T@Er|2=uxfKBMS$ zIs7x@podQ=@&|N|0381kjL#Lej+lSmPL*-F^6|M?CZriN38&}n?5BAqa*?ELk#@W|1<w#eZiQ7((l_StWjhBbdt;*KXM%N(mRr0gjLM33+$( z4}I-EI}?S=Z@By$+K?Z}mA}mzmJ`SqDj}g^PagEXF-JD!mAohyZNsJB7gnC!Uq(xs z+7R#&l4@x!dG7OfsQ)W(T`PNwK!g~6=ojB$|kIx zol-}1Ve!B2GURKQ)~8b?{z%6%invh3{)R1zyu11L=~QWx-s)o+*@Q&tWC+9W4y)^H!iTSFM#z-dUZmhT4 zPxIShCpVb+?Z!&BliZD&Ow-yoV_N&!hc4jpYilQ;;o8adllRfA%gr>G{oOQ|{c&R- zU-Nj`&h4_#^hoUCtBjod^A@p(Gx9`PbL-t{gyB)Sy7!x04DP|zlRkSm*Z9!ANMG9) zNb?T-P#8{kqwR2IG7%l!4IKqKS9kgB;X%X1_IvWFIjCxFu50Mm#c<;#b2t0PrS<7< zi9b?%SakPD?O|D`Vz{;|JBJoQKHrS?aO!$2VK!( zrkGRqa3Q9yn;GXcf1M_so9atOa3PFf*trPqd~D#-7Z8A;X1rAodFj44{#rdIZ^$19 zR|op+-2(Ybj- zRCit{$`8*-U@m&xUIY786}q{I91tWuCaSK6_f?OF0S`H$JZ2vIFgM zE)?-=;qyb+xcT?>h1||?`d0A#5l}5~E;!^y0ItWLPcvvX9xx96y52P{Yh2NlZlcm_och|R ziWzzDiFAb1#vx|Ttv~U6v}j%d{Tv(p=zY9Dx`4Jg;qYS$B z&F4py@@pkJGG9NUK^}l}boI2a?a4L1&yRpkMi{Q`@c9vmko*I3b!UvQFnzd{aD?I7 z4xb zhkCd%2uT{+_z%gY#fP!S_mPBIxs!JE{$paGyLcixe*#k4qe){Af}Uof)D%yo--hDA z4vx~@Sp{_3P+XWMT0*0yE29%=!pTQ>J|B;sP*7~h(ga0l#v<4yyu>i0jh!xi^g=!cTNs4sx{qMMKD9ev^W7|s!nMq6V2nx?Mq zGMdKsy1F%yfURM7U!VpZJ?Wy^7>$R_K*})8#bKHFWnqR0i^(o#39eiy|uJOgM zadr4%PQ=ZxT+6YB=um#zMlwKxuh;S(ra z*T<%1&8_S5@OR29D)Szb9#jd&j2tmq7jIl7L2c?_BH31aIFbCJXa+A zjvB<1q91*NHZ-J-VW&P7y>SxNS^^gqL_hi{wmBs9=g}K~M=UX2Gy3smd@`dx<%lM_LcCTKNnrPhoU`6|Fo@Qx|OE( zmM(vh=s&sGEUZnf_bN zMprG#x8#RLP!f{PA0YfG5?~iaBSEfk8~mY-^pzgwqLNu)UJNR=-9s<^3E*bSPjD36 zrTd2VnR}7wO+$3T-^ZDcw^AQxNXAE1CPx?yy0!Tj;T&0Il_o~_}mFD<4=$`E;7*P0F}tH`da z^6}knu^r_IP2|ocC65RIMXM^M#Uu=+a zCoPGOZwPb{vE&$|n>csddTChQ@{(&giVfk$FXCz^mzPgoh3c5F*4V3MlL+CJD$KtS@ zGlQ*G*?ds8*;>f1UE}XNhE|TY8Q5z* zt)fURhP~7~)GbIUwvMdj;o>!1F@U4ggnp?9-=J`9ll3x=cN+N>J^`I0fIt2vG%agc zzcvpWt87~SYZ5GHnUH48B+PSE()|{_&y-LzKbHD0$h=DTGhq5Q;j^gu-)Z_Q>;Nel zB3V5YrfWmrM(@N#$3B7~6p$fQvIk=LYysfX@30AkbH|sW=i#XIH@uDmrvZtMqW87! zCU10Kg8P2>+V=hI@+3GS>NnDHb)&Cs|E?tH9Nl)v*S6;x-`97&lhZAA(iiy!hHc== zgnJXYK&1^t{!t_nU+@@Vs_N5~4Tt$ST-#VjbYbzaEJs*yVPD%Q@kiQsy_^e0`Z=Jl zkasu#zP9mJu0JSW9bEbKJ$(+kKVRD@xzrM&4a{!Skbm74$@`XX-}PkTMuzCOA6;DvCqJ(xPL+blCXh3?_8>$a&u(d#xSU_866Y3o>(S6eeZ z@9%?TEFL1nj2t0t%|vQbW@9vSd?NXWy5w)Eb)jKRYG4YA2N4IY2DK;SicJT2^n_Uj zFQ=*+amEt+P2Jp zjcv7JGWDpZ`QU&-nV?)ma{46MXB7UPcT0<45u~)N*rwq9X)Le?V{FR z9+A;h&_&ROA>i@qwx!OX*=@^Qh3D3`P(zka+cG`>@z>3&62**sS#3*>3om>BQ+g*S4tYHTpU7t@cRUqSMv;rnBI}zP3o> zkF+h?{2JS$JGlPf`RL%vukYz|(7hS`9C_dJZHr)&x$h>*1GZ8aPHhmBKH4I9G2veY z&>eS36a5khZd-J*g$=I#oHm8$*cM&Y*`02TQtNzr=4qCfYK0M4%G(V=kou%c;A&yQxJYIy%39-FkaYzo&pXjrw6| zl1BeNLPL&IcSdje38B%x$LN=vpncCrPdMJhqBiXcQ2&?`qJhd2mKIZz+?c_aA{VLj zGWjNV<4t8dld}qv*m9oG?JOLpx|HP6>C);qw8csZjXu(ZB`oi7vUS)f-II&yhd>gK zCO3i2)e9-v`^Y=nMWSJn6J;5)QS2oLh=6j#vVrJ6$SW8XXyF?mm++3&fpZQjq_E!#OR-bGt|3<Dn;8dx?QaKkjR0KNYs`C2TP(rw-QSa9o7>cq{hceQW!*{0uB#LDd;hv|Xo>0ne)^~N>`E{N3O2~@jfFj9alL0dwdwa$ zn@%0LGHL1~XyXkv*%@TLs5bjcE4Od_tU~r5+Ga#a{T!CIe6v8lHXOM4(J5j?dYiP} z8F{8`yYHK??cU1jV>!h^$hYm@X<}vn;2qFm3SB@SyZU#hCQ|2ad|%rw@!kB2?w6yl z?cUF6y7A>&j=r}0AjdD|qZ}k%xvr-ZH&3`HYdK3Bjq=Z@?Ji>7GSaqN{Bp>m1G7y* zzP4N9L%-_a#>chRaY8F=P|fEEXuI(*w8`GDMp$}U0%&EGLXRg~+yax!t zbz9hMP>XASf1L*p6t3%4Q)4F<=<4{OUA$%3wzFac{{CX6#9~H{w7)-yYg#nm`2Jbr zF2fYxn#|oW`WH^@d$jwU{)L5ok4CpXO2kCiw==r+6*{fnz3DQ&Eybbl*uAMn6G0!E zMv6AjIhK~^I@7Go#q)TR`x5;N1KQy<`qfzl)ek3by|?C=S0dL867}9$6H&tteFF1< zHS7K^T9)y{bSq*c?(Ztpm%ek!)D}dfdD%bZr4ejC4{Zy{ZytRG&oi}S zYTevR;`Mbk3+p~wJ2|p&e%-9v5{72Q7u3|vrJD^)CL8G@k-GMEjcu*XK~oFuqT1EE zu?2ghu5K}>!PSjj!6a)DX3!zQ)^>{5y@AOUqGLJy71g=4Z)=K4(6YX%rKPzm$Pz;n zS!tAbI;C7}o(4Q-({Dk?qi6Ft^P|n>>pCYIk20WtWY5)FF~Sf`-tDRRl{Q--pY3yi z)!kZFAZUA$j_6Ejd(L27z4nInCqWz%+;)Bn(SYYjWj?IZE8PA6^7-1xW-OX>huXsLg&dytltzmyBAsatmliX^!H-h>Mk z-1OD0j8o9PnQfop`Yo1cWt{XRYZD?<5Y9lHe#5#r! zI+6aRzXt6B0^Uu$N`eP;jsSYJy@DqIQgG?#SlH0xLoK2IJma9(w(f0;{@sfH>xy36 zz~5H%u*Ze}E)V^^9{PtAJ#?+`c~sFu=Lr5|MX$@}r;1+Z_XUOHof1CBvqC~S{FTDR zcSSktayUuR>vA}ianS2>I789ve!a65z0Oy;qSyJFq3CtKWZw|TulxHFieAef5FG;O z@h<_dg>p@X_f5*H^4=GBr)nr-CSmKF;2X;Q_;&JO^7(rDl+t`pd4MMP*C)HNV8JF@ zu%P#u#2}*7mi?MMm~(29gJ#}7K41(myRxL7&Pwb1yNj#p`!^NGXoM~yV~1?J4@~(- zaJUPvTs^ILFrl8-J}5F=2R5A&Nj_em{8OUomAZlR&NE=5=^kJ&5KvG<+$R{6Hq$MF zdvqglp)Ct1z(0C`&dEP|4<}?&FvLR*TkqF$GStD?JGJKgo zyU*i#Ua#u%D346qYO>olE{Kd;Uo`4{z390A6_omPh zJe7JfcXEyI^MNG3%!}vbQue-x7o!_EFBbwnmau}}?ckDsiSP4)4s-mNC%(WwALtGg zI0Y$ZT;}5gm2!bX<>(-C3+D5IX1WiABe?N>K9Iy8sSgxGW+{x+2fCeopv{I$`p1<& zeJAq_bZ=%K$Yx(G+;rYx2cgGgxjCkPVE@8*alIN_|HeebCYBgx@=q3ZByu|Qk@rOC z&on1v&3@2=$uZ0af?m)*kmxbroaZ{CcXb>1f5d|?_TbAs_-YTn)`PG2;Kr}X+L+Mq z0(m#UW*3M(ph$B|)9S{~Ww?YRBz{n&rL(iO9oMa^=yX}C{Go@n&(lQL2vA$v_Py4i z**?$TDqP#d|LVaXWZdQdn4;IV@>7al`$)f5^xD?{t)kby!6<&=kzdqh@jZ$dhdi48 zT^{zg^by|Es^mjBTLeNGcOAIV69%tkresfCr zmT?YfxP{p7O46=cLQos1J3DcQBNzhV`zo%@iQ0FXMCl9X%LA-hC+tirl=z-h;==n? zT%B(lSEmMfG6PL%Ux%``h_Xifh4F4M9=gD|KF0T{`HSz9<@>|` zo=Odwd%4E<`8*PTq&|0I+iAF^7|$7Ic!xGC4gVg<@ok3lX-?wm3_YuTnpuoP zEomEej-uD&IM;aSZ&dW!*AX8G{I!qrIYqB+@2VQPJ!28OsU-<*D;~BIC%f_EAnz^g6#&6}`@HOwsH7Ua07`kMa>kujOB? z=(YSS6up+eOVMi|AhwtyT&?W)c=3Wohw2ta(WT zHGhDwLJmut8KbdZikTsr)9naNA>5QAxGChT&{z$P%al0dGCUyDMB_16+Tob~Sw;O< znvs?3DcQbXN4MTb$Lf2odzYB&Dfi~ktt*EcU$GmS8Ed{i`7Co7M1F+Zt2iOk$?O-h zNfbrL6P6l#wegjwhZ$e_l^S2E`-_k9sy@aQcwa8Mp`drnN5+>99CNd&s&6wN!;}H) zF$cHr(dT2_0YybYY&_^`6sK$B`FxBWtgFC7hg^M(T;uzE42eHYCr;-gmKUeLltxR>W1F_yYTUjH1`*V;tc0N9todts4>%mX4BdfqXuO#2=}TA>S29 z{ma+Kh;jY>i;p2s${ydW<0_)Z-c&vYws$4>A{QTnHh?`UK8EzKxjx3lTn+GAYa8@( z#zC)r3>i;x>9;C+ZL|7(jDJ-0+GhO%se^AkDALB7auWj`I zRP?%h{!7v8{64SfwU6<#qSyJ=Yqje9VgYvql)uie`Rsu(l#li?XUmi ze2fIm2b;hqIn56%O8$FY@}W7&2dx#}_e6Bd?Zl_|g^5a&xoAE7hT{3c`xwg+o7cdJp~+>siYy`;Ng6eMWp3CNq`|$9>h9Lzk0(BF`zZva`K$O-ssin7gRHe*V0=xec`o zso(ApKW_q4U08#D&(9qs4fJXp*3 z>0W2cRXwepEzMK$m=<=^nC>bQZ8d$Z($>D*vVPgi%aq9r*0!$CPwLhm5B zbEWin!4%YEw&mx)O>KEo2BxI!Pp-E7dbWjRj!M3^d>iW!m9#m94$@%?T@=#4>Jl)w zbB*t_QATYeAS z9kFDQ+2ymA&FW}h*V5Td4XjM0%KW0FX*G74wNt9-j-6B0MBX4ieAq(I-uya%`d(K$_HaS!v7bFUYGL_6ugig^*_(iJ z)8!!JBEWSy$agGASC_*(xgh|(_66R=SZbe38J~C{!*?i2Bwwye z{;n?hBV$$f?d*xMm3H8hYWMf zy6}?n+WOpV;H}{LI`n71j?1k^0?HB|k=x3|2tzP=wx{OT)x+NYYi4*G$Hn`BbPD+z z^&jC3`UmdXtov{?B;Z}pVG3P<=SbuGY+gwpcA^fD6+w=*e6HUs+~1EM3RU)y`jz|( z5Tg?}Pq??76P9v9`JqT9zToJ;7Fp;t6$%-2Z3LHgF~x8(FgYm<459VetP+1Un5p2h z#kE^@Am7J@aw|uG9!1;a<{$dcef9)JmUI1EfD0Ae^wq75Q_#KfY*yqpGoVbuY*V14 zQ>BF~8_>RJTW~AmXxH3#8@JB!;OPAbqd(7s&-CCIdGH7~PTYZOuX608T}PcDG?Trt zrES%^^h|e3h=SPIs9w5lE;V;;T|^xd8{$KZgI?Plc<&K_Yg+;D69RDEmW%I;x~}=R zf|vs6QJ#`+K<5ac*Y5`xMCvopVcYDgY1En{EPuy!we_=)8I^tmMn%pKefKw~Ng^=_ zLBH6W8qM^e*^k<^ubBCK5VHzsTTN=hyY1|PI{Fwh`R{{>MNM)d`LpjpRhjEVs;PdF z2KgDXtgzh%`tE2Jf|)VhZD%12felxM)aTea^;cbuh_yEtGz^UH9Ya%Gx1kXK2gaV? zNNu&rGxE*BeLsC|^{uQcw{yIF+v+IipuOf}nFg+)0 zTGp)TSl1#gvRRG8uEIeHQNa6xfVzcuPTD}|3j|azl%3$PF%W?3HW{`s0&v|XUt-W~ z{#}fNUboeOqSy7kY4wW6u9iIf<+A+ORXxaQ;}A3FF)E+J$Q@7;)RE#Fs{t-!&-^-> z*!i`2-7V|8BU77c&zH#56QPI8eiHbU0=Xo(#N~01Jcp~b={Q-_qQ`BZ425sKoVc@a|uKK-LRg4;o6oO zq6>?Elgp5=U0Pq;BJnY{qk|hC*KXN?eg{900~{It4)X5iALZgcJ49K}2h?|+hBcT-BzUD7gkzOy3k(YhXl+Pl4@y*s=1{z z4;@#X|96$L<^e>A;fH?VU&Jq|Oa3Xoh}?&GL;b*t!bJ;f`y>5R(RWu$pZra(?b}J) z)t^-}uxJ!56a6vTR;lDaX`Sf*Twhv~+*x*CVxT5AI3xQBD|3D^%0&7)y^OX^tWAgi+UigoOK1*?ngHO{{EP z*I#p70Q&mlCKA<;=yVB51>$`ssB5Wy6=~m5g6Crbb^&>ssiTCaq zmFRuCFkXEq+P8tG6cF2cP$a~OgjhP3P8O3SCyb76yPhN^@lS!o$W49nzOomH{)dTy zf_qRDDY*!Ih*Bp8i+@PRItaImxW#D}_%6CQp{9cNLAI!pBK1RVq#SKRaDWtYd7#xF118NXr=Jv)4XuPuWvl(y_~ynr*u z7i~MHcKpPF(Y3V0VnOZrk~n>|IQE7ymQ#LhoN3as8@kk%8n55-lmUs4?4{mS&Q6Sv zChvTXgWKl${JFK`3}vnXwp zpDS)D0|~mPgTxc;d^&OSgnK)3?0cOp6WlUoI`|QWpcSo7@a>0xqq$&E@zj zIi4Kc__z*Bs+22az!6}3qYg>=iOu0_bLVsU$vf;zUvT$`WbX(w&H)wJn;;XmiR{t z__+bcGZH+Ya|Gb}xl=N&tMX{`E2ihau3Vui?ihrK#K`9w7l~gwC%HF%$(-cF-0)NX z;-W-ud0J4;ZUT?xs~@CH#rr1|V_mm1NqX8^;?X$+EoecDYRMFsxp2R!J~|U0l2Pv7eXe$c>qf3gZt-stAFU~^+d%Tu?fVkReK_vweVSVAB@Yr)wA%O9Pu`d49U4WnOCL@2{)SrO zXA4OZWO+X^d5Gwqq2pdU{s}_trjsY>|1h=oPtkwno@n1jm=s9EBtSQRLYyDQ1+iFi zH%@*@Jbpm`_fV9Jso`IIkjPAX{}jsV$AtWxPL>`Znx{yZ6V9Nk#qXm+KjBomEP{!$ zq}CWcW9cI^vLvjH5Wgb6jMq9x>70WnU?0ztD~rJ5?C33*(T7=mj~XeEgP%vY{52uw z^bXW_d2&Mw08bSgFnj2j7n4BaIEaLp;yYkMJ=Pk#3vXry0L^HCq4TJ?)Y==V8y>LOTyQ=wucun1+g_Ef( zeEr(S_O8~B_Mo|CRcA{}Y7VHGMcT5evAcC$OR%D+TQ3|=Y1LuoDJ_E@bT&4(_H?D9 zt?lS)^+cgq2ft50IC^coO1dlULm5;z*?70W#@hxPZvZyl&0}iDm)H@$RbLyV86jQAV}*EaImf`_?tO@GIObPAc5wB={e zHE_2T?REi<=h{s^TQJx7Vhffte>q6}3IX^CSrOzI<8wE@tl`rPVihF+5+8ksICpKf zBF?B=-V$GqjU1nvgNzVx{P`JZy8H!RN+)ia;$8wBnH1zXp>;x;Da4 zrh=Qkx|MMXx;LIJ$_93ZqZ3M+tQ*pF^=!P!-$9XG7Mkr!C`ra z(XaC09UdHGIbnRR^Wf;dgOP500qUZtpEV=(X&bu+gqbzb%~aRv93jUk6TBR{%vqHw ztHi`E6G(Geo7W=mr_nzG)PkOKs(leW74bP<1Th7?z8ZfQzt1?}6&3n93fJ^a3Wq-` z^lKQ0JbKP!x1xv66#8ow{d*MNr|9+A(I*r=bgl6Dw4%p5BlzbPy`H=JB}K30|E8kX zb659x=pRz_I=??s^r%-N&rcP-&hIZ3z0U7*iXJwF@cF%>hprcVG}{L#f1TfVFpg+C zzY`R_&Tl|;2%zVr%r&Zgd)WTVzB#HD`H#8D_bEs)W>U3dZsbx__fIEZ=0gLsN0GNj zUf4!-I=@JM&Wq7)e@~>?;4pD3^$_npQbs!umtZgALHa*<=p8Gu|1oTLI9iX?t>=4mwYQA?z$N6FE+u?1`kYUI zSFo2r>Zo0e8+QYQcr%S}HHv(xOP?T`AJYF*^#8!2ZzEe)hf_Q6tceX=Z1D#{C?PLf zJG)EujWTwaktfQVt9PN((9Uz!l-x(g0SpPK>pGlC7if7$8eeQ*UGKqP)*dazg$iyf zKZWkOGJ$+C_qm9Th&C5=5?^rN*kO$GKb-AYLp;NZO8TMbc1Cb%eYT^-Z^($9ofi1H zWrrxMxlj&pe6%OXyPJQX?HJ?o8!rFMKI;Iv^0ytsa)P?$)-Iczzkf5^hC__7{!NsN zwwY4z3oBnUc4$@ywrK|T5T>iCry!59!-`V+ssJJPxry^t<%tJ@x*l%6cjb&}d9UwqIAm-FdwFAm_W`US zM;~gLHRJ}(Z11|{Z)LW3RbBG2(M35$`W3rjeg*a20Ek&(+iU`+DqG~a07fFUM>H00_6Lu^#1APu(2K3uR4dJ&jg)@nn-a?5La6-U!`&kolg>D>}A%)b?L>$ z=gylupH}N=h|jFAot20$prMw`U1jGjnoCP~1QCkEH)>Mrd(_XHd*Ngf3wz2owKaBi z1vCbM6+6zHbS4)1Xtn##o*Q(prYpYJ)Y0DE*xKF|*abk=V%rA9!L|;KO;{$Rqz;k< z9}Xr>4jQ{@br6iy(7+GxR!iS^)50Mu+8W!hlqEshTGzC82Xo?!>ucu*U8_5K+M2OE zh;NJs@=gj7vL&EQbenZaEc>)fB!62+Q)72abEZhh8;wOZu5Vq_vnFV4YwNh0NO+|Z ziezN=rFXOn#pf5pCloiM*Ix?xQ3*f|5EZ!V}GAEPfy^0MV#b>5K~e4>85PG>CY z^>U#pbG8j49qAo|GG$;W?T>5o`Np8C&;dt5{Hbwtj&uqEQV?6pHwM)Z?)qf;yzqm; z(ot=(~3F4>Gsz5ER*p0;BL{dr1Ad>8EZuC!ou}A0SK;$QSm6frl4z zn7sQYxqumy8O|}6 z+576+_i=0_a2}X_pT9_#!7(Gm_d$X zSt~ocy4z{63dTtLiu4v&UCWx*ti=cytbs^kS{V0{&?qv&({<^+E~HwU>x*%3~jHXhy5b-k12Yn zG{OH<;n0nOKf^fWKSklsGmdmM{b+u_T>2>EF8zBIJ#>JiEAOdGFMDNyzoxHL{PkGY z`HKIkihr%5*UxdDq7M{(i=v0l6FJu_di`9Iie8t`Hbt+?^D`d$FDQDQ-`hR(#_u8d z-16C_=%J59{s$C)T|SR0dR;z0QS^c0^BaZhdR~ABNC5}5?UL?9#v!LJw^J3puFq2y zy{^w6R`j}@>lM8&XFZ0j={r62y^6mshXF+&sC>!TFK)x+lKlQ3MX&QKW52kq<=Lg^ z^>g3HI1X@Uh5w_9UO&elD|#*eQ;I%Ne4bbIT0gv`a4qL?Y@)dDJ9r`>8b>wPO{-V6 zcCO54e4whdD$ntO#ZcHBV&-VqDve)?uZteTB;()38y3|k?^#%%e1K*cPwai=m_%}1 zadgXZRE@8_p!b#0(Jj|f%-&ZDXntqU3_CtB2wr_Vw@0_^CNkR3p!e>H8PivJ9&hh& zXi_ls6WG26TD<77tX>QO@JblA0;D=-4*m0XNw4QqS$F$K53GHq_fHd|H@-lkL~nU# zAxZWEryt!qnl5+!ih7BR!Io$u0Vp~(Jj?PHqia(i`W0@yTpvvmY5K|k5CgB@o z6AT@PjF`1&LknWdi_U$@iY}-v&ypy%Ad;hpzDs>h@?<|kgr>Y1piV!d$~ATu9-aY) zRyYrYiYk@PP%#N%@;hLJWR5l>`ne=cl0^!!e&7RiVYgd1gnP}?0$Ve)+Ki74bnkqT zi*>@D4ew73=t8=)lQe;qmbx@2>fFlO#iJq)5<5*GHeRomxZZTfc}ZqT(h7pqnUDESbrF{7y7T@jFs{ zQ=(-Oo0ma|5yc2$g(e}WTXsTb4j>eAfHvAMg>XdjvWa}CocvgXJ|)4ci;Ef-zXPVC z5*JU(zBbWYeoD90%kTqSO2yCx5E}iuzfL{y^=nhnOi3yF-oazi&uZH}ltM;9ZMzs1 z(sl>)qq%dP)RuvQ&8bH}bRH3=^-t3WR@0rgXK1{K zZiCQeh;RXkzIyF1qb~ zWKC%0V5CoLf}smv(%(DCqwEeX$7#fi%h7p`HwZmH$7P=9)2Hd^IgU=#@#}5tMF!oJ zJwx9zPmuJ3Q!jc`{A^V;)h;n=@6h?_>X{x9kaGAs6`v^w26$j0W9cHsUNCe*!1Ow9 zT7e69s9-}e^wk$rWiJK0CnYddcq)LZ--9G0?;zoJ&?a;%HKb?`hn_i-MT|Z?7RNBL z1u#%qH1uRT@uOD)FAV*j3bwx*J6eE(Ao4yy?qx6HNuS*_IPAKLmR33^}45CvvgNNn+-*w3&X?obE zY2MlNiR2@-^jUfGIg%=o{L}a8EzK55>N&|%LuTZh#B#H-I;6 zbW>O%RHai(X#q}S3?G%Bva)IAQ>!Y=E32kePoGg<8B_$pIkeDc`PB01Wu;Y>71d>B zGlBrCf0j+Fm|9v{I(>S1X=z0Ti9w`Up>*oB@@e6>vS@Pwh+jq7w4=wdbZTW;DP<^3 z_FUv~X-cP-RZOcsn*1tf%s6`44XFI8@RjD#%kQ*l`g8_8%8D8E zplJ>cWsUXew9?A*(z4QN6?pKhPiIVWZq0iYWp8v4E9T<>eLhUp0M7P(H;f z{L1obY77XUHiJmh^+e9xCh8)p+*G$y!M&bI+12;oXxFnZ=BcQh16TfhuigCR8-KX+ zb@{vU*VLX#|awDFy)a+}W18U#9F0!%r0vuFIYHFaRXrK5PXE z7sl)3vl{AV$u-@l8Y5RG{c?&N^BkR-^Dd;dhvqgcSTZ?6=z@6-Gy;Xb%Vm-7PWp^G(%iDLD}ryU<8v2A z;tOUiterJ)Zq337R#@svf0(^s_S|_53uR8p@x{+r5_{0*n z-g(xQlq|*s5Ize7n!Y2SiLc1P^Zj!ec;(SMWiNeX|v%^B*olLxpYvd69KPdEN@R1gaL;H9e&sB@f_(Ld6+ za}0pkAn|V!fRCU>kYkL`-S~$&{dWit3(E-eO8+-CCq#P&_Vx@=erJ{4UCH%!e=w%Yw3s}eER7e ze6}(lN&i!fuLdy%!9Pdmpbr32NZ3Q~*&GlGXS2r{K-dv7}pdRUfAziG0Fjs>>Mp=BLgWJ7+#-yIN+%97JKmb0zi}4Z% zKZ)^k9sE?rp_6ndW_+p!>D=y5IwmsP!KWH}t_l8;19J@O}^e2@n1m5B@n1{v{9oH4lyv*)aLh zIUR=Y_2577;Q!&lf9An|<-woz;Lm&TKM;=kvjYt(g){6SGMd^?;QJXro$=!tmnA?1 zKaufLw*QPxPI2DH_;SW4F&}p9=zA>dg;BRI%{=UEX>8s=r=``_;WM4Rk!I`Z5Jg3# zY1y(e`dKmE_=1R49%)^+j7}=5A|Jz{IznGOOeH6DTIA}E&SpU65&F=f3uk4KwRET~ z#XQ80PCA`l8fk1_)z$*EEJBNI(G}q7k?u8X$-N^+r6$#C>txcsva-kuI#kSnFy&_E zq?t2m&dSUxAS4tfRhmhbBs9*=jLI@Q+0v3*`suiv-XPDAnHieqhT&$|*qD^2b%;xI zoRrCX;88TYpa@OI>{z=YV&`P8S-+;6ret14UqPg&Yx4GaknGS0kJG*G_ZgZq-`Z{J^C*7tSYL_ur@kT{Ioz8{NHbt-J zaNVltXDIsrrRd+U@PAeGu&IRq*A%Yh{~qIzGoXK=-^)1itL6MHn$Kp&ArI0P`{+>z7oT3{ zFoG6su%rt;gMh>7^e^}+jDud6+c}CJ_r!jzRJi7IzT%_HXRe}$4wG~*Q}ntV+7*4V zqW^0}f1bjVieAh4_X_`jqW@>b2e!J%bDN@vE*Jd&D*E#k{#`|Xro!)4^t%2(rs!ca z34cAeQP)E~w-NPL==I!2&a9_k9*=zEKvAagiE?h6n?hCn-u?;!q+N#oC=?-6|T!+lj5Vx;o}ay_*Gw4^l`=i z>khr->z59Wv=N?haPe23cW~iTz!7nnN&k|s;~B^E!s#7s>b}##Z)W_x4&Fv_5CR7m zdCC~aVHW*Mx-%Slk+a6ZrQEJ`aK4OmI=G~J1LHX8{0=zulCMuXxa8{}9DECx!{;1a z()|YGIMk^8en-(yQTQ%}Bg1Cpx&ik0&{})RR*gM>4bNU*!CNLoeyhQaD#tBpbO%;ov3d&Qts^BwY9}a_FW0 zT;ajjIJn5OS>f;rh5wBT*ZSmd7>A58MgI*C{dW|u_0QcNK2Lb)f39#X&odrAqq&~q z`RaVVL*bgw1jgNbl`DGOlX9D{a6HHF^7Z8k*YwQ_2ff%u-Hd}aLH|bgU_{S)1DgVFr(0^Rvx<23R;q!S9{g)K3<@u(E z&jTL%M-{H+`H6?m^NRk1D!(r&T+36y_B)=hE}!EWmwF=Qf2zXubDXUBXnUqq(U&TD zKBVZi-56K&XDIr)ieB4|i#+rzJoHz2=+}AZuTk`8DtT^H^x7`nrs#F~+^XnxJ^zBD z*U$Ig6t17w|5beS^V;j7e^}v~|KkeBv;QppBmB(6|F?=>%ku|?V=PSGuQA6NcE;w4 zDSRB`Qm;f$o~CeJZf7e#x?YtldR?#1Q}nuC%~JHbUd>nZx?WxCp>OukZ&LJH|MxmL z${OKs6rYReTFUKv3P<0r;6on#z3%`wYujr2`5t_u2M-Jv+b-bQNLb7#!0<2qb88)3 z`scPfxb)BMaB%6LyTieye~$WzTHBYUwz&<4Tlc7ZM*i!5R;i4}j2!k`u|(f1wEe^% zx|eOfAkzKLLENErgp&7OHiT39_A6sW9@H|PMl7FJXefPt8OJkR)H+BufefDLv5+b3 zS+_Iza5+&&S94EWOKR%L+(q^E^XJjRG_?z8MH;)R%;}R(H(*Q-&6jK?KYJ>1k^_H?Ygi;GEWlvG?g-CvCOd+S$^Krr6A#!12}A z7yU8_XpTfL%KmM(eu~LE^3TETulLP`*j{KO#JIkWqf2yGF+A-0DbH|v?m={s;8U2V zwhM7D*Z97<5E6f(B*aJVax-}W6r+D&?p%l%6PmYz?n{vT3m@NH2#f_Gpq_cbV(# z{iE!Zlrd(nS{()B1sI!-nPd9L@@0oF4cmEYM2~0ahOn_+D0e-!`(=&_;~5DKe+~ikP)UMU0;B+X)E&WP z&H(692L+!==Lo=|%LKm=AO-MwH~kAf7a#@DV;+>?qR&D99)({<=Ln$J`NDHUaPhSk z&dRUoE6|Upe@Sr|B?-F2HlN2I>5ub1j!{{4%-$ zxm?@!AV+}hssm>yWlzTFW?1|xCN%GZVj%e!KH!gYtv^7H`BMm`_K^CO_yWwM6E{z| zxA`^N#ydFuk=n*zmkf%ad~{*7qwccx!P z&h6AC=-$k>G2Yj(eWk2zIwtY~b3grqb{h0y`T;oFUmXH-F(wk%Ae~#j*|zanOz+l5 zz+tvAY%*;diyo^Y+?5eLU`vJJmw51H9(+H#1(pY~JkI3u_yenFWwBWy%=ZuVNRc?Pu_@_ArT-WfO`|4V|NH=2JmT z0q>%=fr|~AZEKy)IOw%aD0&#Uwh3n_KH9cK-!KB`wGBMWpf+7?Ltex<=(SCFsiJ=m zor~?)>Y;B}^tv2+6uq{MH!6B4WL%mH6JfbQ*uwn7d88QzaNP3A0U0 z>)jv3diR5gMt2>w@iAMny#=>CnInVi?eYt1u>_{YE)Zdd$zK3@@ZI!56@FpQUZOu;>+I{1esqq66 zcu#(;sAZbBYh@h_L%KEVY2v`h`0U9*|!eUF>F>zO~uPsv|MmZ z7KbInHkv1l9aY%df4_NgV*EtB{QL*cnX~U(_Zsg12<-{S$NKjT-*=X0*!mp1rwo)Q zEz4QD%c*YNI~M(sA@_$PA;7Zbmc)L+VHbuKq-j;-Nk4#Lh2FQ2nT zm1n1EE3BuCzY>?`pXQ5HQ@8E_@_$2C$0)(Xx$%2w@W1f>-<@Lze{)sm*tXgG86y2d zwz+rA;_h7ie`=1c{g|{Tw+|CjzV94cp4(*8nG=G~4Z#n%;Xu z_zw~PK;myAKCdC3AinGwtN!1J&-w5I@i`yfAU>}Nwi2K7;XUGWK72|z=fif=;e6<9 zJ5nhxUK8wQaj6fSu5QHVbm@0RgwN@U;j=i=mp^r7=gg?DOTSJyeMTf?tuSQJF#Cgp z-+is{xmG$vnr9-;Ltn9XMBXQCUnV>@`8eJu`~==7+>u!F_9i55>5g3z$&z@#xks9; zm-pUQVX!i1K9)Qz4CmFsd6?r%3y35?Pn6|cl<2f&$LrpEPIK2SHM4uX#P-s-yf{00 z)w*QoZGX1HjknvG`UATlv;i~U_t-84dv9;`^xhaLukAeyIj^6RP4W9-)WSmhD%jkY z)-2s#mVAEULH^tOj1lcU5sO{OB(BJRB&P|wk=9Y26H7Zf4f8}U+@Pw_COHHKvtuwj zA-@1tlzh*aXpN6Hck3!X3$WbDcuS!5*H=?6!(_*>io8QIMXkq3yoTjP)?%I_;6<&& zp7#RT6h&9f{uvBBXGf|P0nGbj-^owD9bF+Gmuz2-6}7(hukF|P(EL*J#psGPxJ#5h zJ+|!OC0`3Azop0J`N_-*~a{2NpmE+>X}0k+>=he8(lpc>nlG4yo^prMtkp>%uha?Iu#7(J=D#Aq__Eg z-@^YFW>nvr?@gaW7H{lb@{MFd@-CB-XxqY=_b$}AxY`22TT1cv-sRt^Kwf|r3dELS zsyVY<L=Hy#$+kCFSq+I`%E|5f)-Py3z3%Q{~+7()6-q#_wN!dtK!n< z;a5isBVN^R>EvBMjP3)XN5v147J}meiIy%2kCJF9jCjHpfPB*(=wAKW#+v}%%U(q? zv;8$sk4p%qw#)F6?p3%CO20DJsHFBpa`7H@D~b1ke~A~#ascC#XlXLNn-h)Sc|9U# z>D#lL;&-68vWn5B?IuC1;_@gXkt~YGyt8!~_IAy%S32Y&*cotQLwHJ*bdrZ7hrJ%g zyt%r}Zv-0rYTp2jsZ3fXfy8^*dJu7;R|xB^!#;WGThc=x>}^Ki|LWQ9N#6M7`X`&|x8W*eJH%O=d|EZKLXud4Ymsdk zWg81y_F7ih{AlB`F8x@mdIYYNghvXRC2~!%ubyYshvI5#Rn9V}rlL#pYAVJ#zb&M? zn%^;OGMd2_=8c^XpsVwmPJoe`jyC~Ee;N`#H4?r{%;>ZN8ks|JwE4`Rz*ZT_z2 zkdFcyM!FwNJ#Sv5{NK~KJi8sKH?rf2*6(58v*xYPUXC5DDc8)}NuJLAMCTKk+0fpB znq@K}xiJ+-&y7ik)(4S8u9?U(ct?PTy=BfNXMB*Zba+>ErG|rM7j0XBrcltju#;^) zwpAoQv5jCvNFO=Vc=9r(%SsQI@lMwGDw?$Vp<1QdL!3xSG4eitKg`P1I){>=oyE=Nf zoL@xS7GqON5-<-}ze9Y*rVd@qZzute zQ%%CWV4>E6+aeFW-bG%+KBBuVJTsuT%P44s@mm)omVEgUJ|{1={q!A}~NKcV%`4u+_HT~W8`ecu_)wY?W+1}3I7zX9`# zQ2x=%hwx1xy7kqu@B#F7-hA6>ABUq3I`hDd(bcQboU#%9dEkPu_Vz+B-6N4Z@*M+P z)4lcn;zb8wJ<%+C0`2l-pX4*&OH9DBNgZ`%?V0~UocF5B@hy1H71(ae-c zNDhJm85F1w$#>fWybY;;()fhsBr0D<9$l=;ilc51T%VeWQ8AF8^T72Vn0YE-dwD(I z_@P}clXhiWlC9Pbb(NvomTcz|Hujx{Yc=8gMr!6DHk^ql*Sgp_UoU>k-^w?QJGn3H1C<&0F&==BYJ)mi^*e0<`8Vwqg7}C$(ILm$3SEo}Z+R zsb6{RHKVM>-oJpksGHc1^q~ z@P(J>x7O?!)mrf2b{RDa;v;MUCATi@|)TArud(c zfQ3U6t!vGl4$t;y)}2YlXZV%(*LVt)9u@IZ;DOfJ-jKGSg-0F#7sLGun%wImYkhko z0%dJQ7{i;9+4$8IDJ?&!$1Qt4bu9waVS3AgW>%XS?(|IG!Tsp8q zTT}$Ug!svlY{87Brtx(0NB#7IV&T0`N!+eUN^abCP1f;(7#hQczp>J%?~qM4Z-Xe> zb_>c2E2$!I8CE8XYo>*_3g)4s13qFam4zsD0u{ncHs-|e0{EnGff8m;C zgT~~m2fgUWXZIzqV7?N_Y=S%;t$#zvO49mZ#ppkCkMN z=TBO~UXft1x)4;O%l%RE)pnnW{z!hxD0_eO&)|6f0y0;|r$Lg{ItFDHgp^i4Ks?3r zi?I_tTFl7Ryd&DY1ZFu}s0LK1b^?*#npypRj0Xc!{i3+)@ZI(XcHxns-aguM_~1{U zpVRu+r6fMo>}sY~zPkgvdd85V)?3Z8H2(pK+l2S(eEzVF(Y6mU*~)LN&e#BGlsfxP za%*(OIk=N)M9y;4jmheE(STHk>Y%NTPvCcD`e{=v+t`wG(eO?UXJN~4t%)_d`ZAM~ zCPQ`0IoW|7CK1E(f5|sjE$gIf{)M-xl5GR><^hwrXw;Ya<3+khT+|?j&a3u}9PX(` zn^u@Ok^9J{X+u9l}t`Aau;N zllu}vcx$SsaL2uCwC!^7L&I&uRo5~2-NLetv_MObUnF}hiMAE^GLi+EGIA(FWIi{u zPCIqVE+hLpo;C8qjZB$J@qI^EA3Vk=cyvwbN=1-C`od!sR$0TCzp9{Nw0L>bn3BZeopc^!l|cgswhyjV?Q ztH;&fw#}@BD7{O)q55zkBfg*DnknbV`jfb8FuQ+er>bQ`3Ip zMsNSes}I)y%(Q=N&f?5$w7U*nOf;G{8%|!=k~ss!aC#*=B4-?*2A&sQHZVF;C!*`I z-$M%6!M~9PWBh_obvDCvlcW>rGb5KZr+td*do>Q@{*`8P)y)UtrPm=pH=Mlg`=W)r1#^U=m{^a_Y5Ye+0$D>dW&VlM%Sy3eZouYjR@5%CcPBaQDJ(*OY2<^ zW_J7JHA`BbChkN}cxk5(}oAKpIn$HT)SMy#%4d6wP4vfymMo#tlE2K z<}c>+^Zk@|$XwSx2r_4(^72G8dt zjNL}Xi1kR0oC?#)X|(NPOqOLhS&6G|ww66-S?MPgw)>*TCYQV-o#r4Bv!3mlo1C(! zco~p4M%amgPVn&;GkjO&dNzoq9z{$S;;KNn4af03?mqixcs z+5yC8(mMK&PQL7qC5)|A+kWlUgPkyR*U3`ae~OaIvZkwkO@DXVO!+g;Fx=bK%hf;P zy0azn^=9PB$i&Q*nZHC{^$%J7Tt~|uFC97`ZaWTh9e33;Sq5&i>N&*>-QEyz1xEMu z+UMBRKaiQSe}Q$6R9v0GVcoN2c;|-G(o2lh_kd~3yeRn}FGs)gy5~$3w-&->+W%wP zqe?taT8N0m@Oksp92mVs*Fw#e7>$|!Q!~wx)!qKM)1tj1+4G{*31;BVqou;4nMV06 zRz};ZHfy5W%#a-%FUw)P?Qc>NyV|c+znJ_lg@)^YUfO@#GC4oM=AS6jRWm&wggdU# z(Y74%L;L*7By4ZwOL~@WC)c`k`LmY`m=XUTcbPI5iXUVezg;HRmpLLJ^QlxQ$jIB* zHUFHczFH$Mp7#=UHSRL4sj)J%zFnr5k%_K2I3V(t)DhV7PstLkw3rBQ(2l{Z=u$74 zxrARS>^x8&tZR8bj(LlznBK!bIpwt_y837&zI9|LZyVR^s#-^PvfE)F+Q*0<9&MAi z*NZLkc6)F4plp51KC*Q36P~e=7HwN?Ltvvodq`xYXPxO~^OFUadF>_D`}x4*pOvuR zHm1}L(~0o(4%4?ZVMFTS0HIwB*YM|O_f8M5^0U?2sBHeNpzt3d|FU?e!~Z!*SWe-q zvU{h)=LQMODEz-s!cP3+oeqDqA!PKj$aUJYN?rLw_4@Jbvx>(h9r_R;KiQ`VG&u#4x9~70 z#jg<445PAc(Y@q^-UPdI#$xM8 z?h-lv9O_MoHv`tnFjuW%j&yj#B8K z4NYwW-}I;3%N89h2It8yQXuPTPIV$WY(GL{80KH^YC64HhYtGic@I9B&)RH$Y`fX( z4Vpi-&41z8zer@cFIBAZPVHrRj`Jm(jR!LM$tv?~Mjy;<^fb}8c%4b=mso~mTHF4* z&g-yRn=HpVTJDc`MgL^%D#BO(Vu~bMSH)$y?hB;z*Jd(ydZB>L%39E5^9M8LrWYZG zG9B6}6@Niu&nUeEF(t_||LKpXrOpH}bM7J&z|SCTC1VuX!}e=_N3FZP4CQYTcI`Pcw8}2wGYfvSG^c0&3}NgRq`FB zxo67tMg{ZB?zozb6=SOv3-0vnV+G|!zG*Aa`D~FBv1aScYd6M9%c5n<+go<*z{$j>xO~YD zXAGN6^N3#5&5SAc$MZ~M@kBGLZ=w}>uoGVs#zxqV#PfJ^M{vXui_?$3q-~5x0=>sR z&5t&mZSx|t`adb>CQ>HPAd8s5TwQ&KpgjhwOt2n6P?fj^yz% zFb!4RCg>3PlzJHd%z1W{#2v^5bZ1sfuDwXF>&;!($mdw0PhNcnjSDYVU! zVdi8fD0-x`uF$g+F*eEjZd-E}wKhb)Uh>U@N9>+niC$o5y7jo426UJh(vq`O^6C@` z)^Oq;OTIZ7@%bkiN7!fwdeQn1r^VvvYWb}IZ%&6ZMNN-G4bfVYeTfsSglx?Q5*b}4 z-ds(iZI_|?N>W=*)wabUr(pM5uaAKISfXtsEL(nu!^@bG4H<&IA+K0Np2f8y+Izh} zr-k}nCVJJAASw$wy8ii6uO?H z49m0M&gxRig14-M{6=S3?O8;+2Srwq$Sv?rXNqHIo18J0oScDcpwdK_9gJZ+GwT=H z0COdP-O%)o5o^{XXA0sIP|P;2Xq#+WOC*c^NQ$%oKwcGJA=RQ*HvBdJyj^+(kzIO} zD+Fz1_)vro66N|P6Ven5bO6KCQ$s1CgoLSOwLUdIm`@iYpG?T^_}?RLN(aGu#FJ8) zisIc=|IW{5vBFp>{LU7cS+FuGAgD;!Lq(lz0(zDR&bturLqvmIl&~d_nkZU zE`>K2wqF=6c7sY@bet}8^!;}3()Rw}1M`rsDARObo0@;SGMA}2UnGHwz$cJ;W8R^Kqt=@{uPcaghbmu4i?@{4kj<;|63uK!e2F$#+Fn34pOT*3R&@dg7^6Uqd4uhn> zMkyTDXW4>X3Y&K{9*Y1t#}GKL)HhA1^Gbb|Wgb^bLL%DyK897Q6rKD^@ff~bA&t5N zSIlB;+1#JA4k@tH4KqbZR{|M(>cJ+tbb}vmN|YOLP3!p2551GcIGlW`4VgI&sg}@?uD~@QJzu69kUkezq{bh%Jk87% z0uC+X#ImzdoZe+l-SBvz?TpnHfu?oc#{us#la~sqgk#FnaLMS4bj2RITV5k6S@S+ zwavI@nTP8H+|I{o9&Shd^D%wo<%kNdlaKt9@|k zh0DJ28HGdb$~Hdk6DsvE$#kh8izt z^V#@|ZJ?F7!lZ)ubhUiCwHyl@gc0Ly=jf+lx=Dlh`e~R>Y1qd~?~ZE%TL}FUWlxGG zlv=vmg`Aa4_E-^Z`-ANxZ^AWDVMlbwy3SiT-ene!>5eyRhjNAOtJX+gWzS9JA6$DjnhR$oq)5nTxR_-ObU0HC418eU>%M^cdfJJE!zt zW{zD80;Xn}NoH9Qgd0zGx%rmSfai^p6|E6=u1;b4lVR49FkYjy9jw_l+ zG99?%T7pNW;)kla5?4)*siA2B>2c-c%xGU`L_lUwE7Jv6e@J!@^5ARTc7N$UIV))_ z`UCDVEn4iIqg*l19HBJpX8$Oc9^>-Q1oiiYdIy9)L+MG<-osUsrjJ(Wu$;Vn02{;4 z>9d}zB$%=7GTdd_Hq%N@6-j+ogtq)kH7waaTaW=5sY zmt87kW6Db0Wtwt^6*~312<_<$brK;{PxN5eW_&?WELxANW>eY5z`?M3OFIWw(`BNo zjdp*nXyiz<|dSl%PGezEx?ui((7bQcg z?c7a|E!YzDzTd59werp!*ooBHPHcN9?7Yn1{oZq9YK2+H4uW-RUb+|e4Lw8#Col0n zHp1)zdc#6Gh&9PPLHB=?#@2}TJ2c+(_Q3Msm(*@oR%^~;8#29&J}}6?Rrzv!4KwW2 zRc69(3PNKhj*VNU?5S~J%CYcUO+lCtI3{h9hzW+ESV1k>ZVqPaS0Y};tW=gY@>{Qd z{nZuIHR6eO@M~PtM>xz=1ye`m1bH&&5)}_j@cY~FN8y@fzVtwE6q9G(rJi{?6EXks z7bNRpu|zLlW%ie8cne0)rq+gice;`0ZReUMgn6;fEwm|nm3wURc@ww!C-t}I%OTq@ z|Av`j$1Aw%;45$A7`V(T>Pd7z1JhGcY`)phi*dC%g?<3*%wMMJgS$z!=qPNNrS>y> zBN-(x1CcSB%Mti@!)eseChBlt}1F`||R9uT%~hPO?xjZ@N`+AYX@ z5KOy=?pue9PhAw;@Di#mOiRW3PU@zq!o7k4{-Q>Rn6Xc-O_jhpp)^=AX2?63gx9Uh zJ0M2j9S}RBtA7R94Kf2543J%n5zC@0ishr%;JxaGsXx7%;Irq^L-M!sQm>gtmob81 z?&A!9V=$P8n7k{zBtO1Ep9ed{Jljj4Q*d8}af9vQeq(w#O`m;)W0rZ*)h8N1TL%w; zDOx5_&is~*dv^0sq}?Q1&OmN#>9aIY(JqFX7`qZzF?M*L<iC6n#wT`GBF3wyY)_I-?kh5vBMNZd(X6AY7}A!sSM8`CduE& zaFy*#vCe+ySq^yUAlxD}bOuXtwY3yYPm07otu$$|Pw%}zi$*lRG;gRS?@#3QDLH%R zn0peLD^D3Rz0oI1Gx4fQ$F`dTz7x~F-r?NLgY-q}ZF2z~XEZoQ>>p&kY(}q)vdOF! zGAvI)e{A=E)6dFg!)H}onEuw( zY~7k#Z^xD_dy;K-O0^tUD42=?b^AQJp7$g7v?=N0r-YwJC%iWdq1rXon6+89=h5$? zzmfX;Ca#FZ4hDtt{sDP4QS%518GI!D7)nBdb>NC%wm+P@G@=celUt0CnIQbG} zAP1w%@5PKD9oU^^j`iYRkuMRO+Ch05T~>g$<#)2^@1t#B*w{Xhtk7))Qw8-5f~kTy zNRWP9%cFu93FcCstl8eZ5jp2n!4exyk(a1~crDkzTBCx;wGuL21#3+e6wI%JwSE;$ z%|k|HJtzK|He|H(pP0_X^ocgY_AAsoJwYlC&axIO3nKC*NLe__6F56aeD=J3B4;`! z=NXfokr__5Hwx{IFNtLKVeRKrbdLqBK?mp)v=8e@wFG$WZ6tG9pdZcfmQlemfiA9*i#em z##!MsVMA(QfY82@!oT%SAnU|Ceb)B&AR$TN%Yxo3(&1ab&sX_GHtsdF_572}>#bhk-+i?c$vde@~Eb5rwbJ?wt{FV)`DTB=VD^my%$tG5Qjj#`iPsn3JG&1Pl7kc$J}FeFXrNR2myjP~-C zCd8cVUY1&k#AGf^7j?yyCHYmb>3^z05%nuU?+?^F-6?+*%m^u|Z2K?g2dR&0Qd_f> z(Q&~(c9Zhc20Zo8KuN3*vL@_=g|vQ!FLP8?}vhM9J>=1L|%G55Qi@U z?-j;7V_@=^h6(JW%Ck<>3(7L&D@?WhRdJh~zFU)8h>c{-Lknc^kjd<$4HIlGxv&11 zjCGAnWXI#`Ph@)uXwF$5h`aRckms?wcWLZ!o{QQM&PzZtWhlPA;~oh-68#g5wD#ef zlnrO=?AII#mdB*gWw&A*JaYnjG!U7~_c9ygSO>t;vW<2&4TT<9qGBQAJ!S2ULx1bn z%M5diOery$#M@B!$?+(XofPFmb-nS)Ka^}%GIjfV15WdfhPf?w#TOt%^QVpH@MgV# zn6qzrZJaeLzHxx+jonsa%UV+Jp6z>E$o<-Sn>h>(SsYlI^Voe0TUzN;(glO9d zcBgHy*=Y+c3CU)uVmLqh5SAd>3j`*oTEaf$jkfJ0WIQX}-H=VG;zc)~ zu9;WkKl{d78Efmb3f@D}rRN&FWw#Ze8FEZ@v-jp)MfyyI@k)Jjb)eHLLya+>==A0W zRu=7x;B77N)N!%^R`_)q#qSMYGlRQ25>}-PgWe<4b=69nE`z0QAuiezk21?PMw7P% zpHqkm`Vl@LoVX&@1R~TfHT^Vd`)2fGTcXQ;1(@}tZM&Lo1Y5GwceMr^&R!kTR8%_8?_@aRj z?dRt<3M#cJxWK)aD#HcA${^7pLvdQ$BrmOY1#acAcVkd;883>13za({ndN&~vEUBC z2DPnK7nBQ4Y#F7R`6ygU^?++LGFeL%8$0%_;Rm=G3Z63Csd-_?B0eH(iZ=-7Jayr+u9ABCe<})TTe+KhX zOPAlCLrx+@#{S$uz?pr+StxQD1x_<(0<>>HxXd${^LT%5PaCESu6A7T;=(qa44J6o ztKxUS(Db+&ZMy@eOGG!~3VCdXdMUwuQGA{k3_Ha0GR|PmgRdv$@6gTD9Xg!BJl<*! z!ZqEoImS1|7bB+hMrgF{Kemuw!!^|YKO+#^zsd$`!qwO>s$Q~J#pT{60dK{`hu~pM zk7Uv#1e+cYr6ldJ1^Ag1;CDEZd6nf~j%%O>f8QgSxgv&H`jNQm9&qN7%=a-Vky6}> zD-!?Rk7UX>r6gdp1oTdD%1N-+>_;+fsYsS`8T`zO9E9t)&NiNq0SB{<4Y*pNXxq;P zOuz4c96o-RxkvhWg!9bJtZMgrE-2mSosR92>Veyf7g+>UdA^ zk3og^W=Zl&oUBtTSqKYz-!;6GRoSRS{IxH2EJYC z?UhUmG9OkwOeVhw96!NcNt)1+x;sE<@6hmp0>LIxQINl0`Dy##2o~F4f~?ba!h-Fc zckX>_urTir#?gN#EX46@@M~4R2)tVY-Y8XnMy=`Hkos%jOC9a=bvmQ0jj07e)?8(2 z)$&U9;2^U>nQ6T{&Ec1f##FDYY-Kkl$d|(*rV6K3Uk&W@wO4_~yVI7OkZEC$j?7Nb zUnWe>u9IFSWT?bbM+Euj{E&FB2yUr~PH4QdgM6OT{wlbG#onWX-bZMjq5^FSY#5^b z`2@}Mj#Sd{GWxJAkLmtyBFkX?Myq_fkNr4k(q=UY)xvbHsSj}!agF?_b7AhIg}Lhz z_-*F{av#loI``8DF;|J;l}^2-PsBAQ*9305>rGehCMPaeQ+pCiA0FC)^Ov4pf%gKD zqWA$uxg_2_k!*-}O(efW44*!T`3dO;RLq;U>~l@%jZHo^Hu-)cxmP^*=|u7igvZ#Q z)xHD7oS>m;1C4#K!b`HT1>^Mh(Mmj$-CTW7oS&aKdmhVuG?Dx;k^IKIN?kKl>WkHMDA+5*hhZHMoL_A0@LLTH*)-#NyV|kaU~Pai0#Z}1fmb4P99l2F;Z-P5F7WR zX2gz+j5@h!!srO;N6haSPK#7F;HNrkBNYv^ORMp}x^WJm8RfGg^#-YIsI0CBQa-O1 z|7TaoeHH%q@?$9(KmL^bac7JkTU1yq@k~NI;LO0kM)_A;H@CvO%=RvoxYRY4&+|Ub zM39li#a3?I_@eRo1%(AxZCv5x*w}ISY41s=ARUnt!7U!A+)?>OMJDX%u@j5&i{C;v z;Uc3Fg`-Z66^$(}iNqq~iwZ0(gyO<6B2^s8FDQtWjE{|;I3B{qlZq!4jw>)+mmzq4 z!_2ao_+RP$pIP0254ANlRguK_357^_apaWzlM7=Lkr(hOEjuSNVPfHg{E3Az{3{uo zU*uUcv9K5^vG!&76c^@C9F>SoK6ZR;=?!tEj9hua8yLl+G-l z8LO<1l{UmmV{=O9RnBRg(`v4+{@vD(r){A79qf{!jK9y_J5 zk3r{_RyCH3;CZtv%VvvGufDM}Y8qqbRaRBSs>>0+p(a+2qDDZ8E>=-~9&SziePT6r zu`*PYS>;)y=&MyRzadstURvJ}tEn!Jp(rG@5wG`uMcpO^#+s@bn^9g-Q&*15tjg-@ z%IaB2UVV9KUD<3AJ*5#^#>w|>iZE$B9M>24== zTP%I5_Z#pf=Fa>5-$+5XJjJUlULaS(n=C%w!R3&lxMKN7{JZ2c+ywbY_~Y^!?o|0_ z@yP#~-lDPq+`6MAO`;T zTnxccOo9F~516<=)Oc6@Z$?i2fGfT(81YJsK-^B3bB1tRuk@}M+f6)Xz{R~8IB-4O z;xZCuxLWU1A_I(|*U5B!@KH3~@Y8Mh`}?sKS<>I%!8N?RV1=E2)N39* zvxV87Zf3prN%Kkl+`N{$?qb4C9O1>V#s-x9mwjZ7Uv*1? zWs85YjsJD{v(xa3O~p;N_@B4&-)M;vzq}qn!)yHK0P`%hM0=Uu;N9S1WrlOPLUS<* zP-nwu1kS?6m!JZ5N5W|MCiy_ljY~eeWheB{=Xrs;OTytWYmG=+-SkVIxOEp$r0a6| zk3P%ETsMA?75p!}|1bQ;y`;YrEWOLNQ%$avdne>f3|Dczy-Nh=OAY_e4*w{N-{If` zEPnNju|`40BylI=PvV{a@+$K=HqKlkCs};pOpmYjoM!RY%ROBAr54w6RlW>$qCeEp znXh;suV2z|O&0Ix;B6MqbMRkT{A!zC)w$l{k-IX}dxzqq=aW8iEbL`w;@x?aZ zl>d~)Z*=lm4&95+x~HT^!hr>w&;POb;$yw^#%yK(z~a+wx)k4T@jQ9s3Y_Zf20hWw zvvw-Juf?Yi%H;pV;#VK##jE@y4c^61zoskK@?$2}NTi?DJKo}pt&Z{&R>#tPJ$do3 z*m?DzGV}j*#fN%!UM(F0+)Rr{hGg1bYw_3ReH?JgmuJn=F0{PW9{EC~#H*k6y3*o# z_jvX!KFC`cU1srHopQX&>UTG>rt8Ud7Wb@4<2PBI>DpnQ?e*+(R#xnp{)|^2B3H$Y zqO2eVUwnpD+TH8{7{4xNgs>6QrAtI(O@ngmTUL8`Wk818V)0l88i~kTzJ%Y$!C$nv z^b_n}v-oig;$D8gL3A#1@V6}fCkKDu;#(YC-s~$n|8VfHEM8}>Y0u7Pkl7{jS{gEU z@+uV3k@mr^o5dNE`~58Lu8-v>;{Fzk=Q;d8So~-QzsKT39o+nsAMBBSlwF7A%Qr08 zJ!~qzrewtwYc=(>|V0?)eim-i%b8_?mrf9aqxF6{yPW%$l~TFlu76di#I!b zp>&DtNlfo{2l)GL=Hqgy4sV;KzjE@{~K9{_qfdR0w`@2woh5 zpBaLeh2WJT__-nY{1ALe2)-f&UlW2~5rWGz=4|xsc z{z?e`?-2a$5d5PMe0vDq855pt`L;(0zE22#KnNZS!FvOjcDHVh*ShR7BGS*|-K#yk zz`I0-SbVz0?d&LWg2nH!c(LUds!ojuOt5&7>R9|#i+h{Teaj-%6%BoJ2jmWxP1A

b42cjM@}LjP#VvN*D@9x~4EJK*5HSSzk_Cfvjbx;vT0X%^3>5`3acn`_NEq1@RH->!$Ua7MV7tX#B|hqG{ttk1j4OnO2fNvZ!zxs$)ZAUG=mGDtsj__0!5~YUkrp zhkf_R%+iXQ+PZ0xic;*U&&2badhC%`P7}PWs@?>uX>2f|=F~>&D`%D0fn8tTFsFXj zvQZd`kaO;bE&BJu9ejyQaeXt#HDl|q_BryhbTZs^)XS*s6Z5ms-n8o;MMaW zHm7E;SOR#)40s~~6C9ssdF)0Ts1|{M*5V^Ht1A!{uB8$qxZbDAsu>2YtOB|0oY`nt za;>jMAjvm#X{@b~PgUMUGSll=dfWa5-A+WhI-H#_PWvgDuIxs*t_uX0Ft^)v<`UeC zb9GjEu-Qu+gnQNhrNxCWU8CavWpU9TO!#$#W2o?-J=|$=(UC4wb!7iToZ6}TP>*=9 zkLx=51qWYi_eb6$dxjp7>b zl_7j@J?H6g{!bABt3M1^jkm($ZvM|Foa=d#bYxFJbuJ-3*H3T#V27{q9_rw# z-^am~FY5!2SL=_wf=qEP-?s?o^8M7}Zu#yd0GyfrWc9cKO%et!f5_~Nw`#v zo?;x_?s8xRPQ1C@d8fa<{NZvu*zz^s=Gp!~PCAXy(s*+T&!{J)BRinVmjn0W#2&6E zQ;5&~Nh#r+F8Kj8acbvvw!D^-{#^KLyw?){1j277ob}s7bT$!Rp0TL@UkPWOS3`8( zCcfl_mTxz^ajEIL-#%|R*uk~l4s&qrPsTa8>YwZ2I=;)#N{iEY7ue?+zjttLNB23n zwwG5Ne5!4C?>M;fKXGu?|Hi?!A2>=TVPxkB`y54n{xSo%?PZ07PqoiI)`j4E+XoMt z4{Pmnkr56)!s^!%o(BW8KFlYa>qDEx-S&7b@$*UNHsW)8xr_KCiT?oc&m(*T@mc?` z#OHSX2Jv}5@Jss!Skp?i9ZT{n$JfQe;(oe zi7)xDZW!SO099uc>C7kmB;pqmUP64%=QD}V^Zat+b3UI-{L!R;0r5Fq7ZHC9@mCR_ z?YV^b+|U0P@!6i6h%aTJ0CfMuQ+_|_ug@E z)&JPRRsRdpXFI#@fym&reyUE?!ByvAi%Z_HorgMnwKLbjRevbqQa`mG9#8rU2p>y) zE|&=ou69l$9Zv5|hp+aWqo?Aoi7PLnRIgOBMet(KZ{Ge zBZz+x;XGa(Njf~A8A5!CL;Ks49ek~ArxP7q$FErqt~&D_T;dS7*uix^yw<_BKHTfz z+Rs1i;5yHF$H7&n+g@J$+D_Nn^9RFS+|E}E9bD%>GaOv!1JxFnbY6%*tq+Y3U*|>3 zh`*5dtqx!3Czm?7&Wq$Hjl}usvgaq{g~*J5HP{2T5MBg=+WDHr#eSaW@3FU$@%3M} z=PmXpTT(>99Sch|lflB*J+gNnU;>PVC|KcqZ}1 zPs_KSaMnMc@NwX4y5zk^;#__2H6-bBQT=O4hxKnJob~00OtR^B5Pv)fYR_iEIX_<@ z9nQ~f#AkaxB>ZI3|AurpKYMgDW}14!ItLTZI!9RC&9~viXPuFRPau2beV5`~9eIhS zIBgf2|7C=;{@H}fvm(vUh7kP=h|l%s62e*k*MxKZye>rl7UHvh2jQ&0nQ%Fip!WYQ zME@n?v;Iefv;LQabN=iam0V8evyKaUTHGy{eI34*%Q1v=yaNg6bjb@?#JT!~#OHJs z6VCcm2%<9X9r+;_ajs4c@mXgs;oOg1 z6ryu6@lCngb;=(dT-T@flFnk-rRDW#2>(Um^Sbo|;AVR3C2 z;xBF=2iNt{L4U`iD2iJAqO%AT>zP~uQK1X}m!H>1=Ex;d`NtWSL z<;D7Y5YFxBM;3R>{b=H|j{Itz>QBOr)}Ij}I-`g$acKQ1CY zPMp?H?-TZdh<_14weupvx!tV^(YcCner|XJ;cVxhNT1u|{lw>d_`<<;9e3c5y_9IW zbU(1agX_LulY@`2->bRK!F61|)#75yQp%qvi9dw!X9+)(@YhJEmhb}(zy~MCT*ov(A@Y=q{DXB6Tg`F=M&EQO(8m0 zhVZW;oYVVz!X@vtzTFw3{|xa@BRgLtobCKqh|XKYmw2`QY$u#`I{ySDI4MVtx0}V? za_>ca);WrB&ga2|iyfD;I`zb7o%0E2on;|9 zR}!Cft|6TFd2S8S=^#GqY$lv_o(s|0Mts)!knl4i>H7Rth|Ye8f&}OGKL-)cI)_`_ zE%!p=i=WP0iX2?$OY;b4`xg<;{a%a3-FUAfKI_~?zv#O4NWxjaAK|QjoWwe?W4zBr}PdJxjf^hENCR$wLWKh@3GdwHQwtio`ZOo;!pE=Bk?((pCJ59;{Tm=xIVl={2cH#-gk+A z0qN{{7(T#hdNo}qgy7{N_)@~z{*{FD{Na}t7aQ6BYl+V~Hxte}cZcY75TA866V5u% zh3I@me6dyQ!;cS_TubMh?vspiaOI!n;JQz;(!rH~y@TsM$x{xl{I?xk`?nt*k!h#$ za~)jE{dfo0^>{JioS#z&=lra&xLdxpgfD|>TL0&gj)c+oD6MpG?a$XZxbkmwaOH0f z!QXXo)%l$8L1gD{y}kSt8+rWN&*IXKIDZZzob$(f_ik{%qCfFjXBgqEQ)qEFpNoml zI#USe@nvR+P95=CXFlPq(;T963GrFy*M#%@`MMCDKN6pH%E3&L4vmm^^yoLgS|Sv*jG2Jb2Q=HzJ`S8j3vIrq4U@Y4zB&-B+{v;@;!(6 zY)>8GY|lc{;qrQj_$QJ6Cc;_&*$|z75}(tRa&S%8yQIVE+V$vkxp2ID6Mhoed7#DJ z@+u}i>r5e>^QR(2r-Aq!Z<27eheln$Zi^bjazD<1A|HQ#{ z-0ajRdp>t1ocA;LwYVGa;e;@@-FdN=M%zNr&C`qA6%WT7MJl<{4^i>JGky^6*{=`&vtNqUbD*LqRr#)#SUL} z{_NoTyyHp2rM`)txMxVe37@t8{D=6QuHBC{!2;{b{Rrp!d=TMzq<;+IqOafA?r(9y zYKT9K_`L5liugQluOa>v(pgCS8p2zN|8v6EhVZW?{#nGonQ+dB_7I&7#Lpw0#|dYh zmq>^EhZON8?-tnaJ$>ZhT2J=t2NIlcFT|gg`#~1h`mE2>dpo%5BuHl=>5O;y`kZ}^ zi`)08HaNKMZ(QKuQ|e!k}5%HO4braj8XtFep|JE!4K%j+bHT3#Po+%1nE0%7JmGB5m=K*w#AltUgtI*r zAvz7jFQt6AfN<7t4$=8_2>-W)myrG~Av*2E=Xlo<&N`bzbe<%2xd=T9m`=TqWK zS!#VdKsKk~wBG7`DemApzrt(oeEtcz)B1)t4f;5bBV#Nsan=yOnE0HoDTI$B{!G&0 zex{E2tTUhR$)vM1M92HhRmunZeUNKNhxKnFoS*C68KVCX@mXgR;l*U<(;+%95MT0C z=Uv+fXZ;TeKb7>q3eoQ}7$i8Y4_Z(5A)NIOAe{B%7I*uNqlwS;a2Vk;5Wm)|Ji@tN zjVJxN#Ggty?+=%gj>N0`HWxU!t_xZmT=U^KgmXSzPdMkpA1v?wiaw7fLmjwief{)!h_TaGgi}mh=~s{v9FwhltP5l{Pti z&Ho<_g(#e+SIaBU!F3aR1qp_^i{5aNg%RCPZgA@mXgi z;in^RwR2pE&Q#)ytvXM>i*U)ez3?aQJ_px*n-0=n37*FLA@N0jf&ION9>K_G9pt) z_YJOfaNQr+U~$Pa&Y#B|zUm(+i)T2sQ_nO1%)ynPaBv;h&LUjOUE&v4W^wu4gg-6c zO5%&3>bE$!o=e$4xZJAF-v}2SJ(u#TgX@068x|LCBk6oXIPXL5Ba{`eeQqm zB|hssM0g3s`$UM&OT=fLe-h5?k#|FM4muH$!D+qK@$NVW@9EJZBP}lZyBL3(pQncK zXAqyqyGnUJzw{QgKNLK>!{59RGk5YcL7EFjo}uT&rSH# zdY(^w@zefxjDxFwv4iXRkTVINN%}Jg?*d%g-MJQ*I640>B>vAyr-^XZxrB6hK70-F zB@T`Ecf@ZY{RfE8@jgL(w)17;&mf&`A^Z=Ce-`n-AiN9N*|h*4;N1K<*y5ex$Nl8b z2%io=E#E$*!~OPg#4jU$KH+T71k&Mro<{r}=x9FABtGYJGx0gzO9(%c?D;j}oZjn5 zpVQSI!e2*tIq7c>(fJ$kbHLYmW{PmO=Y7Jbk^Yw!7Y(*^??M1@QjVqg)AH&;IP3q! z;;zn##1}u!|1rd0Mf!CPU!T*had3TJ`CksM=Nq4KaLu1LEiSgSQoPa8_y8yA6+c}U zjBs(g&tFWq)I(h_OmT3XU(K+%X!HDP7U4Xm6M4`8LvD4IM4V zI~~62ZzY_|_dUXS-M5|ex&G`n29d!@e)7IkH^N!}0EejFa6GnV+A zpOXk@d!`c3>8%LSZy-MFTtGPMEGJy-(Q;fBqW>G>v;OsjbG!Zn;i5m)*4w*7^dBWY z>u({P`+=7UH~RK@);~h@za&2EcS^uGIH@P)_|y8ir^Q8^>%;!U7e8&+M-k5YxrEEo zT=j>C=#M2n>r5b=`~RsSI%gA~bkyrLh%fo3{lkOA=YIGt zhp+u`*Rco;=l7HL_bK*waP5arc5p4Pvn(#Qa6i1<;cGu^e-XteOzXpIgmXXqF6oG^+E4Byhoay#AGH0R?BJTu6D%$oi}9!NP7C4J62Fc3 z3y5Dq_)@}oUUV_(@Vw}^#OHK9=HNQd|G>dDy%Fhr;WQr>*!Lan?ch3I_i%8nCkH#Y z=G#ERxt{Iot_=-_Jq#SX6JeuabUKJC+l&w{>|?+b);xoow# z*uwMn?ZoHwb}j-DPV$-ivArzrruRVNi=U?J#1OoQ@Y&$2{l$c{{WC1?+Fwt6w*P#> zr;~mY>2P_q5ubH_NjQ(ESBL2Qp7>&`mgA?yzmV+t+TrUyz@DAEdM=Pu%Nd95d$^&cgCBH8&&i2jSjXZ@{&bNhXdaIXK~kUsaTJtdKFT2FM|)yu)P ze>=*-b-Wwo;9B1%IJnl&RSvHFbq=ol`1nja_1w|v4zA~prn|U3cXX+PtNpJ!xIVvl z*TL1!Bc+nT`T1sl&!WP?^?ApwA^4viT=k!EaBYuKc?e4JDnHM`mES@**TahmpAJ3k z2i96#>RK(~Hxr-dfqx*J_3sPO*%HG4JK?PVj}V>Dh%dHk{oF+w6`Wv;@u%tPVR0=l zi@W)J7V%l9oN(4TH$-P1@g)weC(8(D z{Z_)cAHF<9|9axH&aH%VIo=(j^DyyQ=P|zqxvG%3|-2+_HK z_*}1>Pt{!li3h{a=UZ|Cacye>>rdT*zb-`oN#gT*dhIP3f&MCU=`v(84sCy_l{LUdjwKI{CO@X4g} zL5NONB7>8%<@)v`i@WvY5W?Bcex$?W_zA>kI|~VCJ5MECY|`g_r-kTO6aO^uwHzA> z=Xe)|=rj{w;??J6mk`c6zb2gHy&**ZF5%2%f>%1AF^D*&R zXFK6CB~*KMkwn5t-f;QuXK}Zl97H(l93G-GkoauRaKgF2Eez2qCO+#-A)Iw8LUbC4 z&pH+NvD&mg=oM5mbetTTmh)~N{5X&^r9TtGNK zFIY~vv@u;LuCln>?ye{P5K7mrg!A))yF+x=5ntla{pV*1A42*s6VCf=Z(7{7^JC(( z&UV6ie{wfz3~;W_{uX!ZNl(IuBAk}{;UPK$iO=>7C!FU$g&{gc#1~t2UUU}WtY1zz zmwQc!{)NP6ohHJitJd_c3DNlt@wwl-o^aN`Jw)e)5dQ0gv;JElI-e7t+CL# z4bH6(-7PNlLHu;R`4hrf|1iRNU6xC@=;(gbV2iu)jwL?pPau3UbhKQigy_s9zQm#P zocV;a{$j$Vi&g!VA^N`{KIhL>gtPt)g!BC2ju8EOh|l^P2xtAr3FrKOE=2!d#Alst zgtMKWgy?jcg3N+*`;9#a=lMwwi@W81F!4FPM-t9<_9L9rdt8Wqg7~a6o^ZDFj1Zk! z#OLP})r9kUvzc_}BA>KgT|#_GuRagD#ldyo@*W4*_V|H=>+`a`rPGHK?dAB>cn`I> zl$Y4K7yiWcc5r=O*^hMidF3F&>kwY`Pa++OTmHmNc5qGCOb6Hf)%gyt>Alp!bwBy< z4zByj?>e~dCx7bVc0YNqsh+*s?|Gl_`y&>Y^d#}8>HTpC|1byF^6eLb7dyBZ&^yX z1;s>?55foTkhB6p8%E;u0s< zpF@a$Jp9zo-h@jS{T@Ls=`<4mc;a(ETtN6R;*TR8UKdX#KI@bb&g+^Q!o^O_pN0_q zB@SQn{|dr6-m3`beY2ZF^zR`)>pVa>k4Kvc7yGsT|20JaWrwf!e@!^Yn=>7va8e&Q z-ueW}y{}Iy-?AIUFpX}h;9@h{qRZ{EE<%ILNd4t6ztvqhtMSSs7okv3OuPiQH zZr6LtA^}d)%kds$ahHD>@x@Qmd!mDD`tv12Xn>gN-mbrOX0{{O@foeJX5gsoaX=Mc{IZ2{?UJzq(Du~l{MC!BR2BOR{i zPZ3{qw(s!Vs}8RFA%n|6g6oVw(bxIm@eZ!@ghGppHqR3ph%bJ+@9|6Gvz_Z5zMjka zmxJp(p~p;!!ik-tuk*&D5d3rp*Y;BH;M%YL&cT)6Pd0tvG+u3|vm9LcJ>;Pj@pT?D z*uixka=OKH5Qg*TEQhc9w>r4aL;mF8%74khb$;>z;aw27#4qksi_7OG{AoS>n)u?U z`f)kD0;l<-^OH&k*YS6rgKPhJJK@|O?&apG7$D z>z*5;KacpLul>(T!dd?pgmeA5GDQC-;Cd8=^my_^dygaMnMCaPA)_ zhv=6RpLMDTXFKPH=rj?Zby^7LdFEvyI%|o~>Ajh7*8cue#M?R+sr zXDjhp=RLx?KiM9l)A<~!ZRzn^`;+d3v;L0>=lx>A|8AW`~w^Iq{{5hR) zj(0|g{&~dbdB{S-S!YFv&VPmQuOnQh2HJ1@K164iYA^pKtF-R9R82cK^7vUAF+>igCl8?!EV zV821b1`Qc9XlN`puz&yDSS+_+Zh!gTZ}7l@vDkoqL;HEu>3b|HEE?UpQzxq&iFAsb zfWM%7-sY|ND#>%$*;GHXY;y-ALXt~v`md3kZ7rj z#}Z2)?%fgnX+b2CXqBD+$ODq~hPw1ZbeQuS4orA&7i^cZx>tM?$^RIFdI*-`(Y&s) zS0eeIB`t{WW$w&Bcy(_ni0=hEPDoRnm{U`*jTNfCZFz>h^VMFPfO{pA63KUM?4I4UE&g*F z>ltAqwKVa}UfE+UonvHHdtbv2C*l_26%S!q>O`OLnETb#Cu zPUlaIbeh+_)4_Y~)^!ciEO<}Dz`9ZLU|hF;OS>%V92qle)N!%iW5!K7GB&X9fW8AF zk-qiw=QNbgz_p>yyUy0Ty7H>hz76H`8X|pXmNt||`p&4YkMympkq<)8?VFqVaVS1Y znDW`vD(Xt-lt=oO)y$FHiS(_mX(;cDc#o-XC@r%y25aDd;}SzyN#3rGMxOm_(oTNb zwT%NBl$n;@&>a`yr5mYq;F{CPH0+WB&sQyZCCS}~)dewth>s!OLuDoQcF z&orMgxieufR3lJ%!<_nA(<0?{b+b!Fq;eK+r=hGpCoMwmbuN!_*f?qKQcDy!6Bc|H zzSJqjrM$%nUuwVN_6UgK%N#)Qa@>m(zI3gMYyTwr`xCwt_u>SX>5}qW1%wm)$M{qH zVgca;l ziukrQMDCD&SV@Tc?rVtN)+UKF&qSOT*&DSCD~GPh1@Rm^wcaXTiB`%ZJzV@0f>o7W}%56n^jPfki>NQz{kJ8I+s6KB%u-J1VyKO8nEJ-`Y|-zrYp zvBc9=KEO%46L&cN1b0Vc>8rCjsjKYz;Dc!X(C}e%QjK5j)i|}f>9r6Za?kZ%xSH;M z@`0SImj^#LO+sH|^H1|h@=qWQuei)f)fU|P?nZm3eYkqK+|%LVV#2*w12|Wg8#brZ z@Uy=qyy&@kCqZW0Oqp#Xlzvgh4mbVMKe=TOD6+*)r$);Ma<2X4m2oS)|NG{Y!8w_? z^a#!!B{5z6+)5`++Aq)Hw0%o`5qP*p)yX16P(A&Lk$|#k^V@W@Oi9^2?!^3mFp|gQ8U*c z;jka}E&F7{`uG3dW8CLrh;@19s{3S9<6C62?D<6Uv7+S6`0GXZuoW9-MHu=%FG@CG z2W`pQ&!aAnO@5Y0mc*x@l6?4-{KW%ONMi3G$x5n?lwW#H~_@B-7*7!Pe zy(_-ST!8NhuVbR0JTV8PAts**kT}6JhZ%#bA{8;2*%cb%6C5+vMlQnT7`I?PA zSrD&k?B!6TNYj*P(@juGw62Y>1KzSKzEvz~ZHU+Aw@(0)Z{BKx&A6iEhl%8?Mpz@0 zPT^i5vD{HWcSdM_ln7GHMxiMAnYB6Ee504F&na0FQ<2>>Y+i?C&5kzhgBF=+y)?d- zcv7W`k~@r)ueZh1lY~h+WjhS%(Zu*PlMl()60Nt!r-M?|dY6$l{)yJ6_!TDHBMHQQ zx({|YU_pF>F!Jn&gnU?GKjg`WRrbSB`A};=^h+#V*Hz?t3%b~%vDD*8MD(Xk_#cUU z8125wnA1`cpDktoVSaS#UUA$#-Td^2(e)2?u85Xws)$ZnUlBd+p%0_`c=8C=6rT-6 z&`-~a8+;x(Qc1zmQUG zSzxoq&(spY2rYTnye`@_%(5mJLQzXWJRyOQd$QQjdXq?|jQ`U6<3$MAsbS9qnA2PO zHGkT8CDbIJ^M~)&*w#`MuWEiY+WZ`LX@O4wj>?|E1(r&l11!O1>6e|7m&Pyka4DE* zQ#mYI`eo;6({uHwiQWPQn0qgRxCld%VOvM+wPqbIp+!v1&c z-${ITf0=3j(6s%7aEqE_vY=i1KhCiX&#oDsu=IT?7BA%Y&CtV)K^ppj-ajP$MafUU zYkuGT1)h1>ex1uvW+g@=btxDXYf$}7jijeC>3%cX{0XeK34Y*24T_BL!k8?yH6il} ziEK4wn3|5ar&xw)O%*p?2O4xg&!%mtC7Ep`W!lIoNerXXMx;rk+ec2^3wGBJ3wGfT z3pV%ot)`2dTddl=TlNJGEzLMNd3o+FDafhVZ!){C57gxSR_(X zQ&nD9T3wcY;8k5yeN1)vtkQ$Ql?~;HP87^j zIM3UE5Eq+KSzTH;-+x%wP$SRh>dH%Jmd?PlyBYJnr*QTWT;Eu1Y=wEaSDB6qkL60M zeF1s+hqTvMl-J>LVBMV3hCZ>n#_Cwf_>p7B;d!44ZJzNVs%Q(s>xrRGNc3^8ZX; zNxLkmoP)>I^XnT>l=Ue8SjpH^iq9zanl4&oX0w&nD&2!=u;?rLMv5D2YisJH)}VIC z-f_c`Ub2tbd=_fIhK-ePV-9&kEFAn!kOzew^2K(a^X;RaVceEGuo0;>PoI z$?)oOshBmf##%&DE>K;}bbGOqnwqL}DjU3RCUj3SjtTc4JZ`0XSr22{o%UWM|84}fT@$ei=umO zvPU2|CgB9$J8$1G(NX!$wJfHvM5kD8m z&9DUfGOSrB59NtVEQtFh@;odtHNcn4b9tgFz&kvDb5Ovn_I#a7sm|QuDLMB=@UKPiZ%6R& zNAM>j_%9>)GZFmx2>wC@FGs#972m@m_?sg5F%kUu2!2uopB%wYi{Nz;oc)2N;&pBW zUl_qJjo{r8{F(^P;S&r_U>Ie=f+_rw`6V*bWHP6gOySQo{#3h}CxTX^JqN_$LYB!W z)iN(dcrq`g+M#lPGF>=lBC}e6iEd7db2rfiW~v?whFw|O@8UY<;p9O7^|zM6wP*NX)8>2@ncM!1hcrKFh}O{ z_GRr|m^0(uWBU+)H!*)VDSua!znd(xX_mDk@QK7J_@`lUlfu7_S@jZxVKK*XEyZ&L zVaPuo|BAC*p&_4bBgO9|2tz*Griy=yAPo6zODO(Bf-oWf4ai4|v+h#t4m* zVfbSWKF#ne4SrUHe}Uoi`%(ETBK+$OpKUSa-(>hU9X@0DY+@<@%Z5MB;CCDR9R`2G z;3pdVrv|tDGA0-d)0u64^;hSc5@%aL@h1&`g29LQdX0RGPcpcbGu7ZWJm(wyoksqp z9;f&I7I%rnWdW|?yu!$-0#EU?89*3bsG}&};&IAnn@jPPhEH8Y@v98q&XZbi_-rdF z|E384pCWvY;n6TWN8(@QeBSVD3@+;jJl}q&+YFz5`6}m8BcHhEJRatsBMjfB=NQ9h|CGu< z$?$D@o@)3uz8S-}={6_AUlifD89sG54Ns@x7v&$rFUmiLZ{w?TwU}-v8~GoJ$oW)6 z&Q}cojYiIP!#}~`-!uGU48GIwZ8|?~_%@yYX!tgr4;c=jFnsUSg*Dv{^LUs~4mW(8 zZbuuwO}A+Vr*5e7I}A?USMh%~INMZ;KVk4w4SuBWIAJ(XGx*sC=dhy6x!B{3Z_?mP z4d15cYQwkbxz_McH*zSGhVuEZMw;mdFi*DT>T^Yk+<9*1*?vX9E_A(=Ha zEBm0ILWD_0m_oE3E*i4?FrjFCL-t#ku~Em_82Ncb@8GJu`COH^u(5w}s;v=s9gP@o zUDMcqcWNyhW7-g9Y}@1q5O?7rF>Bqv%Dz9M@l?C^-I&DiV}YL2IS!+dM73*A$2<2QXAD z4*c-2IOAlJ-@afxV8-)|O>m81_p*6KutziUjm={5nA#ou1V&7X#ZfGE_grG_4}FQv!ei zr1qW_D==c^MjLUDK|^N`yUy0jdX{ziF~Xv8s4-l7iLvLx=qJYtiBWwJ!}5wIT#K0k z#yXqk*DR!DOsR2WS#D_ah)qK_l;1=U=5K6FNz%f_TzB*8B38kNiF= z2*R*^O>+YNiCg`PcvT1xgc<5C`Csanlo`_Z*L`eEN!|Z_-Y0j%u+r!??eAGXTBCik zi!6wHjla5Y2F81zyYlR*KBDP7;%?Nv!gFvFrU~ulvmphe>CE(Jb3xrJ&OUk#3vTmf zjTh?0hGa5!A+%-7bqilRJmkp*$@3iiQcEH%O__hT>xN3Kt@JQ3!rwC7)2pvv7D z9$y#WjUJyD;AhLTS1gR(xt`B_7@AUJFBgJj$6mA?ZUG*a!IXDJ1iwCl-x$F^7{PCi z;Gc-#w@2_VM(}$h_(Ks~8#KDE0v++vi!UAZ(nT*l^3ox1yZWVX-u3C*o_yDd&+hyh zl^j{3;TN7_a6wj{wxD0U>x%Z4mK9j0fzEq0oV);Cb}CG_jKeQDZDD6S`rzTftvJO? zrM^VNV$=3bbP4LpIF?nav#s$s`E0i+zQ^E48@$XHT;v~P@DUMQ*FuJT+m~&1V@~s? zAwP+K4bK9Pvy8UkUu^it8Ge`Hzs}%m41cu2uQhzDd+S^P`pddc!_#l%j4}B8jU3x2 z^HLNW|7{UIwP6}wZ1~3+-1<8q zB4@JUQwPxSpJMp-{ni@3eZOZI{&7am`3AS&-Et$xzV{BpA8q7ZZuqQIHJrT$w|(pD zBXU$-p|$-kK4j$Bbo+>rW8c@u4d3>;|FhxSbo)2Mx9Ro;!?)?S&G2o!9ya{ZCLO+Q z`1ZT_p~0=3oe?>|G<=)RN%%!WYfq8qmgTKg)d#TNt$ONI>=<=mYr607-xxhii?4o7 zH@af5)NKX2q_V%^dN(X)S&`b)ko_h*t@d)WsD|td4cY%{%s#k_?y$sd441eam15si z1^cE(vTte>`=)dQseGSGVMR)&zbuoxs-iLbbS7Kx`X*}ohe6s~GyOB*$564Oh~Hn^5guH{-1Os%iuyrfajl;y=wD{5kW6^4?*ya%CHaHjb#;_=@a*^jcb5 zE^%hOyE(Oc{0CiW|>f@Il<#)o~M^RdJ|k(Mq4u;50rVZ?)mN+u23gd z|HIa?W_!KXd-wMH1C-dyADF4`lK<8CE0D%b7$@3ge1Ey>zDz%cMcpe--9y8I+q|jr z;7jSm^WmbD`{|{?5?t1EVcIhg>b{K+#)M+|9Ht%Vdwim-^$uA6vrY=*&vLtz{~i9t z&4j%*q5sy--jny*(}@||V&f3saaC-EbkWo*Sg;8PpBRCWgR#y2H=Xlu9`A3&cTv^y2N9Jh23;C98TYDT>gD)K%Ck}}!G)F`Y)-$ev#p%5_VM z3mG}0!~zH-N)(2L=xZs&R={G1A8*__ONoSwC zYO3zNh&9A#Ve#`b&sJXa`e!T8KMR%nMX3%9dmZK$0mA;UR3^72wHMMGvp*5)`45AD z)rxr!vriO8m!8G)Rb3)k+dmw8NgiWEEFthiC4CUUWa!2|mwr__#!+_faQTL93f3pF zHbn|{+NQV!>618fLwWD;SvMWBv8;K-RxAp+K?|>!e{aRtQrkk}j_9ii%Z*suVrqqR z!MsItplyp!dUw8xaYFDLKF8V?w|Vz@hyEsXA8T8v`-5#;Xxlp-1i&Xt9;JO4CR%p* zYGf22U=FlxvB$^%VA~d|hdbX3zhSb*+7{}*t>9GdLic>OWv|lj@YUr=Z^`4C%z^l%#AL%rTTkWFP7?WCt9k_!9Ez<=Fsn+ z{q5m5PZ?Dad};)bwJpww@EapI`@KtrhvQDA@RkU^EP_j0XCm4b?=? z4Q(5J)Z^saHqh;c&o;O6?=gJa2Kt)8nSRP2FgU+)#clsC%NE6L|E}%Nd%OSO7*5+y z#Iyr6_aI_ zOfdWFVE-MqX4&8snV86PYicL>XqqAf@D!a?xQB0S$|CabaU1O!LMZ0+92T{pVfp?0%~M(ms)2wkxU zl3WN7zfopswvDMfI~)@ZjMV!SNE&9YC4H1 zA_EOt510l@C8^qThfVVktV2Ph1`KI`=y@7_ljPtJ_=?$ZkR ztGZKo7H+~g(e7a;IE3b|y^3vr@DZmg}X z?t7fG{BP)<&tck;Jm0sKH+xIAKiH-Sl4{M$}h(SZJS-opA_)0?4g5Lzu)u-zafG*MeunM zoc(*H!qXDLmql>ua;4 z70}lH%I-B#2RcO`C~PFI>VeY?RIxbjm48BnUu$rFJ1T#P z!L4p#=X}`od9UFgY2Qv7x!hiweSlenj$wWr84b)%XC(2c66O*&xRs8s*7>#&ZQWv1`bkwy!b!`wZmfX6&mS@*+NbiWJ#iOi|vQ$6>yYkML0xkQ88>p+h?Ysf(yoRZMcKb#(*NBR&puFF&(S7UU+fsMYR{#zNdD_>^bWsa*oN}l(2c(4e>vu>zlt5)Nkom&3v1OhFdB)wyOrOt zeu=f&rGW?+YrI=F;ptC>f7UkR2_E;U=WP>-+f5mg2XVu)!<%tWnp} zb_uqsL}xDcnM0qhwB{1uW?*3WP1v?Y*k;l?_-SD~zOA$WXmILV%Af5sKqx=y`OJ$p zKe8^Ld?0l>jvvHvgE0GlHb~lhq-hC9I#G!hNbPyWHThI@VzaVtlP%KOt2v+bb<-}o zK|S|ojx~c*R7+t@cF+iJL+)DFKZtF>(PsrGmFqYGbbDVag$I6PsMt|+%SPQDBEL5K z5V&JujXD-RVujAK6j22L0@jeLd1er?A=mv3nqR`U)b3|=LS6y&G<1Cyu!h{_V@o){ zys8w4&ey;r58TU)W&>WBN;t4p7Ame~bmaX_koR{8*DhA}4M+9EmwBw%SFSq_mOitv zo*MWT9An>Pmk-4GgZlda8zo&`KjuW>C9eoG2x$y}&s1;v!FZbbJ z_uQJRYIF7bGA-Y${M=)?x)XPd#Fu%^o)t!{+zg51cT*nJ_xrO_# zdx4U#xh}s?yS${kQmDSgCQ-{nncPti;x3Wv*$3-uI}z)4fsYWF&ErhID|>7PuSn7sE$n1w2$F-7M@h*Y zhTYej{chCiW&M!ey+gAP`j7M4E`7rT>tz{jA3er8#_?SPzf5v3q9=}cniLFm(_DUhxEQsUU}0e;XCu+t+3ldfo)63N z`LJ^1-y{3+#bS~F)hR!$hDT8x)AIhjhS;PRxVUyrJd6#<Za^q19=`p{ORm}t~eL_U}FdYOKxc>Ql`+SAKmes&L zcvk87a@5%tX()J$LhYu^7xCaY5hy9(*>|n8r2(QppV!j!aI}er5-BQA5vJbJ?NJ?VVVJw-=D6Q@Evo~deRCxGmD>rif7U~wQ z{JzS3R9pEuh|{WXR&E8VK9no@T5jMYAfa6+9~*AvV;lbaob?ipTnq-Lk%o}RYk9Ni3`uwxo)fZ zPHM9cR&HeXx_lC7Ai8g$nJvAWrKKmWLw+n(vvP~K@4ZvX;RUW7UiZW7kJelWr%$kc zK}N^y1E1S}k(;ZzJD;gDEe}c^$rh^5;3&WArtQ*J&IAo~ZvMXBKMud+@*AT!@@i3u7{N-M*?BWX~)4oC3xoh`?Ju=dJb3}M4 zJVlBvX)oS87RljX?iNW8DMts+a_@#;zmy^ONICp~)Q9q!>|X|DgXbVKDBDj17a*kc znR6T_7q%`bI?KXsD>A*d?rii?&uy5AlQcxl#wM5D*kImoJ5twhZbM!D^z$#MKW7d$ zFj>`tO-d50FX>sb1meZaYtL^Sf(`Jw_kD6Q4|bQkG3L~GZ{yCCpO84a2flQ+W51Im z7WB3!vATCv=PAj{3NSXl$2Rz_Yj8YcmO(UCAYjI&mCACpXD&$2k+& z0mUD~kzCTbYNZ^Nz+F{Z7ju^uBiV~{f+i$QP#|>dnDI&fH||vK%CZ;|y1G_%(no8_ zBR2r8T(lh9{qtA`<3ktb#Fgo@F?E-W~9e%(Ql{#GxIC5F+2PY6Z@O;5iS? zMXtNX%kcusmLwN-bgaNR0B|j5PAuz8E^h5ywpvb-04sme$Kp$SaDc&LoCkr!Bjk*T zE93xzjzwKv?%05C231e`;EOYnUb$##`?Bty#W?Ar+nsJOMvgyl8`-$m9Q?-T%h*2m zJ6S+UpL>1S=f0=?mFROf2Mu5+*-rDw88q(k)tye0NFoVX7C;p*GHL%LX=H3hntR^H z`sT;_fsG_P)?j#{KNWm{(Z1;ua8DfVup*=91hSm4CVYME$O)b>KUSi9%*S8hIly^uy7z>cVW&AvnBJOxdR+t#-J@D5GV{Ir zrXsYE{t91&n=nmir@J`md*b_}pX#sT%YkWJaGN)`dH=(Bh1_nq2r&xzig%wE=x;(U zX<^W;u$N?*cLp8?kB(I0m%LYUY=K^u z$!O7F&r8j(dGWCbKM)m&ijPISK47}JPNnAKP~BtcG&OMH^55Wd0ge`4d460~osIVR zI~DNPw|hMNPEPVT+Ga(@edmMYizXG!@O=JIN75cc_@&XQAgz{uxx(MUG)9FKKVr>T?;zfm$oL_&|)S_R+(_wNmt8?{OS|8*2K+3Thr0CbQ$EV zSPHS2nYMcID*Cn>$_Or(Exv5xqSelMo<*^4;4?7}@0EsiHJesCR(Tdd7}jC0$G_t9 z2*QxhGEs4^(V-!J4E`0*5`+nHzHb`JXFaQYs^K)`AB%s*XGHjROf_lv^CJ9ZM!w}= zW%zb1cb(xMXXNuNS{jC*Z5R!w?)Ag)k2d(HBK*%A`C|-UMvd?s%HJO0KN^w$qX>T> z!v9T#|Az>lL$@@HuMNM>!3e{DRD}O_kB9u~2>-MQ-|o3%!!yh9+2+#sb)J!*GB`&J zXn3*tpDS@_7~kXZuW}w|CWfIko9K%F*x)R$6yNP}%Au~Jco_khP|oWNZsok$67}~)!yjw# zNrwMMgP&<|w(V5T5`$a$e`n;g3{?L0zKIm3PuAcz{XgLGFkWx=O*!H={ihrJ9me0Y z4Su4*7kZrGvH5VN;U91KKQVk8-`DvD9>ZhH)i-!NO#h<{KWXHTiSTP8{FxE{IfhSN zTho8B;U8h}cEdl;;MW?yErj7Zhr%%o!(+pLxW~i%|5k(B{Qq_% z$9~t74BwUyrx={NmZnc#M9u|K+-}~bc{{I-hmH+1mznqOW7^crV@vre6?Qy234gcwe zZ{^oV_;U@v%E)guc(uV-8aXySHyHjz!~d+oZT@`J;5L6QXJG-u_)fyV#`lvR5A)|| z4Q}(*myH~ouO2acn{GcbeD-;(zxxdS4uikJ_m?s}wmg5E#~FTG9-e3T*5BoZKi@FudKoU-9_=#YHNH4K7pc`w` zzAV09nsC2->Xp9RK5-)ne`9<2Nt_vPZ&-g?6C3N;Jj}5+c`}PWW(i-VzvNiQH@&;? z!f(zReovIi@6DS1bI$XjW))@wa%cyGTik{{y_%v5*D|7!ddNaH4q z6YZ*eTbS(w8m1q^qV5%+15Cq$+q_|46%Ff2YeMdPScVw+qf3D$xGayuw72ft_+U&Z zmd|0@k-ozx%3AN>FkozUgz-NVSSkOT{EKUVy)~i#*3RCO_gWfjVAx8nwPpNEjS&zn zHP*nY!uECR_f35w{I)6M#0buMyA=PF2woe(rE_u$`aGq(Q);Hzx`&{r(ocQR6|9g? zbCSErH^n@ob-aFu%xla;icdFuHUktt*WgSu#V_`FC}*kR+ct61@NGVCS&sP*-GxfH zx&{j%CZBxrWbCF}GjU>dGFe?!J(0gvQ)*EAPO6@AzUY(9*%griUg>t23;wEMvP zws1le7C=6XZ=iO&xN|*s4cTvV#!&I%iRo@rm|H;RrZAgv<)$#)r;MAz+#%O3DUS7U zYrn0yVz~unV^f$uk*+m2KUvN)UIWWrw8>za;08QkW)s&G2!#8E{@!yY6PGg_F@VK6%)5GiQhjYcel#fNd1^P*$9!?8|Nub)xzwwMlL30T-lt$4#%k!1K@V0 z!3SB)n-cvs zbkAp7rzyR{w_P`TOC|^FR!u)mmss2FHrJ?0ut2mX^xxXqd-DDoZ8v^4rS@lGdmz4M zHT-&AOiH!&oQ_H*xY%%y2DSlxvKLvFY6G&5#zMt|q`Fy{Mf6d_32NmDpaTWtC0~O!tamryCr#ReJC0$`e6iyXJZY3B_8_u1rT+TO`xF7>~)eIM2$`&iv;sJ$!6hVMH00G zddzlx#_J?$AA-IVR~XuMK2?ILbdvB+pfkwsmu^WsbP`#U2%UtVyvUZoeKNJ)dng*s zZT>-YlP3R=+SB)nMT(eXedC$62F-!$EIYl<@@eNh{~P+Bw+L>?`#+tRv&SR7d0N-0O{%YzpLwtF~GTrJlIwzI5)qzene5=#U@Hj74htRpFlw);> zF2lFw@s$CtI?DSzPB~Vm`HaD>PV;4hvt6We?ltmlI3G5A8_p!$($Lyd<%Vf3iyRLB*FEXj3?Z0*jGmn6kq_W-4CEAG$d zJ8>;v>9B`>vThuNE~z|kYX-gcY%W8up(aAJq_%QGePX-ZSH6$#s36dmEoBT2VaJT; zICR0fmjfr?<<;#EgU#;mPW=kc;vL=X!h>t!yA3+1YpoRre%Pdn57Z-yMp~ev(B-osb z^J0<^pQd7__rLb8B*f3k?!o%{Z-R+eG!?HXt4dU#$U4+PwB z=?QiN*vaSY^L#Uu){uP+yC7i9O9Df}e_OOMyH6~7p*RD_hGqZe<#ShB$pJ+gGG6DM zw8$1V9Zj2IIv#4UP&Qe4fno65FNhC3pWsF=!{;Uq^aHsIFBr#csVLd}%8xO5Rm^8s z`=-qB(!keIj4auNurp3WD%aI+lohnm?`7=_xu zaj1W0A&GMcazhu5xMS!|hwvPNUf<^Y|GQ2nahH^HKVkbKrqj(=oy1o#2ddL)UsLEG zzh7&{9rn~yvIjeWJX5(XIQOC;~|U_ z?K{{2f?+*R!}Mc*R`-g}0j6QWZQe9_p$DteT~aDgkRJLK)9KWGTRueYCUjpa?Z_PI zBf8MPSY{{2C5%76??LY#SO*gf=I8E`{|)`mTLd@c{WWwt#*gDo{`1M_4fd%I!IQog zO$V;2C^c@C@;EMH)ZI8dQH~nDV^K^z=`Hk{#xv!sf66DV)VgYidxe@0-tapqHP`7( zkLRmid3HYqUkf1fyB+`1@@XFMu&kh~XcKk&8`OHTJ|HSB(kt6g~|!qUUVvwno_$}8I!tz5$M z)s|pc>ylN4VY{xD?ui(CL&#d%u)r1PD&WU0g+<)c_^09bVaK`p1$FfUi*(h6KIn1s zk2Ls4JkI)rR zJ*X`!*n*`YW_86UJg)IoH)RB16n9V1Zv$M@(~bjLo%1Bar)=eOlz@g8;@W?2#|Jem zcf!AqlrMl<%V`&ny-ev=p@Xm(<~_CSgY9fsI%0 zFdnAG*TPwPJE^u~<3H>_xtQl6uYlU#`>Xj-IdOQfsD!e)BzL)Oq!#*L4cTwb%09S@ zVlwM~SlRbw+^jt{(cOvpdVVicXPLus5Sd&z&SS_y7&QM1P7JJ>mHlx8wrkG*pfF+v z6oZ8rR^u5H-f=-2&GcWyQM46Qj~7FG!d+9Q_ksD_biB;FV9gEX$2g4K@BUXG&SLU@ zyC1j|ij{kBECmZ2oy}`(Y?{+BySe_Haf!LzC^nZSM~@kuY+KZoT+!OTw7V_owzhJ6 zpw-W6YCeB%^EnN(XRqUFbPBb$@w2MD8YZ&*xHJ={k`0 z-jeeW=~ozkX45e50ZKgPi8u1Wn9zS?Rdh?$Gii!YlxqgN8HUAxrC)rA~9C*a+yyWI6?S*VPh;#!oAh? zv>dAe9+qKrMqRQLeoh2GKY}la;QUTX$?u5ZS48mZBDm;EXcYMcHCR<6y9UX`L)i~# z3Rl|5_CPhB8&QQYZ4f$53-%W6L=Eh?e)1p&0o#_Z>glF!Yxl~orMSV)KrL+qmMz6C zZk!qIul)S@cC<~Z@0(?oo$JT+q#@3{r2JljFvP8{!?~9<#H~*AQ9)gqVEz5L$H}+4 z%QnO3SD^krZ1^lI75}#3Gfyl2J%h8XRs4q@r@#Cb6#t3GnLaF=6#u2i$+vCcr#&8~ z=Wh((#;eR1ROH)rOcfrdd>gMy!?*EzlfiAg-e%<3c9MyBHfiTK+iW}9NN)kr((ztR|FC*96Q#{kP5fcgL%N2)gIld4)_{vK51vlT#4R4r`vnk=%h5I%&r2emIT*vKQaYZ;0h94~7Vqe8 zEFSD&8fW>XY0*U27}H9J<9Kv|alECw+d0_SfhRwN_w20f@ACtBOhKqn)P(vm5Sq#A zXxGi+KSuMGIq9*{Jn_bi=DmMVY7Ja319s^mMJP6&w-eFfT*9@IC@hiSOp@D==MB|V zL8SV8++TV;?=ZN6gSEKiW7wCXER5&Tva+uRFO9EZ6rN<5Rj#+EDsbg+U6Rk)=fiP4 z=bVJ2K*-zrvx=(Z1!7=~t}&?hdx_7jsT75BST`Kh+si2BN8+}~do$yDoIF|OjvnNA z@bl1F#RvJ}$lf(bYleO;V#8Uln?>G}j2N5DGK%~Qm#gIHaUFN`;gAJxe;|7+96BDn zM83c|<-hdL93Qj?l=r2W_3eANV}pGtqTIMRl7VT2@j)J6&hbIUmWJ7#_X9_j8Xx4i zVC}hukwMoMf}ktUNeo#ta>&~b8(y&qkxN06>Xy&IBOMpqg98mYD)>sCPyT8ul}SVm z(T(bq5_j0E3EM?6opLWLAee+cdad{OKJ$qke{@_fok!e_#$RFDhjF6ad>?U5C#E0k z40W$KbxI8jZu4f77y42<;e5C#<^JQP0#$+=(+SmmTRueYCiIKXVcL<|T{^u=%8}j}dIw9M&rN#wWdzBg&JkIm=b?Mc8SA~>O z{6sGY7cq*TjHgoLg3|>rjL<2cj^ny3-%7EWDUapFAf6gMUP{|7_*!swHg2u1sO1xN zlCZ3xt5p&F@(6xS1YZ}yH$?CcMDUM9@J~eWe~sW@9W=sNQ#~m^!g#WbK87QV+_?6yImU?bM;T*W zvt%M>$rg__;{XY z!jNxublnG@xYg}Cd_hW_b&<;dkijkg(+0OX=)ZeB48M*?QohwezhU^aQ=@&j#Mma$ z@O;nk8DDkt#{gG3hcF;8nm#H=_nW1AwhI+M-tcLs`1k?s zgT-6QqtP`Yd`{tC<=klG9B=S{FgWWx<^PM3Z@-JX4BzIfB;3+4JU*%9+4WTvMlfG` z{PMupTkbR-rp4F7_$78vTY(-4H-5Q`*_g#pDV2JW1;zd} z9n2i&q}yT0{)@Q5$qEi*F2;Ol+|6%<&bJT)nr+(m;a!O$?gKtpkP*83U;e`JOrAWd z@A2gv(R?MxGaFex$v$@HkLcKVNUm%HzKFlE@k~hrW?*l^_FYW(T;rRc2Roj*!PgDy zuU@r`(&zEGsldN4QWQ??ultzpsqWdX+O<_)_cXbp&fdzxZ6rtA$k5VGedYbC*x3O-@YyH}pSm5!{gX*U()VjJQr% zO2Z?c8gH>-eknDc$@fKkv|I~6Y_AdzwN91~#5rbTO;R4p^KELiW4mH-Pgo-H4#CT% zeJ!`Nb*Ub)OL=)Oh zOGNc5F{Vk~$Zd(TU!$5QA)GY)Hkl{1O;|?|hGmu=&s-#^!>w+m-yiu_hx)kTTV3g2 zJRbV{Z-#GmqDKv%Ux9}6F~etBsrZwI&mvawUl^R2h_XQQx!H#E+@;Lc6UdI}~jn@eVxA8jB$g%O_j)64v*S7gjHhdee z(+%IoOV5G{IQon zvVZpDnQoopdN^swez(DE1Q^4dz%k5=FldA}`a-tW+t^y~U~7F1mm;o(3k+J)AvS?5 z8j;xr3_v4Q27VW~m!?Jo&U((eMP9vErz(bYpQGbAGePpMu;ZaeHWT&CqH0zqeHb#pa9k4eQoykh)WK(SWj)uujcph@X-H$^?%=&s~(t zG~{MiRDSNk3}%ZqBE%T$svEKw+7xuG@_o2AikQmJtw`0?mz@Sh>j|(Lv;TuZvf5nT zJ4tcF&Kl}MlAH>kBp(vOxYjvU)%m%aGtN5ioH?^+*3~xGHlN>AkNKKS4KwP;&NyrK zoZ0pB8!#=ie#SUBOVlmuUgVCKUA06`TkUcu$tJtnR`sml(WlAkQ<6>Yz|+O8T`ir< zI=XRaE37Za@vJ<3_Fc&_6B6g}WL7yW)t@8V-m~%&oFO}Q%(&#@RXEADeN}g|bq!9c zl4DtMn(89_kHJJwo;us5N6~uUCq(CbrVwWBOWDWoSN33;#YKC~BQ_1W>5v#bde>=a|qOtgduv_(Ghxe7gBZnU7hDs_rjWV#GbuvDB+>^J>9nZ^`6f zT*COXelF#Ih0nhmVQ-DTH;a|JC-1eSD=|8y*7>nLLtKshKFTD=s7>KoO1EOoRZ6#F zJF1lK!#-#7{cDmZ{)~~k!8+Gi!G|R>axMJ0Hu>PWsAQDVq4=Fz9ZJi$Q-FtM8)Y;_ z@c9vZK?GkC!P_HvOozHA!oMMcQ-@+Bvee!!G842gJ5&yv#ELm_u%821e$`ueL}Yk2 zBxp+)W9!O7Imvuxb)w~Xrs3ym+v+`nx^kawLe(j*^Emm1+>5@E09U?_PtjkiTm6&a zTV3F@9w*=GAYV3otK-~f_$*u1--iv~>MV~KzST8;VE8s2erotu*RXRr?fBFb7CLV>2sCg+jO|z@NGJ1A11?Z)8T$2$EL&2 zBlxc(@}Dz&D?bVUXqcY-S0i7`!~@XLrc6HIy=0P%tT$=78XZm4F&W3veKTboNA{B8 z3bpHgbtjxOWcL{z?Q}QKl-~;HnQp?B^Gt7%E9T?LbxZ0tx!&z|;JEGq%7Mz3F4Eb! ziAQ=DY(#NeSgg3sDpK4shjhC~j-%GsDm=8qPjF5U9UCv2N=% z!%nSBbzjq_o`#AUR?b<)Omsy7pt1QVIsNfP)UwZuTGq#4B%t;-F)VASm0g|TPAUk{ zFLHI;_V(@`0*z};@7CeCThCTChM8nJaqZs>;cS9X6*v&?U5VnXMuIR!J3#5-nj#`kSa+CNBI7>ls|6VvUg zSRm8*iuXWuyKY~A(w#M?m=kzBek<^A>vvkLwFNK%Z$kGm-A>&ftZt_|Ez3)57*-lz zg(PCS9p~}Wq~*8pqwW=n>2_6YNWhG87uoBB-?O?`Jf_=i^8O#JZujxaSt=1MB=FdH=40z_ zO6hz~w<`~rZa&fAQm3HXg+7cG34?V$r`rwI`KZHDcTCE)_@|W4cQPne=hJfU-N3^# zkJ9Ev@QWk(;t0Mxf_Fvmt0H)B1n-aF)OAY5>mw1|seBWQbVN*hJlUPgrAr1&D~c0e zUPZBGd3$FSWU9hg*dPUAckg|$F35DFVR2w}xElp^e5><)$m8VOqU@sqt~$zXMvm15 zzhwAUXWDA`EQ?jnHx1wFg5NWIs{{SW@U0H_OT)K1%F~8#(_ydSvrgCWyxA9ctT*l4 zLmdZW`Y<0Uf3o4*c2t4By79$>Sma;s~ExBGQo0v3dN5ixPe)Cr2m>dI(=&qy>z<^S(j}>b zSY1-fw^M+JWgBHQMez9%{N)-y?1{*KZv5P+#bVfPG89y?RDC(l@KO@78 zSV+fl#YqRIE~*;1Y{BC8_HNy9hWpK6$2XjS=k}Y?9cd8MA|3IyFuwRL1`3AthSeP( z7u4Y_OI3$>-s3F(txhn+7aWvhbtxVHBj4(vM;gA>jgIqp$XA_@@-5%aeYCor>U`u| z9YyCjQobFxj574d3drHygeU|3?hphW}HB zZ^Qq%!R`C~a|9pCgnk7;n;YE$DpV`mt{8f64V@ zTt}wr-V50Cau?k}-8<1u3th-*p_mc6m@`6Ga7O5s)LJkKGeYYM`V~v-#@vcjQiO1F zW;z^S#DD@XsGwtD?->rM(niDcD_ha<+fsqZl#s|{w+`eJGPYucRK3$Q? z;xbUN?vZPES8v_)Y~?$KmOWcr`G&eWC!u%mQ9Vy-tofG2zk#<<@q=MjChD6|gkTn? zMHj4jMRdWMye^o0k;$YkAg|h-QkE0^r#Xs=BJ1uh!gSJH*~UY#@a}JHE~%t}q=x$m z+eRvujb&RX8BJ$U? z$F!eYsdsq)H!I+;75=JnUTVB?YQ(+5FBe^2%P|gl ztfbW7ambY5gLS@fp0BS}9`Q55<9v_SOp=FTqRUy_eNX#84#~>i>W*3-)&tkHvGOmB z;4KmS(g=Q81ivDJUl+l%5&Z8W_}@qHe~REvMXV{(DO(m?QZ1)A?AK^y&4Hg}ba>Lp zx4M)x9%09N^=SO7e7o+CWxV1?`vR1F8?ThdnGQBy)rN25H8sMokMMQfE#}N&JO5*f^|XKm z9dtj|C*A@l4cYG*MRbZ&L~(GStV+ae%|=XtT?-y{(e-k@JH<~7Iw_rF%4=P*PMU#E z>gH)uC&gBmqJ`xbD_Wg&RCz%soe5#P@Q?AsgVRZ;8=Vv*nJFl4913ja!HcqHG06eE z-d$z5T!epY+=-h^_MyTyE70Pwmazg$7`Lw53QA-5>fXIW?%^BnzN~leA@{J{=w8~p zx9lF)j@=ilmUl9qeBirNjUKh5olcWIyg+k6K|Ac@_~V4iWBWi!B<`ue563by9FI-A z@mSp{RF!%eer>AlABNFaF0s5+LlbJ+ICav7rJJWGivJdM0eTT#`zJWMUBlm)2`dx{I|PqQ__MN!JDvs8Pl~Ze5GRd$7H$8 z&y|Ml4Vn}1Pu#Xwh*x+(`NU{g!dMg2wMT{my`#{5HE{YL>dNZA!FuMogtU%H`}@%S zLht_$l8w>$sQZ|%t^3QSja%NTdxc}V_8n}nz-T)2b+9B>_lmy zLhe#nh8X$RhY9V4gj}}6O1&y|f3UjtS|3sE>tTE8Ky>Xk-&gdHKHPc@RFCGUT; zuFd$ooa3%x`mjCvV&kr%?mSlbgXi#`YCp*e73b!{u738b;q9@zD#i+kJS2m2-b%t-_)$eigZM@!Z`24<9{;h^@UPmR#*PL$0^_T8R)r?VSMemkT$+LzaxzA7z&2r#q#yM$dGT(i)7ub>2tc5L%vO) zdL!Sa&m6C52_P-Bca?QyHJok7k8$jNq z<(ftwJ`7`>IAJB2d+hco@&~Z2NIizZ=v{E)<{r<=KEwx(N6&CeVEI{d3G7x}xdirM zx!#`IA=fRb$K;Ch?r}wb09|jxK@okpQhhC`bnFvo65;F<=yJ~V&Q=U1MM5D^; z*~fB=5Mz3_DBhS5?a3~oSilznh2DXc=pD#iv+pa%uG@WfcJF=rj(z^A`~FZq?)&4O zXRL08!`#qHSrUuAj-DN|3sE5`(l9>Vm%15Gwf)1Pt|vKEeMUuDa|&BEp|@i!4;dS)>`Ve`9i)1D@ z10(X=*^4tuKtz8^lg=JOU2U3n9mAvjxT{d!z$`ztd!>88uHe6Rng zP3yjPO(opZ;k5s$+;{@stfu66VBSARc!})uf+xG|b40;);lmTgzyy@1`EO1v@A@|s zQ(~EYXyANC+<&d6C(A|hCBjgggob20`*WteRDVvx?7I5-bLKVAIpdt#*)#Lo zX%%<#xFU8z0z(j8S9V2r+}f``pDFv(=QC?r`?8aCzpiENi(A(uSN3#ubI-12?a9tX z?Mu0N*O=rbJ>AL6aY!q+=@L_-uV_lCzM_>@zU=YEy}BTKzkPE4Rp7#UlkF&05zHSn zFLvh62k5}|5$zdr!!SK`=arw2AmAk-Cu z`YK|5Mc?JSFnss4|9wUO?cJ+8y@qhCuSngmQiuM^IMC=d?eCp#N*iaIe7v=dt~m20 zjk=%X?`^w@_GwluFkyO!&liD1S)qG9-!u(7Yt(>i*h5KU zP^Ssw&pr*SQ{qv~COUxG;V${#(Eq$ea6{hz=DsGDw?oVNCR9(VlC=y~`4e;p zEr&7x0l8laxjqXO`Gz{^rkIYv}{Ey4)oD=5(_%fMoUaaJZV_=ABBJI zbLb@q!!ptKUGV+UkbgA(mH#n2FDT$rDQ6Q%y>J6E_%;oeN|uSR9EzuQF`&W`F{&U2%tptB46z&kMe zboPGji&U4`RS)Mr^91PL2SyFht=WUnIrB?jTnCSbq!UQ)cYm?4&-{Mz*TD~;c8MjZ zSlbt^Y|Z!N%%0cS*fghMc60qXn1R!cg@{X&qsNR+wxJ^g)TP~R$tznsS55H!H1)HZ zn$O3!=nb=Hj$_zg$+MmAp$GN7WphU)Z^*xvSH4f&w_t;T-Jr zb=YBe z;?!+4EV#{^hds#li!~v4DJ(;b{KrdyCAhJ^2z7rsg&7ly<#U*Jq(4^f9Cdh0mizQ8 zj6ZeQL3syQ#uHg~Srhti?d&~yucf{ShArNQ;4_Pf0LMtFQ-{WV|K&1Y&DybjLB6K1 z+OhwKIMd!5wik#`w;=9Q@;taNLJE8E*=`F>srf1sK(ac!mSaLL2wIUssfIo*`mrd|1@&3fV^NuFl)S$uII(%7i~n16cYqdd575$v zbD;e804)e|zITbA7r!BGgHbQ0VVPvx*eqvhh}*XA>4G}kwo&Un9?BQbVMpAy?c0nT z+eTewgKl?z76L;8omwZrwwky z`B@{!hV%1=Z`Qcoy7zyL!X8stq{U;`2ChA?Hv8?`a~rbH)y`|k{#R}DyiE4bbI}T(x{EB# zLO2p_+NsrBFTA++qS}jV-&4C_(Ei%O?3c#ux_y;>{cyKkN;wwTck(BbI~u=<-N$dr zv^=!#xlHb~-Zi70Ga+Iax_9p}S-HPySTXLq-Uk$<}Py{pIhNPo{eiJcM?fR`0K7- zmv{?4%F5iAfalKN*ZW5V@=|;P>wcJhqH_I0+=2F$M`v9!GSl*n{_b^&?4J8xz%&OR z^85ZUY}~WiBi6fEVirK)?QrkyKBRFeZ!3+rz4#)Xw^!h9zr5A$1Dp;erx|~RZ*v#p z$7v!@qK+$m1LZ*Y2L6oqq6yyeQ2)^DYqRwLB+r@ytlq%66Mij?B(101RgD)Q-l!1d zz@x4o_>AxH=0jWYGc z<;_NS!I8wQ$S1OYM`60%x3gS6-jM@;W=1^LzpmcB$cS%1oyYkokd9d#@{142-QaV& z_NaBwtr>+-H|CBPpIRPj$elKH_euVJ$-DFkcULFgm*+{a#b45W9=Z$miLWH_<73s` zQk-!fKw$WK?#5M8>N&Ws@vaLFiyi%kcl6~VNB8EvDP~{iGszXW_UCgW=BIdHvO_=Y zqvKw-OA%K#R^D{Dcl~-?gZxudCIQ4z)ukMM267m)kK?L&;0WY6SMZr{tM<-9zG89ZQHAsrZy*}uBe9&8b+H#{yEsZfnYLNeV zKi=mBT&n``(Tp#HwaevGy>*qb#y6FHS_;}hFHckSJ3i!JGa(NX#)auFFkHs*Z?rq% ze14A?aqf$VxQor8c-(fwny=@lxa#Xc+5Nq_J>Tn(88x#533iy@U<_FK^V5sU^GCEi$Hc3j{ay<3KBiRSuBouu{V!(zWRW}C ziYHn^-{Q((yiPfnR~ueyzU#s z`)|k7T*melvruDEF55nI6JN@}Aqb?aXO(}m=Wi&_w)Jb$g>vm!mBY+yQ= zh54R=d~PT08{g^;oz;{L`~aD0aQ@>_M?%D#Yy(5*mwK^xZB+Ywg*tE#J~HcnQ9aD% z;02Fa0T0Xx_(l2O@(bxPzHH!+rPJevBKeXY8(%CvxNN-;9^t<&;1`9TTeev~3Y9G^ zF7j)HgY>riqVO+}PM9ufAJjm+d7_KM&VN}+%;x@ zIdG(WU3G;I-sc|79RDNPROZ}Ty z(!Vd}8G(PV8|+_!`_RDL-<0x?+n%d`BazX<{M)7Wh5S1fsaZ(x;Qe$D=ATrGU%S1Y zuOo5qTKq@=ydY?reww+eo35N?e~slCC1k^%efwAx-UQ`h)4)%jm3Xdu&Xs4C>vvJ- z*fcN~IAn0{0>UVLH@xzH##yuKn`_xyr}yZzVi&`LL{C>|OLu2t(b86KRoSv)c~@e^ zs#VK-IuczSxKD!E1^1W%GIvJfS@>-_3xh=X=hGNJUNmnuj?z7Ew)1A3c#~*uYvtl= z`jTACb9I+>x2}{yr)BQ^+eLER?b7yTS7MoVKwE-Cb-N*;b5&3GvUUoR2qY<#hva%! zs~4^4acAd_Mwmt?7hzfVXohU`gro~ae12^W2-=T!4?A(Dj~IE=A@w6hZ7i!Fk<1OP zA2GIeMAZ$$Hk8+mm|8cYqn9mQn!mNNDW;7vVL$ELV25_ZAk)E&2(yqKXE5wnV_vM_ z1B{2GYqGUNnDVU&{TdHT%0#taWRgChpJd0NF-ddJTlSeUT;bS~x^E%L7;qs_6gcj0I;W@Yo(}Z?A*a;7#>CE(J7FPcikBv<& z^!^|0*i@(KUt~DcXuS2AwD8^0PTgOwM1Kw4mr6TQJER&*B&bu;P=%?&e;9vg<|X}K z=nIF+;KhXg!+A+V-fL-Wiv9R@KQqlUOr{~sLH;{YoY5z~8CRM;?vfabEAg}+&f4l< z-Xy^bZ&Kw<^ZX5(T>R7DBp+ZDUx0fFXAu779=|2P znV-nN)5}+Xdj&6(atgQkaNXqjx;MJ!AI=Y@oUK7PKjrbH_gBODIgfAl8ECCfh_8D5 z)*ze@dK?!q8qTldiRs4n0*$8UcX9u6>`V6pky(O|rNr^japI3G)m!Loy(XbjfBpmzZuSwhC# z2!3G%za)aMh~R8cm-3g2WGS2qQYoBkwoBn3jNse@yA=Nu5&W|e{0kBMs}X!#1ph_^ ze>8&sFoJWfc&T{pir{-9_}&Q4hDRy+!y~xY956J#WLaldHz%1-O|;`uGubN>6RK+_ zRymD=@U#SuWt&u$Sb2pEYF1C0DqAB~Q?tMdI#5pLKKos8HVI%)XJ@-eJvq_cwybNx z0uUxmN%V9;iD=RZ|#18QPbTez}vO{p!Mazii|v6XWf4d6^U-Qvu}kfa*z{E+BL0s~zBu5`YI@ z+gdQQanAJG#szcEIAd;o^MdBu>5cUZ5}mExJ)P|`DPS2c*s!s?vxj$GZc2R1iq=J) zEejGWF70XQ>{^hxq^qTE74~xkadpS4RVzqrS=phJ3KC0~IaDXuD{JxP4o9lDcEUZ5 zBk1bx#2U@c)+NibN4&)w9Hb-jUgM67v*vnu1&Z&tiu46WhSh>BXE% z5Qfbsssf6$-lrj-Z3e~9A_zl1TM=xp(wy%ug44}j>5EPzmIe5&{`qQuC6{%E%D>*@ zlux@qc{v*+_-2D2OTLfSKN~!0@PGF>WluKvHjk^nr}=gh>v0;5ugYgVPD43t!Ylqb zK^Wz0JLKmM&Zo~&zCH3QgEKwVxO&scKN+CPABysUCLc~O=k)=u_2C->T-z^i^*F;n z75^%Kbilvaw|D9ST;Jo_0j~U20j}x!-T>d?!>?y4Fg$FFYIxW&OQZ2sK1bFSXS!)R zbNpR#%Bu43QP&%&oEndB4fu-N^Z6)8} z{^k((@8xp_KMwwBx_!yu48P{L2R%;g6vKZs;A?oE4)CMAzxxbs%Z)>QCZ>FrEgGJ; zd7RFY1|My3`~8kLa_o0H$?)li=EE}sT*KcQ;QC(r16=o#`Fn%=TlkVlY&JOk)pF^d z16=cu%yIya+|$VS<OAUfmq<75|3-S3U9* z0j}x%r2todzhQ72{znX+M0hlPo-jCXRSt)LX?U^m{f*&|ft|`Z#H(<$w%_An9@lix z@K*=8mWQVrIn=3Cer>>4Im-61oIt&#KdfUj~m-GWBbQ`6^-22a6W@zEaVdzo(Vv4&4OmH$qI^Lx>@ z`uhW%ZfJCUIiF|XU;Vw!@U48#y`Ujhhkxb25aFl1q94ZhM1vo1N47 zEDdlCPrJcSFmkSm$nP_JEB|4G+w$j!M$Q>V{*Mjc${FSx2AU4~y^QoYx%PW`Q^42v zTOHt9kG#j=45yk_gVPT!hgSr+))&`!oLpNz_XT_n&p!sZ))(6h{&xE7>z%I~JZbQ6 zdz}8-@@jX4|E$5s8aaQ8$Qk3md!~QV@ZVu@E2qZeVR%k8eA;PzX9T#W&s>AsbhyCa zHatrVPWf8SEcbXAo?gSZa&9#EILOiTzd0i3BZf~uG+%upz%^c9F!(!+{I3{X(#Jo4 z&0mSx`sMopU*$g=;2NIS`}Q*5qiyfK$>8=oJ=Wv&*R}&E8GaIWnm(r({6vG-896q8 zo@w~>L&JZe!L9sD3~uGGh{*3Wd@KLM0j~LQdw^@Y{nX$#JWmw^;Ny&(=7^jN4WE8!`m_YNhQG_; zHk?-)+{UZV<6-!7hEF?{{|SRz`JXYkmA@q-|53xYavnFhmGcXOGdx<(?2gDU^BpW< z`T077p9nen9*^*Nm=0qMf3)Gh!{9djH4!;;4d2SSz~ENS;)tBy2>(Wd+jP4*BIl!q zZ{P113~s~o6@y#(4@Bhu)bOpGrwnf8{5B%zaNm!`_h|WVHMo_Z@_6_jXGHjC8r;fn zj>x&#@NK$v8Qi|#D-CYL*%y)jal@y4)yw`Zf`2u@RiC;q!1eq6Mu6*nNk28X4d+t^ zFDh?69;S1d@8{tAvT|N$a4Y9c9uMUlWB4|ms|{}DPc^vxuBS)j&oz82=K_P<@_BJY zPM6_ZIaeCo%DEvTXQScU`2Lf@t^C^zZsYs;i2QAaZ{>X5;5MA!jmY__;oE%vl)

1vtKV$GN!=GUA_ZohK z!TSu~w)Zv~zHQef;g*K!z<)IuQt7BFv4?MLja*IDq=`u}`@cqRq}TcBXIeZi>=Utr zyF=hW+28Q^*jJGVXN!=;eyHi_n#YVoAH)yS0V{UOOEpoYs@520qOt$e7a`)KtGord-pbR$J;(wa$DIBx2-Jpyv0h8 zqhQ;NJy~ffF6D=-vwk#$>EnV2;+p=RL~VBKy613g&Yt%!_hGu1gGxRK-KjOPkV??8 zqQf&^GW1uug<1?0))w8@f2)M=PVVGe`~0rwzf*hP-eVhcpG>WXHDZ&y=q)c`Yu~zY z_h%m)w`0h|nf?v3&2sLDs$5+acdy+5VkYOVh%Mb^vN(oEHoR@j{zL-CRXyC-7tbQJ zY)JN2afyq#K;k9!Kp}C#bo!#ma_NMPaE}rZ^lPnHVEf+TFSyNg3GgVTJ`pMcyp*1< z4BkT$Tjo|YWQPfe`;oQT;qIRM2+MxDZU^5C5@ZL2VW9{mmr24P&h+5ajsVXX$va1ELR>fLjk)f#eX^qThfq5G}g{Z%9zqw!Jq&9LLWtshBG`+%nT zV2rv~Xbx_|IMMDlUngriGyR9-U)?MI9$*?4+~&<%FZ7Lh#NCA4rGP_>%=ecHR0(cu z4yn37*g2$|d_;Hngk_VSaS7vpD6mplWue!-KMH$mO2yUM>pgj|#W|$Wx?MLo!!aQls7v8(aGD-PQc$|Ee&5Hlrn&VLMHyiW8uo!Ru6Z1^^Pl1v;J^1WB`j3cgB9*FKgajM@Q z=K#*|-DEsWi?0RUejs1&p z;H?~L)B8Xhlz8Zh?;^3V%#Z3j^fQ((u$;_GLw2X?$GumlDu#8RqpsLvBOX!xIw29vAfOf}~=Ol)#89C%_hYhdboId7f{?i=J@9xYEWxeHR zkLb8zXii?~-`M&+Ndrj@_Y<~HV!Bs`janGpqwqj=uV!E7RX8#EUzQ2h#B{HVynD;# zeds=>d#U?mAV9_HH4S^-vrT8sT2IJW5ce7%b>9q(_olcI7n*KU<*D$a?iHDXn=nqa z8|ifi)<-l4s(WdGsIOR~;Z`iBd%ZD?karNekLh0O{$O>lk-oXV*@uJmJM*rlpQcMp z_qxLqb&oiWZy0{X!z+3Jr+c|}p*!unIE9Xp$Nks6NH3*JjRkIXDJ`$6fQMxjWtVaT^SRGXj$T=`udryRBc6u-{!Syn3E?{V_kwo?4V9;d%n zclaldlW%pj+YI08P@gw^tDD?q_%!Nl{CwtyEX} zKhK#t_ny4DuM$?>e$DT9?>q1Fo;fpfX5M*c&YYQHFZ%#R(SI6y)~-x^-+E42dH7rj z!yH53y8Kwq(mR&EwXCQ83-4RIHN}*?bHVRbSl?O|lQ;W!lI<0}rJj%WZO-txZ5K&W z)19}7uL7d@G(mazfV@~n($b#Z@tnJrUKzLKguVp zZ@t|UObrRIa9H2^W^ePTa;E&LL)Q2ezY3V9MS1edwX}4{+qc$pn;n<@e=x4FzO{xw z-oAAy8x%OZZ~IXC)+@cBdK{bFe=z;I2LTW1{@S;G_50S^Uj4cDt=U&*r{x&>${>4X z`pT^8qkVm6d-~VDvFmgGZ~DeRHS)B5&Za;aSeDr$rn(+SDqU%d> z<@&u7!~4C*(C3|aEPY<43%d;@y(aLS{$QVYwI@gg!fSpsJo~it2m79? zZ`Qu6veEE*t@q(gb0nnueFQJnr>5R4C=)Wciw!WG#?SI&oEop<%YbQK;LW*FK0(2J z1!>a=5yZ&k%wUE*=OArZpIXDaR@Dc_B^aLfg`#TrFNE3(QAfnKBbfg%eYNg)_EChf zE*QUkX8ol5^X*fs6m5<>@}*p`wPq zdn)-om!zjZ@#XEp`-6y)P&n#Z>Dbm;J@5=cT^m5Xf$EcIdYtsOuY0ATw|ba`0bKd8 z9O%f0ZKmR@2*R=LVcV)WW_Pz^j4pIi=mIgul)bj_#uPyo1pk}9%p*2jmj|JP*OfNJyDO7-livpdpgqF z_FO8~q+=foOg#6zA+Ia>Bh-5rzY=4DoNbBMd+W*uH7W6(f9kwV?>{DrZI85)o_pf?y5s|jP{Eo8js{FM6h4s;OJplVM*7@pep@M$W{rUFM zedRJaf2I54jOtiyO0>Ny1AVZqB9Dtg@Y)bOtk2D{aUuSVA$Us&o({pU4Z(XtaM!n< z^pbsR*XMb8JJXHziGV8;Z% z5a~GF_WhqQxb5Tr*5mA3SveQ^28?pH{9}fGP#?KsD1GE}hin_N(nOe$bQs$ZXL3#Z zYuI6P0rnBtU(bX6^*23VANh^UT`Kdq*oO4WcxaGP zzyBO-XU%>SY^~>%RfPA8kD*Uo@pAQvWlVO-+TpabUYH%mBe?$J&Pma6DYH%&{0@Zm ziAVk~`^3}yyURLZ9p7c^#^Z+l9IJ!i^HfOZB^W+T@2%luWM-VQ)oTLJ=y&?CJmFGL zkjg{i(>|GouLDZIX%>V|#}dceC*J=PgG3FP<8I!(7?VRqKf1_^zDARMN**6_z` z3v$G(N^PH*ajE=Ys!zPy6MjT98j}9NLt`KR0`W*_(EICsP88wcyHPZde|$%UNM zB9XZG2isqd^SEzTOo+mLME|}Jd{GGgfe^eS1ivN( zUlW46K5@l>J~39Qy1oA8006r}ReHu1FK^GdbBQ~84GDxB?Jk4*xVBHsw!KiFm~~I_ zde4XLqiy4t25_afcGT>FD1L*Xw|eG2kMp}=_2GYS=&hdl(}v#a!*4V6R?qw;LvQ<_ zcN=;uhh2u=_I)2Q^pt~s$9`()ZJ+pnp||`G8+yw>X6Pwvby8C%52a81XQ4MPd1d;< zeof;4R&P8xynoDcJBB{;_D{8znkB%*p4eP@E-i?BZOU-iaLVks4zzn1!Ik-vuZ zk+*w-LdSEZ_GZ)V4Dd_wU7-2`!(FxCFuAa9&CB$_KhCO zJ}~6+SG{p0(gQgJ+hEGZ^^qqJ=p)1aqHync^2^&h{;S^j=+WDx5S*^V_Ni?j+4iYz zAKB`4Z6De8sej@5vu|wswoe$`_K{ycy>Z*359GVZvGR(t$>&Wz_uQ~OJ119EOdYD7 z^?uXLBqTq1y|LS~GxLb-*6DWX%slV+@4OZ|J_V|gU%p4UQyFbdcZ?nL?-%U5CKynL6Q(3o1B)7>tg!_XRMNdsY zk*&FLdTrgwWM56@r~0fW^LsS`$?@-T{I{oH4VcgH+d4xhHs=THCwQvBk|TO|dbtrS+XL9A&r^ zXTdk%%tJsEpNEA)OQyy-A1^hslKs(5!ftRg?(dih`c`> zenKo(?RJuB&PRpE^{qJu&8@L?M}2GO;--!mj+S3upB^9U=xUAC&6-|a8*9T;oGUMB zKvWHFtt*;3(m1a^#)w@~Tqx?wUXA=rACUh}h;2nv4Duf!JD2ZOZC$aZmF*B`Q{#Ya z6cFTiA!zStgA|v?me;SMSR1>Vn9rO97Bw}uE}`(+uo+KlTkF}a_336rFXCybZ&=31 zDixNh6HTnS)p?rRS|`M+)9*q7v~;$`+S@uin^|hP2v`ReH8r(D&>bCJ?MOGpI#{l* zJXW>8OqB$6_72-PEIWLC$p&I{ul)Ly zS8GX%WG9AyG?k(2QbZO)>HbCHf!^|yp`UC%IhWd zemp#+(c)2jVG!^S*mtuoY<^C|Uv7!vXCCPEn(+RK1dY4P$N!!{Iy65Tz7ApNw>nX> z8R`3D3Emi|;S~zASu2xnL|)F6KUr#cm4Db;?b$y5ztM>NRnx8T5_p0bpDps?l}@ig z+OYXK4S&4za|_v_hui1nPn|sb{=xi**{n^ak{#}6?vnctra$)};33@~)BGIs$@w;| z|9a&(>E+mi_6?H%!MX=m&q@ZhFSJ3Y?%_1K=Kn^Ew?xid%cJg$mcgx*+pB?mf>v~V zuZgqXTQ@~+Mnv{n5dI6~z9e#b08hyMh{)K$3tHvr-Gaw~fePtJI4@=A3$ksT=N0vo(rdA)b=cCN-wTY>&fI$>a?}vq;Wlw9QTVB z<0Nxj7q`MlkV+qS+l5PWYiCCq=aU0%Xu*BM(q(O3p@bse8HIQs-TFUopAM?QQP75^$hIL2$&m)tL?qqp;@ z`#c_`|8GOjwoLi|A%y--z5yp6wn0k&HiL7IHpM3yoHhlDUtsWc&72{p1Vw^E%!Z!{&YkCBaf5b z&P(gL+>DofJmvp{q38Rk_;ZH;y9_>zjNy2(^rv{7{4M?43_bf6%KvmjKi1&m4ZY3p z6hm+GJHybkZ>0QZ8hV@GIzw;M-(cu%`acjte{BeTx1r}ZSkvP+ZFS{t^Sjy5+x&jg z@VEKB)6jG5r2M~b=xu&?8+w~xJf5Py$^7*ZyxAqs$8+x1H;r?agW1HWT zJkIpk{KjxkM|#gv?p-6^kki7xln!>%)S>Tnaf@jf5)x}(2a9bkoVo7QROY!<=6479 z9IDngr26K^$I@803?{l$?Kww6lIs0Yw1I)*#o}VF5_jQqBP?semk*>@8sz&v0 z-_&(7bbjSdarr=%tejOnW2&z!mf5LyKGJBQ_%Laqz$&r^rk7RqS>daT-xeW&QojVd*e`FP;rm_RQ4a-GN2IZ>i@Kopj;4m@PH2kosZTd8!Gq?; zP9Ktb!}u}tI;8>j z9b;m6JmvzUEu(IUn06gPbt-HxRHt$q1zdYlV(qZ*;=eQ%w#>Wo)qE zj`tj&1OA)pxa9xY=2LQQ=0_eMYxpo7iiQufan>YcI+W4D0%2m{G~ezn z5((3xX!zsRp~RS3xRg)FP<1Fv{h)l8W0U(2ra$)};33@~lMaQ+8;U)Kdwu0=Hy~&3 z{V$2I-dX2Vb|WHFEeJo`2kJ7elxzMkCf<_B2l9~k*qxcjf6}uoMvM)pMVIds~pxC4Q_QIKk_)!6T?sWvv*HN{#F;#FQ~)q82u@alh0}R zDW4-D^me_Yr7taV0T{1Mr|uy_+{Sx~rw_*aHp7SSr=}-n=tmn|bu;8|$NID@p$p1K z&s8Elzsbt~A``Do=cR_vX@-7|p|@l1D-69&XS2a=J^Ya2W5?F34SmeSd!wPZ>EB>* zn|`Y+I?eF;2Sabi(4X=+6R3Nyg&ocOxU*ME(O{`DjzfoV&QMimx3^xR!IB(0bhJA2JDf3`%zWzr!(%Lc zmOFYVxb(FKN6+FAqHA$VFb^SeV`o41%$uR~6~o?W!*$@4O&$H(BQqC`%&+P zrtyTz2joLKDE|I;V@lTxfjPAwezn#s!oWaVeZyW-& zao8(4|NUxCc*mG`{DQra1TebewY9&^_mvMhHqyQ`o>G6WV}&ztPdwPQ|6|#sh2Jsj ze3Kw)CeFSbG4uKnjx6+q3AxMvY5o=AbG9Qvce5u{Ir00*GScvh&jO}tvOI3_AlpUj zg0%DSFo=={meNc8JUs&P-?e_uL4`4G9%s?aIgZ87NGqyVOE%ZEw zA7Hpt?~~D<$KhFxeoD0GTKH!6{$f+KhqbwK^|W|I<^`fXpTQHDQG0#53!C|MDznRZ zvtS6LZ-*A+#zpBRyi(m2JmFfDw=o>N}#e+s_ zE_E-b9)65tnfrgE_y+5@sas@U(oYM?9sj5kA^vW;=Kt6?Bt9n(iEo_z5AMTG5WJ*d zzphZDXrR8?1OUK{(>9ONyrn!UgfH zg9U#R{7S#s3q#B1d< z!QfUts*ffgE1&ZXJ>MHmkLsg?^0E48Ti>ic+REpBhQH0%LXQXYwZza{`NWVmI?9

m1|N{a=kr1 zTdrH<^W=JOd?Bt_lS;nUrYf)RO=Z`|dDwJKwkLiFwQ`_3xAK81$%I-?_4UM$fT;UO zQKlz89>JnL{|bWcBg3LSSE4w&j}%9H4hb^ckHHQLT;j(%(VpojlI|lTa`&_x^~0BK zXCb6yG?m>d?EQnUv84Tj3*n7y<9i~2{FQ&VcYD|H%D%bEsWLM+lFwuR9#}Q0zB?J8 zJu?F{G>rCsCfhDTfxaUJE3QOMX1r5USHW(p3bOvE8sv8+a+&H|A8)6SGS8&?>f)&s zROtzcx&K-jY$0Co1-l$;Xu&<-vK-&azOG2`@1s2_gn2R6WsWtE0L_mv!5=(lX8LnU zug+{|y4^`im3`MmdXGkXoR3>|Cm`^HA3)HBktM%Y;QfFHany$>dR8};)#9zW6q$GV4t0EyxF4YMw6 ztgGQqv&8T-4|IA>cz!9S1Vyic*@cCF_c{Afj0Si!2TrbuF6m4!hTVqsxp=W zgVR2&yBnN-#e-L->yK%y%X|)feuOn3Rb-P4!D~YB%R=z?hTw}r@DGIG9U=HNA^4gQJQIR%3c>$A1pj0R z{@D=x_7MEe5d3Q)_>K^KPYC{<5FBHE4l)YQTft_{ud)-WW1qp|vN*H+4d(9o^>4bU zPA9e+mdW9^4a=H%#x3tA@zUfj9c4H*i+6JAD4XK$MV4OO8$0iIoHtJvFm#c&bD3Cv&`eYQwUuy$+j=|a1DgFBmZfyYj3~p_s?lySL@cD0ppJworeW5ZvqYeIU zgO4%z2Mr!K_@@khy1`@c(=mFV1i6=5Ka{ckl*vOrlVF|sSR^FY1lsu553tq3*dCLa zH5r&^RcF5E4Y$%b-S>tk*rk-QeN7xgl>0ckcLOGjG^e>yJ$GB+sD3-H9M$iU>+SKq za@`u|E&w%s_r~|*icvi|?pmDNn~16h?#8qb@ByYTh2bkZk{si&maC|QbEaDRF|2<; zG9u*N_r{lkswmp~E7UgJwa8u1?YLk>43n&>ELMyJd#@z4Io{4oPdtqaN9{94xCUzD>kD;f774a}mw zKR^;v+0AiAo`P=THeAb}Ol3}qbIe=Hy{7tV;#2z&{%eg$RrHP;EFD84Zeb!aN5>r~ zu8B`8>hC_%7@f5<)ptrfvtFJdIpmd1mL5g=aK{+DxYD##JFJ^hRc3Y{u8fYXid1Ij z$B)XX#bdjlYshSoAkmGq|LpxyW?yt2=be$Y8mwTu`EYc8&F;kF=ma)1k?5K?p_-fTYB$_%T_ zCdVHI#nk8>D3;=6d|EDF!;VUBZN~g&Qmi17)BbFsy{695$JHo9tZx%d%V5kOG>{M@=9ZlUP_c)AgXL~-z26ptHxA(fY zLbAh)e3janUAm?JCS*!q0NorttoAb|%T$NYSeOG9PRqq1rb3Z@>2h6%O#&pdwj zhamxpCbO%5v?wuFlMXe8B@$U2y<$)QV-m}1-m5k&R~`y*Ocf&ed!Nheiuj_k=iL8Z zwEDQRon+HBXn*<@6k0?@_KecBQJ*b#;-;JZ)oJlh=y0wWjN_8&`enlCGBej@XK(mbQlG^eWMy zu*W>Wt=2nMIJy_J_51`|CZ{vuMn}+@oUoyIy@>bKun!n;7I*HZ9P>M`+R5CJNQ^SV z&wQqE7l|a~KN1lcc|R|~@ky92|a7yp) zT%Se#ypG3@G{Nu(e0b7W7lgxfDH{F)8yJ43l}@h-@1ID}xUs$(Ei@RtnjZ~63mE2h?U{i|eRTrhs~Xn>b=f4;gLmEwRbqYa=m2fN}yJ0ZF8C3QJL z=j!EP9TLYwgIh^Gi({}(h&mqf52lpu74fs>n*U=vM7$yoiEoPh2f65;O(XpJ#eATI zcuQn|mptlx#WI>4h*sg&>Y}v0uK})YgblGM1P{{{eK3T6WeC1H1YZ||ZwkS04#95; z!EXz}?+C$NU#FnXMiv{|6Jemj$s29RDnx%Qx$iF(Hr()w4E-8I?rcPj4!1qx8Hp{O z>4ug@C|d?^bTmNI)48Cdbx9M+Tbe+g+gprnw$&AMKu0ahAxO(orcv#jPi{zFZ|XhpHFx^$mdo=Z}arJc49*dh z#`}K5CuZO}Oh!^X|B|Z!p>Wz)o%w!#ksx$U^N^(!o~BaJG9_kazEhJk6o9tL?`uAm zL>L8^;Yw{2wL3I7Nyv3;JSEqA1hi39mZh-MIqNlYJs;4cfG}!5 z3wMX3XKp_ny;6D$hokfS^(ucoxkrLYazr^*C%US^8mf8G-uIwcqZ;Gw6c2P0qj2SZ z?+dG_r>es;0mMGm+qq!bKpoUI^Qoa42}0-*>QY#XncDGR#o3xSMv~(Wh|VFI*I0oA zR8}O0YKP37%Ic@MW0X#0P-noN0{h56Blo@AGrOX_f6tU5h6L4DBSbN^5P5~7VZx4% z4=;|6eHi7!M)@xOQPDINT8|PKZESIRLUNVVr818}@AWtMT~f;AXNNPb#Fgm zU~0gLN=MOS`i+hQkIB zc%j5a@{lxCMbNKl8Hm`S&>>YoKU5}}@`=Ze^iD(M@>58rco`^oNhdhc4;9hdD6E`{ zC`ldBJ4CCKj6}SSXdZP$KXy7IrlYdxd;QI*rkj{Q)`1fNItk;wIfCk$O};TAIZZ-; zmpNRtFIjW|2_>CG&!T)2iV_A`phg)!h|=8Iac;Krs4vX!7aB5KMJCaW_d~j{G+M{y z9;t@=5w33c!py$@k($m6wn%QGJx_rG+krWK&l-F-%t|AHW5XW77>zET|hq6mVB2s5CXPkd_dX`_k`2Y(C)A&`zmz6YYe#HErp3MT_E9JbxxiPfc`;s`?o&j!)Ptb`2(7|zy$8+)w zhQBSCA>FB<+V1^kt?bb3vAe=z($AAcE%jnn*V_*r;HKl|I(mHK{~ z%1NJTc)ix+0mExGRl1lDpHRSGHJrlK4F+YxXZpfu{476))$och1EzU_H|G}m_=EWh z(xwq2h>=N$51(V`JwaNIgMwvGQVrkZ!|5d$p7%l7k@hZ5s>7*nj^jnn%LnrxrkgAC z_5bT+Vq7qO^JsvVbbrdaIgZz8m!=8&5l;j=5tZPenJTBLPe}(MOsz73OaM~`{01vjwHXZ$v#C@*Pa67n82o8NZ*^ra82Wb_`V!yJvTe6=(6vuYkJZUk z8+xl-<6xYQeE2QXbaGJ&9dWCh(zQe6AHz@SUq?bX;-}%KxbDYIe6+zo9zy>GkMqLv zVmLax-}D&VD}TG+w3WlR4Sy?#1-=pl)49UnqYeMx8QkXUX`e7gV|8)Q8QkjPN_ zbdlAW7xKn%&`C~(OsE%2P$!9_y~P5~Ep^K4BuhyIwF}i=)Jan1LY-txu3O{OS<(Wo z3|HtR$#Z~ClJ;+_QP&SJeN;syNC+LvEdX-^<;i?HGqZn?{o6WF6-Rq7foP$qT#vh= zXwQ1wJ>V?qz%1exarLf6rvv;q3Ew(wss`oR|KNse#E{F8G~F6Wr4^Nr(B$mH1@xOq zpLv}7nv4P}n#luPO~eRAHvNA1IY)m6-?RN*lahG;NjHSw}@f88D!$ ziT2(v8Q&a#0(|cQX++GdpzGR{%={sldDhuY-LYP*(URk+Ld-OPufxYourrGK3zXmZ~;0h$#^ESvb+vSx~tWVL6?VzF#YbmZ! zPIW)ukhxu|8Uzhh9tw-v_~^#5qRl1*?9pn&RHPVg>8vu4vDG zq&p|ipQ91ZDfyf{sc)b>Z^4!F6mw8M%E@y(ZlW9Kkq)}e*+K{7L@({T@DySa-5dQ7 zsz@v&|GswTZlvjuCv3{dIpv<=tw32sZ@hsoxzlHkTrWk*yiW!D`SIEA^%=VtuhKsF zhvE7#b)KD6(C&(^NwStkC;TwF_5+B6uODA87As#bQ@kQiDH6P9NHJc_lP^sKUn`s{ z>t8?j8sW{t3+7*=fv=ptT>Ka?+Em}LRHl11DuXuJ4~Vv*|I?`On~*5J)KV`n<@BHM zqb)<#sEpq6K)yZ_Pi0-H%Y*|K=0=xxQ!NZF(`|fT;vZHtGNM;vq>HqYzNUzKRpb~fQDmwTRHwVCU&`wn508pcE zbvf#BQ)Y;16u(h?6;V)0eoS0boGiXoDn3#Qal1FrrxX{y0m;m*^6t6Rx%coaCooX3 z5c``TMA}QEX^^_&l-A5GA}ftg!wf0NkRIuAH-a$G(Y(^@58GC{4WeLXxQ6di)0Lx z!@D4dG15BvFFA88@gfucl^BE44KU|8#ud%|2Y2-TKGpF3m8<&?p&FrlIDSL-Ac8!J zgBR}5H}uLmxJhAiaE0vkvC!|>=Hw<7oRb@>y*|gWbT4L?Kbgu5XP3{zhwDz-UP}9X z3HO(_Z=cA*OW18s__|ZRTj?Txw5YMdB^lSJ!JfxrR zm3338=!8qifBsLyD>4h7U>^Bw9u;qJDrd@{MWNvpzY3V91>T%n>EnN?IkqJTQ7HUJ zeE1wg?+Ma|&9Q0ts{;&z;dvjF9fPd%31`=hj>SP;b};{8b8IVVoCn7?&$?jz_L=pQ z?oWS?EnllvNWPlCVDTphas#I+tOABGK|!}E(8NaS5guF~^U zNUk&GpI@qhZjRgzwwJ%c<2D_HIET$IUYT6;fA!)WJomQP<7ekd#mBkqLiY7U3#}Vy z2X5!&v>oRApt5IJby;`{;WvfgTSD-E3c)#NQ;7eULh!IX3wDOk|3?V^a0vcb2>#O$ zygvm0O$dG@1ebZaNdxBgT9($gHclv?RCZnjrv$EOrFUwiWl_@-_;CIYj^p8DoczPb zoqT-kbAh5GAKEman&|uKKHY0UP4Jhut)L~oP6~!?(LnMv==`)`WBc;@l?w*W4ca-n zZpe#{Z87T!dj8^A|LE8r*g3k}1$FfH+ka;OS3bKvPCj<-PWL<@Zs+Lio(KFCDjz$C zX7M)Pu#->B&~qg;U6B8o20snYmH+1rZqu{F;G+%w4?^%_FBCqu@_fC=nVvC*&lp3` zZ>px}Y(pP6_<4q&pGu{lVdzgc_$7wk&Pmo8diLd%&-)C$O@EW2A7kiGVus+DUwW0# zzj>S&E6<$GJ}&|+y8|D+(#E_3*b7Q80J4U!F1}J8}ZTj zX}&59y~V#}aGT!)27i~~!x! zhw!=6&|5xVGq~lmJA}`31|MhY$w&@x;DT~{v%xL@(>xxmZ!zKG_>h-6_CqR$FjrqO zdCHL252;-%<4j1z!MXaH%&z?QG}W2^k;OzZVUM}`eF%cnxvMij;AH*SnVD}NAQQ~f z`~7EcBLOBxzKAR5>F<&&)&t3PYkZGf?~U)p74!7uH)#Lanrusaw(zC$ct0s|u2_3c zgEkomX6dnX=+_U>>lA6-*T&}!kM`b)PDbDBdjBK+Iso%Ak<5K&QvxSPJuC620I4H8zm@&q2rq3GbYlZ7rqe&G?&lRjEwGt@#kyd11II zuoU*5Df1$!&VG2L-@FG(M^0g89uw}V?4@sqLRpY~<(N;66l2BB_Tj1X_H_NO_q&)d z<`{*ay$?f&xfAox_m8a3*4&@kl_fwdw!==Bp_q*30EZ?5f4P&{~@M5I! z8nO0{m8d=>pqB>K>teyO(f^*`#3(wV5XOC~uR~Oisc!o0f zbG`)afizroC{T7#Ugv5~u40TuFPtUzCQhATK=g|5YMT1+I!Ajh0|SQW{}>*l<}sR@K5S9N7v^T%@SS4qk=o7I3RUmzam*J$ zM#OO;nXTohif@lcdyjx4({={`Sk31zrkI$dZ{mvOMDuqtX&vtofdaxBAX%k`WjS*o zY)z@8C-8PjDx5SWYKapp9_fF(ghUDXIA}t$H@c?CFvOEbUD$3f*#2Ka4#)=HKY34l zR}gn}3lr4ER~)M@9wEZ_%BgtObnowA|Jv!^xff2|N&Abk!*!v|E5A+BW{1Yt*zlJ|MfRmO^uLT%X`S>|5w=PJ#1P_B4>E9cy zP@YMUmdOm3oeh7r52u%4c-{wPN7{LQj8o>Bv#WUue!={62v#Wmb-r(UH=bJ;jNd-9 ze$xHv>)r?J*g1buNSDsM4@GBAy#jU7K{rN#!IfvM;DdGM?)@CR$BcU)2kXqw^?azm z3%Wu&@M$2jI&f_dX8;ejh2(c-2woq8FAc%lLU6thh2p(F1ivu^-xz{_JOuxA2>vf2 z_`iqXqPwmbpu28Zu&5ksOSPhLtFjr`D^?=GS%vSa9OkFzae)1f+*j~aSA_Wfr=Z`+?Q1aRfE&G2E{t@!T@ z&UaJsH~EH&-#fb=M$f<@ZguBrL;rTe$L_al>F@UR%rDc=?+cyoS);gqZ@+8!TirR= zrPBrF*5z@Aw>rpfL(eXT<~M8Ttxo-BLmxHtpE2|?ga3=6=X<97?=!pYs2);cwIb3q#LuvC=?9TYb4=<6>O7aWO7DfWAjkq2`+WigHhx z*?21aIsQAu5N<#x1t%sIXDB?Z$L}KeNSNrmf)o)p2Vg5*%DZ6-U=TSSv44} z_Q2aUpF`4jVqhrW&*++QC<{WT#4$AdCdQIIk_rq*xy{CotD_jJVx&G{b9^3xujsN# zmZbJSEhG5V%#c2u4!_F>Z0DE)|6uTzx_l!%<%Q&6mJ)2SeCI+-qna&tgCz_y$~>-69)tt6UT0Fd!F-c%D*K^QaKH{SK2;wY z2`20CMDJ-Yy~*6iz|raQ;9Hlp;H*Cl}zzDBkk5NKe3dQM_Tpmp-lgNHK3f zAKAukjh9l_rCLAwwn|hmQQq)NP*H2~FzDpasXgK;61&)F&u7u$0=sQ1@@#Nw5kQ~p zt&*(JV&G()rwkUu8;#B=`jLlmr=`punhhkSTa)>{#kTPiI{;u^7oh(hG=p>Y}~xBTLkvy=eca`MFJ^pj|Isn~_klrW)^QL|SCU zMzj`o(O_J67WksFrTVyEG$Jp{)|EuE!;A68Nsa4+MiLc;%p|j@VCyA{%;V#p!t1nN zs%Z8i(ItT>x^^~DStC=s||y?qzLn7ZXQlKLY^-n#q4E8cQt_tms!Lpfm@KCalh(*wh3~-8GgS6hD)*d zNQ9EvCHAa~VVcj}MmKK5t4OQ=uiy&1R%{5wpm=q6Gbc2JZYN##%Xr@X++uE1F5!A0 zSGO_HHSncw&UO}Euys(_r4sf=hJ7I)=Qkk)#<>eu#L1G8*hJFpxJ}0Ap~!pU61;aE z5)%E$8vIKcveeAW3*Ts>H1hfm-&zQM;5n zy5{v5G%v1p|#8QLNL>+v}@;w03W0_wJ&i2P?-t1RhgSQe-E~ALPve z9eL_{lv3PN-Upa5SJhEDuu9}!DV72-MV7fw9-MbywCBCBxXxhRk;_44_LTAC4nmpl z8fLs(Ctr*f{!H05y|g+zD^{I3Av^tOw(hN1jUi1&UA%>P+al?dmcyk8*{qT9BeQiQ z`N_an0=eNk&UB8HXRcZ5e!dam`6P3@sX1NjIQfq6>7LIwPSyA^p5%Q z7FKC2B}ijxqv(ND!y{NF*;1XY`+^977#$!l z#ajx=+#bTM(*yUPDYo0L*=M8cB#e?~f(v{xwn`fNyg+{sy+c5*ugTu-ZWw@@vOxsh^u=nl=|TD@Ff@@a^t?p)vPr&qo8s*Ng@wxi<&z z8(%GH-J)y10+x^m+fEc1n_E`))nJ}&7p46OFcfSZupH+;2$`ID?7DDf2zis|qh`UM zkK)FC$fu72JZ<{AJeTFTA~4$=`R<_3^BwPhi^(s01YWYPEF|Ck>(DLAO%#gA@7{^r z3MG~ioCW)R@kUx)qxA%X{S@&nhpT$(Q;Oqo#6hGh_#YL`B#L_X}?lH5HNH9e6 z5Z!nxDY3xs&A8%~n8u|VXfxbCW`=ZL|2=pUbq$(Eeib+=~W) z=VqW9vBhB``2Cq%gdOf8VPA2L-q8;%+YN1;W*Kk*!rj-SbFBq4PiA54mm4h_3tb4% zWY%$SJ#-eMJvU;BmMpHra*h-h*j<436?^SPYxni9#-l(a-{eQzpE9vTR=4Cn0a(>^ z7)kI=eIgRQ@xrGO-Zux38ooMGPnZt<@UcwgQ9Fw@SB?6g9=wu;%r$>mbX5?vMps&W z8!5$rggu4}w^IwvIgRNXAh?OqL zFgi^l58rICQxILd8vngN`tY@=N8}l(N3H_{o-V$Zu1P2Yl1dfQUc!f02TJxs=Dlw6 z)dw;8z7NAo+LPn<=c>-f(DcZ5ny5OnxqNQvmhSDtP=RK%_GIuh5XXAF#eNMJ)(_!p z)W2NH*)`^c+T0VQjgqqSP4nH~F$sMq%57jASf@29N3g4Z589xC1b3I^9^c=8JsxXu zW72kK{{;i8#ufYeM-7VM?%$h=coouT80_hP9yK!%AvIoFannKipFv6}Z8&f>^J@9^ zN%9cul~5+)I7d1;a%RLWO_K9PW?bq{OLfrYl{Is#X3edebpgsXVqOc zclPXAbLy&+<9zt)T98*KC5$_c1P76|bA3}sq|;qo0wPzob;asCnqu|obkp+obaU&H zSh_8Sqebe|P3~OQGv$Pl7>^!tz+?yb(@Z8fMs;m1O&#^E4NbA-U7hLJq9z>W+In_t z(~|mh^NOa}qONr8>iW)DeM7pdz6D3Sp6SEQZEafF-qe6IUSl&ZRsNk_i~NzWi`%+d z8yUCUPtHyMMy_aXZEU+b*4cbbQ|@tD?zzM@=7L;W+S@vtnT`p^8m@k249RS}8p&Ew z-_nIRI%8vEi`zPICat8cGggM9SQ=v!V`EcI9m|{3P2*!zV|ZR(aduNnlbrL?UXLT- z(w*a&)uE-gX+=}(|0cF$j_(-qSuXjU6dPMpzXT<`1R1ShM$dgk@;S8FXe)q{X>Y?` z@3GFMZCx#ma)dCdUq@4Y!_ub439*Zt(o(ILHldm?uV01g(%9^(_tN@wERBPC8rm9B zUz?g5J6ZX=+Hoi`3Lais)VJV008MKXYMa(e|MKK7tJTZ-MY=PPepFklbP+|3`^c{?H_k)->h$gHEj7~h>iZeh$pWqvY(YBK6AN*$b= z3qQl-XvGJ(g+8LO1JHbUg~!7~p26_zeE4A6g7@VJ%XCo#W}SxrpatP4EuCHy-X9Dv zhw|dtxq*af{xv*p2I!~u)Vis@0xP{f(|f(n$Ad!Q6Fz*fy!2kLoZDo0ejlxy?ZYQ5 z2*1Xw@CV=t%9PJGv0&iTwt?l(`F#zq_$pv33wU#GlaD_rmmuvLga~3}@);jK$IyF% zw4C<|6p>JB_>Tq{1jF+_C_4t3$_YTYyQH&=ZYTWX@C)XjGAR`QAvY->(X%%}CN3Di z;=wEF{`74g@-<6+6icD?hG%*_?ggRr6&{ZT@W1uAmWN)eJ+AdraRv{!sjyU}bgqyM z1D_N+|EErZ_{!pf%m0<~kMTjkT_yL>JOx~X+z+(zIOS~}-%s|uQx=5(M!7GM`APd|z1)n59I_z%?mZk4*%x>LZWg+dLHs}I z`OFTa|5lIRCD;7lzlyiSukXy`U-UTJIqSY6Hzg4#@BEW{#XBOhG?31nf(NDV!W9?T zb9N6NSz8zV4u1!@w%snY`~R;H{K*jf=@9(65S;sj6^i$DA^00YaN0Z+;xi@$KPv>E z6oQ{0f>(y%7lq)pA^7DX`1?cf#t>X=Zzd10y$P-x<-$=c67>s5u}0J{9K~W%T{v1k zF}K7N3rn$Mto+FavVjAiWQ8gFmNhfvJSaK#X)Djk{3 zKRA9D&cY9h1aaL2;n+;rb&NL&>gd^(QF_;YIC}ftzSGl_4{@d6?QzC?w!xqGIO$I@ z_!QI^x?p+|9w#4;W0n79hMtNX#aSQeNPiA~inkbgYcsXN(3ctd>kPfMnYz)?vk$HO zHyC;=&zlXsO~35wi11A3M8oHZp`T>%=MBzpjmG;93Ji{XSk{W49fDsNf^*kQx*(sA zdYl*b4V1qZd2<^M)QZ{>fgp||q4 z>wc|`k6rg`>yKUcYwHg;h@xY9rr@XYxyq#H9R^=&=xzGj482YNDnoD6|4)XVeM60R zo1y3Qi{gu!Ksa7(y?V&tQ}Imcz4R_a=`sysfvV8+!ZRonz?jdp9G5J{3Yg%h1OVx618G zLvQQ(LPKxs`3DTWt>?PVnfbEy`8LDnG!yTa3?D0pn_mkeILd7_ewxnDcswY#dkp;; zL%-ADaf3f(_*`J{eFmRq@Lz`DUw|bL9n)jq)A7E71@StMGha5H?=$%6c&7PnGJI@0 z*BacuM|T@Omj8Bx50Hc5WBEU3=xsYtArot^Tr7V#;pT9g{whyTIavOe8$QK&7Q>IO zIe_bXw>p56AKga-xW0E^2;e?Dkr5}kaKUm}5rTirEC;hEK$ zr{(-iccSJEPppFst20NdGvA{fU!n$oQxA|0OjxHmQ|Eagp{esiTxsgORIazj+vU17 zzEZCD##iGCQ)hDAmEWVb1iWbDe5lw@z0wR}6KEdb6LC4C=479Yyz);ZB{Ts`A^@h@ zdGQ#>FId~|H;LAx7yGeX*U}*_8o0wCf%Z0io8u4R0)hk>;n}0S!=~LprU6Ozy{)SE zM_u!|pJoDc$!~*k5Bs5!=$e~ANxPxBG`e&4(#%l-d+8&9S6r#qOU$ICxc?5ZYmQ*? zdHPfOv_YRLz>4QHcp<#jF1pQyPi4JL^sj}kvhM_Ec_9WH+M+VEG zMwDPn3f3RkNMXI4;hO9_opJl>1o{~0X+~RvD+C3z2-w-pquG(1qzNN)*!))Y{vz7j zgf1|wR_8T-y%8KLzs?b4w6-NaFPS-X7R+Yy)6)%m2E6Jn#}z2na5FCnF&-( zSnj~6krF@(#1b=mA~qO(CmuCQ6c7KQ^1O#K4^~ENA3bkRv~~~darw@%Ze+)w%-E;m zAOeVCI`TaX<=6s__oXrqV~61wb{O9ctE@(!9PWpYy}pI!1M(q~%4f_LFF52Gfhb{si1^T>|p zO2+N-DN1G=i(aT4_n%e0{}Ju^3EnT5$MudbWm4zoUmGzXx@!w+9uMnqhVWpXg4rE5 zK6drDDm(r}Mvtwyr)TG%xg}dy+9XC%@?yB-GhnWbBIZdY&NBYRUybk5uE@O-TO|!SducdW$3hAH7F$^BTWu>ERV`79nyg zc0jx3ZM|_R!lMhoNMN+SFxvAuj3+G}cH?m8WP=`N^y5&gApR|`HsIigu(N;$%k3$cu3=FRORoEc;^>V{rKojVrPf6^{wE|wi`GYRO=acdhh4M%(1qgj*>!thPqf8dKS7QCYyZ$yKoZDCWcEkrxyzJP;1_FE;KG>|@+)T9(b zFtG(1(5)iB0uNj_f$9m*!U4>W0R8{=JM>sHzHEM#(|RKe4vywtF1E&PwsAyuKg@N zBvr7=->?N9o;<-eEA!(@nDOK5`D7qP`DCE9if7d|_IQuj|G>MA6R)1yc|IE~Flg z02vI7DI+wQNM+DWollUcyqS9LdsVRNUH{voM`5$hP_%>p94bQLYPe)@HOwEaaDV@7 zJVt6{?Uk5UOS)vq78^eDNA;(PwWKF6NXpZTi|=zmnf>r^E|CzKlN|-OmV)~l{@fZt zzQ5VRa+6J`UQW4PoKF&LzRxQxvt@&2wi(q`U)?%B##aq1^;|cGZ7C%s1o+5SN_XiS z>}Jt?JF^pA?!7qIr=RVZ4>_n!XJ>am^6x*a>^Y9@{|=sE?6LlXVpG1weSI=N zk(BX$xfnGvck?i!!!Q~v%~ zl6i;xOB2b#4pVeEy7R$d85ux2dTc@(nNM&(!E?2F|Km~h}VSOD3H~8R75L|^@ zGMg@9$DVCbG9&tl+&V0NB6A6A$-(^Ax|{ynAgMq*|L{e*WzgJ7%eathD_n#$!UE$X1Q`U>)`?52!KHb3z^XQYP z%hQW+hR`%*9R-QrcCMA6;Ihe+Uy!fqG4{K+J%x<1r|lx7FLPh+OhCRQ=u~rPsoiPz zt`8LR3vGtcxf<36b_Ir1$J?J~1!EWnJaC+?s~ks*5Y@sxPmqn^mLB6b3AF5DjPU5Ec+t&x>6c z8#5ud&|&)Ai^oN(FQ2ZsTNmM%I$Sn)x?3%QEnPaV>5MF2d39^&H3gSLL~>`fG<7y~ zG`FW=%--y6!m&c3bxBuCeMf9X6Ba=Ikl;b$JI)FmCFE?f3+dkI7KiZVQES|aNfu5L~* z#gdEV&8^L6D~56?xQ4-m!txHYAFy}=r5c-QxkLO-D`kxZC0B5* zL}*08wGuDE9Q;f1!^;&p2|o;kWbT-%Z_X(h6*%tb_P<-_pkB=>ufLbZ3u4Q67nC3h-|!{7eDopL*51- z%OmKfp6-ynC%Y@li}A4h=(McPfS)+p(E%>z3obbT&4*WbJUrwX48PQe*Laj(nK$IEPv=xa`{)h6PU`v zg>e6?ef+_E1!=Dh3I9rn`NALAoA$WctM8)6j>4gdY6u;EdC;S7&ukbj_kWTT1@H1Y0&omz`f*0rVrT9vZ zt1X4{>GAk9TVKARhf!Cd{HIZmbeP^2Rx$rM< zZeGcS6l5VQDoC&>-MpLxli+Xi{tEazvAmtcQ{l(3YZ3kB@V77PyoP?p(~6NT{S4cI z13ByVXS+^l;D)Q?#WYLAJ!jL5w zvNppl)({Xv;X({qxB-UnyY(3kb}Km?N4K8Ct=kY92#G-*vvZxek8ur0x(!3^7FnFp z)j4>l*3RZ7Sf2syfnURc8!QPQyp}^3ZurFitF|- zGP_kVgWu$Fe*dg3**|%l^z5gd=F36nbi8mV ztMro${d9w$Z|FIuRr;i%PZ<1CLmxBvTtjd3yV%g%dYCpi^PutCeRfH&??cAW6W9LZ z-y58Kw4Q&~;H2j>x_bk-_Fr}e@TrbGvL}GYJ^t+gUgq)d2k^Ih{O1Au6p!ovxO~iX zj`jEm-oPn7-rYuS@Hq1`13#79T7xGI&ZEESNYB2J(zg?U3-bAD2!5}@lL)7L_IaG? z^j@-!{Knw#!oAWz=W$+ay*;6Xp$6AmH;dtTUxeq%XOy9*%oHE(aq>?Xe4L?=8GMqV zxApdK4LwE3wv}$C!5N3vxAz&G^gf%BWdU64vt3g&1N54HPOs20d=fv!cNqL)gFh64 zZ}CF~^0E9sZE(x~euJkB|EYe+6y$TE!7ZOz2Dj;K4Z;7_;5MCi7~Jyzj=?WB>HJ9u z{_7AtRf@oH!FCdBr1di_o$M{-~t34i!x7Xm7&)tR(+Y;sT zSOC|0_`Jc-H1sEM!W542+V}2F9%ni^_EY{bLqFZ%6(RKJh0v!$=;wsc*N4zA3!(2Y z^lT$F{nr}$gu%NFeazrlLvP!G9~<13`_Bw+%PajlFog@2?<#{^`pAQSDVm80m7(9t*nx0P?yvpFe48a%5 z?DSyyG#T9T|FywwdY(48r5{g)EnHBZlMHUhTg7KzueF#Ogi6h=wk+7V(9Jr_(g-;cJIpuPZ~ZC7~J;Xeh`8m zHMr$JoO9oBl&9r?ioq@aQ$z4`LhyHo;I|mursuN;x9N#7k#MXJ{HbeL*44gvK|^kJ zU3o>>l7GgLLyG!^pMv^ zQr%CKX0DA7_qJCD_$ZYH;C*5r<^0{dOLswMCTW$m{G<)qB=DWq_JrS*Nb)4t%Dn>n z3cgzQ1+A{k^uSXLy|LxOMIJ z#`yUzSjV=UJdZbgIl?ks6Y;Z7#qC5H!T=ix~ZBk|XAAqIMawERQ_WzP^Ae(AvAgW@8; zpzIiAsTYdwyTxxmhaLjne~(Ik7>fPt8wLyV4JCLlxioYy5EyR10rs&cM{oQp zq(?fUshfe%%{20CO(fiEzi?j!aNNTRQ3(W z4*WbWAPXXY5V`;8S7-J=kc`W0JQiq`!Js^iYeo6?%I?37;HVwkOmhsk#t$*VzI)@_ zaTN>)_S}!qE7=fyILQ?AQS>XrunJcWrt3Zs>ppVTiqraeoSw)d`jyHeoY#Xjx<&3` z^u{ak?7Z*8QheogKZO&Vp{z!8e-SBQC;x1

OL2Q56&_3r>hc3Lk;Bu)Ex^^5u&VB>!6k^Nq9>HF2HSu^s3f5-J+n(nE&aCp22H#Yo$_}SYW0OS*Nu_S0U z2sF4HP&R;iRCw^x0{MBDl0$UlW0O^*ClF+vsJKVifVlE0`vO))%X@$&s#@0DYV-63 zYd`~0Z4O)GXThE{)-3>@wpe=wH2w%FR|J|=;e>AYLa-vD*Hyji+U05`3!EE`#oUX z_f~xwv9PILUPVn081rq@m(RX*f7ma)vHSvJ#G)FI`Ij;~?fR5^FAq2p`!-+q`IOc{ zGV5LVb5ng=Bw$Up5es$sJwQ9tJ&J9a zOCa|7z}_3(F(NnY;zif)%A$#d15$M#+nDRV&hNz@$-}krrJfH~U2rP|ET)$bE}_0U z<_q8)tYeCP0!-CRnECg=`X9gxH?%kYgWyyS}X(^z~izRHJ4h} z^j{{2Wz3qBteT_L@2#3M>pgQT>#F9|R?n&(hb)L2!<7g1tylztvmTmpfxH_zJSlrx!V=o#fv`>gNv@LIMYi+`b1mM6m z5RGP?NvFm#A(otx99uq)Yh2`n1?C|+TM;rQ-_E9nw${d>GoCnzaV?8PVsoi>{5zT! zW916Z?O5DVzq|=)fh@SvrL(KOy{$vmvbc1(wIR)o$XN5@X2=H#OV>j%Jn5sI<~Cdx z6Khyn-+@y;nmRgj>ud^zS>A^AGHIAm#VX277?EjSo=zq)SV}dW?~~?F6d@t$3xet*ag$7j@ITj9CwmNc&WpnC;$G;To% z1X4bMOG5rA*N2EqoCM^5r18@ms=Hx(2)B}hYdDUZ*fT8U4IH}{bQ~)YXPaeRsV8JF z#yYld)`jVA-mVc@V)%pM!*n+q{_BD8Oe>vU6W$-x{p|PgPhn@5``h(%abVnM#C%_;Wp7%l7G066)3pm!l|0m&=oq=Hf!*oXne8qM4 z*^U?ggYoB|4D^xik4bmLd~&^j))l={F2vO-&TcMom6zhIH^ix5p;P=F@Dtbit~hCi zzP?~^g9a}J1nZkB8QZ-#hF zBFwjSDY+RDNmvm6nH~?okvRgCH^~tAe<8h`%JV$zb%Zl=~5pd4cqNSn!falU(zEJ>orKP`*AQ_=w1+03R1$ zNn}-?Mb1|&THoBQc>W*$tqxPabDsdNbmGX%dU1m78gKNx~P9D+X%-o%UyO_2+ zn|85p7sGZjlFuK7Ae6>JUaae#O}yH{(r%ipQm4sW4g8TE8Ho=OEx*g!)F@ z{qpu6FxW3$FjoZ?x6aHJoLpW;swgd;ub_S zRURjwGx1aWN`s$e@Nb0R|7rNMekz|{CIn8?!+7X)kAB{>uc-8&F!bz0DE>K*lb+uI z#qTuq?9(Xzbwkf_hvK^pJ->yDt35RNbKXSp?-_bqEa)NkdOntfr^d(A)gZHS{*W3kOQ>&_elNXXtHy zdknoz|KAyUo8QkHda81j|CbHD<-gm|TmIiR^tL{H&(M!D{C{HTt$coI=&gLX8!a8n z%gU#i036HfE%<5rU+-~VZ2C_z^qk*P`ga<7o1W7Ry-m+KhTf)UhN0&eQTfj_^fo>3 zGxS!TI)}^06Ahm>LvQVwRvG>_{i_YVP5(y>y-ok83_bg3n*M(=^fvupHuN_A-!SyH zK0Fda|1(2x>*wJR`eHvm;bY7H%^nZFzh@YF%l~Xc|4x(Na}B+fr?vaH@=O_eD^F|p z&!MHtv&qm~dA6AJ#0>okLvPb_ouRksxzW(u^!&5I*{9d^eBR&{27lJ@=PT%oBXR8 z4ZThO0z+@p{~1GX%iXTKuyTtb4Rp*ef9hOMv49;LY}X3eu}#7PS21H7f*spJCeXWt zTobTAc%97gAK)DSp%ka}8{r|zSrvO&~NP731}wv(LQxGA4YpF!IR3>)8c*(yXR*>VOY?D=^Gb3^XpW8 zgJbNfij8kULSs5aUlUKJvUS)^3^R1IYjE3AojKsPCQim1Flc}0HyY9-%>M)0cX&USw)!Ycavw1`_CJh*lGYnlVEf>V(MqbBO^*3uvqv8^rDK4{%4wQEhpDz(+JKFa@mXXf1dy^}kT(8r%{cRtDe z&F}oabLPzX&2Qdk#!rxA;$z<-bpPFP_!TakUi|R5&llBhm!a3Whi?}g(&DEd*)(7L z^)CO~F*^Y{=f|&f{|emUGzJd&!eh}#`r^BFhOXgAPwn?#7&(b(@E&XK`;X8PpSk-6^9+vb6fX7UY(#I1W zWv$XD5+5GhIGgY&n-qUO;dyMs?qy`-<#b(0cuv<9#Gli(nDCsgs|k;9N#$uJI`=uu zx+uZ<`uQ;7SwFWBo%Pe@=-|Wp`3T|h-KabtCp_!tUkK0o`4r(5xnx@au?m1Ssqg$ue``PW6u0%uuS*opDt0j!J0>yj0I=OQOa zCoHo*x>xQavN~{|Ty#t3oYm0hC8PHbm+hQ+8T840=Si$~U3i{#&?m`5S_jRn%@SxF zTT40_Av!^+Ag6kLQ|e&!8h6T_XltZAkzJOP25;9{+J%!y4UXQ~@bBVLRuph1RzD|- zq8(>Q))w!MXvYVINlDMwz;= z557rMU4fYHmL<6`fKZ_-vd{yp2)8y5EJ&)mZSOu4$3Rzv+jZ5BhXj9RuaQ4TPPCnJ z2-!FDs;nqx!Lw@WK19J&xvSlEnS0;oWfd?lnqMkH;aHeelw6Z##mK-UftSBqZ3G{? zIBfyy>r+?9A0R#blt@eS^_8My8BpTAvVJ;x+c~r>JDvdtbDJ$HwjAKyTqbPgYqs^s zEBRL1V{#hBe~(0GO=nQg;jERLNf5zoVA9eZintg<;}^JK-k8GXGZnK?Qku)=+MvUGmc+)7>x z-+$5jp{;kHFkaMTTy}l-pw_$hTku|$oLBXySnqBa^MZHLz!+NY4tWprb?#6_XqmfR z=Pqe70F00~*0#3V#q)A>g^ZS0H^$nUjH$u=3?pNxV8-0Vs6kB{N@N*)79pIR=>apx zNe|igjNJ6c$1CSO3_4!b$U&C%TgExd`c1ydtm=1m0-1Ewnd3fWE&_TnpTgB*BY?RH zV~)@!nWe6&v9W0dra7`wBL$MJEL&@^kuRP;8ZC115teTt3zH|L(Tm_+4o3 zV;5S3;ud3|LmYZ?s0)g4BW{$v1m`{;zyO9gw3^wWUST&*ZopHjuN?PX7e0q5H-7lg z+=qsL!DE0l!09#N{Qlg>18z83_p3x0I8DEX$J_<{{v1OB11#c3+DqnF!|SzLo*+Ex zU3Qf&e1eJM*KkV4dSYKEcs3Q2QsVSI;r$`3hFAJELesQ}H{&+C`2BSG*ft5_)4=4D zE_{Ze^Z3}%+=+(o^ceWzaqsI6L3*9wo6)=x2XRi9e?R@mW`5oiQe>S|&}=V4?-tO! z4!FZKkp1J(#><9LG{O6hb z{_FcOPLpr02;V#8_cd2-=)>K42j<57)S2J@_6Cg(U+HD&7Kg7j*X++qhridu+c}T^ z_6D5}zuEgZZ!`45$mg@Hjc=pFkMZyybM(C){Z2zKjBGX6?9V41ew`=hT@HU;7HWKV zo8SI+4j|{VTewf?Jol#c>(_;@c^_fb{XjhV=syk6cL(Ub0s6}U`tJku{Q>$BqOW{% z{;BK=P7UxsBS4=Vpno7hFALDkq~C;r+bziP12VB_Z4I)!`)BPI$V4GCD@hg%Y^#vj z%U>AE2?Stktrx6mgt2OHyZ&2~2s_zntr{jAmR1c~PTDpH+HN|h)ggX3e5O1X)orL2 ze}?!K|2v|OC;DLR8WQr};ZWb4DgVlUF42pL&im;z{ZWU9{P+%(&#zs%gA1w>t=C?0 zbljs2s(4-hkH=`+DE$am4*@@c=-l+S#^A4Bvj3D5E`B|OXjA;M1~KAQsgPXzFvCOprb-%WT9OU7-+hZLa7v?{j@XQ~F48!4ami()n zXAvH4Go>d9&-%fksBpf1<`JItQ$u)k36=jc!n6FV2+#80LU_*4-Gt}4@Q)Lo<^LDL z^ZUJv@GSq=36H+6%Kr%AS^n=59&0ES|6{_lJU=Hq%kw3l<@q1=MbLr|B?Xy>HvN@;bS6` z>Srb4IlUhyJg3(l4Bfwc`$xi`MEpNR{5ie%5T4WfAmKSbKOVsU7vWhyF9z^$5uW+K z!*yKnzF3}^qa!~s|I-M6GNreK@T||NglBzDCp_n$d4wNL{1+0Q^;u7NmcNDYoZedk z_>U5v)B6zN<0Q{_2+#8TnD8vm3xsERUJc;ic7#MG4*F;O36Ac+uW^KD`SlzNA3vS& z%>R-A|60N`|3<=}BC_iDbuHmJKio)o&JVW|p7X;$68==;|0%+={=ZCk*8f9eY)$2<9(qCfcFnK*U@o*w)`ufWggz$ zMp^>+TRgmuyL=>ozdu0d^FLUg)7&_#%CG#-C;AwY{{lz%({&Zmu?|(!TT6Uc|4oEv z{l_FM9OS{jIwP?+*4Tm@rCStYUX^i*6ZpYg1G>ZL>SjX&E zBc4_9rEU`4nD8txCOnm5!c$S6{%)zP%1X^nKi&&|#)=24EUgvKcZDQYJR75(mkW*U zcV3YvGSlnUGTE>>COpNM555a5#e_$quZUN`ghw{dY>O|Lo&JS2;F$`;oQ$;(HWn=c zC5FJ85Lj;doAabn=>oHdpe|;y@ryN2J*;_}E4r4#r00wAHDHl3=}F|m2Vu|i=|7V_ zPx%1sc_zrR-@hh%o*$u~dcpc(w-i)~Jx@nrH$IZTF?$}P14*_zf7~iGr&Z+UbPm;? z2m9LQb6V!>GmMKA$v+h*=FvdIV>|(`8TBMP4Sxv}#Sbi;UK7smhi`WBqr7DYS>ZH% zmGk?_y~`0$FS66{N}DSlUnh9B*Htd)r^4YD)vAV9`c*=?fhZ1T)-m$0bfgOo^kd~; z>FYrh=hI)cWJ5nr{EC0m(fxRbxDOY6cx>?fjt)G&0_9Uoc$Ae&Ka22euW}yIQPwJc z2JzuBJy?;$AzrK(P&|*N^BCPFglB!K-HxBGYY5NjY9@I&T`LHWd1{rXgXr9+&^bTE z%Y1GpJnQFUL}&f{v!jC#>jyhM!$CjzZd9Jn5}x&QH{n@7YPaL-XB*);T|0oetmk0)6 z;e&>Vbkktj(=6BgCm)~*gZ0Ke0!9)du=Nr2DzOb}LoQi86APq!#Ml4ygVBB11j+Tm z^4R@sm8Zt;r_G#y&@V1y{PR1fKqyAk^$xMHL6IrOKmQ;VHqNFn%5I0Xk~vek;}1im zi@a*}3^g`+04bGV^NLzd>FYBRl^S08&OdkrGHu8C2a?J*ypg>&VjR4%GkROQL>gV& zojo(=N8Wg9|MK|0e!K~fUiP>`_B)ha>#kV998j7yR20)q3&Fxxw zUEppEk=!DAu|WEkngn3J*5oGS~xnnDXvP)WLf_I7}8C7jL zP34kL&K7ef6BykN!Vc>U!&<&?F`3bvm3z*FQt7RU<&Avm`K@3w_8Ah+vxKpRHY=^t zEDvYi26LkRdEnrdD@{13;KVhomr1G@$8XEKd_wlCD27oIr5pWu_e%4AXPR!5Q!K8e zG;2*Yz;uI0-!Nq2+pZ>qo>MX+xKEJd$;obL*ya$j=~{qu7M%9#GB9E23vR<7ET#jL zD=+=tD_3A?)wX3yCQ>Vfnp&~ExwM0;Rugo9qGz#4BcFq<7;P<^&zcF%J32Sy+osO8 zM`d&k(c)YxZq!Q)O@W>%ufJ$)n{vwQw|1LU$)O?Uo7gQ$ch57nP5XK+B)2NK@pC9< zcL1Mjp=3q*+KFrTT$Gh3b8N^9TVF36`|Y()h&A1+)l>A~5HUF#B~`IXmVUW2<1F-%|wCHrwL!_g#5WM8i38N;4_7BDz*BUato+EmjZrZG!nD;i{zFJl^G&N*qu zZeDyYio|IiJN5%O+(c5u^3=*9CnnMy^CrX?6a~8*_dlT}uOw_7W{+7JZH@u4dW9T^ zxqX-s+Nk0$bPkFfchk~lb?;8Gu_xSU-g1^>nHQ7;>YqKt&di<7f)K58(v0M4=sm+P z8{t6=zKluM{C4eP7m ziZCeie|B3&7YXz0bmIKDj3ht2p*b#9>KY8-iNghTOc8FxVf+XVYcoJcr<+~M4zeGz z-PS@Eo_WHL`i@;_j!VN2g>dBbR<8+p2ERYYrS@vN545t-^lNy`QNi!eB^5hGE8Y*U z^lBF#^*Ot#E_{NC;@5CWUML=4CwR7ItVQU1!uvy54X^ZTgr;e+A?)u;7r&n_AKMlP zf197t9CJT>XpT(7cd}4<;sQTkcL=i66&QN;$-kd|jHmi}S4fe~7=RUrtpnJ3 zxBMu_58UB2M}~C%E!u5u_FgX5ydB7H>qYZC`=fSSYqBKcn_+$n`;{9hLmwU)>1CAJ zj&3gWGtc<@+hJYm@Cm}gi|-xsW6dwSYI8F@(&NR8xjEqNb8};UmYH9%NAvJ4hF%!C zAPY6Vl@7na``FZO>)$=R{chzP8jt^N23Hul-otNn{IO#ayN@|~u@~>1hF%!iz+mxz z(&2TDfj+*=cnTvADZyRuHrL^idN1Dl9R3Lp|20Sdp-0DUK0B`-p|hQrX`=}3QTfkT zME*QLe=a~re$B_{cLDkv0s1g`Px<&96`;Q>K*t_}`S^?u&@o4u4?iJ5pBA7e1N8C$ z{h|Qf%r#FOke!#EgEm`9T01Xe)0N#?(jGvQvF=%M zHrD=Yg0=jzhGrINZN4TRrZ!)a^>WU$k#0n0?z00A#o;sOIm>QCwQZa;#jkUv!{zI_D`eM{COoHi6Y=Ntevyzz>c+CXc5wZLOu_I#rT{?2COpf32jPz={J#*M<@tBQvpi~F1pTu-+X#;~qspW9MZmK>PZ6H; zTQA8ojrhDwc(yD1AHuWzx?zH!AC7cu8h!asbadd^u52vfS^mj{XZg=3Jm-h`0sIoe z^Y^IsMUaR2cMzWW-x=Wl8NxIFFA+XQdj3zsvp%;Fp7X;F!gGFjitr~9|K|wL`h1b_ zClmfP!m~VY5uW8a;s^;W&VRq}c68`-wES!SJc;lu&l!Yg{hvj6*8hb8{N;pa{eLik zzk%?~|DOmSC;2~3c$WVwglGA`L3ozuTZBJ__;W&j2laq!_o}!=UlFfLbyvj~U`5bk zoNKkpn#Gy(s)|$Ho$&_*tmj%8JGpxiT4wBHV0D+fF(z`G-Hkc%suGwYn*zJk#QMAL zjIRMsmXWQKE6%;zi2Iwq1-1OK=U#2jU3283N2wI~qt3l5%U#o!%U77YJoZ;*C- z6g~H9^WW&XS4IcO9nN8VgI#D2ag-~A4%JR>3>Q!oq1G`<8YiA2`KRK=JQ`^D&>W(M zzeFQ)S7Zq|y(XN00*K_+IQh+&MRdptr{Sxd-%suXj)3}~orYK1T=DoiG0!mRCvKFz z4BAdk_ew*%hn>o;w5!GA)9`Gl|3X{<9~+tj)bJ}@IKBAcaqsKSU|kz_oqGs%AT6pt z)eD*o`9xjk+7h=JX4xM<{_K-nA8?1$93Z6oKRY=)-pX?_TE3xO>z8fN*+l{RWdZu) z03F{+KK{)C`gH;NO#!-Au!FRdn>ZLdIhk7+u$|n=A}1U^KYU8smi<$mdo{#;h$#Dx zBmPB>?#KIf!oQpF=MWxMmdcqRJjx2C&mugQsVIF8(b11k`h4QUW15!}9%Yl_7ZIMv zDC-E%`sBF^PS*{D=X9+h{+zB`36J#>D$hR*q5>XZ?J^(ZPrH z^JT*0yHR=mlklvcEre(NV8JvT__KbVBs`~U7vVWw&k&yV69aQ`$Zz;phxYEI>a3w$ z$)w`R(-`Kk1GQXMZY zNQu$U7#s*3OUcsfQ5Dkh7}<*eVyW}aRL8d#l=NJ2WpZKi%H&naMcX#&a&-*n8CXgz zfnudyQ)OLs1@ut1cK_oitV) z<>|*$V)sx~-toxs%0Jm%8XuPGs*;^aHdTz>nd&}TdP$|m4$4?Py%HVQlOCGtc(|Zq z+6(P{DOvAcR9^E^s{2?-CsFK?4w-4FRiuwG>&V5@OXR8OIwlUbqsnV~gl|Rn(Kjc% zrgiKew)$*DdF0oSsa%wkwk5k~7UagC>Kbm$u(r#NDMpZKKe=&FdCd=v=2Be+Ps%1K zdqlTS%Jb4aMcuPrPo{_1xVnzHDcPME;uN#$sN|40lS6*o_fF|$Rp4bH4e~~RS|Kk% zPNXs~b-R66&Uhm8^7`H@OUCt;{*y@TV6wN2qmp?{SDUc49Ed6w4i(4)qofyn@0+P2u3mfD)8mZf8HM#K_X)xC77Ea-OUMU*CIW|oAzCERrljkU4UMxPd2Q7z{* zH(`l&YeQSZwYB48kGRJHVnIc=q%Zk#$x}*_N4JUB7S=@)Yooy1D88p1%z8@ zu*hmL(+9*DKj?mcC*cTwd>Y=d$*iID!&mwQ7XZa0yHH7hMoid;Q@sD17CP&)we ztJ8GreWbwG(SMUB0ygfpf?8SZ2|hK0KGFnUmu{~5ulsCxpW3< zA~lPa$ojpSMT^eDPst>+cF=CudlggQp1F$iz2O8uei4P znoLJs&!@)m)M5&>2-o`R<$|-vRExycjssWZyJO^E`&u(V6o+pfWt!4wgD4Jo_3E&$E&-_~n&wbPz36F1H`F9eY-`57hvwr@G@c15;&!-8` z`ni|ztRHj!uY`yGS^n(-ytY$-XZ`$y@W?+Z&(lQbczYe)k2fY^;qcf&%)RN8FBwFi zeCo6*W}0&lee!h>#<_&KX6HF~reycbU8(eMu@C5OY^B*NyL(nhzkF|n^w9UoW}pv9 zkn;5Y^7M~pr?*$QEkC7~o+#;ox%4`DjETXGa>c~pCUgB_e6zXUXJ#8K#CrH%xt9q; zaNCxHx>yaJZ6B~ay-T>54dMkaQYSmki$p&PgY*i^(V2~>UpBYcV`lY)=>5Vr-Di4r z9lf!ReOF!k?mah}K0Nl4k>P?Nmb{`~I@HsCd}E(lpF1{Y`x* z$9u%jo#%@5uW~pYp#S`q^q-ABRE$Z=R|#0qo5L+DSC0h7cK`~$E7KpI?)Qi1mCc+v zFFCtREyL%`ol`kaEX9-4E6Qf1lJn;4gZX8%%1f)}&aId`XVzF@XB_&dhog-z>NB_l z*^aJ(a*XZh?Cyf~g;gVZhTJ}M12iS>Z>$e$bYW9&e*Jb@s1Lf=wc(4M+ED+X8ZUCZ z@Y%qfD*vE67)ZwTxPltt*imt6$m8S}JpJ(Bb>V%ye;?|DYItqis0@%5POk~)_xqqR zC(uU$Ca3Aw@Ky2*ekX1QY4(niyF`X!JsMugp+0ErkL-i)bMhZ*AM{9H(N17Zx5^*t zgKGFg?SmFMMQQ#+`H%8c^{4p{eHuUSK(?ta|NaMV$ocZqqZ}`Ahhra9UyELmP4e|M zQBHE7Rq<&54av0Rvu%1Iiyr-+BdDOG2b}A$J{)~b-;Fke;gK=k1AAW>iFx!h9Nr^4 zTg?7_S=8T%*YC@oYv{uxi_JCrlQiDK$h0geI8v z)&Tv60R83w{k8!8BLO-l3i8SS$pHQH0lMw`F7b`(CZhjqI=<$|n8szT>0B3B_IhuQ+mL*e@T>=&{{;`W3Hb`)xexaZ;?Fi7-y%HseZNQe z7|E&o9sBP^=WTs?eoOq3&o#Yo5r3BFC@>a>3+gb%k8*VIKZ)ok5*~G`;>Qv`M)YFB zvp&xzJnQp9!m};k#e`@17ZM(2y~?cj z+WFVsW_ymQ^fQK)K#8Ik#LZY-|XJL^Yj5$o3gu zpnb+nf3eJM$2I-pOs5ZhKHcwXMSVj}y_wSdV7qJ^wW6h=t*v&sOs2LsE;X~9GBaA& z)Gkx0ORkGm$LzdlwUoHyV^#Gs2`N*nOB-rrFD#jF6{al>P3^5QDUzF7#>ZkanwGa! z*R;jvB+F-x&z=YF_vujn;U6x6@A!gS3Ob}aw|PkS(Df)}|Hk@qMh8%abAEju>dWnN zjU`^+5`FeW@yLeJ3n0ea`}3H`T9tsg$wtQ67EG{p3yIp5MwexFAvZw1N2J+bTsnw z#f$GDAH69+M}3+Pe`A2&8K8Fs=>HI)|8szD`&zX*eJ$xj@%*A~jt#IQC3A_j(qXEr zmK94fwJ80mB}?R9u64~aGbz`r?QOfgptmK&7P*8vSt5BPah5(Or7NE;j*j{Z zWtY+)3*dKpbaxy1rSpIf_c8Yno%@)tIJ&RTHwn*u$)ntN2|Vf?mGf9fN4(s}Jf85} zM>v)6+-Jl&?Qp(4XAz#|i5YbMKE>p0mm+qswY4P^CQhAXCh`VuuecW(%DIHOCZrBJ zT6zr&<2sM`WOg1em3};D9&d*PG4pt@imBr4^!IwfB0G<_N$$|u*eq9cHtsUlFPeF~ z3Ypt_z}(xj7^L$7Zr(f|M$!yZ7#YG-+9k_!d!ie@AUP7-A!8wY*V$|LM>o7pC_)$| z1new~+?DFSFTO^uhJ(Zh|Jv80owvxVk=vMq?iR9vnEAE81D`w(%{dXB@$~|Jv@?!E zPJ%~P&w>=Y#n=C|h?Dwo6nJKS&n%MFDZc2fNqHt`MciRn-S~7$;@m52=_4vvl(6$R@1ho zx69cOHc1(k9+^L`6vV{FZze9tno7SSQO?9!5UWgT*N7xYMZU8jaAdlTZ|!4Fe9~of z!zq&72cXtHaXX(YZylP(@eEe=PR{81*M*e|ld9RLI!JZAJS5e9?jP_7@6^24wLR_k zy9vZp_nn60p=^MDp9zWA0S)jJr=EFWV$-Qgl%+X@OlI!;xs*9M^PHzCR_0G_4z|ZT za3ndrP=MzUvdq^AbCm&oY6}y6;9ChYL`@N3c&3qdjQ}+GmPtMurPa0&IQz_FHpur{r9OeOZ*t zt|)ib2}@2Kj#lV2R2xx^^6PYa{B1aQ=skvkjsmYUO zxx;-Ma$H2;85ozj?F01sPsvCouOCI$p`>`ToC$#y8d43c?GqkdN6A`@ql?7XebJEg z&aJ&C4%zvGeKKye3WWmn*fo?&87aqYQ4-zoqCB(3%_+`aJY3$Ob<@3aKgyMT;*H+3 zDtqdig$?1 zMg5Q|ll5D7%UJZaxU&45q0vqpVg%KiJh4flFW6p}jE*meM{ivqbwXYA(jLTyDp#V3 zL^}&mF?Jt#iH=da6sWeIx3#ogA7h@l7ZqKLL2{KzEJKb)^TEF33G!v3!p8@Vt9^}{ z9DzYzN7Srlk7mfW5c;3aaEGn8D@@k=xF(?>8cp&l?o$wvf^(R=pkBB+52^^iU4L#UkBsE!cG>92%k?D}wJYj3* zRj#jXX&RqU>l zGRAJ!gsnB!+TPsU*igIl>{x8H;rB-$)1pn5tH&l4$7<@UTVxKXwxt#94S$_`$`^Kd)ADAlc&}a})^^#jCY(KK z11c`9{7atsaX6jDk;x76>X#S;zjH^Q7n3{#i$vsxrWQGuX1vkYhuS40wk*fdH`Q&J zsHg5e>?MrK8Hh0?hV$x|(%UOQ4m^U_Fx4datLv>@Tgt@jhwzO6( z4#j@)9Am~P_KpopmDWcgD(2vqTol zWf4l;pMP$(2}ZZ$Yg*f6uk4oE#_I94^^59SE#l3%1ulL+T|Tx=LijW=`JfA*Vdy+Q7V|6qy9ZRmce-$T@x$ZZ*B!9; zqH!m#$9))hofGBXPygG5mM{KhJBb+iM=wI}Rzl}@z#UF=v`A;Zb+yn7=tsL`XkNnW z%eUSZ`3Cfn9v<^3plf)&0v4X@)wki8xyvv!yOv8EZEm$N&psPtycjXbbyDSt>wm__ zBttLkS6H_x*_=R5povn1myGrz+l8$J33=DyJ6HGYJ00`gQcQT$crzWhLz6?8ECEzS8>uKJ4%tvQXn& z>+qXBe3zq-@#ueV=!KCL=9>NaxWg~-KJrgE{F7Oz@qNnSbze1o{5j((jPxnNUGFj1 z;SpWmsE@yDJcW^OD#2a9Zmz>4yF7WeI{F%~FnQF_3nPDU;q~&k!{6)SZF&kLx^7nS zKQ*4hh@K&#^k*C$`-`%B&fE--^m_b3&bR)3kI;Dygti+nN2}jD!m7jQR6aTeobu7% z9iX2Wpd+36_?#J_V~#c-9yYxB=raR!?30xbe@TFTWq@8Apkue!eEeGi^y>ojn*#K7 zfd2OZx>=Jk*)GWtqwYnErr>9SG5ov#0*aKg(N6Tc-k}*ho zWK8CynG(y&91l}sPn@B{V@gbHCHBA=PD+L)OO^g3N5=(iJ*7WS z__K-r65-MIRQwx+KZoeL4<{ZoKI+On$iw(k9UXYIag_g5!kjN;1)kFigs zR}!Az%jJYWkMP$J{#c^76Q1?cMR-o{M+tvE@wt=mn2c08KSOwy|4W2t`TvvfEdMsb zqsguOA16G^|6hb>`F}-teqX;PJldYh|M!Gv`Tsz8mcIxYK^!hD|9c%B`Qh*6U-@G} z0~{_a|2V?GN1iEu3gKCv4-lT^nMHV(XFlQIOZ=}SJj>Hac-H5&glB!;NO+8!sQkAQ zp5@;_c$Qz!{=s9G{|kgaf%t!w__O>E5&nII-%faz=W)WbJU<~k%ku)^PbB`oBRtD9 ztWZGW{PN`Oj*eig&v*bok?>reln3xv5}x^A7r^UTK9Gm`-$wYDJk$59XZZln`uu0Y zvp)ZwvJCAPbT>n z5}xJ1hVU$ZJK8@DB&* ze+L^WaXz0hj_${MQ2>8M0AC-#UmL)81n_?!z<)M?|8fAYXOsBpeKLUGMRa~&&r`gd z4}U{=&WCRi{#4Po=943iGV1TwP8i|nkdwco_Y$7VrIQKonlOg(c%n0(i2*)m6aF-k zvy|}sJzhw7*2BewXFYt3@MDPoX2NrM@>#;O{Pz)__3(AVk0t((5T51#F5y}J9}}MC zf0pp46aNJp7nD9 z;aNXbglGLMCj1%1|AU0*^j=4Je!r^;&*@!Dc#P5NcXT`9S^kd^p5@<6c$WXmgg=w` zKSX$ze;eV83I90ZS)Lyfp5=L(@GQ>@gvVT!ruTP*XL;TrJnOUQ?GjiV@*C^(Jw%@+ z&y;^m{BX#J_*Z8KL25GA2^rgjiGh8;CrvFL>>gt~r~pfth_m+2V(Q!&-&>mg4r~)( z>U@^~lIh>c{$i_S@9&j%&6oUE$Wq0M_|l5>BXT1L9QA^ctj;_g`;2WAKkO4W$rbhq zn{j{Bx4>&#cI|x5s-(5Qj&{zM!3%o`({B)Eb=%w*uFxvt7)Z=bq2=suvF$Xq5Uch9(GrKevH~r6S z>f0f!Nb5G{=tEcbA#>*}y|U?}1zml&nSH|&y6(;a%tE?9>P)5y2jVMIxxD&Ubtcmp z_}DJEWmreS+!6Qwjh@M5bbxH-+(`Af>wD#ja?E#YTpP=DY~&$|LirB+&Do;;1v(Wo zauAS;}P z$DASj{gUevgmGMU8eVC0#pCM)&(^rQ1mkRQ&_B9g8eZvF2~A}YZ^r2uD(WqEKK5#P z=+l6|z<(i*iI2rNaz3br_vaA(@VM`%JE5hJSaF-(L#P93@zam4SibmsT_5cq4$-%RlT58+c zTb9dXnICJwwY9B9);Q{noSQWhvYlP4!7k9U*Od_LF3>e1s5rE%;ZSz*TuiH>+HV@4 zptgZmIy&$?xAG{_c~0bs0KLI|z~IAk9LuX~?~%KRkU z??_oyn9tt4ExuQ*%FUM1W)o@Y*{A<<#$Y6ECCU7^w#r4O^6+FNf@yatJy9=3bsaXg$CEY<^-U)qZ^);(gnTU z%@U|%>X7J$-BLV3fp-ZZ)xADG23HvdDDIlj@rPl;0)*(T^8gcjaNJes_GF#$aVFFq zc6V_Jy%A|GjaNc%$fv~!vr}%$N`74-gAG&BTaK9{#}LU#V2W%!Da3R86-M&ty7_Xg zkVCAdN}_PGRdKSb;ARP{gA&osN1wuD$YZ280~3rf zB}{GIJ+!Rrn4w(-Lxof-@+~wrpRXI8tcu4>?tsl_iBMc*$p?j%;RT*@*jA-PTRwKH z>_~n=cR{yF`Phd`jUDZ|f&e-x*05{$ryq)&L~g*$PO9bykZXrL7VG}0a!I9kLi+OV z;~$pSc@*CE(NDBY>BE_B$j99UM`l8F+7O#k>4#GtFAOnX;1k9Q^x=s$U3Rt?=r!Mn(TJ#3!>KUbEiR9kS$g7sFWd<5G*Bv31(RI zR?K82J02NQwzj8K_=0_@j4@S7PSX@eH{35$JRnbae*!$U`xB5z(e<4I#S4)4EoaEx z5l67-Js6y^LnhO^j~|(;*#;phy2m|S;cR2^V!n!?57}r}f5PMx_tM&KH;14(78>UL z3x%tEG>Ae?A0=90|Awu+@frLtRPulB1ww%ZJU_ox56$_RUqCkp?g{2SMEfplobsFRC z9Ic`0oI}W}ao_K=Z|0bc{8GmG5^?x^St8fcRqDP?0R^OLCYEIC+lk4cOkbLw?zpr=80Y0l< zvFCQl@1BWD18o;6P>`LY>v2|VY7<&Eo8d!kAa!TQxx=Id@h_rc=pw7YT0{=TDRg9a@Xf<-B6N(i}qeoxf93rIlu? zW-HgPeZM6sF3hqx!22^&WIo!qz57Dh&=r$v0B_5*1BiJI*_oFQLKNHhb35w%rf-=T zU7MC5wx{Sc`!YyvE+5N69LloZ?INPvj!c$E`XR|7E%L7S3PF;GM!MYnPVR78%lYQC zmd^N_a$nw65I055C}aZxjg+g=y%g%bph-s9Xr9R~P15-=&&&^M>l!qCw20{bqA9St zCQ<`6(`b!u7%6YDqWccpAk`M<`gpN0uW&)-2-vcc{SOEwg2rVr+LhA6tcZ^>%{#n! zWJ<}nV|OLHCf%IPn$oUK$rEXBO6y!2?(62u743zorU@Y}x~_3ItJs}|@-R=)Fm_j0 z!A;cCl<3UYfflQ4VMx5#_(U2AW6EpxNADSTv)!WNf6`wxDKSx?Xh7CVcCU&LfzXDF zmJ@aZiLp=1#uode{QPoh*Ax>fBTzP02y`F*9%L> zKD_n`*+>hiU%kMnF8%0(OGSftb334ud;Z5Yc}j;oFHKfc>h#;iB5zCX#``itt&jHz zuT;$+w2@_Y=5TGR8e6Pn-j8kNNfS-p6Sli3xH-2vdnJ0hb~Q|<6=W_T8-}T)syBN6SLGXJ`^0u3tbW3F4 zK;}SUQv^IXRr0in8}*HOY>S3$*Hm(f^qKkZ7;o+?(Z;?@SMVfz-5VDckVj>G$#Azh%DeNBhpV zRWUvYd7i)2Lc(^5f|FfCW!JsN)B^xVB747?4S*^(mVLdQuJN1YXSVDijLUES=Xm6c z`}cRxkfEj1drT`K6W9558~1FqW9(8CnlVl^86--xH_MdF-Yj`{DRKLm{3&)}nKAcb z9K3C}Y?&@MrSo|Y7E7No_mZ-C$ysHyl9dWQ(4H~#FP>g?S*2`;VuouMMVhZ^YrVcT zcf*v@GH)-IOUvh!&b@Sg`Q@1nTKa7W!$Ovp&rdRk{2RZB_OKhw{PJ0{7mRcB-99I@ zr-N*BA$wr7wly`|EgkH=+dV=ztdK*)Wh;}VwYrByOpf5LZL#}u9FF^|%x+lTaE5L- zA-n%Cm$Lw5qY$&%ha}KaG;x`e&*j_$4rlh@kZn3LTWOeGM;dD6aDdTfKMVPltzp#P zQrp^GTZ1Fi8?VE005I=a6N2rR)DLgD*MrAopd%{4L0wq3)D~R@uMAqzY%iH!KrGbVpn-_P)eBNZ+{dY3^4NY+S4cSdh zGP3YiEK?4&Ek9v7=^Zjz%xjA~^Q zoSfvGfqh)?;mSL*y9!~$o$8jB>g)PHk|fKW;cj(a@(X0h+kb(V`I~be(cOw zp2N-VlSKO}NzS!fafwv!Yh;;>_VR7FWb*f*_=pzkL(B z%WE^))2xL-+h>IQ%lL$Id(TI!9PU8-AI$^Eo)fxZ7|sdZIIO$icIh_4{e|{FlC6&p z%YBfHZmcHE?@02)8(NdN>HQWM!)T>Ayce`bi*O?j)3$J@%0KA-y0AOki_`Z9EF9i3 zyU?1%yZnGIkRLv@CQ-v*2I0u*tzHxI4E_m(fw#z|drdYo8ib}_!(+Y%ewW(}20t55 zuwGx^{{5u_LwL*(vD@szYkc}l@AcXs5Awx-mkXcJfbOc{l)O|tzE1J%fuu#~d&c{J zoBV5drDF{e;`d#zi{DR|k6k4JeHwVZ?!x8b#JX@GuBfZiIQ-w>cybO9cyy)#d}YH{+|K59c7di+;*68e96QK=1k**?D3S{vdM0qWS4xK9hB^rN>~wY zZnH-sn?0CH?2b^hf0NtYiS~Q4J4H>f`#0IWoJ?4^Ta(?yN?v@6_v9y zlnrb5dz!2xtczw<%$=UBSTuL$%=u+ii>i{-E6Ns$HJMqA?$)A5{GFb3hbKLDS+{gD zdpPNaPPNz8E?*Q`CL>m|q0_a}6K0Z3xA8g0VPU-Y)-2-|y()e?HM0 zT{-R3UjjiKf^kt^=;|LlPRPIVKZ)o`qL( zW`gtc|1!dJ{_hCjKOVr}9l(Es@G~WT%~wAR;GYfPhq$J(FaL>-4*f9yQwje*ino~X ztpBqJ&-zaip7lSQ@aU^+x-KO=>%WfhoS&Ns&+@Mb;5!5Ot^j^h0Dn&a-xI(;O86M1 z_XmV$eeNPW>+@N{vp!!U{7J-rAK_V_M_`~uoSz@w;pl#OuKOzV2Pcl3M! z|C<1RW8f!p`|ssQXAbPYmy;ab$Dc`f{w}5v{#4RWg7EwvXAz#?qwaGBdH6j(M)=c+ zKkpyK`hS-2tp68D9@hUG0eqqB;`{nJ+R>q(F(l7%gy;00KzL5?X@uwW&L#X<;(r<8 zIlc9S=k&G^p3}P_fZs%Te!u@3z<)7-{|ezxC;7iYc-GIi2+#WY9^qL(KO_A6iT{5S zp7rxv!n1zfB0TG-+zqMX{i1*2in~aqM@PPZ`-r3CzFhvb9J`z77ZCj`M8A;euMvOl zAAJxv;=rH#M~@S|LY`^7!!Y3?4tS>5I=ZIIMHg8e!2d@8|BV3thXMRc0sJ2V_$VeU z#QE}{>gc}w=LhhmL}xwULwvYixS!~8iC^{ELwvYi_#WZM5q=lpIUoKv;W;0^M0n1J zZw2s2xWOjqhw&pE9r`(gkP?OVse&f?uT$x;$yi)AEuG%J~80g}h3i_>m zLOprBLCE@CT&Is1xnXG8h*8r=#F8V%Bu5l?48NsteL*)~JlvmQ4b)%ioHvLclYgjw zxcswAxErGbdfe13U*7POm86;rDTy01}7tgq@~eX$kT8X~MIFdm*YP=no_fuk^V> zQ(45Dal4(*6{#7zk6j>7d>X*7WJ2V6d@RZpU-t;1;p=mQ_lpbseBB|)W~Y>?E<%*C z=mz`g$B;t4_;(e`196k=CG+dcpLyVUfIFPl2tmAjYi#V$fJ>~GhU`k9>;p8}c@2Pm z-?8Mr}I=pkdORcLgzX*rdj(4r}nE2s< z=X_!!T$kx(4M~#to`YX{%k?78#FoLL=jsw6^{Q&k04@ z4;6*#j+`_J&d*;bx$yq?+bHyW&Mzl1)&}JtYIrUCIbR{(X8edNwwKJWmOV;9`h1!2 z>;XsAG8$zRNE%-0m?NhwCU@3tcGrWI-KB!d7yipGynperp|V@US9uKl@VNJNhakFF z^DY-&%WXgXp|X3k)8E0;@7VXdK(4`;-T6|2yyfRE8(sEP%G~I~>n8oL#MWnA7H7T} zSGdXEhG==qauDlc?g~j+T7zmBOj#&riyJraz1l|7%TE|NTv_<;wNI=*z5Dw8(!frO z`F=|5c8}=>!0!3=Xn{$0s-veMHEn16URNXzs7#z_;&DI!OUlHYG)dA1S|+x!F39gb zl?)|RCJr=ws7zexVmQ)QrVCQcgsm<3n936p#5n1$?6V;bb!TvogP zw{QJ0S@F)~G49^Cw*p<;f%q;mZct^OIUc@$WAOij=4cr**fE6)6MO$3zYIk^jJAqj^A9wD;{k(#!r?SxdrDy0*Myn2r~Q|yj&Bu}^jvY}wvF?t-lVVwSz?J58!m>7QhRK;FkQch+MW?D>Y`4OQaV zv(ApubYT%eWd7PG+Ru8_6f4NwDeJ|PlBX=r?O&HRsgr3|!>8korR~4EVjFPkLj4@{ zakQU!;Qt_{_tcX;vIP}z2x-iPYa%`UtzuYV64 ze?aN8G^{mzy+-7&D!-D^uhMcxX}FGbg;dHBk$&W34X^1>2rXYyi=03Q>(`VA!oSB) zkl^6_xI+CJ4S$&pmihI==hGd)+OON;0-#?EmH6og&2L8uDUxvcrw%vd{P^inju*H; zXI%)nhtQknd^Kzk{S*kDZ+zab^Gw+!SmYay3*q6gwlE+4tN=olkIygGJo%1)ulv;r#Mn#jtP<0ljsPmRwIpiIr zQtK|{6F6iaZVMpYaG-Ntr{9s!=Olx+cy1%a936Phw>8U}TUuMSrW?Tdc2ftxW}=re zZ^Fo7>$>En<>}v-roSg^n=dX;za`!GWL0_khcYaY{tha@QrRrt4K$>mNk3AWeytaw zOI}<1>twoTb$!WeCHqSr+Y{IRe8=`7CHv(>hjmrM_LolE-gah6j_T@84w?4Is&kXk z`;R#~dG^JT_Mgf*4asxP|M1TRE?@xy-~Obmp>`t~SSOvlD!E7o7S#% zB*(s{%dET4JxAAB8=3Z?;~xW99Qx^S{`}@7p=rPWaR6jZ_3cAbW=(Z>!G>X}5o6XD zmX0V+j+okU#4W>TjYt3_?tgh*ZFFH%YJUCiHdI$X;EJ2YF6?0IYHjaP)W+-AYvY89 zZ`H3a1{yw8S8I6w9wC5!E_w~s)uSAs5`oA;R(1)w@zaFoqg;Pi%aXy?)mq0LYF&N3 zCJ@4q^U0yQTEo{pmf8gBdwLetMMS1@5n*u7*wq zGj@)?BiGgXeGhhRHP*cNWdS6KxJpasQ%w~X>b5s5!fD8~^4i*3fQ?_*>KYrLem}tC zkcaSXX`THjh~j|fx;X}-IN&+oS+NJ+ubfyi__6*36;cTZ5lP5c!BJvABxCT&^lM^5 zlzuB&C1=Q9oPJy?+9#u(&k1O@9NN^0@@Va2(GBZ_AeFIM%iRkWIFGe^_I^3)5jTRk zTdrj#Pn4BBR_D1iJgNND*%ci|@cJt?V?J9oA}1oZZTf{3+L5<4Z~>$<*1j6D9_ z0}2gFLp!wTFxPD?>DlwCJmHzItJ|5h=SzbR(|4^5cDO7m?Y@TP&FyWO!!_nyTv1Uu zw|q`j*}Sn4X&B;}J!E2j)x7dKv*eJA`Kh_{_OX*kpN#$fm$x@Io)fFa zxe#Z-A8U5cvEMbef0wezTp|%U^KyAA;q2Mz1VA6K!9#%FYw!WZr#F$$OXTT~ zdi?OX&lgpX%g~ztP>&%ke)`da_w$~RA}QCk-+&u(e*E+(#|zxy*9LM8;~Ytme%lga zvduoOAxRJLzEE0BB^tcPnfpRBPS1}}KA?^DekO`PX72q`ClWcu&xLnuu&pDs{Is0o-<{vSeEa zgY3SgH6kP1`=RdDw&mBw4~K6SpP15n#1DtEjQ2dywkYt(rHcQq_~C#@-c$OMAc_MX z{XV7t3`B9jqrI;5Uw|kMc;tDd{|ZELz@w~G`l}#{^W{In6%0Q8Xh-+c^)AA58(aIn ze!5O1Jg4haqK^={RL=KPyckPV`UJwGKcjS>tK#>PAU^zFW)UBjABXb6`SQ;vJj;JM z(eeGMJiLc1%U?%$mj87VtBqHd`(*gU93Afk|LSU%FRN==mZ#4mI~z=zFrh?742v=Q zRZ?6$Ws=Y)PAML=O;tTrEC~~_?X#rP3*);|={H;(Je6*Y@2*HMjrXR~k5|ae-imZv ze4mUIj!C9}SDyay?DQkO2%cK|RJ8MD@vJ!~6758vCAId~(wB&K9w}N$cDy;nuH#vK zRVw|A&`qGS?uz*Siu7wjlEKA_bYCj{g5{QesWkn(_1beOQ(ec$Q(cYmqKdAi@sSnc z8&zS>we0xTm_7*L#tn1(4wLaDmt-b@OVht%=ElG0qtO!+9yk=<1n8@lPDd{D1LI2u zi60_(%?ptl+1R-@f1hT)?Qo#GQZHw}x$egGwJlBKT}P*Ec4gINwzo4@rp*nj{9T|! z?fc}HL5`u*6NJwDKx~5al2G2l`QxGntlym<-&8h3+!e`@Y|3YUir-xkFOIv+lLBAoa!0+ zA57n7my7>U`!+B52{O`T_2+KQniBur;hBa%)V@uxYc}^fIiL=F^Qu493+nNF@$bX~ zarf9u=2zcah7j-o_qW)$L0^EK_HED(VHYzug^|mdD1PnR#67z9ZQN_gJU!F+3L}XO z#d;>0i^~M`%(l4;O}-AE$=YI!(I2!2@z%#{IpZGhewptl9+9Rd3K0R5u@ z`X>VP&jjdF@4LpJ8+n(0k~vbso-~1OlQ~Jk9A9BNQ1(a(d#;5B4)mfj-6z+ZvQb55 zPMEQ1M$>XRzO+rM^=uD{ds#L0(#h)I+cNzcNlL#yh|L%M+ujWTi$ht;eV>~R)zVRB zXxqD+=-igR!_iUfAg?NZ8_~Isw!_g8FTNGUf1mK&7x*#JQKl>YDMtq%v|p6|tfNC7 z#=qd`z@H%hivNwH1J8Yy*Bl-A_sPHF^&BJMxo=hE3Q9j+QAYbY5nm*u>W;$=DK5g*j08tf@GR%8gl9RwD)GTV9`1X_Kokdg@UKn|9d4+} zx7H-kmz+Ft%2cxeGdA%3IqJ1?mq-&P;)LXlx66Fi!uW3VAf@y820D-X(39Moy6MFQ zk~-N(uRQ&uUf{(vWnxKBs_V`;vPG)vi{|9`imp$`Q*vJ+_m!aE^eu$jCLPI66N~G6 zZ9#2g_=xfQFmpWpNWqDxG@cOBg+=0BAKxb^@l?c9ppB8A`6K0L#wbIq2XU%+tKuv1 zs93zE@x|s@C15e}u8-sMs*7Iwm;p8my(*rni;n+x^wyU}>*A}3C!!snl9r9}S4KNN zEcA-*Psi6u^r`MU<7?zvk$ygvep*HDG&CUyyY&Vq&rS3q&qx)bSmAdN{EJz*07Y;S zUlR3>adAbDiwh4MgOPS*U3AQI;;V>D3NPC&cR!Q6`wSl;?2?<(xWs$ecjfH<3{@lPJlYt}Z?LxXUzQd3%tB6+$ zsm-z7YjK5g5&Tu6Qo-IA-zm4E`<;TULOd636&?48a6gpCcf@<-@%2O7-X=-fYElnv zZxmvx`#vLSs{5h1%NU*U7&27)XAU@j6hPnr5T2O_B5bG2HzSXghj^(wqqiP!U$v1h zdJ9efk~l@Ig$5%M-(lhrA{5wZGL4A4Lqb0$5*{n!%4^aX#4E@hg8YHRR}n`}EJM1# zEgVbZ%~qkJ?NJa}#6uoTb>Cs{(@)E=iA%)?AY%4w==+=$dNii71$C{1-siZOAYT)P z`oQu)$rWH)WtgrJfCypHS7y=o8Fje_{rO@vG{E=GHz4d90Z7_K?e+iCIbP_N--wRhEe4N{d+p;g~iqSpoTCY%cU9{2-dD$UB@o|Wo8!z3s_S||be z&&`qFW&efpTAg4brO0uarstxEk$I6DkPZ>9A|5lGO&*8|QobT7ffhL8RpLb+MMoH! zV2oTfyT})^z$6b3UGB-rIRHC8s)Vn+wSWJNxpT^A%+HJ|O;47V&6rU(M<&H*lviCg z){Pwrxw33td9reT*(J$}i_3^UYxY>YFC3a)TT>$o&s!R58rrUtlfiMSv>Xe)LWZOC zu)IQ~$IKDz=9xXI-to5-IX}Kx zj;F3}Zmo^ARLl8eUQ{weul$8mFurOW8!nUf99fRca@4yY@2uH>*0>}(b!*gPui>+@ z(T>1B+-8(U7u-_NA;)Cz9=d*5x0F$Tfibhp4lgCr?fCz5Qg$Q~lcY)x53Un1x{>GV z&~9ai_CMNFzFX;ly1pFkY{XOKfI60Os-sJ-pW}9$8X|{eZv42$2^BmKHGF6+P2(@~ zL_iwg^qO#fe=Kc`>&8!4AOeZg^ecI;(BSvSteV}FuCH&s*DLCeeBsx)@EV`MjMIC) zHVGBsk>%N~bK$2lQT!TC$sZJt|4#61_c0cs?-}nOeM=3m^y`GCy09VaZ;y-L*Ncz6 zIS~E{7oK^-?}tZ!#m_syY50%ehMXTB_rC4`uSYXL++xQZ{V~+we)^%4eDUu<0CD%) zOXk;)Kl8xz0Qc83mZw_DO+>!2Eg*)OUTiKF;}iMTd|Ea3=Wm*uW^_515Bh~D4R_^| zBPW{s!hRv*j_!XargHCBs#+UV$cgvP&aUMg9$Cyp@ms!yk(fuv?Xb*!%%4+ZGg2I#8-^v(c%eSnU!t9p{dYK4-%fazU-!X;9$5Zg5}wEYeog#Y{x=EF@(%}Nak#|fU*&weqeGu) z3n=~FglGBRM|hTh4B=V+8lrQ4`xNnc7sdM}!gIPFB0Q&SJKEqY+gwB)QQ zgI<4wkxX?7`16cq|z~5>8Qxph(}v%sK4MseZ-CSalcO9AqE;g z)JN3tep^nnr(V(af}g(=h_D$y;%pnw`thsjS4u)Wewy%Xhtr?x3Hk#`!z+ER&{P)j zX5234J6IoUf#C9me<8yu*W+VDeJl-MpBubiT={f|Ae)?0>Rp5==Z=(rKmDOTmS*U3 zFeB&7PmglEz#V>lEI&8e_D{aP5fU>jqpfVx@V>YYq2D*!foMbcu2=~9=u-pqM1Yd-kIoG!2+uJ%&H=b28Ri3~Nd_Hj<669RMT(fIacVa$qS7~}1DoRkIy*-sKjgNBAO;_F-!zCX;aD%N#|K0++R>ftCic#rp24TTAflt8< zuqS%Q*3Ku|3pyWbJ0ZROZBIu#(G2f=0&8*Ceo(SY=VQ^e&&svCet*YX??Jkvw|`rT z0a>oQ?qRuh7yKIPs^~rim(-@&-Qx;6_6+HG<2}*ae+JxB(REK4+|Mnby!+gO2aCl2 zHT+aK^FR@#^C^L4toMzsgv+Bc`6jwJTd?Adi`Q!FJ~QuDk-pE&ZOEfB@(5KyD%}|` z7EVGMCnQ7?y&Z~%BM6^mFMQ{J5{6bwwpHo+AQ+YQcUl=dO+#FJv>c$6X#7Aonvo|qwHJV61 zaD#dHj6|9cv^+7;#p3C;;hxz7h`n)BZKw`&2$0nf`eHJpqkAQ~jPe2SdGKw*J^hk< zp9Z^i_b~fj`$o%Lm_MKH@|g{1XQ@p9yyw1mnaQ(GFpkK}d?gtjc|`Q~Ps$zM#y`n5 zRkJPCeS&%Z)_Y_&>ga7|c5BRs7p(ntx_9L~nc6Cik4bHE%~ta@$t+pHwp3SXTqeHW z;nGtnMV(ELkvY31q(J^3d*1?IS5fDG(-%=|ZSF}wY(obwt}wpg{-0`Aj;yZ z_1XXTJ2Ss?e|K_*Ja|>?@AJ9$%=yl5o@eGazxmCaIi?1O2f$(bWkq?pJX`u{SzAUP zretv5B)-?D`AQFc<~88-_)2#SpN?(UZhcVmf9547-f{)JnnLvIdaYn%c*i10e;d{|Ea4i$( z5X=m9_>me8-jY~)cCi5?<#@08#+6OErS%QZ_O+>T39}cC_gbz2?Rw&jml=BZ8Q=T- z`?j33aKRbYcYfAh_d5T#JNyZI&EAlG$E<%l`+u(3e#YNcnRqy}aN?gg$dtON^ za{0#G(v_?tL-~fYS2Q$~?{h2amozS2)g%z^S2kb~KJQox%T}$BXU_;Ma~ZMB<@+TK zc%{7@ee~ufHeLCz_wJW?_r=Du3r&brqR6e1koJ03Lqn5B8kg1=B=5x0>Y7lR<|U0q z124_3YHF;{6$Lmiw?c|$qA}^6*N~GuFNdp~I^xrnfe;myg?rYI0Tg{BqDmYe)IB=%rn5X34rc`HFchrk*4EA_{$Q(Kur7mm7=7jF{)~7TG3EH&qeV1sF7z5NWjR1#36htbj<0F32iHZ|1xvL(xLO4FIe29xqU>nPG@*iDH)>9@}@u>F%?9=q_L z=5Tl#68?IJ3!hvI4wvU7I0Gl0Ic@QgoqY*CjD~6)@!tyLnwFXyBi6CnT&AY3_i*+P z#`BjR-sW)55;eWe+)Pc~q(QhhIs9r5-|X;`hhO3F|M2iWhx^-U`VG#3tCIf0+)g#` zXK0@r96n!zaNp?gb3FWS9G>&=zjyd09?sjO{URR#u5FnzzWgh2e{5kKw*~O~0{Gql z{*3_sy#W5h0RC72|9JraZ2;#xFG=O)8|F!P${8zhEO3|lxl5m zUT~Vxxtg1S)YcLKY_ux^H3UxKpE;?*Y?`oJC%}t0uWHQ;SGC5o)*M`6_E4C86}9Cz zvJ9_bGCbx5E#rHd%i$PzS8Q%=>1l6Hb@X(%u5ZQOiDn#iAzjQd`IUYa3C%JHvABpEh9xnX)-6kCm?E@rQus?RXCke{|ydj zeoj*St%_gABl}vIPo3_ifp|Wu;-T|*_>sPSRQ*9PLz`%!c} z9|^?s=|DUWD*iuXy}{Z?`j*0}$_xI#3U^fxU)cHG{FL?2wkG`D4regkkKUlC10{8IntQ#D2)5c?NHe@2~=9#P4AZ=WOr2hkMr2>5odmmIo{!A=yz&uROjol-N>ChW1Ptuzi3o(AZPNyF~P%Y zV4!1}QxiR>#!XS5a{p61$M1$~r!)=XMVcbc*JOYC6SHBNI$%XR^7ZSG4QtnnY=9xx z(K)webymB0I8Km`!;iS?o`h2$CYV4X!^Dg7k#SBmd@aHatyucaLCYL_- zSxr9gI(YgR`LFQ{*K`vOQW#gAq2%g<(-lzz2q zzcTj$n;}1a!Tl@w4kjBG^EVzFkZnFrfl!6x^P)}XXob{4*ZRU=D)|5Imwrz<= zWE@jdW|$HX*JB;NTw!!l&$2r*j3fTD`<$klvoB)MIg)HB3*o12C?emO4_~%1nw0_k z`~ZG&0DoHm?+M^n2Jr0xJRV?WzZuLDWy^yxIv9IH`IOCtagZ^d3S)MB#cy!nXwCNC zjXmq^@h|2WnE0$s zxS#G{D}Fua_?+T@G2D{w9>q^tDfm4OXZ$Rq;9pTV`;OobI-L2}bF6PEe#$1{r%jDS zem$r8kwHh+=VJ~hzb@Br6~8W*2y61|a_O@{XTVSLqt5_MD}1&Sgnm3@IRjMJk3Iub z*UthMKkJ$OQu1?}N>|s<8x_B9Z}o~_*N;ByQoC&QCg!+B$Sky=g@Q zt7hY~zl#PMke77-yBI}-i{eNV1;ekh;TtN#H`wr#5pMgBk&|uvtJ2#qMFiXSPfBlp zDIEHph=G&!UC2HBGrJWo&%kE>+QJ5%bWLIA7`QZJ0%t(-~f6CY344SyUKw-=o&Z z^vW1tQ4xiiix2YvRnBb(Hb;elcT|?Gzm5S)KQ+c$6V=Y)V;z6#r?m$RWb12qz?2Zv z_=hU-lO3KI|Gv0AJ+=!CJ3p{-N@3u_C_lKy)&(2yyYPIlAJ|qu&c*%rrp&@Z>jNfj zyy25CAA@Tk_LGf>HecFYoiA;j?&kEv=K(|2EVS_qZndAW)QDGES0h0AX%2TYd@sYx z1CH-n*0q`2Nj71dOh->gS0^U=z3uDZ(b~RY z1E%~8;C8Y!owvMUN#n{Txu*JpoFam4G%HsvUyjdjH00-@Hc0uF-j;}4VIrLOF^8Yv zz&WyQBf%4+i?QW~j6L?4*^Mo|t?RLGrfYL|YkR~DM6f^fwsds%V82UwBae!#wX3Z? znq##S>Ln!qY}yPk+6PH(93ad-my2ffRoyV@`pJK~`&>+2m|C%az8=jv0ISQVCpeIT z3U01Oy@11SH9?TfQA0L@4<<#5a6Wt@FvjW6^TrxJWFwI9oI`7JDuk$7sVqE+`8I-T zH@y-aSK^TJOFT_3JjSyM>T}_<6==Es1P<8<>ZoXgq@G#-hv6sb3m&o&>~ZN&)JE`t z3(q`gl5z_cvJpu5%Y@Ng{qVf^>yE5)#%#4~Fx10YC4Tv-Px@^KP--6ofL`Gx=-pbT zgn#n=G1~|@uSnV_LVcQZ^{ly;|Eye{>b{3j#;Nx+o;Q^tlf}tyG_C_An{-)XC;%sFv!oT8g%X?Tf>>~)3yeYla0WA8Odm{ zG@ppC58#^u_~ilongGtZbW(n94B$5f@Q(%XPY3Y-4B)p1@cRS!0|A_qlcaJz62Li^ zPU8Q00Oy=JiGM}_H#!g|h2`@%%nlKIP_Nxo5}&$Zc9a;ijoTq&&ii#*SMn=_?hFp| zsgsUQ*k!bVX0)%N)Gs)zc}dHrvpTk5Atu+|om$({v7x;Uu`o^SGFjW*-k$2|!Tx7% zIcaU_Zo`#+IIiQ0D|#;PY{fAjmbJrEBYSAu%4sS z#zvZiA7!xE0M@`wB0t9{!CCJl@@t!i*f7XXStI;MD1L3rIojdm*EWW^ieK9>PE!2T zbtL|UieKk{k>c0u&2ok<^RI0}D^xt%_Hd!XwGE>~;cTChpB|O2u7@iWKgU|(zgpqC zey&yV9I5zk2=MO;@V{U2Q-_drKcsM-?!N}&`Hukq?g0N?ivMtxF5iA6@ww~g_*KQP zpW}Zke*GMO72u!B2Mc2Se~zD&_r(g=>-Vn?;PV1_gTf;f|CdKGyrpj6`i2Ge)v&P^YWK+JQ_bhkx0_g;;cPdjN<&19c}zaX&YRi!(jQ=tJkj{V zQG<6uPh5oSJ^9RHhDa~P4L&1_Q?T*Nr?3AffQ_y9m|Z2b`XVo|XVwo+d1vlFtKf%# z3mLF#58h_3y0fv>yrMo643`orRNeL1k@D_pZrfc|#mQ|jhfc;umHeU&nf#Tl`O^R9 zOTU3pO^&7+0ieux!RWjg1;M5mlXa%b)EDhbFWHCVZWcfG0c2A0VzMYXF}6H>`H6Px zDEE1sxC>L5P4Xd$ZUoT3XY-2OwmYksQRMc5%uIZZ>cHl^X)MFrp;u zcw+j7yOAH@78+Fx#ySQDVs>X2UIy z(B2I8X7Y~3oSGa*T7b`D?c?~(oMbn(rV1c#F2nz5ZIkm*9u^X@n=J`!B%fuQRVmoG zI3fn(ItOvVw|?33^Xjc#&%T;g-%u>_>$yvE#o|14d5bm_8RQIhyux3a|5&kLkKM&}g^A`*S^;H}o1Cpqb9ux#UP29UCskAktSU1n{lg8zwc( zn0-CJm3!ulxw#oNxfykN811$lcI~w5rVhG}`zN-q$JC9fCHv>kV?s8&4^trnO>|$+ zEH{?eSjzwIDa1g?W;fRGA)B3qUlgZg9h5vIxn`Z)x7jUs`EMYzqH5=s@J+aFHp#4x6|27#Wpuyo86F0f1)4ZxA?Ty_694=8k3BpG`Tm$~cC42qo1JY|BW-FN4aiS@O_QzXk^6u+ zA0)pY(=iTr;=|m@Uy|*Nda1UZiM*ol_hl91;dq*a7X$dp0RGkh-V(sq2k_1SerW)| zDu7=bz^@PBHwN&V0{905xHbDIQ&suBC1a2>?=meA`^Ia@DUSIGu3kU z^3sNup59H`u4F&fD;BI&M>9TVDW92&4~uQz(%RnB(~J_>`2?>VN3<=Wo*;;FSkGCP z7}WA>8vvg_iSba!kh#kx1VP00{v>(lh`8Q|q-{>xrgfYXH00N|tIZ16@n~C%jz``# zWjxxJ^JN#0U*2!1__a;zXA0N(Iou6gyl7k6kq&3N+D7tPg=-tYsVW|A%gHN#ZA0QA zDC+2%c^U$>mIBCO-lXK6x+-FpSnQt9G<&@`s8#@DuCoeLWGv5Wa-xuaq zh($xW(w*t0PhgMH@q=d_sC}R?IQ=dv0P=3bK>igqm@poW$ZxMMEV_U5^nIO6vL#o}LFm?U0Jo_=$56)` zMN)o&vT*oiqTh0>B*yi``lCK4;idjKN0Ge18Plx}9Bq!V8X=Oxiyc0W&^dhG&>Ta; zulFMG!}H#+I|kW80R)=qJUOoL=a-+=!R7t`i;uG;V2k;dEoH}Dt z{1*rCw*_#cO}8nXTPfLCQysIC4PGkQyin)H6&g6qZOtjsnB{l?WCSE~hO$8GEUX6- zy8+w2=rXGag2=De9WOMf#aSQ1Fa41G?6ZR3qWHDWzQ^Hyy7w!7t+PL@_}L~U{wEc` z*5!Y#__c1!b0tX3r`GX#t^~=?&n(5S^Aj0v%g-=EX0?2LI@-9;ldn+;W=+D+gN|kt zw0vnOmtK0OS$LQUEAuS3A-onx&}Ly(f5mL<2#1n38%o-gMa9glt&bTkO>1Yb79}fI z35VZmv@__6Pg6I0d097We44tM+5hz?rkj~EOT)(1mwzGMOzd|P)y-DBKBtm4PWD+% zA>C}O;X}Hagcq49X-c-_8q&?SIEIPpW(7A4iw-tk-AwETl((8B--3m7GoB2cL_QqS z%_O{x2@;ndp7%7qo8Hk*u3x z2i%x-Gw@P3=?6VH{b)h>Izt)BJDSoY+J*xP%ZuY;5U+ZSS zRs32v6Z@;5pXshcGygh2k&0i-m)5S$oxSl1B%{Btw{X#E<9=T+s}@DFCLbf;*L%?W zo(4L)**%`tQ@7twLpPatoYjF1ONnigZTyq1{sA6TYks*s)y-fh8vjZ&>#nl+7 zxH|)1uXf*KXIN}ZnF-&Bj{#S+brMYa4Z0eWw$Tp@>FxJ`aod%d0*=+c0D;VzD*gWm z7j`NXx9x$Zm?`p=!|VPEj01-++MB+fZEjIhrnvcfQ4`B0YRVij`~&RIP-l|tek1rz znvUJM zv|p4kFdn0MH#1*#W#$Ov>+3d?+Zk(YXU)RxBI(8ZpElPcN{^3Mm=8J_&fUzO;~XCL z>UV{XuNaCisn#8456O1{nJ#;;O_z^A(tSJ9b?)75!odwP!89w&KzSx{9gDbFnf1$7 zEp4ig_pa3Emg0@Hvl^G?&t9>7UTSV`Ug|8IZoM?Oq`~cO;q8isT>h*a9C&4o_o=H= zQG8l6K9b#-Z)#ZGG!M}m;`gyPbab{yotrma+}_<2wRJ^28+v2QCHR1KduI>Me2&g6 zHZE<5-hlVrS~}aJs6lS$<0zW$ZX8eD-QLn>j%RM)(i^SCChe%RWn+6=B>9`qWa7_c zH!kDp+~s{U%*cxNme%zM(T)VL5y!-_xwC!Crgpr^*M@I%xAfY4;+?xr>&?iqL8mfv zI&X}3DL=d2jh*JqUT$T5V`CJ*AJ}7$!d?q8i_d|tZ|{tZ#3iTV>FU%KggVgav+_|3 zc3qBF-(H>pCie0^8s^+N)I0yg-_J93!3uLU*16gi8iPO&vm1hF17%;S<_$>ZAjiQ? z+_#19aexcXAcp+=&|K|KKf*xx&|FQzi(SeEk8RG(GbxK7-3##3G}mRcK^UEz~sX2`~6Xz$7nl#`JMFSE9VrGpYpb3K>-MECmaadTbSm(2B7u66t6CtFfe*~I{$@7YWI@8>`E@EqhjnC5!a zhm+2gX12$3whwK#Nqc}e#uDfHv?kVh(%CzfZ{+)Va}58;vw-G0{48@V{~4iMGWf{%`KaG9|0kGh`LEtMr=@n3A>*>?O-a z+QW1na6L!vbB(kGxG#el2m479{>}h?Z2-S6fWJ3@|7`&OKmh;O0RE`}&N*XJxo!*K z_XY5;2JmkLaIB}8NgduwYi>4cDdr_RbNI4bTESa&W@D2+&Drd4Dj$}lj&hb`o^8Bi zob|75?ry(~2Qc@nZI37W>hsrpGcVrK)YjF!wxcW6Zn?QFsuLg0#-+Q1U&%HnJ>!$v zYdbeK+x0FK-K_~$5G@6F06{4iD+i1|4dKZ$3C!+Fu` za<5Q0`=Rj5ejdg{9Zv8w0{qJyPX6N+e~;p)E+Fx2Rs4~{ONw7V$M-7!qZR-A6hCzt ziT|G!KgSlqKc)B&SNI(Y=U6BFUsmx%3je0!*ZKT`;@A0SPgC*ey@olJZlvO0qWE<_&sF?7pBE{9{k$$w z{5qePDSo}jk$E7oyspa4ee0&K9<_`*>ib-^r;PvGqdTiiQsyt~{-oX`!06GRhNb;-UZ912v)ox=CWsXHt2;{tVmUDnOXIk z>4#M_@6?@SE?gpS`8}AkXGDWj8qAw8d;#XH8FkwZJ9|c!OrU3CPuX+0i7Y~v`KYGh zrzz`hOxcx(uZM)zDTmzLrN)J|y7$Pr2jwQycTG4>=}WPz(!oBh=|tRA<2TXpry?xV z*Zl*xslEIIEw`8WpJ{30+}Y0){b#!hl{qHM&nl7df@gs-eV-x+jyCsfM8Kr*a{iwm zug@ErdrElf;F|pKy!Y#l{5xHxNI9tgu_9a_Tvb^f!(-eqUqAOaOmv08bfV4-FnNKcsNmw*xwwJ38C8Fb&c%_F~$$ z*3HgWxYlVShqEo{_F&RYS{FJciWV+dP>YqKnp(UqTw7Cf>cWLlwBR(}k;eX=>oqFD ztjUM03vJ+Ojcu9z*hbAw)?*j zq?|t5ey}MsJy+USx~*9Hk!<1KHdHlyA+u;#8Ac@FRy>Bgz+>w?g-K6rkFPi?o(5yi zah}by-}ke!-gMohYt6y$P8d8BW25?DA?Bdn>J}5t?&omiOr;_ek#Z(9cA7eXzmVUb zLu2Qy)i%VvPS|m7N2h~hduC|ttaITcUAg+>RA}rRYk10LCbd8ka90V>{ArSG$u$el zr0{DTgXvu=0x7?QZ*t*P_cz?T97CN7OQ(bvIAk~Oqrd~rwih$ErsS6Jf?oto^5R&{ zWv>HA8@ty9!hb(0(gfbn*e&5FYBzq^>29lC#d6NVw(FNaG?2}lSWXZ` zIZW9g__+i@}?9?m?80ZIh^UTtqFdq!x@jZOT5G3vKr)>-zke;@5Vb zNa0Ldh!4738BpT$Z~{7Q?J46w4`-7SmRXZ<7UK}?CorA-A-Afr^b6Qeny`@xN8*$o zG$rGvp3>LTONaU&zbb1@Cesc)_A;w;ZhIVdlgFyyb*$`lF=i9HZ3bqOht4kzU6{Kd zcVX@#99EvP=9AhzxHG9+8HMrAvy)JV5IYHVO4>=T=XoK6lVK;hZc5(RNw!UsZ+pGa z>?5YkriSdFFTX-M-o0*ksBvN0PWi~I-M#1-Asz1)$LC+hs^g6{e8@g>t4p}xWkB*T zFm*&fPxRaG$}i<)`3XsQ!Lz_rSHPVk2acv=HG(}U{L7QT1m2L2CE+J(AKBz8C35)~ zuYF{vtG|<_J}RrlLr2~++2>EklBZmmuOuCd@?PsG(%;z6{JzH6*k6)x%BdvWjN0AU zmu!Uk*exU+&q#cXdW>0NP>buaIdVA1kr88w`q0H_W62@=2uv`~fPJK!=ev$#AUR|o zagBC@mk8k~XZ#sY78q&2y~O{1{|t?tFBJR8@o~wmLxv=|W&zW^z@S_jW{AzLXv$v!d<3|jXPc}1PpmsO1G>;S$jfUgeV zYXW#j0Phaqmj`gC>x|7n!htgR?W~DeNV=O3*+;n61o|+Z4~aVD3(7un>87qO9A+;j zl2LWqy1H?{r@u)l(OFhvO4j@?$UITNAw&D!S|2{)Rw(_V_nlbf>s>HJM!xAXt8_aK zMKZT|KWbK~0p|kC*-CENZ##Lt^*+70XGY)fa$K49u@CaR-KSo+3wxL289onfrq$JL zs%2e!XK(WQ-b(Ct#Csvf%sD1n-_jGoHo2~MeH8o@v?=E^t?SZWBzB>PnZnW;HP=qs zHu)K`|ENX3gMAIql%3^wvKNUkN`=k}bJr;h7YEi({Cmj{9*JzD6ewx744&9Gm?*q2FAqq{Q{i z`acXm2`~1k&>G;wF8!A?GDQxKk#%tS7(Jg%0uy*cI$p}Yb(N?}#yX^Kno$^?TsI-k`qV`E zKs>EMxFd5v6{B7y9cyk!>d>z>_{eWN5l+&5Uk6<4z7LZTREM80!-y{p;Hv`og#o-h zfOiIPu3;tR=bZsOB?G8Bioh%kmOmI|zb9nBBqZDc6A|hWv9gR7Y--CF4ql;pX=bl|F;4Dn-#yVhksW5 zoDWJoA65Li9zLb`bv@{F8+1Kv$>Ma8e{;Q__3>){)UU)MvV_*r*C zt(Uj7c5D*OTb;uYSesn1=+rv1-EJKF?c@x0rkOPf+cUE8tq!bC;zJ!+oy;{gmcFzq zU-~kZCx1&-e29!#XM7pe>x!M&PWRnSp=G!RUebSG`uf{21mx16Zb&UYvv*dw%P9{xL&eSwyz*DyD($`P zH%I;I*ZA~Agb6~lZ9h&)oz2d+9bhcdT5&Wcav=H1OmPsCS=je3SXif&E$No>t8Ry}SiH@E0} zTOX1tkDu-E@9_-`)Uc}G;lITh0+T1B!lL01z?rH)FIV5VJXL>rE8g~B7qxZZi?hA> zByMyWW;3sykM9lI4`ehhHD?6m8&@>cH#II>IxiI=cj5Qj7s5~GBxkeJV6FO0e%XQ_ zxUhTrubZ03JY`zm?&)6x9@4Y0Z}GX@s2HILd~Uv0kOf9Ebzz<6-ycsya}@dhr|8<0 zmrSSH#l;>;Iu1YLzMi;43obG`;+Uf8MBFgWiG~l&Q6&AvIx)DJSCU*CoZHW?oH4!J zaF_q2{DNfR@XJKMK2{h=>WQ~}MiO4|WxymaaK<#-Rmf;_jMWH{6#lh-g}Ru1-q0LF z!mp2WWF3BZ-urb&&V8;y${d5^D#vKQ{2ULHvMOh}?SQ`~KYi_|-Q+v?<`^t(B~gFl z9Ka{)6~s9&)kM9Kcx0~SKk5&}k10dOCHo0q@8P_i96yb+=Nvfo+(6{V3BY~X!BDvX z-Wb5ypOWHXJ5Iu>>n7oxTPNXN0eo`+zcPSd9l%pg2`hi6)O%Zcq2mZ`H*jAfb@Pe% zD-L*Z8MBG_U1zud(0$yY^Ww`oa8m8MRvuexzYSrZtCc;h2hl<0IkQi)uL+)qn?zZ~ zJ}>y?1VQB2y6HB9T7JqP;nzC7o_pM+`1PFU0}f~Wlz|e@#}vPw3*Dmlb^doNemw_x zLg8B1uc80|vAkM$m%Tm2DT5_H|L6FbPdx|F-=EYv`YXu@;zj2(ayaAH`HXN+qPJr) z_h?RSl=4XpCk8Ok5SR1EkA7VUKnZFM% zr_86fe+xH@FHUdgoM-V_c7I~J{}D2;N|hDESx`b}8O56qHod(c|MuA0l0E2Z;PhPS zuF`Kx`=P4me)ao?{>PzSU)7Qyz+t$>(hqV*Sv4=0uAMJut3iJ*4otr4b@|dajryFg zy03Kay#0&*D_y)7igTg$w!*w2XwA@>?<@?=ES7L&+}^F<%t5imd#BY6i@v+{^COhn zidsM!^z>oY@F|#681;76@EhQi&}>Za8RSlMJNH>1Og<~9= zC^IyLbmOsx59!7dUd9SZQ?e!3kZvq8E-L}uRmv|g{rxi0?+K>{v6qm>s~fLz@@%5I zv3%#ore6M+atjjDjV1hgVRTnNJnxn0jkzPI8_#r}9B*h(llqf-VKpV`#x;(Sx{fA4 zeeI{+ zU9IOB)mEd5ijt}h?9n=`(YugEBLg^}5nbzKf*>}3Hf6!hayafOGgzO3?}D2|T(=V*tMU+b=`6u;JWn-#y-UDqmpt?SDACF9q+>pK;{)^$rNeytPkRQ$Rg-lzC= z{v)JEVtJkDF!y+J9plp>$A3QWkV-IXQuTDmudOP?2I2ARkoP0XScm*JZm2^($ZM=a z{)j9Cvoc9aBrWwxN+is)cRKUz?;83a$(8n8)!JBk)LLGx4(aU94gGs^1FyfTu55bU zjyNHIp>I~&U!g`8=k3cadZI9x?@tZPEWzx$bstTxjrdqY!=f*3{gkMIl=DN3r9z2h zAu6@Vg=H;r@iVPOUO_DqXSkl1Yn-Sa$r4z*1N0p49ia^TM3?+0w%b2ZUDA}D73Ihu z4??=+huv5{QC)J#$qGqVu9QuhLb~Kw!-sT92|rO?a;}prS)Ez9UA4q0{rxi0bN|!S zCD*(3C#p+cq2wa-Bji7pkS;0V*GoWm^~3W%DXFyqmg zzt$zMQ2bh#yjt;VU2;J2YhCg^ieKkn&TaJbAE7)XmRHM_RxHf6#JhV(-(zrc?fBn+ zmhY@H{Vf0R|5EH^;rVg@<+d3t;puUWrQf-220zC(gSsKIx@`t^Vwucclxx0Ygu-Pl zlRrYGK&zaFT?TK%E`zn)Wss+)_yc%wkHNQbm9U(3n-mgkcE8jfyPsl@!NpMDas#i@ z>Rk;?oi)bP*@x7irQ+Xwf5Ls%K%Cd(yfu|N@8DYwl=j+P2Zdb-Hf2g~$6@JzZ^~@RSKZEi2(8$;aOEpfrF(Ka zrfvO#-G6XFraEuFUG~?q1tBt95N44EM-hgqq=Zz?nx5wwM>?f6PxvJX-OLW7U2521G>t zxxSdIpV+>IknX$?4^4DubB-r;XKq)(u7%`13!4yt^a8ib%9*CNup@0NAzeC4!3x@s z9!8?vq_dhgAhD})>?Q8o*1n?!Ap#}rN|V_NSjbi%r{|3F;Kep*3Y+J#>q=g2zz z@VrlY)N|cp`wr*H>KM`zJYtPbD@+n$9TfqcRqY?QrZ9UjNOb1wrq#;C{#?7(6swntGW z>}A;4b!j`&NF9xQk|>*4-=c$yU6|dHvPkf=;U+*l>dm5fJrLyJHdm1KFK!8|Y zy{AFG{Y;!PTI%NrC&zf9EE9Zz!^yArG`vyq>v}FIem&>tQ}~~$_}>+X=iQ25#}gqe ziQbOI+?&SNHje$yr}30g(%8=zovX&2tVz|)MeJ^8Hx2m`jN89(8zg29kqy(3S+MHP zEKftQMIv9GO~m@+z>*YqJkyqKry}X?KZcw3?eFm#+qZvCjtcwsbSS9P&CKD8@Jny! zT$B@o>GEB+fvu@r>F#)!#2*^^f5}}EZ{scrFn!lrxO1OpyNT`G*du|DaV?Tf5)L1^ zSE4xY;lgbXPo{Q1Fl+LXQhuu0F7e-XyTo1CF7eRTPsrpcF0NN6zO8%u@Lbxu8~Dw< z>BFxZqp^F;)33Kdtw-hH_0O(3!wevQk2L1)(GRYO_a_+_I1&2BCvI{SEa`47AFC#uVTHc@aD|B9bL^;>A1gDSUWPRwo zG`){k=QS_+-G!({<^3kyRC&M3Yy7TX{}0Ggu`#%;^L`$F>FwOF?Q~wZF&KL~?s9uN z?6%-NS6%d!dpb@Q+cxal(<|-Tb}t9i+)3EaG0=q1-IW$k!FGjCu7sbcj=S6mzJksy+^$+;Gz*ts zCVK9CnmX<-m;OX`+>dC%%?vqmB42KUI$qlB9&!8iaF^mAtB%_~ zjy)y|>gvX=<8Dy~oh^wigConOc;@88YA*okVty_P59?2dDE#?TfLqeA@EVEyYr>n^QArJ zg*!1Nzr8qE%)F{N*p_)^Y)`g(XmEIkIj^FM$5njGyl=;HO-72Pz4>{2@{4XyFWXya z{Y`$+qv=lW!V=i$e7U-RlH8OLf{wPB=g>>k#h7ak`68>nN7~HNn@iptP1s-3P!Wgu|UgCc# zzr@o7AG#fT%qKdqG&}K-@N&;RAAX(CuZ9B6NnYTLX~<=0G##Aw zwxsaC@eAZ)_IY0h+<*3DmGGCjaB}g(^FAr5{Z0p$=Rh0tc=n9cxpj`slCZn_>3iPs zE%^>UJ2P9rNJ=^{+D_r7j$o#(a^$HtB4yxkY!b zCkSGn(mL`IgIa#}S>Zod;abO}Tp%%ijlbKVHh!&B|EFG4IQg}%J<|yQ;(D*g2OaL$+rKG(9Z%%qCqI8et(R}u z(9%10J9BN_$>aWZ>ui-^)+B80%=}#I!#u}%s93s#8)-P-iIkK+rjPo`%c z1v7N9^yRhbxj$H&p8wtSHM4}A5Z()^(8+#)_LTZ4H+-5om-#0WGL z=HB7+p_;lq77BlOxYnqwOhKqm9BgMK|6M!kk)lh!h|l{?*G}0s^(`~9gOjc^W7{*Q zGq(2h*5a(pgX^2Crp&AuN4^{l*;(&(V|2lVWB+FL`8rBSM=ZL&<$}i-_DxM89dWGT zYY`cf@^vA3H_$Jy+{-oZ!mDm)vbV=sV8+V0OdW$6uDu4P@Ym$0ul=-}d2fSf(jEZnczWNi^ly%L(xw?!=p;CjaOgH> zFf+PMt-A{;GcCO>oeOM?|KcKMo7ZFbBMxU<;4_x7{dWO8Qn+qEHd_hbN;oz7`{=c& zjsLy;{i+dVO+LzF>=4ITd@$kX_B-i#g9!&ONyo_!w%+ER}?--=9Kb=!cyQt8rn+JBH3x z?NlW{V!R2Bp<@jn8bfPb`hI!kUap}rH0#1obPSdAFlDS9?-;tpr9aUz^e+PS@57-n zRKibm46S>bW9TN={!Z162W~(Ao_BmpzCVUBl;aTX7)g{ghVpsoF;x0D_v1^O)^XJY za2YjY3xNz?0h@pfqZt>uKURLq;r`efDSmIP#7WQz^U=^)x$x9+@AVfwnpw!2d}J~1 zzbM7|D5juo_^wdt3BG7tD18wtLl}nATq(gwG}G)snvH>IdOS`|&tT}n-1EF*1|H{O z83NvKuEyVFP8aPcRjS7u0{r~YTr)K^i3ZmSIA+QG?rmhn)b6@x>bpA6;i1$Kvd;eI zx-49lvhHfi=G?sa?KCt7?Qq>fWGMAbrsM13$2r{B#Xkx>iP%Opg~p(JC-_caEa8^AdxP$=UA%El3zQuTCnws!TTQc|ycOw5DKn#eW zAAd_ODDzK&4{7Z0cV*SX%`y`yEA!owe*|%j0}{9vKHJE8E7LLQ7$PquKTavYe=!5W z4jIq?qLK9VaL$~FgP?EO;j79S4z&H)UiM zI`Z3HNXGXi$T&ViY5gMOLNb1rBI!PVb_QS$G3$G3khGJZO8tYy6PH?BGPeT{`X zA%Kf$S5iLoO;{20j4uApz&K=m&!+X`(C?q6^`urm2&Swh_DiHA*NZNC z7)GF7pJ}tquF=h-UsY3j4?;VW6}|vdffZiu953Xq4lPHht``+v#t1x zaL4{0nx}|8S_1j~Dl~>2T5qy7Hrg0?XuYXYAC`6|^OQsDO;RIVKRUS9n>d)2*PCz` znjDFt3`M!$6^COc$8VV*J>qcAji@IIK7sWnW@PO1snbp!_qVx+lp>fl`5w96^kBT+ zgf|E=QVrQ19Y!<5?f>G(^(G9LX1(eAb|_6;YvMZ7xqIAN6V{&Q@4MpI&2umqo{Zlr zGn__dQHaB<7~QxD1MzV-3%F8RYh3#~w7wKSI^*E;((_E|-xFD1vV)V`fePcFxu4+r(!DO5{#Y70oc&Ap zv9{)xi+jq`&uCOz|mi^l`x2nsr;PyY?&9C zuSt6(K9=<_M2dB@@}M;8m~`^^zy0`xWE$73aohDT+7ySC-&n>NTkkH=Gcm>-MC(-* zWkV4~21*r$#uCvxMP~82vw!)0IW(3~MkbLjH%|l;+l4W{ySDI* z*vAhd+eJm$P)2_~^=#?MVmpv(mFrk#@>s(kvR#a{`>?JL7Td*1^5EU|g>Ji${x%WY zMK6S=mC1MuJ^8quc*l^;f5&dSXzhI4x^c+lh2wvpB2o`GYo52={{wlvw7M`bO|Nbi zO5C=(tXi#b_PHh!d{08JX&x!eygn25=I3V_)085@|5MpID#{ApvC8m1H*kynb-ep# z)*!7U8mkOnlN1=3AD;GOmfyGYt^r2!%PaSC&4Y*G{rUbT1_ssGOZ@L!CPRBo{r4@# zyKm-Zm!e-T)lCdXXy42y;~ZBy{O}?BwS=GOzL_=dL5cl(I8+vaSzkLeLemN5^uoB79;jq+NUWe$0{pjfAKtNc<%b_%F6M|MA7OhGdZ5UZ0uiJR!V=HfQ^7cld=`p zfHq1WN0M_&dyZqH+ig2Gwv1oxs7PPbOsJ)tR5zZ z`EDWR+y);aA~$4#Tzm@Z6Th*@PV+tF{0u8z#w9z=_f|$u*yDW*2k*Ps{x_g~*&5Ps zx41?oGG;m|nvd3(O~*Ohm(5qogYmAuY!0n~jWxW;W?u&OxpXDJk`1|+Yv^6 zc%#TqUwKtH$v6J7At@)!U(ypME?R0u(!gU0U*Qq9QE-H)B&%nSjQ{Dri!Jhm@3>1J z&?)n*;Ut_x6b7HlcejBAH2Jj~y1KdeKJw8JaM4Y7;d>%m%Yn){joN|KX z^S{c%BlshSlb=7Kw&o4%YHP~IoA}-E&=`8k$>X+L&s2>xYZ7*6dATukh!_r_G*4HJ zku!dH+$-Mk#c!W6ma&lM#H60JvGBRsgdL#>tSY~^WPy=P8LiX&`|UC`_TB2bO^pjX z-o1Mls5G_HmjWlklk&`$8eY-00zW+O{kmfi zIS*gX5upsDjFNhndI^nPJG}PCI7xo`79IIdzJqVNfQ@Eaq`|k z`Z#h!r_oE;Hbip<3xo%E_eT=(s^=FWz&bGN8YmNof^$J}ZRqVc)E-G9!re(_Zo(^uj(sdz6ac#RK-+abmSz`SQn zR*bO8#{@sj*BUkT$<0{C*cD`c)@*a}qSZllX0R!>d}s#$Dwi z>B>E2f?p@}D?H6H_6e83M90`ks-L^4%*BU8W2}Uq=ol;excXdzlnwkz{Ym?y-1XZI zGb-z>i+Q8S&%g4jaFXxfv-P<~QIS)Y-&*`MY!R8Ym3=r*q-8m8MO4^JHJ@Jz~Q3}!NGMbJvQsHcA?9ZKL)?S;p~g7 zBN@vZ6hH0lg3ocd&mSrN%CUJ9PL(fDh({fp7mR<8$dF5$m#lHyeQ-a=T=?hd^QNU| z?Mc5CZ(!JG4S9aWid5B>nN_cuepvNRGA+ZipZXjy+E|hYUsCw@_z}8$pEop?Ncbi%9zQ(q{kmh254#7l&xNNv zVA=ihhsKgVSAWc(CO>`cr`_Zm|5%b#61FYBb=j1{dm%z&hTluT@@vPv=Qpb=KWp+~*YYuSz_%pLJmmiFW8mW3XtyVP zg(Tryl8^0m1xls*#5ERKNgXn#XViB0oK7W75hDDvYW>!c1xBhUEAD3+wEP#EPu%QO z5s_izUHk7VCsE;YT{Ff)^NF#B7a8o!ItlNWSMKGSM^0FOxsAR>e1 zy^!g^M2^#6>Lnz@W$mA9+M4|QYd`HK-}q(tcxClSeVus-?^|POD=DP+lWQz%|8f6z zLfq)(wGjLi>4-!0L$+_WUD1aZ!cFq=$ezX*X2$>hrR$9i1OKhS7;GWGPN9-H;_yQAdZ#3{=@RowwHt(&A5}_MmHL5=sX`t<@JnaA~N~y-RkASQSHVH$8R@I zdM{!+Rue}@@E$Z4Tgf~!K9g&(&y{f**^cmg zDw%D{1|A{5y@d4WLW0akLeC6aPRp z_7eX~{sjoh>@^AHCnVve{8?a3-=~`$Fi}1FlYWHm-cKu}M@#sL>d`aZgA&^YZ96Qx zUw+Cc|JgIEvt9lDsmW~VZxfN(6sksM!x30y?4cKlYn`OA>(LdTZ#rb#IP^_D+kjjf zif`Zu$>gGDQf^q z!d}`TkOSt4f--I zq$f-GiR#IRzCG>NJm&)=_jf#lwhc&JYulhBpeGwI=4{+Dxg~IZe8Aqk;Ix{B<9$bL zy_&3MP4#85zi)bKWuf$2*f*jfV*Pu1v2p#}J+Ns+=ig!8{VEKa9f7;KW@dP>mE>?3 zL0&=r?#pp!N{biEZnrgb6!wD#qpr^O`K${=Pq=;gPkbR{1LC@|tQ|keFu55sw@o_Rz3_(nXKvq2Pj7ea{92s* zY7WzWl zWniph;aJ1d=EI~GxcKEF;s0C!ca?0(H48i`yqt$tZi6-gDZhkY=EA?+ddL4e9D`rq z5?-z?F1!*WCXQV$d|e!)bx1gYFMz|ZQ~GV8kOqluOZK))c)>3LkCep(aDRIp=$Fgq zr3J&s7{&LKzy#jVST5nWGcrYfw7mE0j_h+?hgj`AX8_}~@XOEnMUu^{&oRCo{+j&s zwV!sA@A;cw`O?7VENLvKPtv{}i_=nANw!(ZNL==_dpSqy3RYep7T3Fkur{xe`Lz9Y zYJ%3me7Z(0k>EN9KRrJbd3OSEzwa?vE`T=%@Z|x#DS)#-CZ*dFz&iqXs?91dZhw?{ zWdVPur0{n#{}wuq=784J-QK&oyR$jfy8e<5T==RzoL!rHn^VT{*wfy-v1c7_I@Yy! zcQ+#&hS(oSlqu}{vZl{^Cb2v5DF{w2fkghp@e_OzK@j=biUhAG2qHcmKfzZL1o`}% zENtRuTN3`u9Pa1mU5cN&l<K(vU@Ojx3XqHx|O<(h6%lr}`tm#zxnhzM{0%)-oxpcz_)lvX9 z&>@C$z-K973#FeXU=L|*Hy>UFK$&9z!lEPR=b97y{ci^s-|UUt;j7s zyJ23ebT0=+_{?RimgZN^Ll#o0re($GvX-7`&gs#{%{{%*#qCjNSLaEc?dw{4J1#A& z*-h))qbo%rzcT9C)ZW^$wxhkx1YXzO-qPFNZI$!d`T3gY;>)9rUES>#nKM6Pa47Yg z+oP_v0NZ2To{ByEOa(A=MNqK+DZ8tv$st?dq#x& z=UB&oe%{DUrC3xJ-yc1*z(}TUtkeAa<55WGA9BO%UMF}c-GBm~B_^cM=4VpR!l*5Qe>Zn{|U>-wx${JK7uD}G&{=PG_ZH*Hb;x_;Ixex3hr#joopLfJ{I z2mXZGTGqBKxOnXE`Y%{;+PL3;jZ}hJldygNwNSbsv$s&%kl9!IVzJbgdAJDoP@(ku zVyQRtM6q;bWThQ<2F@wIyj0~ciG76vwCYKjAGnYtoe+2TNN zrcfNXGP4{LvDJ61-Rb5^#lb5xN0b*wO5ZA${!l3W%*5uR-2D1{>3@o)M~kIj7E1>z zeFpNGBMPM--!mn{+f;MiO4|WxymaaK?1A14q;CS0hAH_)jK* z3A`cQUc#@Bb7UQUw7mE0j-0Xw_+A%)<2UtBzx*NHey)3Pt&B{OpT6>{aFXxf)9pv< z>Q*O@rBOv0lGX`0PHNp%`ZvvPe&1$fCk60R0yuT!q9EzzKWZk(z z_AaERdbal7ExlcvU{YV((y^hvt(j5vF1Q%?&8-`(K5NYINI8|Fydbg9vQ3JvBkhcB znQc_?Zn#P0*E)pgj>NU@xSh-(;##Nq8-rS0>vn&yaLs?a!nLlZbv~U>t@CLe?stKB zCcBR0m-nR(Xa03Ok&B1?{0Z?vwU$+*QTImIEjo4F-^!ZJig%PXS9eAsbt9(_J!teH zqbM~}IWn3Om7}YFvJYi}epD)E>;?>IM{l5ZbW?^OGA;~!H1ly>ivu6b+-j~L&FnGP zTQc{W>*q6jaV=bZCnJL8T1?`**=vWGp8?Z<5%27K;+}lBaZRxo1Yw6ueU@OcQm;z) z-+~G)3~tZ#F_}TGP6&VQR*tI(P$=D2fHpPTBxnBm_oVyZfq)GIZ*1s?g*=b;cKr_- zQ!5HewXvp9`fl#?e4fz9IL^X;U(D1&1BAC#?fUnW?!Ibq`qK^YdTiTJwD_X*yUsGX zSylBJhJ0)`%A5Z5q(bSz!nWJ19LpTAY`d*$(O0%UlG}D?RaI~1#KPnanYxBWKi+zC zVeq<4jVZ~EneFC!OJ;|;ZqMw(wFv(k&2@WbC$FWSp$t?RDSHZ~DfTJFh5RezW5BXD z)IL)CK<(p$tN+md?ez8EHW`Idn?7ngOP3nB(Ny7JeU;NUOWQNoA%&886eUx!E?W3( zflqq-D@-JBVDQ~J{2BiO>S(rJMX>1LEhbQchYimJ9H#}Ct^tOx`~86fSO0bhPcwbP z7m;wG^^R?KR5cDZO*@eOw8>s>+dWk~CKU$ogbG!~Oig~#m6^He!S^G75^w_;3xg;y zLKg;`rb9H9ytpYB-sA#L+ZDT?CO0Vub0sS~isfTq@q_&hu(k80zFh?6 zelYw`5St_Y&z5RPe|mBOm3R{?!0w$g%Sy->{o1(&nBRZdi9TcFh`ZeF>FZBLMRwdleDI@_UWEdk zIXGob?F0RLuBz_XOL*R+XbC6g2J`8vMYpF1YspzSFz>6MeQ?ReGfVg0_Uog5_2_NC znKti!^veDRN;hV%L=9ebB&(OM5i(}^9}XPof83sfp5Fc>k}nOJxPJ9$Y3R27M=`G3 z2hXh9cKakm#)i|eXEyRRc+=Ejq}?!ZYD51o^O$qaO<%tOzTd=6d-ocN`zbrm?xzrI|FQqTf$=`8{w7lj+c5)GRSOoss*W_l##&V$LOJi* zZu$aBnHo-+zIi2NryYq+MVl%I7n?gP`g3fnCf(tefPdU2yTT+w0qvw4i`=#CfUM{IX>yI_mOhO=|U`a*6+uD+>Zg)G#c)mUs;(U8lZm4hQM=$W~E{jw$8 zE}Mhryj0|t^~r6L6n0ySTyXE)yzyeJ%45a7wadH)7j5Y1Y{wqjE-v%8w6$UR9&Rqj zU)<5z(tUY^Tt{m$F^P_!bG%vE@9gT0Hg)xMa4*2?u~47NaeKg~Zk+Yq(YY>aUEk8( z(#oZO?jdOJZ0*|Ii95vG(P`q9gfHH_c5Qq2{OBC+0YF5lhVJgJ?g;w^+Dtqye=Pu* zUzZ(|mClxphz}W>A4QGJRyO6DqBk%n<#I|QCbUbqq9hwzE@z3`TJS;L_BOj4p}n(B z_9D3OJ*cM58`@AnvkhV`%F-suxcpw$jhaBYQET1ptzF%1(Hw~+kYzu|vJUZ7Ho%v1 z>iwp{DccTfnep(8ZkTl4)N7|*kKSqMS+D_mdzGI{lOUS0wF!l6f~GEP$<4n%-w)aZ zsg!|M)0hR~{F!~Unl~V^X@zWpYn=JxPRkzuN3qK~I9Fku@_58MEkZ_8->w%O8Et*?SpO(DVhqbFi_U~m;WTZAhZekWuo8E zF_uH>nbFZqCgBCY2$hOqxTT>6~XYw~&5!PCdc|2`L9ho#%+4cQbW{AFGQet6#d zb;lsPTtnSNO&vtDz#RPi^0S%wZ3j@QnhG4~U0#CTtz}C1C*Q$jQ)D@-P|`gvuhM2H z537(+U0W10{Ddiye)uV62RXcz%LKreF5Cq z{#&t~Wo<`yPw)KNlWP{H+Phjec3%Q_9o-w8yDrt*ytZXSPkXAPtGT&(0p1H+SbMU) zIr(JXoCc2OT8GpSS?F#I?4 z&E0LA+f!;o&f3n6%_(fm!IWX-&YYg+%gEl=)x5c*E7flA+HD-In0T0oTlfw_PjhS6 zrpr^E7EPUuenX<%J{CV1WDLE7Ac$k~;rI#OPY^`@Pf++n3fJ)*$qa&|K5w$Osn>e=Ee@~o@S7ceio=;7 zj`@u?L*+&1f0n};zs~=kD}LQ>j}7oIQ2e^QixfZG zh~%eU@$2%wN%8CQHYt8x-ZhG!MVI(DDt_Hgu2wh=i^Bicfq4F2;dDy-|AdO?R29!r zPPL}@X$sFMT+6X{D_qONM;y-Q!g5`SAL&sK?=xsB^(zm*(c!;S@$3Hea;HKw{v+{| zdN{)2%)f3YCn$d1PEJw$`nl%<{BKtLx?R0Bz~83$b^Mno{y$gw->mp`ySh^G>vnam z;@9o!y^3GAtD6*ME=V*Y&?u@$34Ry>`<6FF+ck zzf$qAe%25KeZa$eEu8wWieIL zzpjVK<%{*epOBp`ly}d>@0iv_(ZU4_YNM#OhF{XDt*JS6Ax=s;xwdZH=cVjX31&^g zcJB<{G5zvNZtD2SZ0sSP;ufq*3+?8MLjU9G?Vkbrw%=A=)i$s&QyeU2s*8j9%q+)Q zC=HjsHN*(bAC?>=ELhJf3^Zk`3)oCNrBM2j@!`sFwRPD=G3(xT=WM(NI%2PYV>HWP zE+rkdRPnB<_R+DLwPu}|UGhtaZ$u2kt(auE=aRAuEb)@l(pAOc@@0)n)w0scrWK7# z&u&_VV_250FlVkT@4}o6Yd6QtIfk!cc5dFV;q<7*zW)g~7JjTh{JPuUzPSVIIutdj zmA#nEtuw*aW7%gzd*`~|_4*CcH@+cS0M1!t2Kj3p)HnDe9l?RS{I2F%=1`VDu{91; z2c|ac-%RDEGqlEWGmWaCTV21QEs)h&O%TNS22ZwSoPROSiH7I+ z!K5hPG)ele*C5=IExBeL=7-lb^o!({Az|Olus>+jwmLc4^X01XRIn|DR^` z69uPe-{DDTQorKI`6}_W0Pf21o_NOH%f;TihbJJe)}}wzJVON=XOhjFgMqf0iyY&; z%a>t{q!_^2Ka=<`4&avr@a_Q4_MH@eUjQ!!@OKCB_XTigVx_fMjJL)pTYdx5m~4$f zmq)hH9@`o?vc(?N(weGYa8~n@mQ5IfbKTvtiyVhZTVw9p?)G*$%B59|u&uPdwysCi z&I$`3d$3C@G7b{?!#>WwD!Qg^S624vxq;}qKL1&a3`AMUv0vhOGeHn>ZKG^AsKvD{ zuS?;2&U2~5{dC3V%lIjCCEfQbey+F)zRTg{*S4hhD}MG(;s21rDdPqISBEnm)|KF& zbU5>=`KhFm$ggccdkBKaPZ=ul+(i&Xe(Fnte~BQ-uZOQ%*zoIm_<_U8KLbCBXGrnu zdia^**Y)sAh3j(tR>h<1VUiQ%Oqa4r(ml-Kez|5Se%%faSNytMkxQ5H^C!g4ppM%u z@AD7MRqE<$;00Rq;&(O_&ze-_5=4Ym`08Z&PEx=bVw`+A%9?8yGUlb&L3crBAGh{D zjBV)L+CRii|4(2B!%hEu|8dK<1JfHzzgSYbb4lqdm%h$C1ZM4^Gt5-pT|r9E8qpW(AJ{x0F(V_isL;IO6{(*19N zJ&Wn?fKPFd4ILLV`W5V5<#tiLpm_i+CjR)Pg(D;amzqmG-TxjmU@7{s609(Q?fkfL z9%h572_c-6Iu!s1MFR}?V9O%jConhtdv>P#FE)ER-vEY`s$5fy{`=DX3m`@F*oFCF z_!kDQbLpD8cX`d3O2ckvl#J?-iQ2`#`Lc4sbQtIT|Ji#N@T#hFYj|;$R%K(wY87>> zQ9%(&NVq801Of()fLs(6g^&xNA&E&4wWuJ8vJC;McuEzIR6W+Vp4L`vMXhoZwOYkX zt=AT-t;D-{ty=isG3Wd4J@!l%(w^^}@BIJs&*#~Dtu@w|W4`m9*R|H(Yx-XmCz`rR zci1{betLYB6s6R((!{bMk_Y+G?BZi(>)q5^w`1XU5E9Eah*tBbiN*KJ*1TK3sigez zmabPUTH7hr^=k7(Cgb>FXy#g14M6_gk3PfvyYj>TJ61~dUFgm(M$%3D?1DcKxnqAM zn%|Kg!%WsnQ{rn&$8{$)N#0|c^@kMsn?@2tm2CIxfl^8J&M}7kKgD0@Tg^%|b(aKN z3WOK6j_%|gC@r>BUBB#4;(EC9dD)goIWHDsi_33G`I9ZZTIb2Hot-l%YVXB~WeYXl z#fT?NSGuw60m?pNm)NhN?8T-RWt*u#&We)q=e62B(semHFjtW6OM8j@92fT>GUa?p z<_`r_&(r0+RNTbnydG{_k#nacp$V=*awVxht7M|-1{rjuB|3`2nM3bi$MxQqqA4A= zDfMB>mBr;Jm6UHv{JOZy4*fq*LTZ;3P{~U9S4o#0Z-2+$w zSRn*tTZ}FK{WR3)=+tP@-{&W;x=ZXSYU!QRI%4|?p9>>#)hrn(#opBBbz2YawE5}J zJ3YGS^Gg%Uek$X93H}=-q?XRot`@&3$k+8N=uP6<(Up?4Wc6O5sQLGyQP^+(TjcLl znw}P)vRo|0Y=e#@{NL9hu!)Op>9^c?{?p-dmT2lPBAHG? z^I0G%MQhTdk?KA;R8Z$jsX4dHzT%~+_jn9-k@Xbg&Up_?JGJugKxT;9_p|hS@?0uz zeC;ftrJtszyXWSmG8y51XAbJMHm{qcl(L)GZPF`s(7cY2Y^R;QKZeZ}g8WySSG^?t z|EcEnBe{e1zpZ)g37fQe6}Rj^3V#wh%5?)$deSt~4NTq<@-H^Am*ob5Yh5~?_=>0X z(YLb>Th(b2?|(_FTKAFsuPf7@ekF(P+EcNge~iNAz`4$=emL=~3U9Q?TZId~x`(H8TU$Az}j*BYDZ+FQ+ zdJ+xeF55plziWEQjK=3yW)ptoD1W}C>+;m7a1M^>iDiR@0}l+4tx1({l1X@x{Druk zk!_!S*g^mJ7XjN*)A^A;XgU0vH3O#Mvt7)#YecV#>dO@!>+2PijMAj<@?PxQ$S7RA z{)Y@9W=qV7>zb!BNmE)l35@n6iFzd&f-(YUAPQvS{=RmbEHH#`0-7plK|zvJt* zUkPprr88^^rN?zwD)tXtKLMAD+H{X}ssCc0tvpW&%Tp$@T%KtYTyX|d3y1Bj;GTOg zylz=9NW1*{zNq=JM)|jKfuwJ)chw>D0tC2aWpK8gR@-z+0gXPZPRVeT4Wt=ueJS2y z0nJro``e}3=&`Ja!rmWpQJ9@Zx?I~fzU%#gVREt19vm!RnuSN)&9SyCscnuU#dvoo{l;XmZKpM=ZTu%+ z$5jQqo`%lb@GM`+?y*(O=^~T4*FS0 z{HJU)k>>&Z)W0WX@p-I}5%BR3*Z2o!#eY+*Oviso4#uR@qwm zm!IAI>GF$C_i^O1YDH11cT?->orX=4yD83*i6tjXdaY;ajmX5(Pu;yyb+Rj7nG$}G zZj2k+UUhdow}7`7jFBFezoev}7S2|83O`73I+#J^6m%WzI?iq~-|C`6HFJFhb>^67H z)mf6hnb(|>$$bD_D3GtEi#Bx{CYPOhcd#`VCw$R+2m9-K4|Q}?qxooe>5yeZ4=dM< z4c*$?uuY~Cu}R^MrZXcj{I_oYk(C;5j|QwC2rGb^keZ9vVY~c;w#(oDlkM^%jaP?w zU;D)7aAhC3OY9fK0ci7^W&1C-%a>l`>pg2TM_T#F1Z}PCZZDD) zOt-ISIJe^=KuN1qD?NkKT)*zEgFCH%`im};Be{uQnn@(9zs{46K(0z|ch1Vr^lK9W3)b{z7O!|d}B0~%0AT~ognRfoz3GO4YE&7^SQUESr(nGwQdC!pb5Hsy` zx`$ZYo>bM2RM7sCq|!)|(4TO%k?xJv9_NwFoYdTr?q+sj#tkKx8H=3pxQ=c4W7zMt%GjpK4ArU{;@#mJnJMH-LK1QV%hV0CGezd|C#B*#TxGd z#QWNA=m=#Wv`g$4aoHf<(9^QbR7hVqyEr|V_-dwN^|ey@*E@;zZkp?-f`umcUupAq zy^^u-SQcC?2UeXV`_^!{;9cjG>CLQF?PNMV%B6;OXxeM4<$Q5e z%!8SG5!MZz*N$|4`@0&mjU);6ZhyK|eoAF_^pZ;w&5b2-ik(i|@!QM~J&bg6JJNZM zl$GHzMiM*rmecO~RetbPGAj46QMqengeWYL+u_OF$4caH96jXin4dl*msfbaisy~k z;+8MAs8H_J?DEXg@1S=V#J{xNWk-GvRkC4uMjxX4Eg@I*Ja9I0qb=z`%lt?<0Ov{ ziLd|9Bxb*#XqP{vB@f442Axyknz;N4o-VU6pB?y8ZUkt$8Gj-vNl!B|Boh@RX=5&f+?l)`rIC4QjeA50aNNj zmt|Dau9C7`5Dyj3c(TAXy!Mq;n0?dDBh%_!%g)qK(VA77+9T)G)VeXLM@v#qm!!5y zlW>2*wlp-&>Fv`<>kDNdOm~UGKKzbG|Bi*W-o8J{ZhtcJ#X5B-$+quQcGmu=y<_mO z?8!E(5Bo2rr@t=iz@@o6#3hAteu1PdyC}wsWDCF5$yS!okg|Z^lGvN>-ouQ&DcI|U zz0j*7!~s9vgCpn5=L`82n~ zD=5dyt0qsCl^^{JD1|b1+=NjRPwy9v9d$+o&1s{@O*pk^QihOzwWPXWY&5oL%;;k! zDsnTjbRsq-6Gvxaj2$;|^2m~sqOrxLVjj+xPR6EmviVgGJZbXSG4e-5P)3i%X7t#0 z6d2Vn?UDX?4`hG$XT{paWLZ+;3~=$sIddkCvG|(bapNbA88?>lYp>!QIdarQw*qGN zdnoZLOy_xhyJJ;-?VPyxW8!YBtejxF}fb@op-%yN?QUQ2o9Wqn!A z%*y211N$F#j<;*$YHuIydssibBGWq*Iq;!KMIs;O?rYe)Uc z2>Pl}MAcVlx>ZWk@x|}5yr{UlrWUmz>AdQkE={gNN zKU@eWU)gO@_cMDg=(MzRYnLTm5f8sRMVN-K;-2HN0X_*k5@zCy@M;`OsK6KDO*ocN zhA+Zb;aEaBz6ie?#}Y#P2@glJuqFN*iih@mrFdn)@2!K{`2pTv@zDO_7~K93djaYE z53E~@_r2D;cfdvi>i?%+{+g6L!VQ>sb12kDIR=ujNkT@ z4bs8I3xd1$lI;=l0p3MES>b4ZWOcyKC2dEy{bdWycJXmS!e;lQd%utGWMfEI0aR{~L#PjRsu`g&Xk z7nQys93!Dl!5i@011M1EbI6+&*KoDDHVxVc?{dYO=mp9{6CI~2dkM@xT)@o^lM9msu$_$brm z2ha%E)X68zKYY?r`in=)2?-Ab&JEM|toGmF{lDQq*~mZM+qy-wVA<{M@UDK$k$v3M zK{!x8cu#He-`!!l?)6oC<6`e2(?K-=|55D+496Jg@PH4u1K%=Mb|m2O2*L#U0AGLu z2}AX~f2Tm#s8H=mDn45{;6D+hTd(+|$}@W|Q#^8`aTJ+OO7XRUo!2U!6Zip#NH-~4 z1mqLp$MOMg_0Q71Q}OBVfR$;>_sc%`_o|&1?-9k(?h#C9v+RSv`Z(`@vmd{D0lq-> z4Sz%N>9R#Iop)s){EEPyPZj?&Iy?!+$6rKIf9%+{cyB9owk+}X*n8r78Ls}ci2JJ! z>K%gV9HO}OmxdpqI(BSZytftUTChF5w-xx>z@H;kf2~GH>K6Sb_~agA)`u##SbG4yH6-SH^859c=xC<=-gjWenG&0 zRqqQq;#Pm`%vQw@HbA%UDt=CYf28>L0{riaUlHIt6n`whySe;yi#`kR-4*{b z!1r=^_Xzcc!@kP5|B%}`|K8DV(E$M;%YUI<4h`^rirf0YrgN;~=+`;qD}F44vOi4m zyg>g%#U}>*QHrCTaq#aomG@N#_-T&cJ?i1MnHXoN&ba~q9K{;~yj<~10(`dOShOygP+5&K=E*%-|X=25yk-y{(Y+5q9+-Y{qHM(mfL1d{y_09fju`W zo?-gEn;qUw*J00`{juUxGLYND%3{b@Q-I&4_^JS3<8W!e0sfHkD+2ss#ZL|J$5m%R zfIqGLUk3OemH$G3zpD7Xfq!0Ce6`zVBDJ~WZrYz^@b{H3gFsgJMDc+E{-x^tEsHH< zh?{hFj~;dBGbeX*c(>^JKnIL2ZpHQt7khgOpWi*>?l}nlZNaVY=NNdOZAW;141RnJ zj`!boq%$T4$9r)*;-49VPmjT8#o%=@_(d`Jf*Abj82p+T{Q4OD))@Sb82qjn{Jt1` zT@3z64E|IMj`#g`R4%W@;BUv^pTyu_#o*m#Lef#Xd&b~+4{%3(ya%`={D>GFt6X-( z9~y(77=xb_gO82DCku{t+6(stCAfQkvOP!fI>l$Yvr$y3_!h-06vummp)>vn50oiB zSMjxqmn(j$;scNLfZ@%GuU34P@>><}r31g&bDiP~6t7hNjf#JuxV!f!=l(HR#h zLizux_~rn=NAW_v-*tiV{R1X>bCj(!ke3(9?cV{p1+o-?Uz#d6zaTG~T{dTytUNGS z_GVO7$zH)w!Rm!LXs~<7zbv06>jw$OvNDzs zhZe|r*(t~!>K=kYCf_{?!yZn~z{w%e>}k`4J}570bhoy1^9N(`glTzEx!n8~Zo#mq z!tV_p=+;cgbLVrT>bbBZFE_o^g53F@Q|2?;x3$XOE(O1%QXyg?+6nI2|mcvrAVAg|)zE9T!++WXU z^uN;kvHm*Tjgt zl^>Q%5#d}e<4GTJtbI)j@CWq%b5(%bbB#Fx-UmiYXbfoCHvkaNZ#q_~yKR793A zl=zF}*!bU#;g<%uJ%_qB2EQ%9U)KKTA;n>T6Q#R}_(g>Oo^Zr5o#zPGsw!urXba)s zTRZxu-cSYBEFa77EXCm;?q_NVA3^*k(&7F;ML72}H<1p~?js+BJBZ&T$7YXvg`gb6 zo48=VhA%+}hns0gkj0-U@K*$36&f>z6)J9P!!CuLAxn+D~@DBvk_JN4eNN zlpcyh=SulletQxh=ggk{1Kj%ILkNeyJqJ97^sgfQ;lzi&g^>Yn_MA*O*N4f9Lu0Xg zjDHs4T<)_;2XP+I{=AOxk)(4u>EKzi>0e2F)@coK_5X?hH-Fv`;8qWB4si3)PXgT9 z(R~4K^<-UuTRnUc z{ygAiquKy}PVw&%j&!ZvEevp_M^_OJ{k3{xiQ>>`k&oqf1@UpNTKPXA96I|cekb8v zKkp;`CBilRb;K_w{Bh#*{QpJb^ZfsB#BU{?cZtvTe@r;*Y$qMQj_CFcpFx!GDAG?T z4sE`U_%`u*{7n*nKI!BV&f|Cy>5L{m{^o^%ba@;%?Rr>% z;~c`60Jr{UT!349oTND7H_6BRaCX4A@nr_#@V|{OGf9WXmpQ~o8fMSM0dC{V0>Yth z&`fCX1a(|R`kgkm{PZ2(nbpAv-DZ>9s zeAam<#C3f6D8S91Uj(?-!%n+PViK%gnU8u9ev+Iw|9ppVaIKys1KjH2kpYgh5K0t> z#?|sM{Zk2Nf7S&$HojaF;5NS88sKKeW<-M$sPw9QV`^UJdZ+4vnI} zD2{x!$j9>a7V&Y;#*rO_BV8Luy6+(e5>PH&4|^#N4IW4KC4RA-vvdz3K93{E5}*73 z;l$^0WF+y~{*wu3ok^s_=W(Qx_&knO6QBG43yD9U^1G059!I`UIwi!vf%rU* z+)R9w%PaChxQ}r7!LF~@1-MCIr-nljURhKS+Nm z;obI>0}0lyP5-a}x9jwogtLDxP#k&9@-yLCekPq$B#zm61M%6Mi!@KVhkY7&sKZwuu0B1WUrc=Nx0exrJn8(9_}p)=CjMCB z|CIP#Pu395_2etAwJiWwg9*C{UE@td_N0uEtl;9Zsq$;o#=+;+e`7V zzU?32R_=WXA4d7jBYiISBI0wopF(^t#|gwgp7f^@pUbhF`0W2V#OHEcNH~|{_ep00 zrF#SMxg38ce)$!}`#5FELtz z)dws0ZxcRI&RcswLUHJDx#ts~%e{#Bt)x>z{7HmQAU>D-nZ)PvDknad`vrt^xi2K0 z$&_vj@wwc;Pkf$tts)%0K-vhm5Dvci?RL_?hVY*U{1+f1VIASDzln6N6`tw;p7@-v zKN6q)^E&ZQC!KeR&wlur_-7D*JMp=^x_wJX5>T&LKcTqg$?QLX__$Ux{BYuPed|wr zu5ZJL&;3jx@lh^FAEA_R);TRkXA1Gpl=x=n4C1pNW)q*U7aEAq<+7akXOaHT2tS+f z`$>oW^Az!sSF`hZ!g+qRg>;q>|4rggCHzC;bGkc-&;HzFZ;31cws1eNx8m0SR6CZe z_eVJE|aYdT<(t$e>(A>CO-TB1>*Dl*uM~; z{r?{EVJFTZd_p+)w_lLXHNvxcVmIhe-@v#2wwK*XPHH&*?rxIQL7hkPi1tZ^iIGBR=+fIp(Y%PmzL8Y|>u^?wTS+0JQ%vma)Y4%<18_!XqTkoepWFD8B^@vk91 z_lG|uK938x5TE}iSpQ@E{Q}&^-{Apn_Kyy58<)=uaPv=N zfZKTe?*VSlzitn3>#y!s9J>5F)%%G*oc#7M@wt9JP5ha}f0_6f6aE(Qk0bnJ;$K4e zm&8Aw@NNglfdtsk?Q1W^Q7%K}W97ad;fOO`J_tvW&V_Pp{M>;5klq(Pk?_I9A459q zpUK4M{%|Vc+#gnv4)=$R#OL|R_XubG<`|t8;=>PCZ+}QQ&mUG3&iX%%(Z7@Utp6b4 ztn)D8JT5;KqyH-L`MTpx;&Xj_kND`{tb9Kqoa^BZ(&2izXCH|yAsiR>R~&ie>yAT+ zKSR!0x0C!TWyFV0wR{k&iT`hM zZ1y+C@D~KQ&9_@)@E-=aOH{sA6At@_>xtU}yioBw2#5VP?)-{y=uA@nZxjc&MLw3V zhltO9cp|{<_h8Qw4t;$r61__L?B~A{pY=Z=KKuFe7=G6SeMW5D@kdd#JK?ZLqepuM zcv2(mOE~*2NjP-!m4CS6q2G=nKIiMW0Jr*CL^$-Vex5@5?6--;XZ>@D&wi_l;nxSa z^?S`R_>W@nI|JOt_vZrK#`ix3xQ*|f5Au$+azx$`_6Tqr-vH0xxc-Z_}s7FNPO-mZzcY0(*HT}xu3j;_&okTM0~dY zapIpx`hOrk+y7VMv;Cb9mdFy|PaYR~DvokQecnSp2!{}kIQIN>0O>RdZhkHx{%M4t zNPN!MDa1dY_>+mx`Klm3=c|VJoUggW$CzMtUQT>2mn(_S^=dis+5T0;=lQ@bg!8=U zKS_t@MfVf`T(WaL;jI5ejLtK}M|oNQu!V4*7rjY1>wg%d{~7UFzgtoglYsieI(sC6 zdc0h==KpUefwsS2(Ld?n^!*Uy4~2;l+x>o~eY7RUCY-S5p-SpX=3Z z;&XeiBmOxO$LzU;_*}0R5`Q@HTZqr~>IcN<>*XI2pY6Y$_-y|@#OHRgj`(QrcD?+2 z!r>zu@17%^$Gbl%4la*(eJvJX3MmTitR{nPt2bbq#qlwS?ni$|VA3KY1=-Yg(g7n$X z)x>B0dBkTwUmnA632@C;bPeIK2Xz!-Wq>bmXcYZB;q12`6Aqmf%D+SL&~JAWpYydY zz^#5hN;vdwKK2ahv)^7KKI{LL`0TfLWB7j$aO-dPIMip*>aF2@WAGsXZu7CT1Kj3g zl>u(^u~dK~ZwS{0xXs6Y8{jq{dnCZE+@Dn(x(nrF{oYH&Kaub^h|m4o2gK+3%ooJx z{_UHGiKv9m^5OpNNX20f_iuxUkNU8Od=O3~oaY;3NQcv%LVQkl2Jt!F*~CYmXZ~p* zK938R5TE_lM11z!a^lY+{p*R(_Wy+VZ2w)vXZ!CXK74BPy>*1M&Sui#@$rwuuOT~M zBR>0KEAa;te;e`H58H{)^Nnsf5?KQ33D3I{iX%@v?>dn9JnzaOob?C9=;RZ>tE6G= zeFWj9f?ItULpbYCR2&*?=b6OEIn$p>IP269UQX#=q&PHK|4QPsPAlQ;&mY9-{0H&b zpLY<>`oE6Rd4Tv`DZjrXoc;MU;jI6%;?UsyzD9hUGk?BMIO}{$IQug?Tp~+=2J2T5 zUMJ_Q+@FlWk3Rw`UWfU&$Kd-P*)jj>7<@+zUemW@omXP;3H>_e-yee?eN@N%+hcIg z_U#vKI9CDq7XcVP&vn94X5MP}3)qoh{k`EERlw#`h8KRr^KHIh_zD%+&!0}GyK+wt z^a=3lo*qaB_-4hm`lNMU(ch`7o74F1YGD6B$9`WsFu-ru<79yAVN@94_FhDrM_7LC zy@;rL2!`8x5f^(njoW(>R|mMg7xCTzxA!7$4sd%f;?@AS_aa7G&SsCj7jeG;xA!92 zdtr@l??o&L`1W4J=>cx=Bius&if_ zO;zMW09mx7>)ez4%5u)P&1;t@ny%>{MODjl*Os(Q#oBGvIRi^uDsqOF%3fh< zOJhz+Y0G?Bv2D@DDYE)qwCMd#iKd&xlPWNGldViDG9EMlzj}5o1JaDQzrWnlpL=Dy zvwnfzMW64`)oYuk93amh>UJ#JzIS5T#@+m?u@A^rR|YL9-_(+Sg)Al8e3dj@AKU1k zNE^l?v+v5bwDlM`ROn+`=Qm620vz7gO}?BpYEq*4a%rF0GFR^J;x&KjVkQ<}h+~bv z!{S>;PRRf+1;t|)bloSz#yyP4y{yEU(l$$0O0_i{&0mS;37Pd%Gu(DQn<^HX6R?Ol zoPhVTl(Zth;)LgmTe>bE)x0**TqfO4c6J|;A1EWjL$cjPug$H`mYDyYY>!prIL>1e z#Uhu%?6r^od5;a2C0~R3-F#?fDcOv_%oI4IH1(!STwR=K9+)nFxTjt?>b25V*VC7( z5B-tVLZ3MilXVz-42O?XU30R9|0vPDn@W6LROde8$^`Ew^m`IH@|8ceVbPa68fW-O zum=D6X>IUr;UbBKVyc6M(g=#1qoU)x<|LYy3m~M_fe>=d1{QgsSb-=Roszix_WoBSSpj!(G2gDF%WvU%eKWOqd8JLyouU?mtCanI(P8IzP9I-yynMwnD%{&Z46}l57-#oLDwSX+^S4eNc3t^K~oQQB;)p#rl$!C9T7I zX#uanNyl&{;Y~IFy&%Pb^ft>@(i2$AS<-r>tNW2tVp)rl7CF+BEiRobYO43*#IoT^ z%ilR|uG&7wXA$DAs4@ws_E?@+c97D(?P=M`f$#^H%%*gQ^e~RS4>adKzs}i3Yc7>k zu;%#sb#EQqX}vFkr@!c8K3kXaxvE>VaQg=7LletJi5^^Yg44AkD{1Y$S>;PppHT|d z)8HTQh_+p-&FoEEyJU=Vh0;=*GrcsmJ+qFxb(!grp{-FCk4_w1D4B6pa2H$bTuDhQ z)<4;>B!6P^V~J+G^xrDRpMgm>{wUk5hV_{MLZXKCu~Ogh)D9Y!bM1rDY42!$Cegg{ zoA612u%r7ha#-hM`8`@N=U64}bntL5ek@J>O(S@ZA-yahB{K!hl&x-C|Q^LVkzSAd|w&P z?fl_lrJQ#@Qhn`Q9K&~!Fyvl*X?{|h7QNT$;{AhUkCqv}%BK4rX$Olw-y2E%`x@h+q0 zPpg(E7GEuUnbBJYZy64nekp^SFRbk`p7{G1sJaqi zufH$dBAofAY)gFyC*4a)`5$DcyK2$aP9nJ?^}>CZ!oXjwr;IO^2*N~n-*r=B@#Q$Q z1|q(|5m%=%skJ`S?JU?wE!fjppt%tb_HVKZ_c%HzpOj3J6N~Sc};Yg+5Nw2tq(X#3@Ukn`nRDJj9Wb6kqvcTy6q zeROavx)+5Y(}}fI3Ozvft{E<+@b@0D*4M(+OWq02fYv?_qfAmS_;!-`g+np^x*e`< ziDipK1(x8YXzhl~{9YyHE{^rHa7gNW{{ z|BOGAp2e)kv0QTY;_~;7rJ9^r_KVpSqLYer*Cd?=M_cBj335Apx_WeK>cdl0 zTS`)Gb{$Zf8t$(HvI~BHiHS^n%PCkDe5C6YD7W_g>e(Ockm;!_RO>AM8tOI zC11-@eyw_3K2(_TzX^)*$2j)JI~9y5_Y0Ob)JsWwO)NV`E<9lF;j$G6gclI2?2@7R z_aDiSxa%t4O zBe8VMhc;gOeEM4Yl=en=v0clk%+P?*7{fxBu0KGZDI>S^n|%_?YONzWwKeCe#Nz34 zXl}bhrEUc!UE$@5NM=-%a{9<*u{71@Y)==mbK(;{eDQ9StxM=5Dddv!XE8E$85POM z^nl^)=SJXboPi=u~BXcgAP!=XVWK*zWx7we7A7+WzXwB})&zp5yy&N>qQm z&CM&U*U@xmwBt?bkXP1@w|j@Y>BcL%pLziq2R8W2%C=jj0R8nzmc7#~UfSN{9Z||4 zi+6$X442NO_j;E(f8Rpuk#&IQrTHt}t*5qqo!Nzrp7B=ip$=7w5f7uP@u~W&*dr0q*+W!8I9cvcI zWH;NM?4o{ANZIGt{G6^2p2GY%@Y5}JzC`^rOGtDbY5p88?NhrYm!{DVe;4%jeoE^; zMAgCjIPr@|{Ls+0MJ@{hd(-g@U+E*s$a6*8!kzFvtz_k?t;4TMd$~_y>0_=vXO&?l z4HcKcuc>XjyT%j$x}n1I-Cz9EQNBNWtK)pnFn_jdulc>&W=R7N^v^Lq96Eec+Z&&D ztefF!eU$p&XMNjMLhrEtPhee{dbGXjE-%{E|1{6)f7{jmIwY|3v{3Jmj`hIP*}m2j zFN~RT+tVMnD{s8wI9;K-ZfZMMC>_Ev-9A^PW z&1~M9lT1%~$VtKyCpLi=@KS#w=7zRCSTC!djB@!dfI>PuQk*wRuhU`qjCA~CviK;b zBV0En?J0YdS*a7P<+7FWrLrrj(e(ZkK+}hQ=plpQmmQ;`r+(v6$as+EeW#i&l6MGa!&X2*({xV$<_P z=W^#?@1By(tjMmI@s50?`%BqkB(~=4ie?S&P`JBj+lmrLb#0>f<_S_a$q`;EJ=@O1 zan{t8BH?O93Lv}qUcn7Lx;A_wbAzum^{KmB^Ac_lF~2Vq7P4}&i~YPxx_j8T;7u&U zI)@+(as<0jK)Ehj+Zhudcd_`G+@RCMd&{KfJ{-!EDY;h2RM)oWT+J><#J!VLIxb2%lTXUMU$F^2CWMw5iUT|L} zHnk0Vvt6P!=GnAmLuG~(xOI+^%>8d>uF^CUYtll-+2848*>XMW^uDU?F!#(Vi$Y0x zi`-D;uL`q>X|1&3x62Pr0+;^K5=@h3I8s)nS#Bh=yjOe9vXJxBFWV*7VjLNy2D;N( z$y{NlEtv<~-ycnL()QLmQkKxdQ0SocLc}3AzSw?7cBzSp(WkXPeYx}*uJ)u2iex5{ z?PaNxA?@L|buu$RXLqbLX>{yz-=b}_OnCJ^w%qG=^M=IY^TbnC%iHGKbxKxNvE+(N z-h5WzuFVRwZtEnLt&vvkMiKN#<(vFHVt0Wom0xZ$HeDwp33rHzWk1s>x5(C?!Lz#b zQ@YDfYX0=1k^Y3g2A9+71Kd(S5V~zwwx7Y@W)_P-A83F2IXi9seEWuMXRdiLWV9V6 zk0k=qQ|(AY+mk+MN4h}_lHn?IkKSDqZ&X)2AlnYT_pY4C_TH~G%Fokhvb{G!yf^mi zy!V#eIq=h)wyWAdYWc{l7f0^d-jO-ht)(3qj$J)NM%%&deROa;(lJ6(tB#djt*`0% z=Aw6cl%%$g%6)89?%LePa-Vrf%#0rCnj_y@Qx|RQu^}@*6@G@C`{_e6_IE%}-#?Mx zw)7a2`fyC@bBGIHhX1eQd;QcNIVGv5OH$j!yoWGx^6duJxR$2#TG1~S>Zz%9V^WW% zBjozqtn%xZ9vh;?^1dwmCJZ7A)14?~E zqim|n+-64Q%o+z)Rsw983yQ3-TInn(HVY)xvEy8t{Ztpos53^68#}sm%*aX3u2Evw z?D9x7WMR`N35AhG#mXN$u4ux9qBAE>Dw;59RB=Daq6&u@GuyvaxJN zb)_TJ*VfK~<{bHf)y&G|yn2zYnF-{ujH*PNJ!fupV_8jQ?c9dyi~A>M%oR&!Rn}J~ zXE!8kYLiZ;y0WSf2FM9bK~`jyBcVw81AIQl);a?PE1z3mUs=;weQ|O|CDKINjg>XZ zE2>GBX_n_nM&^`Nh-ht6iY!@C)>!8Dh2kKr_Jijw;kR!>ZR?>aLmg)NxIWN@$%#SCc?lDyioauOMmL{ z=nGG@jGyT6F6sWl^iNj)@*rK55%l*6@M((o2=Mb1UyI*UNYL)et;-0VuN1d*FB1;% z=u1b(o(osXH}KVC{jufi8pZnr>8?_|Yk>dQ;a$@IxitN|l)w5$*^zLko_I+1k#1p- z?&FF_=wKw6J@|>4vp*=8*A-v=G1wXY`?Bx&4$brx$Ug9-;z><^H>tS57u@Dg7{0gS z)774#%0JlQnR;vaJyQ9-1OMQ+^)6lYKc4O(3^iOU&KAWB6`y{y=ZR@9lsddi`ac?$ z?nK3{of|$yb=IoiEZqvz*Zdm4PVp6i{g)`dQp?f!R~jDhF*icHGoEe#P5Ju;{MCvl z1N^6oM*$9JbaAVad%y5^mvnE(DEQhb5`2&7M;-Jh?qRmzyAc<=?#f8;Uk3QYs*?=x z-#NT{WdEVC)0>rFWPon}p!f{|{<7j%1o&$X?;d>+;BPAbI|2TV;u`~eo9e7|+sw(& zm5+AGVY}i-Fev+7+@RDgDhTi%iVq0zJr&n!SNiO?93FaK=3fr)p61!kfvPjo0Noy@ z`1b<5pW^6WIUK9_6b5C#K=IQ8{CLGNAK*}=_#6gh|0Kn$0{m3P?+@^aiih)|GZkMS z@TWPvd-Q04S1Lah;5h8!M#=0G=L`Q^(t<6xYa2P3D|jyhX^Wo)cZ6RXgI^zm-yDPg zGzR}w435Vh9oe%!2LD|Q{&WofVhp||2HzTkzaN8t7K3k(!Mn@2(NTW)jKO=y;C*87 zoEW@+44xl@W3BX#>@1GKPl>@N#^7hi;N>y+`7wBd;Hdwr5A~JYruE-be6!-#|1DBn z?oYX3c#Gl#6+c|t%(aS7S6nxd-ufCKx0~d?Oj*T%+(EemqdM6PDi8>_zy{>z=MIzo zs#!n>B8J@9lKmlhQPpg@3nse*hecKOm6fuWH!PYludE(I`9q^B-7P4H( z+=~M~MD}q*PWJOX2d3p0$o||p4YMzi{hi zFmT|&X!f*euqj{e%faHIQH9$|LhdG=hzuSGa&F#Gw~0hfZr%x=J5=^@8%p*I21gau zwTLM+VR%yp=SAg;4ngF+fl-az5m4k8}hH@D^I2uqoav;9s=1A$tyg~SO zUwQf19p=zHd`seBcpi48`0(uj@v!W>C{D5fhePm{=e}KBsSE<-Iw032lIxY7M6QdN z>tg0Qr96k^IYg=g;(B{ry^*_!(*{n9rkzweZbVV(v~iuaV(<+IM8Et`hfGb`)s-C^zA#%ZW_4YOxWi~K!HcRZ^KyvoKo4Kt@jLN1rnLaVQm zXbscKYwIq?;jD(LY0;e83o9!eX?Bf>HB76onJIT_r35NxyGU~z+@{WN>MKM7QssU- zPmkx>F_M6Gt!P(PSI!X;F<@4i7$oq#3b~mq+p_w3l7Z?Coa@OB z(&2i7c_9K$b3N&$IPBzlvM=$ud=DW$*OOerxt*?YZ~#n zyebIi@~S5t?Dj@t5*8AUw3ldqvN*u)KHIVYxBFfH7T^#3-N{Ec2KeWS-x}awec}1{ zDh^vPw3vT>OE~B2anixA&7q$m99mZYUkvb7df)2L0dDuH+5-Hm&c0*#D8Q}VxdN2* zP_K}#-Jcok4l=mi=Q$(5O=m`cn@%0!Fv0HJTpHl=|1lS?Bpkb@e`5@OYk-@7enU9Y zHT}l}-29Kt-Mw!4m)Sa$MEX|zS(ns zfX~0pC-4mEOedWeiO>D*>%`}N`y=9?Ksx^*KKIXE^;R7G$^G+QiX&g#KYyEW?#FUS zhuh21ghR{POJ0CmI~^L}){l({aO=lP1Kj+4W`JA&gWu~RSpBhn?9Ko;o%;jabe;-u znL;PO0SFU65x<{w1-aFC_i52rnYMf^;efuO>e7Y~_W&lOkC8T0Oaz@IpCn z{=c5^5rp5WIJ7z4yNJ&^_Ypplbnt&Ngiz;M;up$!v*#tkS?7%yosWo*G^XnFtS<;h zdo=w{ct9+{{A2B|yW-HOl#lWE2>9mbqX;h~elFqc&*Mp-{W+5ONZX#h6c5w=1|Ez{uyk#naA1I&J%eC|HcvP- z#J_aOMg2m2hsOs7xY;u#z|H>Qio?z-`B*&}5%5iCT7aAVmj$@Z-xddWAGLpFfSdk3 z0dD%w1^6nR2lmzmXnr%D0|MOAJv7ACZ~X$?{FAFV{4!5&3hLFxQ+W) z1^CpPB@qcr3FrO?FVa9jeu2X-gc}vd@htgRIo?8ioHIK=4Dbi^K3f<3kWB)(v*lwt zyDM&fu2wtu3UKrPkpXW0JSN0-o;*0fr``rDq6jZeLa=o0_b}%MxcTk;0Jr>JAK;d+ zn-xcXXUNC!+hh2@3Gfv+!a8})T!5SXj|8~=UgGxwZg##G;5MKCGQdrzb5EbX`Nzs} zZ^eGH9B9YFkI!jB;wajbj?1-R*)7~sY~DZtGS69e4xdtHEAIo_x^Y&nnY#LF)b zEWf7nVSt+-z9gOVC7#*eDdA+=>5LBW;bT3oA;9f={H6f6dVX7gTf11RxbrdDvnk+P zzFrG(8-KSE&i84*B7Gk3dgwrGezSR9BEW6D`*wiaxO{-(uzwEOe+cn;ygrg}#IbQ7 zufISrdn~_rA0OjpXPM&AsF9DAV{O1Uor?n8(p?$g#=nJd*ssG)bZ3C;Ve}iqVUv~1 zg8^=S+Zf}Kse|36v9V|r1^QW;>ass zS5759Uk}bEel6+L5g+MVm`6D4EF_(BA)7smi9ed~YlzR+mA4R|?|b|w@wvVHp7_YK z`R)Axw|U4A{UNZGm$jp@ibJE0?3@(vP5)ZL3yF^xj3GdOq-F*;8ZA9=9x=yk$b|1H8xNdMy){V#~me%^g=i7Wy6EtHSt_gjRIA-s>`&|p6t zN_^HIL^$goM>zYrI7a_u;G5XIEANqD(^ETmZ=QhGQ-LGQw_tpnDVLjQO@KUlfM{(FvLHJR` zXFucx_!7NeJ(6&?^JKzLCH+Z?hv}Y0d`|Z~!qHD^w;x?dIQZ7j-x1(8?mSC4+xZgV zBgoD_D<0bUSK_ms9}&*_Ul7jisOvtGn1oP&Z^coLTp#u)yim?rKadlnb3E}`X9VG_ zGnR1JWc~KU82$5!&pP#lbGx1&qqCU!NY~o+(g3${;TFO<-JcT9{o&n;hkm}F_%6RX zzugevmhQ8JbGk1P&h6_B#lv*pB0kQU{%+rv0|{aK?MXO~Bl{^H>L-cM`hy7P`fwcK zg_6G2tI>o*$Lhl=iihcz6Q6a?Bb>+C#u%N2#77!7&R$D6_qW#*>G7qkn%4e?8%- z3g(9=VsxG*KJ2vXwYLdpKW`(P?ffc6fA4)oR6`c_HDj=PPY@-;2>-6!6XdYYAsNuP2=A$*nQ^_Y!ew}dEe~a*O@Ppp}`7}m<_x*$JIBAmzBK8lC+VG!{PMbFYbj&QbT zbd1i~#AiRxAe{AU2!~BJ|7nQPZy`R{&ua*0{eLGM`qp3F5~F`#z_)t!YJl5w(yamB zN9RAEk^TjeuKDvH0pE1Gd`CzUP>x(r_6~649~$7+&zu#5&rlrNe7|T`z_j4o7&yr5P9GlLI#AiQj3GgX5JDI5S{<@V7_-5xf z2p=!F=_d&Xf0pX>5AX`ba}@`7I_V4v_~y5>0^G{0EWph_Riw}5QXTM3=i&gjbXNtq z`Qay|&*k-tfNwfa1h}Pp-~p0(387~vJi=MOF-Ct8@mc3;!dYiUjLs_Jvz>Pl&ieNe&iWf;^nXWu)_<9B*8dCP z+)us}qyG`{p>O@tb|nAU@mq6T(^lPQqFLff)Vu#Ap33$;btiBbV1V z2``j$HjeaGJgg5#5uf!>A{_HxyU%et3Xz_WvfuL;pNS{K6=s^D^PA^H;?~owtdPb7tqKgck~K z<@FE3S%0@fgd`!<-&1ka2i8A;@IpCf`iBzE`u$_{^N7#-g@m*INraE2bWe-XKZE$J zKQq9s{xlQL^>Z2F&@uiE0dDp4o&Y!glZ12qd@crmm2gh?%>cJ@-$ppwznyUQXSYKo zGZIj~TwV#qk!FQ_tb7k7ej(vGgtN|o7@d6LBMr0vM8a8rG~pvC-SLWtcAidr)~_I( z_0K1K1nJLJJkV$H#&i{wv4`ucLW3~fp3eJ7@hiDoQsQqsC4 zXQjxNv^M3ea@$ooh1jOvw-ts;QnIijcuO2!oHGUM0nb8=#e$T!lmaQmqQ1o-uFAO; zM1g1FP4z=dQtPqARv}`Ql%)Fj_wJ{yctt7^)K^HPq86-A^FYpOCoo@D2Tpxal6n&A zbs{m}MFOdLZK^2;PkApJQQCTU&I0jKY3r>yw+nKACpnNc4^l65X>y{asco__jbv!i zhE5U-9H%pEl~cI%`Lrpgi7CY`w|Ym&+uut{M7v4&VumA)YJMZJbb~W^RnB;s9l!|? zL)U6psSypU`bBye)$XP5Nl7+<9Z7WXn-`2eL zvc0kDz$k&HU~Mr^9M$|O;hP2b@yIsKdT11~wL_whN_{MuLRlu3T_UeNMoeVBP%_b} z$u$Alpar=4?5lFR3Kxrq=9ftIF0n>YwC-=am881n6nDDYRd??JZDFM;|6<>k6|OSK z%A8H}rLa*S>UvdQJhALYk{Djh{X^LX(NRc+ElZpL7C0CxtBFb6 zo@lNERRDhJ>oR2Pho&>sf+QBuvybC+NQP*c+IsKG9EqA z!u5EWoAeKxB#x{@Q8H}v+>fP!pc723FFJZMnu$~uI8~bB3f~lut6H9ED%MK8b=tPp z25sxor?ebx$%F1&=?IVw)Hlhp5>ayD2kf{{jK^H{}Ldao`Vk(3YohAeX^)C1=WIw7vl3b-XNok6=$sJ~&Jr6+e62GZ%F zOnt=Y-ggXKYIjz6LJcy$oeb0JFDJkW<3AT>NCm?9xq>78JUwq4i*I%s4laUi@%vir zV{XUc15JNCgR&pyr%q}$QEG~s997P!uIY1eu^t4jp$WC#C~9hpK0!9QAS{|?Ng<8^cI zR^}*&EAB=yJ|X)Zy_54O!TBA7)~}%5g?$R-N@8%dr;hk%#Ng9n@R>1qZ45py2ERN8 zzbXb_7K8sF2EQo=|8Wfdix~XZG5Bv|@QpF}<1zR%F}QydSG~OBj^EHGuO_3HsNqdz zgOs?7FDR2s-tdKF?#*NN-Y?nOYs1>TPAqth*o-Rw+A(=Wo_imdzJ+X_M`!vC-cY9R zEt6NIxp$&Th9y`(jP{5&YWH-G$4Lq3+t8*B$9RDNKKf?E(GMelkFL+~N`Ml;$BpB<$DGFSw*g83j<#v|2LL66{KK_F1dhJJ_;U!~m+lqa|Pk}S&s34OE`W;V)$c0x^l{e%>i!wzmX2xWA8Q! z?Qv_lh$3+GwWjlkW*#`^pN2n0_<@8k2T=kxc${SXm4qKm_-evg=WfEeTs9J(B%LjU zA3}In9ZKL1jL~M#?u742_&$n5?oh&yCqC=gJ8_`TI;Al>cM;Cz`!eZsd;BZ$4tN@SDo*L`QmrnunxcDhINL-=p@B91o#0T3)0ce$Sd3Rdw+R@@&+bd*!6pV z)>e^bp-b4``@!d5yw`Imi-KvbK>AXkQ57H7DA;U32b*e)8liyDjQIrRVsiom;ysk(%`X z@oP($XE;VfIIlxLsojoI-1c_8HW{yD3&ue-_2XZWtfOq3^((u6_6xjevd`J~028U*fJU?b`b5(nney1tj}_ z{z7$-YgF9Fx#z_l5=Bm3&;+7JC7U;A0RN8cB=dFaGl6CM}CFN(p(#NemJ z;P{PVNA^sQ!Ewog!M7Y2FnT@XphY8iHoLPdFwA_(XC)-ka5O|T>-jTDwZST%m?6&fVPqy+r79tyX0)!_zNpM>4 z&KW9OC$G<7{j%Edsy!*`Xdaem{z`m}$BFq!!=4coz|JD~`cqlI+{voxiRQ;8f;=+t zeD@F}<+^1h$g_-rB9&;`;DjCF!CaAZ=hgbuizTV|?n5andbf+DXZeJWk4nSwGn31< zU)j?&|3IcgTbe&}w&;T!mpM(!c`2~G`7vRK*gb-|hj=?nW;rF(a(B)Gu^JD(Z3v@I*8# zBajY_Mj|2hj??vJ+Trv3w(0V~rYf^msn4)`C7wLj4(0Y2_lH<_!SK*=xY%6Mx+14g zw(c>zWTjN9+9Y?}lrtXN)Mt1USyz&p}9)aTVr%OqbOEeeB z%>8T1q;ZbbUu!q{<|hS8|EY?I-pHkIa+rQOpskYuJ@U#%dz+3xuytA5S3wDE%E@@(9- zyt{K2z+t=EQd5t>7gj(tSUFSMh7OY(@u=~{D3an4XF9Q5is!creVeS6k0fY@m5&P?&B zOR{AW{LR^0w6=3{BekZeE@vtozR>w;} zQj{3C@n|1Ist;5;;pZo=B}+A%;xeSUN;E(J*)CL@?|<$`h+ZA|I`mJaa6{}g!M?U` z_7{@WP1q^rTrcH(lKZvMOkKy9#=8P|_V#&>KWW3ue*U3Mm_L zrz^$Qg}X8sO@$Fz^X{EZO$P`&bld)deXZL*`P9|N|M8AXet`w&x9_;ZTuc%JL#$9R z3<%TR2|b%=S|x33dE3ZO$Z@_qIa*4~u~M7b9_9hTpT=?~?zA>cVa*ek*te5_;X_)X zdm^v5pR(9Ezq9cFpWm5x+TZ&N+5c1i3)8V<_gr97l*9u9`JMN~@nc4g>MQ#bMimv0 zE*ewXFFG;+5p zNvv9ytg5e_ldPI8E8HJ>*pUO0W5!LKR5U4hf~<9~5hu;6OqMk^R?ewwOg7dg=he?{ zti+DRN&2O}+C`0fmXRa6xSxlx9?GwIWvq|w9EPt#-E+RseQd(}i*e65>JIXe>>Y_Rfp+Qi@Gve1U5Ik z(phmx@`3F4mk%`2H*rX+p;l~mE04k34@ zoD4DWkJI=Z7yBU>w6N^Jv-tCHKp~8eY+FJ(WH-&PniGMXC&Gg^b5qp z^nEJrzrp+8^o#_zK{{Gv9OaAO-~NAPz>R0yljJ<`wShgpopgy-2Y8wC7X)~X;?o2Cdx{qZ_+rJA0e+q0 zQGnm9INBA0+5cnNhy7asN=UlzD7ss=E?;_V_&UW`2l$hUF9`6L6`vm9IE-Io9HpNf zwz|XiGr4ya*JhKBv`ule7Y?7fgK+eaXC4l3|GUdh&X3*P^BdObt~mNL4tpqmD1)-^ zpTTu^>%Z`+Z!15CLD@e*@u2~pR2+WAMrtygCMNjKT2_nvU$bG6rvr!Le3lM>?xw@LOZ>J7Vy=V{rU0 zt)q0;$KZJA(GmZt82pbhIM%l8NC#_Mc7(qhgMSi(|04$P*12PS++yk|-MwS*{bTS$ zVsM@2yWh!Hl~p%XMzd?D$pXl-a`B*Het*yqEMqJS7Ryq{_%e7XV7FZIAWzKA6C__2 zPKHA6AROfCK|T)h^Z?@d8Yj=uWQ}FS$#XPWHrgFH+F+z;2n@*|;!h895r^u5i)e-+ zVu6}5XfO`k!o}@=`72M)-TK9}l(AdMII|M6U(DD?^ot++g^=B^hTS9cU0c>Ty)JQW zo%|)pRx`fjl8TC1v#RI1pZHeHm8FTZmo=8fh5f?C!K%m&)8;i)S4I`J)2e6JMwR|Z z);=z4L}`{+or#r-HQ03= z#!XCBD;C`__>7NML6c{#=n>FL4-f0IP{@q z{O1Yh->bf%IJo)5ZzG)b?Y0Z_F%N!4+BHHq-5S0{kH4u~=wohW_V{tk&xMnOA4UAZ zgy)j}A%tW6L4f`c`I!E=82*{W$JlE8>BK*j@bid2jPMJH&*jd)*Txua`YptV-|*-O z;rjtz=ummr2c>(wV5Wod1Oa|NOg@I+ML6^gcQ=uh4;+3%*hu=Y#rQ7}j@xgBZwvJG zawGaYz>^XO0sTD!(qsG4e~&+V7j*u^~> z^P8=)3x9I^{etwl9J_)j0UIvIUW&t?Ir1_6BMDbYIU7Z`W-d;1y|w#tRxYNqBGA#p z=tsJP4cFUy20T<7T{**`J}^kUQRgM`NKeGs@ii?fZOon)pKqKZ)?kgyWjj@^u#BtUpI_^TTj0mxcf@RQw{+;c{6@{39vd>j+1=m_4fk z-28l-;y7kM-$yw6`ME%+kJ|ZCfF~9IGwHDXUlBit?CjM;4kVa={E^Hp31@zp;;^6V zTO;w=58n%L#6ws@I_!tlgtH%b%~q%HWumo#ex!bQm~_|=p9Op?uk8V@htckOV+eM$ zoxFBxUpZ$wLzNGI_9MKQbjA>V8sVJZ^A)#pc}3zNToB+}92!Lzk`CwhX93^r{8fOf zO!N@xaDKNEpY!`Z;YW#x>3>N&V+ik|x9s3g&hLwapG^Ee5zg)UL&eQM4@ew@&jNg{ zL&YxAVgKxlKNv_b9kc(S0QamY>Z^EIA9$@#&e!RI&MFm}8sMuHFC%@nlh^d*_H|RB zWA*k9(&2J^hWK2LFA{#V*kXS8E9r1KZX=xYdxYLNHh<37eDx3T1&Z?;pq$^6h<_N_ zGnR1n!{h+BerB5DVRdX=c4 zhzW!lYXS)*8UXQQTD4kj^>eDWhFZjd!Lf*A9kJTV zb)Kp?RDSE-d#`)nyU#r$eC_wQ&)@w#$vNje?_PWDwb!1`IeXtLNDk|NH}P{w|Az^O z{uoHh9M$s@lFxqiE8?@9-w@7nZV!I~`@gfUH`CrR}#WC9MK% z#$_71_@Ryunn#b&6?YN3+CyNyBJl3+o_Rf5)Y(1~{SUm;|1Rx;WAf_qjf4Ljct63^ z|A`jq>BgdS9f+n3Mb^<>cXP)>9nSR>w`RHf{=rYHw-6w6N8{u99`wTVJPw+^>td6) z)a~?$dW&=Re~=g8pM+d{NdDLSD^MUOex7je8fQPX6YK{_<10Q!Fx5p)li_xEhIh0a zeC|ZK>0{tOz>(G{IZDlXC>{*>9nzY^L&G)8|1~lM(s%eV=D7QQ!=sb;4Z+{Qvtt@B2P4 zQ=jvIbC?=+9C!5l99(nTq4e+jJhepX_+Q`WnNGp2lGje+Tl9I@n9Hq!Pqx$F#XgUg zjK{V)&&%yQD0e&8j9(E=`9gs?&9r7*mW!K( zTALsuZE1=w34gyN{#PTwDHm;?E^%ZPjE!Puul`Ex`64aaRAFQr!m1Kg!_90<;;-=1 z@4Ipk#ogl@Huhd#>{PB28?lO1GEg8NBDkeMZ5Riw94r4y;;$O5v0iGfNkIO|J5sY0 zyzm}Nk@e}X${s|xFyz9P>>SyZSQhJb5jNUDS>@B!#5TiMtk#RkrL%`znd~+Xl%{f3 zdaBkqvPZdH_hy#nTJo+!_62+@Y3U|OvY~DhR8^Z$jyI*P*~WeVvy5^kF}HU6Q(tyt z+5%duL%A`Xto1a}#jV7IShIb-T$jm8&uehx&Dya)yWm%Vk9A`u@dS*q0BY*eNV$I# z?#KNV-2Kc7ZZU1^y~eO)U$OSLF>zzHbC6YdNo;cH09mZgPO}Yf+S`jwwr!H(bNYg^ zm4_&sO0QA!;#(MdQ|*}RH156%U!l0XBzlM-U2rOnT@GvNT2ss{#c*QIYpHZm=TXcQ)av+XftbBqpCJlR#>2VACaND{ZKHm5G*0JO7;im zwcW7W{eNrE>$;OB`CQia!e}dmQzGp;nmW;bu3RF>Deh>o%F=VGk~zqVTjgCY&z^80 ztGp%8x%R@W@`ec9kyXC3tk_+|aIrjQ@5u5>k>>7nkv+d92S^PIzMHY=SC;JAW$#IK zkG1Qj4QpfLU(71+#a7)cLrU&|KghNs+H{Dh0&843%T28vPfGp(OMhkKdr3dJ&{ll= z7P*ct>nJl|thdEXIJMrkCvRpiJn_NH4gCN|-&^Tlx2$M_TiWHh(Pgj5$QkmUm80yB zFDsi}!*E2?<>0lU!*{(5e$@cxGnyh(x@M{;&TsL%8SfcwsZ~2WZ4LQ+n5lV+U^|-lp%PasU#d1r*@{z{C-sH*=-PR-T;f?v z#SrQBa-!UTXN!T+(v`Gee*(D}gbP=(jSmlB(-rPhC!y)yNpbvudA)U*{yc8yv~-jw%^)WN`>s3u)koid>8Y( zC~v0Qqn}+njkZL74g+TB^&kxMC&}o-FHvjnF;!QxIX7DNpj*5Cq1YNx+B?fh!)bp* zL9jIWP53DWX`d30Vj;1PWQ_x~U7~|6*LcWc;1`TnUsaV#}lqI)+V8#KNZ>NMj zWQ2$&(i*^_1LgHyX$Dq^?Z0)&)}^gGH_brPPEt7%C&>-uH7&qT@r*%?moeZzf*$Qv z>KbcqC!{U79a&mdtSfGdi+V+R7WQ(hZgD5M>=w5UGml+m-R<;-*)!|sMTQrTDjhvp zepjOKlvs~gk4W+8BD$I|WgUBo-Q@Dyz`9#V6hiTYk+IQ*r6Ucwc=U)dMa4z23F8V!j~`h)E{049&!&qdy(Zl{ zlQg6^)>qUv$nxP-GHDBgweQU| zmj956y2qj1#h3OpE%?`A?-MotIcc#|^;PR}f!xQr|2}e)OW!okBt!GB@h7|g$M&abGX`9am3%AwW_Gknf7r-Jq7NH(_G;n9)SdR zG_dO?z{k{`LxH*IVBR${j=l)|vlx`~N+RwjK0hTzA9;Kd>M@gew$A^7PbcvT2~RtR1nf}azD zFABl!$lG5Ei>0Ns`qeCWHLE~F*OTU%1*PU+YALB%S(<0!*j1(duzPbJuPV*gp?~Jj zGU}@vXV=U6O#68TxZip;saf?Yt3N}QlUCNvnir|Bo;7nimZHv)p?ajgv3@#Miq=h@ z>eiSFC`o?9>QectK~|v7sjsfB6glpF8;<%5H}sn}f?}zuAy*l)S!C*d>PG4lLLYlD z{nJ5muHS()I2_|F46PJzb~ySg^lge?N;u|7ivOJO9Kz9lAwWK4DgSPO5`be!r1)BZ z62Lt~{uF-{pakG7|22bJIp~#ju7dUm0rG*zod{S|2%Zva!A0>Z^e@${wj*54LA`-yQ zl|RM16OOTw;{6E6oJ8>v4#$D*c0BRfZf6mn^_fe2{?>UZ;qqKQneJDF;|Y=KlLes? zkgpv1Q#{Y%h{pE(5%JlcV~M{P$vKty?9Ua%XMg53qU_J-hVU;W`RvaZ6CW?wG+$Q` zpZ)n)#OHGPE%CWrbd4zN^Fxx)YeW%M(_Kq)*neIioc(7P6o>@h{&+utfCJnANaABo zsp$?T98)R9O9*!=$lXZf4u|7_F}?Ed@%W0bAwK8puY_~HKK10d%Sew7NZsaZpd3|x zPr`EuAM0@6KBp6(?bA$rwu3%Tf*iKPQzVD&@B+yJU-f*G_-uzS31>SDa1$uxe-OzT zN;v2D?}YOj;I{~8espIMDgp9`$e-$&OZZU2k0Bf{9+h82ILm*+;jkMXF)9B&;&Xfc z1@XDQcXJa}=*jJQj>93J`NKo_Q;5&)RUPr!A6f|K_Wx3n!{xhz_*}lX6VB!PD#>Ae z-XT8g(+&>?Bp|=+pWO&&|2%_m=Ih!#*pvPCJmPb{E^s*boUdOH&iPtJINnoexxYg= z*WV8bXaDKv9tim5TkLS?!~SzZ2)~Z_>_5wh&-PzIe765RgtI@~M{?M14-=p5_A=pY zH(uk%cFX#KWK;t3%l6SVc);;eU+v6m@R&c>$$>rbELi#H6OOT};&DnB&ngtZn)oc| z2Etj+Z6R|0OnjE}5aBH6i4Zxj6Muiw^Pj|LKgsGOBniG>9q4e_ll|m~5PoS0e>(Bm zug)eu`_-j{vtM0Fa@enaO?>vNKN8M<6+>nvAiwz2;HG>3E#K8+YFeqf!>$PaZ{Goj z&mh2-k?+@%!3v@8e!gEzX3X>bS~6>f8XUxb|%aUX3%#j;@>D;F|xD5JtgIpKhg{g7;neP65hg>g(*Z z>)ZErT|`c%z7GC`dw#&&DHD!o8JTd*r8D8CuR~{$T0&;p+imxB=?lo*G}HJD>VnRb zHBGn;`hUgIha&*rP5u-=2%rS`9?Ln@pqAfR&Xpf?IQZE>}>sQ>z!)D(&UHh~d z0-IOQE-z^neQiT;zV0 zN2Kg4Sb6j6^Y(y@^0YMEceE*OR9k!#Su`SIzT7mq3!86ZuBr3Qbzl~D?y|VusLl)2 zKL3Gl5Wh=%n3y~p3)z3_^9qIa#S`7L-k7t~_V&g48@!s19{qkRtS|ny@x%IJjc>>G zntG})(c%y5i@Q0(pj1?IhI-GTKrZ||;r?7l)IN86`{J=K{T=O#r)UPD3x(sh z4aLQ&A0OA;wkf@f>s~gw2q*{GK<%e?!K39&V}TFcSZ10EbVomZ?{@MMy#I#2*gjeh z_QmK&GJT^5G}C+(@8h|T)_VW%nvdf7vfp+=u))!0DF1hav-~?8?&s@I#OH53V#MeA zZi*+h^~*NLGI{^s&ez3pzMrqVqKp){lkey2Y7u+XK1PpWV}!XbT5fvuWFMz+ft;Ye z`r-Tey0ysn^YxTx{I}27(ZFhN?fQmo@A!i5oE}Vn2j}b6+cRI6@0IiIL+NinUtfX` z?p!D^N4wWc;mL(36`oi);l%MJ3*XryH%erOPuV3yeuWvo)Lc>$FUu(?!%F-jIm_RS zs4}hZCVRJlowxe5(+ejRo?duH;bfWO7wF2=)Qq~Q#iU%^yfNB@A7xsX9E+yT?m`R?kb3r>+)b!a|($+&xl^UMf8k6xcKd?g8 zucY!R=U*)|ei|ukDf(%oxMkSo@fkTalG=JGZ=JCv`!WGGncT?Zs+M*`jY`qxw_VN$ zr8)5BIqwTqe)BwEo?y+AQ>k~dv4WjdiJfLFzCTOqTX(D+FOqEmWQF-yk?GuU=>f2w z#2(bLix{&xDwp^{waD9rgI5?E{25o#)>~yLUAS=TX3-(qbPz5Uughv#Y7`e=+a#pH zPezxmlRM4tMw{2mq}c6qAiG~6cUh&C>!N??nuW59HEmqdrSWQ)LUif)zu2|AFD=}XjkoO9})7Z$WBjlec46|t7RRrD;$I|vr z((H=&RJ)QmM^>^=UEchuRI})kzsY>W)ceF<<}4xxn+2syjG5wHT6UKPs2MAHU|sCm z@<*s|oWfO=WwYeFtk#iP&7a!6p#oL>G%=&mS*o~EucYz`v7+??Q{1g{w#K_IQF++o z9ZgL_j+VMf(ie`~1;X+qLUdV`qfP=f3I9y z6d$&zCCldJ8}?@EE9>M_e?L&gwSl0=*0E)-}iOtwP!`e^kLrt3b;&{++ zd1m{P)p8YW`jb>VHQjK%Um_agcECt!iY41vjsFdbjSChdEZz3+*V)?Z}pY)G#0x4g;?iBDx45!3!Sr`57U%j=9J zQC5qV(dK=nLG-bmxR>sa+&Bq^W^B~Pavq3YyjBR)9|YLi)b5AU;u)XXBxtnhM)3^k zYu3vJf|OZ}s2nN8AS04E!zfxH;yIO-EMN8PDRO;1y9zcHq7r|=#wptta)6YeC#30J zamPdlxgq|MEG<^Y&vf2Kd5zOiI%?CBz`JgftfN8yrAW~VP%im1NhOAemab=#-gB1h zTQ&F*F+X~$X!Gr;rSo%Upidptymg&fWtAFyMlW6lf@yfA7SE7AZSZ=LGC#U>o+K*G zU^nTQt8{$u4MS0h)R=fmtlqq_FuozWqBZfRnc9W}Z$nU*v`7K>9 zi+5cdU3Qgdo05&6kKKmsBeyNPu%+wI3gcZbh%VbFP5KYEExpgSrNc1RE*SWWbsN$7 zUWD_M)ep#E^`k_#F?jp|>G!I#N-B$T=8DzjqA^Q+plWbg&V14Ra?!mhx)jS%MPj2Z zM;W%wjb6MDHcFEeGnA*1To_-Sh-BuZQkPT{CrCq(K@hT^6!c_fK`4MEXG~@e93aX0 z3ss)6T6xg>JR}#|f=Om=4BS8s%5YwG}N)sg$z!RimO53za#2{d7CId9H&0DH7 zU56wi>&#To=$cq2(HEP^U{>P8PsBizq+aT<{rnNlFU~zis{49K)X~qQ@$8GFkfamV zAr$JnjE>Bu42_nww6mR1A`#quX_}bHZGh=U%PLs<1fyyEm3XH`4s5GYt4e+(Mcb`p zWKLIRN#**)nWoXV87~#(O=i6|mCSF6coFT0DU(?<)qD`xMryLACv&xz{~5S_y52U% zaf8|`T6Q% zB1nF|At3*lfrka-D{@nhK2LEy?&y6#o?c_`q!DbAS0}l1ol@aU`73twNhbkR?QejzXQQ^2zCmvrsdO|OJbwK+@@s3jC$Ci#L?m4`$ zXvCP~!7Y@Vy&{K4%+^dX7s=h5FlJ2In9-wn3#ti)!^?_Co>*4a%PBrV_J^vQ-8gG@ zV{FRoso1-zVfs1Mu{jkDvD&)Em}o4!Je^%VB-R68+vwg;_0<(s*!!unZsyGD+QwLg z0I|BMy3>@|hN`w=W_4BUupWnH+-nNyrp2CKo7_gqM3;!MnHBS5Q>tTC6*DWQRaf>6H9GBb-0rhw9|~~wbij1)wRuD#TrCbnCCQ0;#B~lEQ=YNC^9W2JbWV`uw} z1s(4hWG~dtu>a2Tr|}g(Lon6F#<2glxb$5%lDB;Bw2=6_nqE8^EqUU{M=|+j2eQVW zlZ#nU;XZAeid;`Im=r8Po3)lN%B`d&2$nEi3pRyzkO?I>;yX z{^Ex z$PpoC{zoFW$`Sl>cO7#_d}jh&gQmOM;d-q{@U~~~v-OA|dyx6zaRUVRKHKPU_&$S(?a)OGdr)D{npI(Yj%&dL5N~^UNaH3-nIOEi0Nx3n7!L1e?a={96$5o5O41`x6he87D)R#^qh05s%mOx%$Cic zC(8^{wt%j$tihga)r~V7rcI87@8DKnHM<(O%|>ssWCa_#iFEs|Y2D=6W)C+*s+6hw zrg^c-J$aLCf} z%Tf=Y=*As*WQzd#;7@b-)c_?ZzQT=buD5U!pX~U5^ziu(U*+NVx^c}K5AW`-AM@~G zuA@9!>L~*BLEo(QDIy#)6u0fX%@gm*GmrQzNBc|2-=E~@^a-|MIk$(%`6J;6kQ{vb zf#A#8OnlboeZmivc$%-zL*&GuxCGxmhY=o=`zj~T;l4g&iGL9BPbK~k!Y30xlyKea z47U#^{94Dy0coo~zi~LQVT9jIILp7E@S};p-r+bvmX5pM@No6Rw>@0>A2=K`enj%S zx}mMgSO474!?nH~;^FG&MINs81>ZU#sQgJQ>~&WtB0=##x$%1g;XUNO+Vfn8<8Tb& zapLC?ei`u#2>%7~4&6nE$hi-`P<1xayz8pq4w*z?& zNAg^M2NNInG~Hu8T+4B;hiiFV^{_hZ<_5YOk1th0~d)@;3GoSZ-WBz_2{6id`EppgC zy@`)Grt}?>ERO`UPtoTf0~JZxNuef zWyELuUrl^`yQch`h+jbXUBt(;8s)DdKHGB*@$sfp`F|lk+w)oCvpqKvpY1uMqX?CN zavUjtD*qV5xnDce;aYzuA+m&79$s$HNMxRe<9QImc_g3heqP=P<%~+;~igobkj*8uz+>{8YkG?^K^Ek~50%xrCPxesPGLpAwFA^?BzC z4_AF|A^D{w|H}}5yIqAOLH$Fq7;U2Ez zlTr`Y@yS>Z*Lr%ghikoFL^%7u?p5g5qbnRAdE)y1w-7lA!nq!836b-oP9j(W(q(;$ z3FrCO1c&?jtROzi(Y^j4KPG=#j(3L0*%BgWE8*OZ?cyFt`}&M?xSy|62|=pQv) zMR<;Yn%^5pP66S!5WgSce;_{l;h%}mez=bK?1xVgpY8Ah;cT}zNDlWS9}%DBd`>vG zC+*!sd*4qwI~@Lod)m)-_i*hu`w$)@`}8NA^*P4je!9iP=X56!&h6M~gtPqW5cy{j zpXEbm1mqWg8tj*Jsnw9%+Pg^JZ*2eGMU-HHN!YH1EQwFb*;FFy12&h%A1sSk<$Qo2 zzTYC-84Z#}k=gp?XMRrnnbP=U$HyPvjL0SOJ$lm}a_`Q^bBe znEaw~w0vSXc1-E$3B}{|^TY8I#+8m9CEp~DFBvmVzHy91#@5O2)W|1e2lqG_AC}e1 zhh;-!74jWl?U6W_j}PsAxmREP(w1hc3x|sS+)1eOMegKpiAZG|@A2{@u3&`Bj_!z$+DfC+$H2onA%DJkg#{!4> z@o#d3$zFWTzsAQiD4bJsV`Av<#NhoJ2aT`T7&-B6f_t0YTtw{*`{S{X##j6d!BiJH zO@;!e&>l&|p7`8p0{a-4yF7BoTXJuU+BMJ@g6SqYV9!>6;g6;?ur)(ROTr;C>qhd1WCu>SreY zX(4!B2tGFiUl@YNL-0#OaQEp!a^DO29>ILdV7^!|A1~N%8t|cl`HeYQi%_}kT`{m? zVPxMClSkCmo?TtvIH6wp*TVYx)J_@hvxG`~cu-j*BHi~1m63+&)8t$b6ArcqQ&&;v zbZoEfCfYD8;ZS^%;{)$X_}PTR=ahf0!%^K?{vzVp?XA9X|d ze;^!ftm1!iIP^zbtM~&Bhn~!T*x}&sBY(=@;BfHKhAIAx!@=jd%u5ajpY8A(@!1X^ z6CcxDmA{4fY=^DHXFJ$$`D|Ov`NFb21m6z!TRzK2+o0+GkocT0`z@d4bG~{IpYs(% zq7q;S{ArLe>C}oobw|lYrY7jzVPI}7mfyE;p6rC0ngEm7(^Xh2Rqtg1xdRWui3YU<60O8vBJUfp&V zZhfm=7mF{3QY&QbvN_o}5fZc%jEK*+q$?1s{k z-88gVmMCwPYoW$5v5dGCW+uXUF2dOwp{QAQ=&%V&as9)OG}|&=ZA!$e zQX4$ePC|n=*>Y?#rRItgs=&5srTBD?Wj`iIE3~BYSzFkJ@$Adp8cgSpWv%AP zXj!Wf<8~j>HI(u916vMQf%k9PxpmfpgYnwU4DIfr@X-vCR5~=vdmCz0RfJ ziMI3S()env3n>F_mc}M&3^v1kk|7b={Ap?HunVF~ZpWpSvl4A*n#avkAfu$?oQXyl z5jN|U&z7|2>m;A|%rLI#T(k`d@l8{Z!Cfhmo}Bod*(W9C@4t}ifWOPeL86Ifd+`=m zs?nxyGT0KAU@PDeC@j5;9G%M>OAot1jghT+cd1633#BPX8fek21GS#Db>Y9Trd`@f zX)5|i$0%FSEICw;$*K@t_L20jlGcHd=#n?(RLih(t#C>zpJ~Znhz+V@Z~C~DlR!qE{w*KFUg|WbwctM&%Pv3 zYKbRg6Na>QU)r;kW@CnGm)`9yGQZ}ZEiLo(&Qa8C#(jBm zTz~5FRD1S_S-$W2yUngG%4Cf+1uJb^wCU2r#p}{rwJ&9+fE;`*$8X!Jp)LN#R;{;G z1hi^7Tp^;%KCpe2t?#eP#W%KVo4H;4nT@*SV#LyRE&GDz)#uO7Sj5*JXtQ;t9I2JV zRyJs{a68>To>|U1(#EfpBQ^<;CP_BbTZGod?RVo@J~2er^mF+fp4t>3H5j$JQa>~I zut16YwWCe?NjZMo61h$Ea{WvCP_#gXgeYFD2Zi0Nn-{fozW{q3#){=3e)F%T-}joW zU&ahwYskg8467l9k~TNC+u38oJ5BV&mXDKr=16<~mRxDepX3DWw%~a4`AL8qDF2&e_~upJ zhea~V|9&}UF8^fGF12WLX#K(aOyf*)<8+Y;eT< zZ>vA|$UZ13`~A-BisIQiV87>O4(Zvi)Y-3aJM6c!_)5n1=W=-f1N$wNW6FLlGG<2e z)4Vm>j2WM2y+6nsRuvjAxy*t+`~9`O&GM6S%?OZK}6m;Z754S5gt3s_76d2FG*gy)lq zh{V+TuX79ANVL5y(Tq!5=aOx7ZZTxZj|?r4EhDV$12Jhj?>;HM)bk?cHFflP(_~wo zAn!FzS5iC+84J;GiOLh+XptoOPt)rY)l2T5AsQ{WPe(8vOx*Qu`t_@l4&VQkbb!kT z?~iOoo6eR0u92-tn?P>Fz(|H#k8mdxU1rBiQ(h5Ji08~MgB@gFVokW{UC?+ zlugL;%i>=b#s4Pzq?WeMKbl*FWd5Sdu9HYe`4@7;(7vZ+RBp?&jMSr)qMU;0vTlxu zF_KLMI>DtUb%1r?+R(e3*``vyYOyXK7~jMafzrCc=32*xKf~n?+Be;-hdIj}2#Idq za{uc)BXiiK*cgBD>h`UT-4@t_;b)0`UF5^%$aC+m>sOGqu+% zBx6ovTL@A}+3OOYzm=+oY3*{Zyl=_CzY=2r(~e{u%sk;bB8z3JAwlv>|$uaKP^F67raMXXuQ7l$c`MAjYs4&_E z|Ym7^25NCn=7 zd!pejaukC|X}g96T4p~dJx!{Y5e+xE{X09kXxVa4geNd*=r}A<00XIZohmlaOHd6_LT48PT;{Qfywes zxPp4kl&^jG{J1IGq{Eoq{o(y6U*j+ss=`2@8!gO;!+ERWYUxUp=(0Z`apB$yu4Reg zx$qp_mfo|kYyH%5(VVw+)7qle@~wpnzrv&SB6%Mv!n5QFcX9I@(Is2tZ7=!GLvq>t zsjcVHC4Z2s(#nU@hDgEj(fJ)k&G@I%p0wT85xR17Vw6jcP@lAoP7{1MqIzx>zq6yN zpq@9121d`T)Ac+vP0vZ&q33y$THAioM0}H;rwA$ie%qc>4C$HaXl6m2*|tN(8PZ9= zmXWL{X}6snNd~?@lO{XtcG7BNf}|g)j3nukfB2H(@3r}~HHqH`Xl;GODUH&i&#Yjc zI>h-sMmxnISL{Gf(Y9L>&CSTJ2H-%;_E$itS zyH5u6UdHC7KXf=V(?f?<$dSuM;sPmrPsUPb?4(YCw{PE|(_iI*u_y0O@>YIPr^kWm80hXy9FOEd?8PZNvF4Q>FcBo_`l5o zUVb@{uVt{`2fZ-k|u%-n;=GwydI@rGSWO60}z=BTyCdV=dJR;hk zJSo_=0|iJ_rCy41B(i+kn#8^VTHD+q(hNDS_f+IsH)Xt1 zj-fr@L5{SK9Hr;eF3&u<+rCb3ybOUec2y6gj~9ObO)pu#xzoE!qM|Rq%!m+6LFa$R zM{$XhWZdj|KAv$HBfI9XTBg)mU0j3SNh!&~`g@=`YzvaEHl(y_wzE#FTw(*>276r!JbSq$Hd5 zwB&-MlY>UgRkf3nCIoc~l6DJ{_Ej?`C1ublNPQ0M?1= ziSe~h2J(1jdLB>vx8?C2r{)__b9?jH>>{5lM{e1M$-_41Td4xb{NZrg=+@Zdn|S&- zKV7_QFl;f~)<|9%6(vcg;w|3XPJXYc$eEnA^Aj|55@tOIZw?yUrG3d7_{w3f@ zT_hoqjPG1ATC$gWuc3~1 z)c$g`uc4f9)2pSwjl#P^#gm?g z%q*Hq+L-BEH3T8=0Lw%q^eBR8S6f60_Zkqo%7@Nj?*QMCu__|JAxHNPFu$if1dw-t zTZ`hal~jr!HTHMCLZDGt`gpP@+OB036SgZJ-aZ&BCAx1{Jk&ZH?~TWHOwU_(Fka&h z#v8VS@v^roUdo=2JsKFc+$t5&y5#<1KKZ%g#37q~Qc?ULZ62>M{!rr8;KS#A10&Y+ zGfMM#kTy6#Z0n^Db+kp3nMwBxGL0)Q#s|>em@O6C&Q?n0OOf>E*d&ntLetj#($?PV z5{cmR`F&L(G1CPbd~q^=ND^FwyCyM0Xc?Q6Q)Ik|ns@>p7H;Ep-cI1k`!MW3lWcFI z%N~(S5rKB}J~@?UM-63OdbY^tmi7T|>W!y)*K`)*iMUER`j5yCw=$O;Yy>_lFC+E! z>2vN=h?Fq<`gCD**%KI~h(PR%^3&cK+HP#C1ywJ%O!G=q9^w6Jb@UIb<>6FL;-)A3 zGH*izZ|aZv!l60itmooIc$Anvmrjc(ANyProc@6l>Yc?w{@tpIc;|T=1DX!d35r$% z)TTulYtyyC+LVfIYg0%0m_`M;84yvZ8vRbb8uIcUlTuCEO!EFwuQ^G3D$;tnly{r*USyS=CB0OBJ+oQI87Z$fRj3XzM9?%j z`cJ&(XT?6IKPY=zoa_Z>A93zQW>9gUkVIyvihcEC2P;; zGC+j2J~ZP-l9m0O8z7~L)Q=C$0vk~e3v9@6lZ`a7+euCw#v^iHEca8fBYnsa?<(!Y z?uIUl!3j~Yj93HLMcgYer`xQBqf=b!XOC?p4cXD zJ|B=XKq*N%=NnR*O>&jw^vMd!>7kUQoC}`|IDBWXq@OY`VA6_lP_j;>96qEee;>1i zbi<`$+ot@13^qw7aD`RXjEJg^S?b98UeGDj-OS!PtwGW~?&*A}T)D}_nT4PIZM z@!DIC+WF{bh$Zsdx;?!~-~}BmANvY#a}ro)CV}`!TsG9w?-Pw<*t{k6u+u@zT%pUq z?DSZtgNe=0BumsrHV*^rl0`eCGmGJ)O)DRuyg}yq<;jWT+!NhM&WLDU-B_Kh6;?)S zq!V5CcNw=slb7Wv60mTd7js{g7%M4d`p$Q#j@E6tyxo#9qwAdb`>gn(`^!;wC6h!< z&Z12p$aPXZR_so>0mXioB*=ITZ~4+pdH$&8Pv?%X0<4*YWi>Hx1WkI0ht0zKv|3Q0 z>dSa1duyQ5*6M9_&9|>opK$}0i9RFIJt*eP04YyMHt&gkL4H4-Bj}gI(ivqhOw^kf zXr{pkbqo2ps!2>G-`;&G%MQ<6^MBPuOZxZR8z z(rQtWN=fQ-Qh+3~eA=4Co&j3hh=8oNzzZvp<~T(1)^7xVDoPzT@J z7%x%Hq*ajD{U-#OuPakZ_4(jyl-KljvbdT9Br%ImTay?WptWrZ$g;~v**`>+ZL%Xr1M2f(Mu^9pYq2O-v{>^N?4=5*2D2&qfQ)OJbJ>oQ+h=NA3kz?WL$A!5w^*jS|Put*Ep-LZiXDD*2uqxdihsd zJ-0ErNA0-c5o5*`jUF>$E_#EmKedEEHO z$>T~V6r1zW_2t}#iq+e zWkq9ktU_+o*Uz5SSX~8aeVhWL>x^u~6GK$jHqMwQJMCf{-iGQ5*%eTK;azwY_4N># zWDYeyK3@*oAC|f)KNcS|zfI{Nr+kl8dLeR9I@9ZBH+ZsURLI`HHi{=oP57;jve?sv ztaHXivgUTl+ON~j9hZwE<_Ic_)=l_xsT_`7+Tntoj$hWUHT#6l3$iY5zZiAZ?qgVF z&LRwzz$KmqUGZ~;~wySu)p4}bp^YcUaWf}O9 z|C_y)>+7m28Y?1w>Z@l|^r^0yJhi@JW_6@bW!=n~;=7SPQW>iIj2eC7kqwO%m1iY$ zzvCw{iHhu^Mdnc8E(RROXmGz#`MN&i9>32|vGF#XV~_Hb+oXe@13{Mbm~g24NBU^7 zIm~tGDo^ia>xnz|mLp{P@vm|53krUj79*B+6^Z1@HPY|v;Tr!#4|lF%;^0<+{AG%N zMH%kOZ^df_dzsvWR^bVP;~ZTQhYiQut6T=<+|U1*3>c!^^fLZOA~BZ`?2nr6+rL7v zOzB5P%MA(TF221=#n)@J4ZcpexBeB&a6iiwLHfJMpPxQ_*h|7hEJwy9$XBIl!RMk4 z@-alHck$CAXW+_1zJTu_j>d1o1qDAXT>E7Q`WDv%PW*w5EKg9)Z*=?lhfRFnMU1hN z@n0TRc{ly^Ei3pRy#Izho{@k2&V47B1@$G&O|sxwD^{30G3Sp5I()%fHiF_uIDFGp zmalU9JKVBUzWO7FH|5&WQ+~0*+b4g|Uh%OGmkEvuio^eno*$*BJJsO}a?<73D(R^|`{~*EsnRXQ1m0-ac9Xl>b|Y>$M(lb#fLs z`CH{0VWs>b-54$;sQuT{AgG#JiB3MN65+X@LY$lHgD(UH>I7v`1xh{tp=4} zI+gE z+S}o1r#bBB@PQ1A{M-<{IRtMF!G9Wp|1t!> zAq4-Q5d7{C{Ldlynh^Z45d5hS{KXLbZz1?wA^3+O_~#*bmbB}c%C}<(9u2|w4#5uy z!4D0=j}#n!xVqFjo6ec@9lpuKhdMlRY&w6q!($#^>hJ;&AM5aP4?o%A3q1S`hhO7x zox@Lc_-c<|>+nq;|7?dxj!W17Jcq{|uJY}}xIXez5%R#NqN-0`zr0*IpIReleFw=I zp3(Km%g@h`;K2^i!I7!*kV>Gzky&!xuV2JGCz8|LfrvV*u^#6_tFNv`g#Hom`wh&C zOqo+rkJJ1Ck*V&qe|}{8)LNPS3p_YCQac^Y{vxLVQu^gZDko3Q6HRb{vO)zTUl@2| z1wD`|o_gUNG4Wtf&inP1bE|Z|Bxs)$O59vz3y%`P?+3m~NwPhAX2bMzfDVdCGWJ}O zuA4elequxLzIlRr^M&=ZXkumn)~!E9I>3Ksl>2X9FU& z)pHEkUkp+`$DpD+asfLI7>wTq5o_W<{^boa{|#(@Ld0I@8Z^)RABg{b4I;YX+z|Vk z__GQu zH+OQ#ubR|XH_ooFos6F@nJxz@&W7nVlOy(Ns5}v_Zk*XLO^)_wOY|2`z^k8HZ}`(1 z?6GF5#CN}Q;(qre(lEKcc3L&qH4Rfm%H+zrS@Uo?r&1!#tUJ59%E*{gC6^6Syw%gq z_3Q?F*Ivz%Dl^l%^&*|9XsY==znLx9a!~eBkrnvP2!-fQ}R8Pw_bMF=kZU&MPec z6vBT&d@e^jf3W;hiGK&B%l>me$>~S@M~Tn=V8{3NSr7ZetHfu2u;X~E5BtMMlrH=s zIVOPNCE&n*V#nVWXFusoeD;&B9=<`UK&e?mHp)SA?^ieQ_Z{b$GSIp$q0HYUi^&zLv{!4`1Q* zx!S{3&JBd)6zL$`;^7vJM1D^=xSFq34hJ?#{#5=$9$)c|9EZeutb^IF2W{k((Z45W1bM0{>PA0|GEPV3i3!f~p0{=&nx zf9&WUQJ@^T9p1y?h{o;k4+-aX_(+n&=}z}>{XK1LLXLoR!T;)M+mJuw;i~^<9-d(XqQU)$p0YUd92b$6;9oqY;DT>G^e4_7%2 z9N69fzciJVWxiUweu8+^_wE_}s7I17ZX% zM@_f$F6p?oSKSHc{^(GLBfs3Q9Z7s+A2&Y1?o9|tm*rqPBLr}{Uptog+^;dFpz`-7oa^Z!B!}y1Z{iQ5bO#Wh z>nXM`MexfJ3nmeuC;P(*gtI?Xkes6>j^_6);enE31u=Mc{2a-D~(Kip0@`@>3y zLk8E!`v_-$c%0;Lx*vJC`ood(oic)7UIQHt8SD=~B0l>=3Gvw<#trNe#uVAlu);B24ANe-v`k%uSi3qH7#p!QUM z9_Vn$NUJZzPpdD)PpdD)hb)zU65(m}h2*5w7viVY7viVY7vgg{UPyfQhf4@&f4G+9 z6pH>@E;kdO{oxMcvp=jPoXh2J9%UA15Uk_J* zILpJeykDUdWio=MtNw7ahpRu_P4c;YxR?0s4{M3f{_r^Q*&m)Joc-Z-lEeP+7V+61J|RB) z!f!a?cxo>*4xb?s>vl&TAp~JA@xa_W9J|NR$1%eOCb_`2M^r;cU;n z35P6gKlgJuuyWw;d1gQ2v%d`?oaK)soaG-EBEOROEdNZxS^n9Cv;3cg$iIyEEdLjT zv;5x>&hl>#k^dm^Sw4P#55f26X9;KdFNVnfnD{LJ3&L6do%Twl%kqEVaA4)~r{&v& z_$>c$!dd%5c%VY&+<@o;@!{kg-TV+GlBtH)P49rhNI1o#8u=s5EL4_Em)9*(#O{XD$8doDUQ1g{Fg zXL-1O$9}cLq2mvh&*kzH;&VM+M0g3wxtMUIt@*u- z57+i;sfX+Q0(-$DK+Yif({jAo;jqD}gs&t%?rDD8?T|`Y+^E=wZHNO)H?iQ(;oA19jARkIQwDN z{;-<08;?JCayVp{%b)7miTG^)g9&Fn`w-50HhQ?~c^%=b=WhvTJ#TfmujgIFXFVSv zoaH}Ecq!%gsSx>pB|gi4lW>;*9^ov1ONjihiO=#o9U#g{fWNW)JqbTn?rC}L?{MEf zM-ZRo^d+4292O#HIPqD}v4peylL=?}6(RDc5ufGHCY@mc-~!dd>W z3Fq7p#~c(f z!I$6Y;VS<;heJ=6e-ZIn{!@e_j_Tj>;PiA={vHnZdcNFotd`}=gm+wU4AC3IF=Pgr+pH{xaXZvjOaMk}UlEe1@koat$FNx3gY1bpO z{dXap?bFTS(2?zPAo1Bgy@=2D$tC^}vd<9WvwcPqpWC0~2`?i#CzG6V!mEgnJm~oO zLJ!w@&21j;hLMpq99?gyB4_TV-Ngl5DnL#-F&pd}i#u=3E0^;MI>VF~O zEaztq2bcZum&6}H@^2(Q`{D124_WuR_4_LcZ%=aWCmehox36_Lu&Km<%;T%w-Xom- z`JaUIIDf0dvqg3}$=~@9xsagcuKQGU55aRh{Brl)tPkPHuYR94$iv-dCy^4up_AHe z4B>3IlL!Z2?RJ{OfwA2xJiglPJi?15j{0pg;cT~M4)^W$bK>Kk+U=GQ{4NhyyR9Oe z?Y7>-)o#xdUQGJGN;uD75)SwE|BU!7=WD{bJ?wa>BqqU^6Lq-ykJjIV2xs{{3Fq-% zeu(@b#7Ej%jwOV%{4s5c$i9 z&+>msILp7D@G)ecTSMgEMSPb30O2hEVZuj}{HH?X|CRVG|3kuA{uaVVk^FW&)D@h)^ix)EPrH({4(OR{8I^M`4xn-{Fx#08;H;H z7ZT3$mk`c=cxj0ID~S*J+ArKpIQzq$gmb$0hRA;+g#QfTB~ z5zg{oA)NhxbBO%+h|luBBAn&7KU|zf0{pF1{?re5b2wy_6TTnuSYg-oq^_^KOTO$MfsI5+Cw}2T^Xnss&-3d%;zO3EJKn>!9j+jp=f!7{e4by| z6Cd(b|9OP7oFycO=hw@K&-3dmiO=)v8;H;KOeL*)E~_$+4;;Vfrqh@7iK_%{&F<$GI*oV$t7<@+Gvtj{BabNN0U zBL4;Av;573v;6l7XZ=49k-wGrEPuBn#R(+9uULLp!dd?V9Pay14)IxjU&2}bV8U7d z5h3zRiO=#+CYzZz@5Io-$IeloK>T+^NHaNo}JJ$`q$ z-|S)^cl*s=pgyVm*2m5xXO9f!&f+cUL^Tdl&{x3zUuj|hpYWR@$eP8ArltENPzw|@~3v& z+2QJMs()t>*L3&ta4nba97-8|kFWJ5-^109Q!TR8o-Y&s7{cEqKDR%+=NWaA^pZ^Z_d^fYa^K?NT8{rB`P?41@0*@4m9vY7Yq|$}xXSP8;Z|xS zGSI`jyYHV*4#8_e@J0_;zq-!hu-g=}+i!`_@9Te0d@kSnh!0b#pFB)_p5JXCK2DYY z0`Ym?^cwNGzk8ebtj}k}XMM8pk);IWm-XrBaI_DIs`~6feAZ_l;twQ#58|^vM-iX( z8BBcEr-1mZ&#}a3eNG@g*T>U{&-zRwKI`*i;2hB0lRAC;o7<&t=4CeSSrJ z*5|jxXMJubKI^lR_^i+U#4jX$9wk2O^BnP6pVx@b`fMgX>+=!uS)b2||0B|;Jsyro zfPb<+QHR4nS)YA~&-%oO&-xrreAXwA_*~zI5})-MMSRxh1md$k6N%6IOd&q&GoAQ@ zCC^$P8;H;PoKJk7k6b`FzeiY3a>_~m&xnsQ(02QJ!dd>!gtPp6LgcR^KFfccaF+ix z;Vl1^5czKqpXGlaF)Ll9)3xHjB@!?`*(6U{E+4EM>xwrnD8=^(>p|dKjK5a zKHodW!?j#aA)KGLloQVSoat~sU-LuwiwWoF|H}x6ES+~;9wL8*$5;JtA)NL6J>fi0 z|8t1^M~TmJHWJSB@mE6Ryg_^}-w#9Zz46dfg8GAw>n8cQrA20VxQ;X1JY36tS9Got zRKBjixQ}qo?^?n~OFZ@44G#Cq{bk~Fem^6e{pxGNIo*zfjGBS^vaiFTKl2YFoc-!Z z!r8B6!)+6M{fBsb^{ZnE=X6gXoc-an5c$)I&vIrFK1MWCJD(FGXCd)TzT9}e)x%Z) z8wqFo-%2>^bC1J)`#ciDf0A&v|BE4VUMD`%P(42;ob~*IaMm*$otXq*&%GV)`^o-< zA20FL&WDA_Ig&%W*=8oYRPpG_>8GNjU4%NI2J*^Frh|5ufdUDdB8~D+%Xxe;p$K?hyXH zgtHyihRAt7g#Rkxtk2tov)w)jk>74us@z%5E`+l^_jI^l?)wm*?RgmCY|lP~bGm~< z~8xbG(i5})%sm~hs!fN<9H*bw=XLim-0 zb3ZsUL{0;Kab{tCjmzxYjvoLh;{{;-O0)@Kdj>~DVwk^c%lU+qRX+hHHVO?kQfiVtwOZ|6}y-;Hn2^>O#S`eu^D&#Uk7`05X@ zd$_JI*i3THlKg4^@*eT=T~J44Ucx7YBM-Vx{0k4)bPp{+tW^EdbdM-7uo=hBkW)>! zzr+3d_#+S3bgMmF)BOqIT<(hq=W<`_aKBuBL44d(`Kt(L`>ZD%{Q2&^($gNU`v23z zmA@ArGD?6QAionXBndCqYT_w92E@mWqe;VkFO5IM7m z&vyO^;Vgd<;Vge?i2O^5&+@M!oaNt0ILp5yME)O%&+;E4oc&}2;hgSsg!A*R*BtKK ze>3rMueI$ILq%&IFC;bb$GTXzc=x5Pvs9GoaGl1&d-^Tb2wy_%b)6h z3h`M^IpHj4Mu?nx;%Aed3kYZV7ZT2PxWwU*!Fv9j__(KbxPfq%e+%LK-1r`cLk7!V zMSR>-`HvCK@}DA{^?%vnkiqg_CqC|}{0|9d`CAC*ekU6w36N1Pe_D>aI^6feZiKV^ z0|{sOy&Ue#KZ^Lcr}`gFI8IfcBEoq-HP+$2{F8{!@~a5Psmec#aGqDrcDOJ9C&Xv@ zal*NuT244lHQir0+?W3#@mbCzgtMHdL*)D;g#Rw#Twb4r$oZQ1&{fAFU7(x<_z5VQ zuOAZ5_5C1+`}sYJ_$+4t;Vh>hM9xU!bGb|)oaLWJIJeK!LgddRKFj|J;Vgd<;asnm zhRDB^_$>b#!dd=}gtL8qA0oev_$+@N;Vl0N!dd_4L*&0ge3t(X;Vl1S!ns}D8X~^~ zI&TSnyR;|aEPr3ZS^pe|L&tLYQ@=f&_^kgR!dd;*72*7RwIiHKg8HF;m$;k5A-i1u)URS5U;Dcugu~^PUr0FXb6kl0(?j@G zgmd}UhRA6oKHFyz;jB-baJK(tA@Z*zKFhz6aF%~7;cWkvghP(n|2~KN_TT97)&B1g z&i4P9aMtHvA@ZZ>JS6!2;NFC@{bLUI^*ogLY@eryKTgt7KlwNW-xHmI1jt~1zYu(U z2;LBaUlxMj8G=6*f`1f(?|Gb2KcIi#5Ztn@{ZR()^}30Vd%*B_R~D{P^ESnAf}tdI zvWFyp=}s2t;^7N+u|QW3&-sA`x_Nkw6RhJVP4|}FEHUQsXLYtfj)&hBwLnh~-{KVP z?csO1>zIeT%ZPL5WPVpWe=7I*n;bsZ!y~TzmV0>2;Wv4Bfx}mOc)7!$_wWS{|G>kq zad<~po@&q44v%^GCWpJn?#cX`P47hZSdSlbekQ-9K2?4}y|Pc;Q89$P{M`P7`wtvA zFgF&<@7p&|kleh!_@6rrSN~tTCAvqKfSYY6S z$ZnBcBjZcrUzW6*7h5HZ-|4a$w@O;)=X5e>Ek!w<+}(J4dvEbWT~2#YzUOy38&UF4 zeKhNwagnUKU9$G;v~$Phk|umn{n310RoJ=9;&!7u$28)o5hI4gdX5@>Vy{?!pMHJh zlhi&9^JX?yOp#+_y*<|GS$*}4iaw3ia~mUlswx^QB7LSbG(`H;*Wm*6ygqqy2~u^< ztge+9wRMfveI%hH8yYJr&(ie&mq+9Srgc>~DXqYrxlhWHxYlt6 z_LCFWEGT4-gPcIE3#jr)r=w$O-9Oaf?H#TMji=Xo^wUCJhRhv}kMC}w7rv+Epy|6N zEO`rD1U;hP!#U~}hb8V}5QB2A`B%6=PW(LK-tEqQYA4takj7UW{iW(6r^&F|o$ZlC z?1|5vD6o%#xzW-C|9$T6!tia6NE*M!liTLP<07DI*j4`g{G)s_rN6m@ z+>qd!WP2h1{q&PJyc6)UBOh+{U~}0%L`wUNnn1ryB@Emt=_S%WP#Z0weZ==h?Tf?Y zsI^iFpuF}V{k4AYE4W{`5i2(YhhJyn7lh!+2DeXTq)*w1+~jp+@~E;g!wbtMj~O{~ zeDQ?I6AFiy6;F;-)|@rHc50V<(e|lpj(Oj>sZ!n3si}fv^3^)DQ%s!CQ=sv ztTg_-)w3vPkYuvy0f{B^-(f;5kVyH9S7#Lteki*1Qo(yYg51RAZtIN0vrMiYi8jxb z{lq0knc(?yERtiv+ZRlY{y+A<1-#CpT6?!NC3>)_P^9{UY-ofQYE610g@QY6((XWd zu`N)!wINBHN}Gfvr3JYZl3@2qQ>vh%hohh##miAtJW|A3S|}G0>kUzlSZ|mJD53(2 z!2iB8Ywf-EWKYvn(f+^A^Xxs}_s*I%GwYlCteH8wiV|{T>}?!_h=4pWE&%TIB6uv1 zh`r7{Aj_uYXi5P5JMURqzWva7 z(Nx!*Y;0}_+$Y8Rd{e!>dOndq-4{8eci8?Ano=imFCc zbRIl+6emk)UV-@#Gd)uAcb*`Uf?~lVX@vwjK3p@Cr2Qee`L2Qm=$a8=F$L2>gd}N_K!?@C@os#Ft1dSOh5n5(2 zK5F{a{}Nz)4wJiH{4b;@W7NMwoF55gLbvrYr>t_O{5hsn|B7D#Oyh#bthrypXQ{U) zq+JQe5F`B$!w(`%LfY8;iuzwC{?rQn^F5RuX&;pVwB|pGgLyYhe{6nbx#ZtoGBYL& z-#FzxlJ3BpU(s2Gyr`n=NMa4_k%99re(52sEwr93a(T?KNxa^@6b+c!d85NeCdON0 zJdYE4jyXe9Xnu(P?R<~cS7pG%x{CbfMDY0${HzGha#M(ZV+3Cl!PiFcDzuu^p-pG2677v0YuZ;X zOEk8%t!nOAmS|tK5|7!Ad!l}IV_jQ=tMc^wv2J1=qVr3&c%~tK7=DUVo-`poQVJY# z&fh3~z2GeSEW?VgG4zKUyu;8lZ!7(khW>R1?>6+Dn^yYw82Td&&dxUtLs`?CHsrCKt|v0U zlnXVxruTI&=4G&qr>l1zrNtO#jp!p8$7UlqHpAG8B$*!w>_#O1S(f>WIl z6KkX@$@bf-;YiGu57OVrKbQ({W&ashYf^X#(?s{}B0rX2nxU@o?e^YW`yr3c()cU3 z6b~Urx1T9NV28A^KB)R{8pMAg+0n}u5z79q@jWlyuQ30H@eiVxeI?z2*9Q%A<6pnV zr}FuGtns0bg+?Pczvs39P20961t&d!YS<<=<(kBto(nWw3hKE`pD|=Tm!!$ODHm|IO;kOXKEgUr zd9E~&{f^e@wJ?s+wvKI}%I{6||EbAGQav zHf~@2$J#jcU#tO(t=UZNSR265BJHux-<^ z3vt`FXD4NXEherI`0|lnnPV15(>|( z*B!!_54mw;CT}^%5kK)!yY@ARf9KrajHMp-6R5k?O#Mw=?U{dOZSBGZHS?ELXP0{x zFIiMGf9{e63l^srELt)lv9JZRMp&&mcHFVaRqe^PM?T;15bvZE&UoU3fN~HM)&sHe@M!6}kCuGSvdsFoSor8T?>ND;@)h^d zkxD&mS7UvJef1yfE2#epiH}+uEwxi{;PYf95S#1PH2b@zbF26d!&muv?ukTfO(*Fa zk?h(T<E=CP5(+!m+-F`rqF*ou{R*VApgQR+xTf z(=hKb-s^?%eS9${jK6WpdnDa~*VoXNHZQ6L*K}fi5MTaB4w&cRyfOPMDqju3>zWq1 zc3LsoN4uAz#IY8{bE$imjkh~VuJ{PGCi6~TKWxa*6t(~?`%nU=q(Go7z)p=YWR??X=w3p{fs&t5jWrTLP^ zwhpwexsIEx@YHjOr=I;jS?a0RwVry!RaXny4Dc)IyoFu!v1>bJprK(s&o)}=b>4!w zU8AVPJ59)+Vbc(|YdB2~_5AHxM2q00XWrLvFEKdlP{rRVIOD^*RPk#BCm&0n5uEgP z&0&k7w|&|78hVx?<^NGbKg!^@8hV?q&l!4~uKzK(jptVkADgZnhMr|m<8z;(xAA1T zp<#Moho90X@k~Sc@TZ3T#P%Wdxy%1S^GS$fwC~9Ls$&p02K(21lKZ?Y>&yqC`PY1s zmx$JRDxa_oO~Ij%{Qfnci|>2HMh4 zA~+-i73w~cr+e{4Z33tnz>V4jV`_nw8eQsA@m!f1QR+Q)-ZTE(%JX*mwHBt4tZ3L4 z((G-1Wd#YKOS@@!)u^$Z2hAOo!uu;Qzj7e0y|^?p-D1KqN35-Ek|EK0@yEU#Ke?7( z9nT*p_(4La)~)&w*kQXe5$@! zkitWlCc5nr`Kg>JKSJtX@ddy%E_lqEr{!s|`H-ccE98H8A+P{#Y(7N&H)UhwA40Z# z4`oNn+e9e)+g6Sh`PKMfv;SfES%=_(bO+viNSGV{di{bGl5UQL!m>>#_Vo(k%-4nR zR0MZJc-N@d#*!8AKD3rOHOv9^HS-S3gpSv=?PvC}b&|^(+gc{c2At}73zxjzFUw4D!rAXNnSJRCe3d~|cOJBORPx&FXL$ws0tfP1 zi<5yDwfhh2gIM2Scd_@hM=E2MQ$7luT?05y@UU$!*kFNHnhZR76YCr7tN&QvK>aV) zfW+3eMeP)DK8I^9ONGFd4Dm}#)35$HC&lM%{vr{~79n6AY>oO?jD3SpCUm<^CONea zLHQ45t>u0Rf3UtqY^~*onm|Uzm=KQjE!6-1uC+W`VQV`e?*U5- z;YK`L6UN`V*=N!nczug~Uu$80DWvZ~84@pbcJ7b!sl>zH3+o5soS(HO>0XKwDGTD+ zx9!rgGj1oi=OXtF4eTBZt+l)bE_S{^>#DAf)f$X`2$tS|pjYbdsF`7Vhk<8Rkct~c?weajmSy>r=(`o|l{wvT`51FVk>*&gV9 zWR_no=Rc+laopau!=aA!Pu4efX=nPyg!Oo=Z>)Mq&r4^5<(iLS-z3&IPDVN*tb?qX zh!^q<`#1aQpLI5a3j4O|e}DVN>m~mC+c&;V{Ffna)~Ngxi}j6*S;4}v-lU=YhtfCR zBjN9F-&pmCT;S$U*k%#-wZd;lNAPz;41o!<~c3SpT5y^FNB7J7rV_wf* zvO5CNcAl~4JbM!209~YP=Na*&VSkr~^|tLRPjTqLzAwKI4e4zk`fUy!*oU@z(rw?4 zV-y5y2)1e->eQU~_F3QOP>wgGNKDH0~5kqhL)}Ju+ zR*&b4hTitA?=bW>o?kQcHlDi-ZsYlN!^g(++lJout-o*RZ9LZ-{0Ka&+>(M*Zv3gi z9BFHNR>R+%&sAP{|Jvj!WkX(*ebfY)asj8%{=Ev_;MJvlwV4J^GJmhu%`QXFe-EaZ zD>{EWY+mMGEZLTHZG#V-)->h{*i}8F%72vk;T?QVXTDk8{Xj|0>$pyPNavrgD4D;b zHuEza=p^SnV+r?;Ka-H_xV4$z4*T|m-RWLe06;XRs;4?pjYF|&&QHwPSu%eoFn?4u zj=sXOZ%1~CxbxS;GQ02YJ9^mebUk=}>v>TJ=*swmJ+1uLo~{4gzZ+W4}YUfrDUl6XR_I0d2(~kAwwc_XtI*3W@8PC)4V^F5pdkO)X{9E>4 z*RI*Fuq_SKPb~OEKoW_RdZ*EQ9pPv0@>dbyp#LHgNLaAOh98?R3F)eI;AB`NkItzN{>E+|ZhqOB!)p5Uo}2u%We3`tp7dj5BtP+4emy5qD-|mM`raTrW5= z+b8*`;354zhTigjour$5EPk5cA)jRt`imm;?S|gQGh=Y(Ax+muB6w2b&-n1CCM6Gw z>vvol;QAfC)c1XVWcf+chdeK-Wt~w-xp;VeHtvY@eJAL&`Mwhr+iEi33l7Ms$vo6Y zZ|n&8qj8|eR-5^$b_Vj+)X|F>%?`|1c3_g|z>ME1Y1}70wk8IIw!U*j?Wi)>(&PPa z(RQ1~>I3aA43}o6TTECl#M<(u(mBxnI?D^QtJY@Pmc`ogTQ$JIX4$hQ)|T(9f40Sp zS2!Q1{x!ZDrW85nhZxsXh}m*R{5JlW~PLv-Z^{+VR<1|iq z%$h!V8mup{6m*6Bb6`=(gtW1~fckF=n1ufM9?Fhh^xh?{A6OrbFwZbAXj{m7fQDtsww+ZD^|+k}IYaP}&q70Q z=RuN&-sV@Nqs<)uJ?Qy3Q>XA&sG;evwQ>+3Cgp6uc2{|JP3F1EvntQT;opnXS3fx( zf={D;EK5V#k%JdT%IA;S*PGWBFt?-L!3O*&ElI~aGrKWyYx`#sR>>F0oJK|kDBD|uiC+Uc)yPv&s z>{l2V<`0;TojwVbGakF*X?pWyd>Xrr{dw{6Cr z)r_BC>G;WQUhq+z+c9M#0`J~_<(nXi@^7bm59wxcs_YqY#NE#yU0FWjh{_2gj!1Xz z7?Gaw;M%?cd8q$AFM^94n*JvE^f3{DvwL|!Ht+SHLw{CC{`~bT-{?ezmoE6_1W#7} zS$P$dKT}fCGyJ(nySHbCUwX33+dZQzXFPJn@s+)EhNW**Sv>I?x2D~>eFPm}-BVoI zxocSW1M8p4?CyWqMGB>&XEffno1~4)ri8^r5^N7lzulFM0uFATYTI5Uu@Lnc&rDxb zsmG(&EMBmvisxtOp&C^+iz^o`s(d>RP;Y5#yL4i*#u2#FGg>;5IP|=wtpO)$T+&$I z(bC5Hd%imty>WegV`Br4*jRHRoLg2T>)P7tE^VhHsp5M%rov6vroWFo&b=Hw5`FBf zQOQ~EO!Uf86>~@JNp>F0!_j+3Y$g%RE6_JKUF8GrTy!TJpK|vv^C(xWvEonP)ehl_a3Ih9^&jgiYxv_eV6hoj8nsjM9QL(Y zqtn!SEBmkMSO1(l<+E*nNvvloF64_b>R%!Dl|z}(ZM%FZl{4i(q_t~dI#^$OCHQJu z7_ORU3PlQzA#JR$t^W6W?OFvT8H4>KibP?RORTT`wC{u_KBoy1JB)weoP8zTf!EiT z$;50d{X?O1(S5Jnbkf8R`;P->$^E({`|M#a-^+R6`R7MDK1FVSy?d0uV+GgmW8Dgk z6^;jiogdWtinV`OSCLm$1ZO!dM87zKpBusJBltxTygh@RT>q!+I66Q#VCHnE~^)oMH=aLn_oghqz-{WD2+cn{DMeviQVj>?)Z|7@meAXFy z8=q?p&N8U+e6PXnTK8uSZu#G5aLfM@gIoT;G`Qt&&x5!850(Zql-pQ?zrn=+c!RUg zqUpLua9Z}eZ!+}kCn~+3zfNb)-6;MML(jTR@lOg)i%p8+Uo`Y@H29r{-p1!1LvQ2r z9fMo>JZEq#|B=!jQf^j0ha23=r(JNeV;@4}e}$p9>CG5=J2!E?q37C-^7%-F{xcE! zFB*EbMat)^hTh8a9z$>C`LLn4@=Ss!4bv+kbnmR@>f3Tk7lZACpHfjimDxo0apCtZN&**rYMwz1x8+vW#H+GB*ofM(8 zXb|!KS)5mpKz|6ea1+wn_nDWHuCXpfi6=H7*u5C3`l1x-u69VsvGwdliAB|wRk;y$ z<(yfSRkIgW&#tYWKY_z<9eh{LnZ0QKf+cenoT;~yRj+TwxVo`HPn^Usy1uEdtqxcl zPN=L$bIg%Au6-|?lw4TX-VRbIv+=A-droCycFWq;4LIhq1D@&{)aSTK7|kzUQn@6# z4u@KfL&uDHfM#zxC_9+g)2|)TS+sCes(1J%S2X^~#@EWEUD&C)ae<9COkCp^gWD)*`Vbdhte`?3{vtJ@nBt6G*VTQ&tcPg5&^Epuc2vh3NMxviyg2^+SXx=p4h z38#IW06<^6eHD&b*8%^kW!!W+*rjZjUDnXh)UueosGzd<5JH}ytq9K1fhP}k09=BtzE`!@K*Lwsf ze>No=?oEc?j#-#LXc(^L^96_cbd}&)`D_=Q^hX)|KEW9-^NG@bOK{TLvDKr3hjROw zp|@kb=M6o1DgT!Z&NfN$*RUdoA#D;r#Sb;OmFF>nGd`?6DI=QW13c+atR4sWRKcek z{>K2*aH|bH>u$vt7<&6%&NB2?{(7fhDF2oS{iTM#{azaky`7u-cSCQ#*ZT}T<)iVx z+0Y+r@c%YA+Y+Tu;+ckW=1&dB$OZ2Whju`rdv&Ik5B;vW^`<#Xxqx$HuEtWyo z*J9;=1IVClK#$lNfbl3+(mBj6!(cScQ**Lg5NdH>_X8!}CqQccdUBr8!|Tbfdlw)s z;}7L(@`rgf`EobZ#0}(F{tvGvPi8M9cbAmA3(27^s27rVBEpC-?<42;<$dJ0!PYyp z^^R@1k9;)mBTveGc7dKc$`_nx2OagBC1kqWS&+H^QsAu$%)##%NH$g=5w3Z)#b zoKrA&oS!*=@tF%3;&zMbs#$a9n0w9#yZL-cQ)BYNRn2v6mnK(W`koh`uc_;B_n*7> zu z3By-ZJOjp%#|bWEc=Ja6>ATu&bFG<(mty?(*MB+uGG2a+ga^!JZ4Rw2%7yQ zYeL$Ua11fh|2h0n!X%_+O%{GT>wkaeFrJr$_DKha{d}e+On+<+V~@$j7EhjklyEsWqxBlv|8{2dXzErMSf!LN?snF#*w2>yWx zeoF**GXQ(Lw_PR*FlCUt!5yQC!KMt{sDD*^{$1{Eh3|52ssov71gNHfY6h4)-I0WB zea>o#c~i$eSJDxNID4Fme~uswal77nw?hZw7qEcCklxNk=(;(p9o8+%|67Khb+6)& z3Ql^KImLfw=SN$R&Emvf7XM_e~O{EayZ%0 zTRBu2dMk${c+xOFl0^6J=Nt;0GZvY1C_icFa}Eoo3^2fy3)S!ETb$1PE$_EyZC6kB zzAZ$*=(0tLVe3Z^`#*;qT+IE8lm~w_HT?V6{q~eX*2KmV|GMAai>M+iDgU5-S%p)0 zU_B6;?VKHeVSPfw`hbx7SDa%BQ&jNg&2F&=8w)H2T_OKJ6aS$V(#FOD>c1&q5c=o4 zty`2_b+Pw%-`>COx98YFbBjvVpR;TG(ymT}Gy5Nf`qE_)ocX#CeJX-WUo>~llQtp| z{Zy})TCd(z$<)==2qJrCE%OdjscoOu)htuC?=%JPG{kKmhGPhtkk4B^?C5PDBPlrP zZN6o4Rus}zi?oST%7?yxFD30Xqmbes{zsu^;2w9KhkqeA4?iz+&wzP&Z1k(iJc6nC z+T3h>*^p-As|wENR$;rG*BaZ(5`8B>Njh_%+XL6fm|Ar=J@wu>V0ydziy-LfD!q|( zm$5M$natYA!Zy~|DTSMspUwP?|C&#Q5E2O|3-{#z z!g?>(2O2BtA^Url=x%<40)};%HL>~Bef7_I8wSOB7Hic11PkI>qosCAu+YC&kj;UA zmSr0CzeJvGeM)ydYdFOhW7NMw>;r`|q1$LS05IBD;_Fc6Q*V<94c3Q>&8O}N6Xar( zOSinbbJI=Lu5d#A@9%u7_95?(c(C1Le@*45a^YC8Q26WV0P`Q-%Kqzj%L0)H(*6HC zpE_{f)Yq#6&)Me~ztH?E=N7nsi~S30#<`b)=jo3ZTBX~~)zdnMy&Lui+gKea8DpkINH`vsuY^TC4 zge|R?l7F636(&xxk7@<3QyNUM3Ng-|`NF#GF#NQS+fGLq7Hbw!#jhX;Lwe>B#WMt9 zNN?vWZzc#sdONTB35R-mI}dfc;H0Ll=T(cPq98r%8ja5pf-^q0kFL5zq_^{8 z;|;y-yH7Lx?fmIXLvQ=;H4*xShThK8onz?P#%uiR484`Vp2x-bvmd4O?~KrQ8~&C) z3BNRy4}WST3uX_}%I=4Wj4{e9W(;{h%&ih9hM95!=g!f>d00-z2ODDCfuzv!smwg< z)qFaiOk=zOjh`c>=UtQezH0p7tb~_qq3g1cmqZ?!Jy(l;b{?s)v^MinIwLnkLc^pg z^IRW87DoOVM{b!jL#ZiLQHzrvQaF4oy%WSL8y98#X&t$@`Mm!m@#&k2I!Dgid{8eA z<63y#@K@rjfxqLCnu#Qm#7`*GM|kokCALemJktv6^;ln4`x0BkFY5({6ZR!yx&eE{ zUudzcSQG2Z?y*GXIrJav%c_5tS8Fu8t6dF8KHG9f`ltB^Q{k=bzouV-6duAj(QP3+ zo-o?yqWp$3pQm-;V13c0;Hzn2cxp~A1i~?d**`4Q7gYaE%24dkKi@;ykyLdPHi!q- z`)rF;ekvD!pF-j5eWpyGHDUPH%|4Uv!0U^KxzV?WLpg_w-^=##w0ytP^LZR|g>{FM zw^qd3tJ3#%VxJUU((ptvAClxH|@v1EDiG(^NhBw6$D{e=4@Z0!J!_v zeTEi;+rEM7i--K#2c;o@+c!uOgdx4n?@Vsn5at1=?#J5L)24DyF%k*iMpvHAL%eD- zFS>KQGQWrJ?HyI+zgja)=`y259AUqCEfn~tgh0VzzU9- zoGYFQI!?i*)4iC*BaYTSO$1GTS82*2d;!u#WFru2zcvwRC9=sOOYj0@IcEWv6aE-s zAgOdlItbZ#aP_?Bu%4S-fW5O{%G^-;8BovIQHg#?SLv;It}2=Tv+C|&lx%(wv{jis zckem4`$yn*IazNJ)=Nt^b3vTY&46lqZ!g`zbobs>dV`Qa`M9gJOJ2(O!jKp*oZ8e? zx)23{FG;>IT)vF$e*|3Ix#qpqFC#+q|4e1c3HLlxa^C&Vl)QG63+9=U(VI#)g7TS? ziFf13tV8oj=z=*;7ZJz=XQ@2{nO9BN1BQ%)lLn8eO7_kkwv~H@(U}4Toax6oXZ?f9 zk;tiRA)B5XTpW964;SAvc8E+%dT&8Ix}VBCQPM?4RmYYSx6j~(-+F1fmxT;M`4D#gn^Ij(Zfz82U*pRHZ~#cQf+!pB?&rOgtPD=yg%uRrjPsbA_Naf8d7(9rHW)ajys zrgQ_UAD)=kT1@+6rOQ#(^?w{PaQUnI*^-Sv$4lmRm-|rg>v#2D{BpYfJ3U=p^l~EN zdi6_x@+8bQnXVg%mt4n#>*#$LZ0nt|aiy@;umHmvPRsX;cibZ2BCLDWO%i2S<5J5hvOoLXPb#)-_YoEG)6tN(w%(dQQm z_%cMkzX1^T2XsH{@%49myT1oGVu|n)8}OqZ_@YILvlrDYsdfXKHZ+W@>Z4tPbJb2C_4EV~!Mp-{yAPzXj+2E?srwK6E3vUo zt4zohv(bkc>R3kyU&Y>g_Fvd#-(zE)V$;57iSZEnkBxQIzxJt>2lE$=+Oe@tQo>*8 z$+Q1qdQxx+<3!^1GDy+zhdS12mGJj>taD97ewuE^ktR0QQU6VzEc+k&=ezCuDPftc z`z)7%4Ev?*JF5ItF0rxB7T1<05Pe{UgRYOg8sWYo1V>a*pqrZxY-!CGI)*S4d~#1UTCao(zcjF1`HIx11~z24jF#CFQn!0Xy_mzX(v z4w-@Ho!N$W9(D~&4r!B<+js#6wrMx7Y(#o#v>swPWf|2m^(l0OVco_utvK5Y8q%|F zR=k!V4Cz_dEBHZ7Z*6x3?c)mQCgJxWO&`AEZJgf4d%Wm{iKdk1%{r zF*wt%{NG`4%bz1%8d`Qvsyo1y&j$@3yMA%6!Ro(k(TGew2yNPJ?qTQ^W0GfH1U<#!vCf4W2akwFb9*K4@_J zT|Q;-V+@}i20zx|j|)z@u`Sm4JY{e;xr#q$_>437QAK!x3Hg*7-13@gpDPS*`MfK_C&@&?FkSqqK@HM|mCWn`Y=f>hO&|JtQ&P$>!%Vq= zvwGeyCS4~I@Gbx&13?zzhj>-c<%%LHQnkE8~dn#m7~&!{tL;Dw97>(P2z#|65BSF zpUNdR_PJl`s5xY2Oc=g#%6lZ;KVs~|NF1aC|GXFxXKM2e^F^Vt4ADYk5SCv%2GR0O zd4^@1JSIi(=@Fb$UWNF$-Y6RZQIe51VINj=(A$*#e)Zt3V>6aF<^^qQnLlWlZEPFH zdYgv0ZNs!K5BVJ9s6D-1*GURadRx|+j&CEz1UsYW@XECV->&()oq@;t6`9gC}6Yck(WXTH(#);Jhp$jpV=cTCkpWt9l`Y+l1 z9`M6m9Ctr|aPPulV3IiuH>6I$O39egC$?@GFrThK65bp$0ix$~gy(|r>sgOxs(vme zLgjo84Te=_9yL3G7LfBa{HdSnYcFB^+|9FAB@!}UAKc#>-rUOh*0U?^F`n}mEIxB~ zy0WSY_hrDfa?#m{QDS~evaX?_t+Bn`=~#=#_PB}3bv&(;r)+uyI`1YfIDaGSabM5k zY-IL2{aSZNTv853W{PJ@7%UTNh%b?syfXX>^l=X4do#A=ilmc9o-BaG`aHKu^{o2F ztcS>|*m22?laCYJ6l+JJdeTCkwWKM`zE8vxdG4?OSf5A3*ET@|RB@=Cf&-r?D}mUm zpFTIhHT~+Jd5q7t9;KI*08M-`M*StL1C5K2I_p*m z|4<7Spj}x2qZhaTgAaiT!;1Bp)c?9c{1=iPz1$&vM$LaL+swOR`eS{j@sfYvMP|l? z@i$I+kEA>B`b^9L15KfOGuXc@)R!u8xCqxh`#;u~h31PnM?yU8t+6>G?rrzt{>Hig zf%j|>F4X5658U?QTpbULF zJg0oVWa#aD=?+70=RY5a&_5EP|FNNGU8>>!%Fx?+zuy>oo8IRQy`4w>H~G%2c5UDM zaKS_Q9BJrn-~2d3Z{_o5LvQ7yI*8~-}!P;I)keNYN7H}JTLR`C8za~3pGDh zq2@&gyvuR*drZ?DtSsbUWhqa5#MzG>Jp1u-sC{+bv)-Te$S<47JfE%~aZP&I?w9xY zK75ax7f3@#X$zdw(D%5JWWzn48K$~968hTfxHWVmNNRgsx2V?Z43$57A1W#wafa*r zI$x^KJcDSL^_&k)nE!+JhKd@8!A{rjs66G!u9B`dxQdedKrDSlIwm|?0NnKcDmQ6p#G6`@0i`>Fcmi;sM3pLKn%(?&t;v?=dj+^ml5TX>yAOY#+beyHb!{q`iCnsBR26C2H4kmfpk6(!W;1c zpvvU$X6XNSevV1{J+cAv%)`CQ%ImO&^7=YTA!D%jER?pn&RCbK=A`GHgD8Ys|C)M!#v>|>z?>W*c zC_W)dIE8aKzDt-%R}9RbFMy0u{5|ZfykGOz<D6(bIrKVke9=zYBfCDd`r?CSp^oL6jdZ{6E*2kmgCCDd5#nU}!1 zwHdB_<$rtV2bLjTt`tcf1;o`*H3)=qt%MB?KVL&}ZKxC1!Zt`gT)V6MN32|`vN3e! z&fn!?N*LTvWjMZaD0GEOX-U_7eBkaMbuT8fxkzMM zD;s*?wG?{D(57`kZ<~tnot*d;N(FUuJ%V~Nevmu>CBOsyAODl;*eTDfn*toPMSM5G zx7LSQak((JUVxA2eBrcVX$-o@;X^X@mG~N37Z;%|XWDsWm;Wa3D(U|7pP75TT5r$m zyMI*D_0sbL@^e+s8>-E{E1yp}X^4D=u_k%!xdQSzxf)f$5ashd`5xbZ{kM=$$#wO@@m$!br+TD% zK(S+r9?p!}*q>zV^L0ma`Da)EFVG@jj@8yHTXXV*J6hl^RnVdyU(K_upGK}^^|X-z zn0n(rL?Fn@s{^3mJn3GF&&p>9%*ApNGq1R?W1a_OOIZJS=e-LAjA>r_8W36W)Fv?1WC!9Y(9O5W;f*n`Vl+&k3vo+sC>D?dHC`0eVy94%7#{Y`jJ z-0JsW^ho~B z?Apr9``i~}Sm_%fK38x=%9|%Tel`!l&z0)O(Z7o#WxkZgXEQ4fO`oqQwqB(^&=L6t zoFSY-E^MTOocTTum9UX&` z?)N}=o))kDU3eQ2 zLp1cl-|z>HQy{a~sGq_zyKSJ%MyU^c!wrrznBK^Q!TMt*-!l~n}rUU%EPW`CMjrWbXCd{Yr8<4ReBY@a()IWES3MJ^ZtKOG4+}E<+(3qH>VXVz zemeUVjznZxU-v(Ws&ioee64=F0^wX)A4K|4C1x1^i%83tro8$W;AYwBPN`qvzb5l7=l_}V2hy3BzJ?~)`E$!NWWYJF!8zsl z)nekPxHdDQ6cMY*+@D>R{Te=I0nWK7NqVCG@$LR9|H$e4;y;Z{nX1hkQaUelw~c=} z_Bde!Ae}4tgi$PNZ9e%k$}rb8ekX$1o7u28N4PPHdozQ%yEX4BIhJhJg1KiduAaYS z(c33DeUEjx@wx3noG6BWtYqWAp{~O{U+gcbSd?8X4=vl2) z7h+Z|bm*MQn%W6S$lv?Uipq|T#x<=S?taWQbvQ(=qeYHN!-GFP?al7`3*MN4PH|Ps z+6!?ATPwt|svYO339-K}Yf|#8y47oO%G!#&Yd81yeb}w03D2is;Zq%#Z*c5-dhdv9 zM_w>$1Fo~cNfig{l@|10g&)ny{Hq$}<_(CS$9EX#ZtxBdCtMS3@J$i?V-fr=!7FJC zpI1VkvVg8Zo5K>5+Wubq%#uhV%M#kFJd={QIxYkmPV+a+Ah1L~I42eBu@CeP4+QZnGvH{{n8N%5x^=CNJ8xJGG>`rm9p zJS#V~Q-X#5ZrotN$h9pH;dw8(lXmCnt3qp$}p&fE{9V+AzZtxN!;|DSylo z4v>ExFvcYe|7Hn)H{7hz_$$V;SSb9_uFxhDw+bP{$NbrV@GkdZslY zEz5j}k^UO-Z~gK)q-7Np<{i?h|1Q256Z+?SC_9oDvtYoKNx{NehRf?JKh6J?Nuls7 zj-l^F;_e{8;MEfq_$S@}3px*&na4L7k$}?AZ$W(d^P$FZUi zm^SxbUugXKFsj904zp(gJL&T`5&YQ*{$d0_7}>rM|B?vK zGwKS_9}~e(jNrVvuMi)eQCA3`9l=kJ;7cO-xe=WAU=|9OXV(?N+aoy7v@1m48Nqp& zLLquqN6Zhq+0ej9vzYjR;G?C1tMbl?TLfP&xa-Tp?URDv9N?c9d{2OH6+9{Zs7m24 z;~%KIH@7v`HQ?Ia@@ag$m`~IFsEChcerUwUay&L)*v7}Hevrh+$#}%5iH}qA@A92o zJ_*|9em5yLmEv?scZsjNj0eo{4nF*!#{U`a(K+UB{hdP45uL;*#{^NLC&vpx;(3}5 z=E?@!nYsqI1+H3_@aI!<52{`R3>B27_7&>V4wu~JKWkbpX~aO$0d4hbvYSig3`~d1 z-N5U3H}GJ3TeuYnLr!d5)jNcpFT|jk=U>3i?v9mRvMU)M;45|4EXS>4P7#~!%6R-R zJLb$g1s@KZb*|#?F*yBbd-SOQm)FErc?kJG6wse1?eKR3{4QySM>DV3tHDn+xSk!We6;0u%OIc& zB`iTZ)7*VYrJU_&El5auB(#5}cTo+d6}D45jk9 zDdfXQz}#i%*%m7O-3GVv{As{P<*9cA(b>u^DFh*2E;!?F<$0dLCz<$MZ1~WR%6WZ& ztDJ8$I3G2C>Ym^*J`WmtE9Y+t9?JO-Aw9yNc@+s^XxaQZ%HUR>lLTjc_$X`>=Ng=t z#(z}=|E|ILcqD!_x>uOkTkzBG`-hNT^3@9gP98MFIonDbKO3Ke1*f+%{FMK(hMq%a z#U~h?V*$md7(N`kD^8^m8uGXKyfpuG1i0p(djeeff8F3z zK~($)f|EDHenW4+?=6PD!q9)w z&~u2c@%*ZxxB1~7Lru&@&f^p`%2Djz<2Zp~b*MBhdHeD|m+?MO2VjoVJuEPWm z|iY`8*Zi-Z#pl!L5A$WcXY8ynz!xFd85K zmPi~E;M)J0VsI%Fx?-6+&oZrR9=Ws)B>#?H^y^YTlLvO$1$p$Yq;Z_+wwp^TH=ou$%7wQde z`M<;9mOu5nX~@I!f2X0h{I55-<^Ms0+j9M}2>+iOdduh62Dg0v5aBcB-(2+F_p*FW zHn=SpRf31STM=Q4xa`m-y-=XyhL`Fzme_B(zo!spY5-hRiO z2DkhlG`Qve-3b358G6hAB$*P`dQ$7d_ebzA8r;U`PJ`R{+#@){wE6byhTg{Kcxcem zgz=eea2xLF2Dka}EWyKY*BN@t=SqXy{PXV-KA$%9md_UqZu8Gw5kB8B^p?*L4Q|u* zc!bZvqjGYyd`21Ert1xYhw?ea&|5yU3~tj^8{u<~p|}0sm4=>kby{z)H#p~B6z?&7 zY<%8h@KQs6li_3Y+eZz(&2NtexQ;u17vNeh4(37=4D+Xr&nSc2@AU@32gupbTRyW4 zZok+32%i>1Z~0teaQnSBMEHEg&|5w`3~uH8P=wES484`}FAZ+_KWT6)x921LUoVru zq5P8uw{n{(cqsoVhMsQv-4`3&#`7G5TX{A___rB)%jZ&q+w^uu_ph8>!V=W%${`sa)YenSNRZUi4A>jcbemjBWS?qlQY8Oli4HRzv)7=L&11xAKJ zS-el?J*An=;xkzp!^r2#;tOS7gEFL1{vY$NiKN(y%d6XC&S%AS9cH-@D6Z=;>jPZZ zVYURguEX3K;JOa8J-~Gx2GjW+lP?^?p4YM&Glsh7b+pt?j6%xA!=K9|J6mzBQBCGA z{#qm6tcshA%x>7LpDdmR?La6|F0afy+(+-&(^SR%tv8iEIu%YmpDEn~ySC?JrG3u+ zOzG3kzP32Kd0y^^R3#&j{Ul<+p-Kig57#9SE-DB8?QHs)3)%MB~UGyH)FUM=r$H z!4Yp`sgkIBfYUb)=-&ZtSJ4Ueu@@#=i$Rjk{5n5ECEXWc9Vf)j23F}jRB}^d!adez zevJc*bkCbgfaOQ7r}d(Nu7CG6kmMkez-0$cPr0k~9`{)&4}2Y$nyoC=X>3J-if1Z} z+gHTf_Pu&bhu*rx+vtJbX68ckHwHk1-hZx=?s@PQvYH{R?jkF9TLU)qVJkMaKDu-M z=VhL+$=uDzFQghU*;i$zmO3`VtEBs_5E1r>_*A%5cm8@+K&VyWt# zdT%kjQS%a}>2iHw)B ziT=f1V3Hc|Uy@#Bxrq0Oka8?GJE?-gD3s9}c-p*_ViqV#K>#0qSjf332a0+~@ec zUnBlgDrSGcpt6z8- z8{%3m-v&S) zc}-Ui9m4(cw_!Kiz)+9MvPP(=U|p#A9;UMe2YloL4$|-(o@F6Gt|gj@FgaDv1h9)F z!wEd)4Bcqd_HVg=#nsNa_$S5H{+D~c1XM0+=ewd)Ryk+M)Ps@R&_MicdTt| zOs;BAHn(&nk4J>z3CCzE2Pc|YF6PPhRhKm;8`sx2Ha0XiOiI=?*CWJsx1-0O$yw9f z(b(2px7zzIoJ2AlBLd&so*bvrdiv&rHWkh5JovidOGa&Z2RG<=pZ{d%ZHDT-Iwv7w zjGni-n~DoC#o~c;9L)2@1YyQ{E4ue3C2Ju!2L&Z5{?tMj*YRY1X3ZX*RIwnQ(V@sQ z<#=Ndlk?C-Lj8X{z%@E*r{G@5|3+B@_)_3s)35%Qh=0z(Sd)^u?UV)ato{{VfQK+m zbbIs!PoZ+AIH-1@{uRFfn8wBX@c$bmd^VicgtRN+7-FQ?xqs`I&mk?R`oeEVI`zMf zFUExa`5wxSg^P|&x!tsFAw-ow!}4mX`b}u3wuuj`qPA-{AiNyKan^CHu)q2`lW)y z(V3*T5{O z_NQSJPsw{yY+47o5@-N=E4c`W1xzOTk?S*5JPuJY_IGKJDI%5@!YY zv+jLlqA9@tBJ{HZe7MUuBNJN!oaY{~C(Q3`4d<|kpKn1t^NbSW?+kFh7TVMF2GHBR zFxs9T3p{K~$)h5Iry}^=2tGf8pBcf=kKjDNwop9RMDVo{{E7(P6~TKVI92Tn#fN)I z3gO&KQV8c>l0rE5k`%&uK3yUFYZ07h&J?2mW(5C!1n1rdE|#EY-?D7kvT4{>;`W*> zE9Zq}Gdwz-=u`qzJWxJ`$Ta^lr3^2Vr;3Z?FkN0wBH2mwD72GFTVCOvCp#_@#$YKQc1+!hw zu-%%3ALh`U>GZJc+gRPd{}P<^Z!z?rG4xhvc$=XwGxYaH=)WJKe=I`(bcFr|L(l%z z<;dSO!^CEvjraz6A1OA|#Xf_|fv5Y>ke+=K#aVySke+>a#U~j0BMm;?&|97J>InS; zL(gxd{5cy&!}uJ9pW@36J=;9RR~mZz9WOTY(+xfM*3qbZ{97Wyy>&E-EC2T!K313V z(+01AKc)YH!L9D-9>bq)ztTTr=&ddg4@IQW_~^OH{}$jXm(hZU-*-|#@3}&MKEUaZ zX0G95)7u!(d+J1jM_|#=Vt!LTdhZ|KEg!r0hxBSb8t_s1d`a+-&jSXx@*gcsNq-7{ z%I9!{bCF5$69w1!b5AMF!T?VRex~7L%h4qUXWvWt^H3!k^0zv`y@uYFuNw@#Enl}7 zdRxA3HS|e@q2YeP(A)B2_Z->sveVGp^70+SpO1_a%?|=R>Ci;tF~i5o=Z^uskSG2U z;2QteNJa|3`!NQ$-+ivZZ8>_o!R>dc7o6Y4%3+P6w{p1J&`XqE5;g|7ye90ui#Gp% z*6_FSA1^}@&4))ye$)F86;BEt+oLo;;G=RrGr(2O=L^ng*?3-Ta2rp5Gw&fqq^?=*O&;j_Wu_B&oLxW@l-N!SMhe1qU0GJLFjz8cV< zC-gf5e7WHFNBI0apcnGQuLE4=^NitR1o!Qi$XImzI&5UBF6G`N-9nS!g_ z=tgsHfTtXqNGvyetlZui&D9eaq_gSWW$11D_zlDVP4J`X{l1~M z{g%fJ{gH@4885Q9K;D$7|PSO*RK(r>9Xzhkp{Qv8fW+%4?mi& zHye7Jt{H~jrYmjeXB$2XBJ_0;dfrb#!*q?uPvg^O=&c+sHS|^vord1Z;XMYoa`=GZ zGr@%WQA2O#@Hs1^Ooj!s@AtzzdZ>n$NTl3jp04cb z(!M}f_Bqj&g%)l4>L=GD-IbZ|_0cEPWGlUzY#J!lWEaAwn(R_%f2MS~vu`hLa`s)N zt+1gcOD4D*W&@e14hFkg)RCnoZEf%EPQ#YEvU^ZaU1*|IvJX14dObk_A3t%d_M(e3 z2EpfaWKTz=Byi@}fjY7zmlPPajhJ=@)9Bds-wQpTz39jqZAFF<>d1O5q9glEnzzvS zgsKGCSri>vuO*DTNUx;UU@Mw$A*#*%Do^9pMU=X<7Y>7>sFFG{K;daTq6M%6{_$3d zHwraW5p@ymssw{=T)PxW^?#CDg(9RARVG%9gX)InB>7Hgt9jio!~u%JTpPOcW&Ei^ zG?VcAV#IGN(aJmc?;idAGRQ2l8*uXMT{uHl+F*?c2cF@=a&&wHrQ(nePnlBqL6~WM;O4U_5R)TiAu^YgO zF5_Lnhvd@;gMKLnJW>sjkI2bh7o6D(KDtVGYwhDSvMI-o*KM0YN1uKBAA`=CKcC+y zak=~_Vg(a=Tl+xpzSXJUMKYzM)%?X(y8$`+DCRfGx2!gqRhfS)U`Lqhr_RsO{X@vq z+t9HYgn1etbE=DjEjB)o0$UowV)Jv&Fn<-^pV@?n-J z=|0C}xiSmoVwCE)8qEpKfi%_#gM;aTW3-7*XcUgg|i-)vxdjo0}bSlQP+CpRHcaliC zD(Sux-yNxD^jHI>m=$N@1+<-g!%+_T;;6G;-bGzll%fqu`l;pi2`Yf1hFA#psQetI zi#s?rara5K-p(?a#c)64MT+y?pDNk>3#4+eKE@H-X60nj|9;#~ApHRZgi6aw%IS!?(+CqAIiT!ol#SUzl= zJWGhPbpYDGhT;~!ro(u*B{tov3Tfw@z{N?^$d>v2^G^|JY5jkE#wK2fZjYe(% zmit#+?VO8$Qe5q!xIg}dUxaZ%;`#dDxo>ojkx=T`~M5-8->`sc+G(dxD~sIyWvc2)DrWJgn@S5B>| z@|Vdwby=d|n(Sz+Yi@^*ZdUshO0Ic|v*0;Y-PwWRW0gCnCF_)AhZ2c=enau;1v0B~ z<*H^V|56DV3*aqn6O;8VYgaco{omHQHt6$u$L6(bE^KU@lym`7LzyXuEppulJ`^iX z=B#4?%^gmy*s%taDBDCe^q~Km*bVA`h_R|-0<1)g*0z&DGxL=f77}(!5)sHlCglsx z@bhBHDS_wMITy=KfgH0+_XRzR$aiE)J6bxRkL{z!YZF{b+T9n(|DH=goFj9e&C}v4 zhL-xq_V&hxq$FEf_=VoS{TKuCA+xFJw2;3@l(^mrKu?%@;MdtZPnQ z)OhK-mbM0`z24aD(%0AqF6)}8v@UVcqCAkNS42l1%`Yd6fP6$M-tVQ@AZzB8`FuW} zhm+0_c(BNfk#e&)o%es^Ao=v(5m}x04Hs=b=$};Q-N`~^Mr*Wr<|Fk`&~+MM)*tPm zn?-k;B4yiEERA9>Smq&97R0mqS2(8gK9&kpFe+z? zlgnZ1U-1ioX7gBf#b1-)vb3RaVvXR*EaD&9oHa7B zA;5jUADQ3~(3;ELOHqRIw&rU0QY7KzT;3)4Njb$t>K06*G6#akQSmpI)Wb;!6!v<>XsJbe_8~e6Tye7vrnDNLg6+<@OMP;wg`S% z1ivPN$L@c4PlW!15&V`2erp8(Tm=7e1dr+L?~2er9Kj!n;M_A-=({*w{ybIw>658@ zFRJ`_5+!=-&`;-$63eW<{d7^`pE8-w)4aMru7KFPp1r#_BByK*rG0p@+V=i73a4j3 z*=gqE3Jj1;_B!_-@pn}?y?kr|fNQzu;4h_cdih@GAKL)vcdAe7KTJ8ltpVdVTy~+# z`OS^%J9u$KGiMoqV^!TL>r;upd7Zn}0+TP)_g^9U{(KV+f5!}-@xD(g{Z22RRTZoI zGW=9$;++IxSY5KKsQ7;pgdx4vt?})Nr#}pCO7GhTPe0kiYBZ7zY zeGz)r$26p8Q{da>MB+~bVHDrs-V%wI#Adpt;HUA|_KWl!n=1YWlp7k-PsLC1V+1EX z`)-P}KBgf(`&Npd8lmT2DH_sG$4}{5@6wR}>+n-t+hx+TFQND{LvO$1D#O3R(DNQ0 z8kLWK!~JRjuKceveArh}{G$f9x?eoKhKBJx1wW;K)bKyT;J-HXT)b`| z{Un2@3_eY8va|KTTtjd9uQhn3;bZp(*mT*w0XAKqHsQ)6xFr&*>(BTQ*YvtOfbq_B z*?g`#{lslP?>GF9G<;qVob)zbhZ2BcxO~)bFBF{CEQ7B!xXsVJteb{>I7C)H|3`3o zn{DvPhW?EPPa9mK4A(?rk>OKi=r1&QwZS(V+~$Y(3eI?P%&PJHgrT?cdEDTZ&p|RE zWV%v@kJV+j`RYhRZ~4zQxaHqyaLa$S;EccJf2E!1B9mD4sgInEn8=q1cl2dLry{c;-$}=tWVS3Lod@TQ~4Q}~=+TbY@&o4yy z-(%=4|9_JS4#tOZRXNNToY)+LuQ2pBKd%XJ<#UVG84BL{#MRCKEv6 zcbR7JGYoyD!7cw*!70yihW;``Z`=2)4ZUsOHye7}-+OO_{u742)`a`n2>n+Kz3o5j zF!ZH{&qIdZ_8-1u=xsauV?%G-*?vR+Cd2>thTh8OFNXd&LqAduf8h7B^oI*h`CEA& zZRo8$PmIt{i_ljZ`r}P}&M@>gKK9-S8y|abgpJQdhQFm>Z}?mKjG-TI;`3gEPcZn0 z4Idj%dq2bphW<+t`mY=QCmQQbCg`=V&Oq;V*7 zAJ1xjI^Fr?cpSuhNM=cCaZTo-+RV;AdQ11>J>3fjr;qwmRqYl3o~Gx#($Td&4W(mi zdsgH0%g%eo@02t~*F;%&YyI8CfU0|kFCA63=^$OydIiq^`g`4T&*UWW<0p`=4W7J7 ziS5!X&$PmMtk~M;Qen7W{4(n?oML$&D>myN;5)2;j~U|2UCZqk#q;r+9e}bXsyIo=`wK3O9AOsS~&-nU%R%V--r1rEZg+O_2NP}+si^Y``LwX z&X&5yq@EMPW%`;}Hn(=cEGWt?m@{W_^^#>vDrePJy8~BNH7~0dsss*gX<6HW_k4+`APB>}XZb92sHY!=XQfXHPI{YPk*sy~ZP_Mr z(EV6brdN~=wT;|uGI+|x!|%spqqv7#ulh1ycWt9Pm1l}~)G6B<5IHOkPc{jd!Fp0Ng(Ji*x>Vm=9Gg2p6JwlSk6Cp_&n|$u;T-a z*M7phlyogdv^@P2o55i(X0W=Yjw5@JzUfIz^oxJ*{y0$uCR8y^|?i)^H#a63Rg zz{?SglQhl_J+EuSsjk_BU(c#ry|$5oh*I0Sx^}O^$!|;(>Z94d*GDLf)2|)TS+sCe zs(1J%S0rA6zE=ws>L#^!w3Sc7VpiMVvn!TJQU>@*(}gE*Qerz9$TO|5o{jazmitB` z(I*ub>qmxDOeQeempBg3#GP#EphoU?m-3H^MreFOp0mf$`Cy6t~lAsC&6c65GdT41jBrqyx%AZqi8ouHe z0MoeOF>6v1{$PE%mGDu>|Dy1N2#{NO521g)hq5E(LM9d_E%9JG%yDU$ z{#ak`Mwzd;mrRTa!#7TOkEA=0`f^N8A$>4@-$Hs{ZxkGsGq&6eMel2z^F6SyI9_o1 zOg<3&zgcjpKC-wkUtulf*F>pT#(ZRrFSkW*4&UOH?q#5U*Bplzx$^}qJ)aBpf!UX{ zeOj$27XuILNb*<}!7q;B>m&Fz5&YjH_?8HMV+6lBg5Mg!Z;Rkxj^NuOIJ@2K)Ye0# zWJTTT_C|k{BTj#uGIhFFP;q^D>U}u%4*nHB&e3z)N4<~BE^BCLYFfS4saCYF!g+|R zmZ58sXm9LT)4no(EMxn!bq#Bsw#Hhgt>NB~wo?3PSYD36Py6!B7c{J^>{#J^hkAO} z$x6@sLPL7;QoNNQ3~@WQxYD7X)~-iu`$Kv=ws?=Be*>PC|4jzB>%yNBoP0_Q{q2UH zeJAC^?@YtETRsmu)W@IYMCl(Dob*Q-{3n7lT$XXA?-!i(tg94%T5!@^IqTd2>5n$_ zB~qc2o=pYQKy!G2CmjmE0nUCsO{w7IpTtk&GsV!eu2o$1Lr8DsR%7U`d=?x2RzBw# zdJZ0xKlSfuLiw~CdZt(DuQ2q-7+lYMB%fmqp2RZ^<;I^H7QTkMeIJ`nEvp#v{H>k? z$1qba;M~}Bw>uUjo%ub-rI@{Sm+ZYLH|||t`aI7HL0Zz8@73gP)jLg&3!wv#3xVy9 z3vo7f_BtEKg*Y3>g}~-yz*|tE#l z+|lXI-wvzkohf@>fsBPCX1KATm(+cfyD;qBKFr3i8$5^o7`wTdfRe69K*+7#?&Sgc zy1}{hY;xF)2TQu^F? z^o=#WWA5pHE62f;!np-bB6uo47{`WPH}JQZ18_u%#rAfa;Db2dqZT``izzI~oprIs zZeC`OE(IV}`~=7j-9?C-jQe#g-~T&oZ#D6)-_`vr(^0Z<42ZY%x563sxrt2fxEeuZ zrPBXP`t@@WUUVX^{*#=qDn`diDVHz%#~{`wJaIoNkdMgXu{>F@^34O-7jr=WHdG?` z5Qz==aeknxGBLk#WnIUrOB$0Ga=)e9BUsna(1v|<*n4N^4CYtQ#g^7ZX2JlQUgs{s zo>q6I4C<0)dUH%7w?R;NxgB{cvALC#2OUjy&B;c;`_Q-}PO-6mDcrQaznqof>DP|z zJb2#bgL+3S8MWb6*A3q!{nmf7F~5@q#G!`mkTtO}|BY;LVRX#JSLTaif-vmg(8R|4 zckvs*D7}C4ZJ0jOo`@f5gq)Bw_k@7pD1dpU9B+)5A5-L<)c?6T$UTvkM(vb5hyIfi z5a+3_(e$YQ*qDE*_)l5Scvk-k$Hx47*fE1qIaB^a8S~#L;j^D&jmBHC*qHxQp`gV> z=$}$Bgpl zm|u?cmghoa`_tfN$M#wua*iOZ3(4lZ2;LCEFN)yp5&W_UeoX|=MDTY< z@DD`rTO#-;BlzbdxEtGJP{6VMvhv9l`NR3#z7V&=!)@O1J3jmn-;XHvaX1g+x;AX4 zSkrPzqu(yEt^t=R;Le5Sm3enA6uxVrZbci(>sL3{wZXd>t>;-znCErO^iFX{f84DR zD&8$P>FpfAZ3bsur1bYka6RXrd|q$pdG84gaXWT@TyVyRb-(g|%HVd+;5oyGWmf4A zBLf&(cFy1^!5OX{vz8iqJ2y~n=-J0q{uL4W>Il8+=F{1ZiO(|hb`Ict!=F{UhO4^# zjK7@&P@R2x%higBgw@$6u6(XD;U*3KUnX43=f4g8F^2vyA)>R5=TU-(@tk7lS%+(U zPBrxQyHpu^`(55<=$(wT3}%j~Mn)RvCzBNME0 z%iO_65OD5b3vA9EurF1M_nV!4d+DvtzN_>$*qA#YzX5XxJSZ;(2gh2E*<%@X%EmbN z%sR;Ww?9x*B2&`+X2_Lin_bRedb!{MD{m3~Cux5Ld$IGA_4o&bgTboz=Z1~>i`iYJ z4PaT)^(5$YT=`aT_ff(a7>aPtn;lu-?mQK6aFlx+UVkDO!-@p_Y=k@X&_$>Fcw{x@ zkN9B%BfCm2G438QfW!~-4VRxfsrl&7q{!r6Wka&fkobU}71?3f?c?$vB=NHWo)zgr zqDvgn?WNn{Xd@od&3ANDOO>X$0Iw4yKvhJz^JXM9WK;yA5c?fIVsO4^ZZto!&>TTb z{=Wk;r?l1&lAH&Gu453oTZE2nnF!IZ{T~+(U+UOmP?_;v!u-IkSP^0A{)S&;2EHkM3zA{>d}+zeoIsaSPwe z;g{j-7y^&ZsDBn_Ye-9@c1oT@|4Eibm{xCP|26&UpJQ!4qZP;RSdI z(?qvEKlsnenerdXT$Ab=v!7{=##^!2T+`1a{z|8I=%4-M@Y|7A{qOHw)1FuR5FZuh z99MCyr}EeQ7n^IkL-cc=^=z{LVf?cW!2{_Iyt$@aPSGcRU(Pk9B>qXUIgTha2Q^M` zrBfR)xR_2n0WpQn8!B^dQb?5$w(ARHZYtz-ve5H;S;Iaq=dz@_$vRcJr-7NU#^D3? zPUZ{ly5w0diGVEgh*VQV&}A&?`YUg**U8BI@HtKxvrZ8C%v7c`mCY1b6Q_A^eoHh5Ie*CLc{us z{WHbyBM3wMDEt(Ej35ldrJLfvBnU(N|FZWk@NpJp`|zesOF-;aDT)ZPr3Yn47qyjL>hQs z{)b!xKsjt$q<{dqzz>}@s>d?5e(n#*e<&dT8HFDT zJxO}?XQqdtwNCfjUy{4DdGw z`11XYFaP-fe@8(6hbREX4}Z+zzWfsd{HX!{rvrQrB+~Gr^9jdCX?QsdKS?j1;X%WT zuD5^ca0x%_XqtySJZ8{H zxLb|+3%Xl@Yswup((p)4<`8>0AEs{5g6*Mo48>|t_6s=6PDc8@}+MZyNal<*^5 z^AeIhrErQvjQT6;i;nti0o5GgA;+A^da`l!3o_hTz8aIahsNINI=SOU-og$-COcK=C`GoGr z(&o|rM|-y;95tCEDK}*=PJ8+FW}UC?bMXPWa2OBLPpsP?AvD2BZzxR5_v0On8XbUZ zs^O7T!-meC`y_gXT%CR`ksfk+bme_a?48l&cj79^z%yjKU$*PwqRY?6ldR1X3F+5* zhI}?X1S~jr_448??I91^2=~bckaBD zh7BseBK$)xH?t(!2cRtQkr|i&9Je-SWlAr}bd7O|h#MeNqK=z`T5zJ;v0Jp26fd6GSFaqelkMqxw2Ip7es-2(WoKG~) znFP@PYG}VJb81QFtNm?ZjjsFy-6b#CnK@uEgVW1{L)@^kkze5Ga=Ixs#w%gOpg;>?f(8eLnaroBs*IB&xFO!nI;lV& zlHCEF_bshh|EaSQXC}@{oSm4pq2eK1bRyBK?#+(CFu9GbD-0=oH##%Zamnlb%S{4v z+bX8d5L}r)SW!9+wN;lbm^~jr5$+v;%rs$hbj2I03Yl!n#zD&v4&=8JSwwQx7OE@O zR#OOi{(Tk0R`lunbITD zB|QW4CD}$G`>L4|GWo>i^>up|=JfQ&Y%2~MLM2|nI@o8qoc($99n8AkB78S7Y4a2+ zOrzXvwQ+%%6v!VMkpEKdY`DJs;_`1cE+Uy(JEhi-t~?4S@^m6+Vi@mscBrW3**5DB z$?M3~fKhwox+$J6-TU2v+~L}BO0jNuX9=dbnLjq4UqW15wqzzlOTUjRIq$P2C$XvY zayrg_#^_=h?>&8RS%nekw6`&P2I7GFH~nT|qqOb-kGa8B@x6aQGI~;d?#AqcAQel$ zk9tx!W_f~DG5>w$hU|ew@=vbe%*E%C9mVDOG2f6)Q6B1{H%$3vv0>@@KCV(xHEgWT zly*tu=^8SgGUkq8%=J`kb$~)Wm|Z_C1F!|&xk!5_EOwm-KMGUw1oUU=`#4h5q zDyCufzf2k}sZ7C(2svt9SCpvl2l~*xI(VxheBz3jY zICv8=hsK$rZ^G8SUW#7BgVELNZTQd`O_yGoo%T|n_}7WAxhy}`kP3pvWl2Ujf_6*a z%K03z&dG@M?R9WFPa`8o`Vz{PDDE|vWB+QRXFYG&n6LGEN-wjOm}!1{2AeNf&@g_< zxubegnFFa0H2SdZDec4;FKC+Zs?-r(c?a$JF-R&iq%*qwTZY~o?=V?8SMZEJrMRZE zCb-)^#r`DHl;i0|W#4Ws%!ejj(d9Ss(H3iyg3@Jm@?0WCyZ2;SGYzSs9oH|K8EQHm zHmgvAb1LCW|HL>p&AZJVuDNgxz=xbxdM6w87bM|ubajkt9NfqrOwZu#QE$OYT}wq} z$M&U6l5|8~c%)BJ!Q00ta)b@p>3uWH1!A4c2eB7(nccKRmy|)>=_Fc6$;qx5j>*R% zdq`jFD?~Cv_R3%Sxc;NKX1`{5s$skIOpgDq(J0#ffv$7Z%l8-0bLE@|E?(QS_hs25 zaG0Y<`-Av`Kz!rnKGyq+wdq`;>-~XjmC;c_VsVRGmsr{7(fWFR>3EciM9=YE-8(Pd!(~WUcTLN`(Ofdh zVadwZGh+v%k-YdmFIr#B2Ws0bE`P5tae3QThORsO728)|{smKB3Tume9|+|OFZ!2p z;u7}gpb^%eP`mtLv^VVj6dX{CMZ%XIX!FR4?VV{WZ&IaG1Ft~>9^rEhYzP;@01 zqtPGk^3B@B1j;lINgE*6oTvivPB<~s5wY^W?qYHsuBZ$;QVl=9XU9S5d&ktpJJNNT z$cSWyFRgh8++&@-e4M@@8hGO^u_>Zi|AP>b^+VQx4I8U^#&$8>C{#UXc1Ktjcf>m` zxd>V2JXZ!ENpFeXTKd_NBe z+2#$lpeTJOpQ*AZ_qD!5SQJNpbvd`rB`SpH zO#ocuZGyS(hY|p(4jnstRbTFHA@2CT5zBGm?bChhhaZS2Sbwpv^{vYKL|E&*eF@9_ zp-5QPnz5eJ%Wa}%x!{kf|2G6CTZ%ulo1RK|T(PT_w%u(b>?AMQX{DGKk?UPPx*At& zkCC55y7ZcCbUP};g0|Ilja{0LgA40}@dk^D&sRa;$F?lb_U+(IRu$fZux317H;tRg z!LJu4`jf7Ib-7HFUy8iZ$PX z7>FUbiW2Q$My0FL$}tXXb+!q4PZTA>?{d|`4{&8t*>?w9d$WdgGLd?$+hVLEhg)gv z9Zc)l?>N(!iuSH~fz8j6^ucwEvKw&EuyNuxSLKvm#t*bFW9clYs$X$r&e|g&W~|H* zlyfdaTZs&aswnKB?Emwd-v~K8~m5bCH?zae@|JT*4O$vW&I+GhwtOc zw2S4Xj3r{ns@(SI*leJhzGMnY-YKZ$O@;mHLFvt7fR5OlKpncm*2mfPS~9BKOU{HF z3{Lv})cT{X{OfUF$>s}i-fo*CL>A+jO@O5^!lTwII>x;UV z_hK@N4W61d;%=@8bV0BHMrJIKedJjx!Q^nB&OSW5$DjLXWtmc1DN@U>TVx49NicJ- zbdNq%&Vcl9WpWXBH~&_VM`Yja_`loo-|Ok+$3K~+Nf+r<|6ksZQ3NF|CT* zGjQs8R-|Lj-1_zoT(AKH{@WTC@iKQwTO%%W>amqm$DH;B=ku~~X?Xvisn-?_3%(=uJ=e6>fZhNw_Ij(t_#ESxJYb|zM%(}sm=kxGI0M1CK!`LuxJ~@o% zIzxgvxmt-xEt$9xUoaXal*wwOa zaVvJc92J|gC^mn=y!o+)=Ed#YwL*5PsPBj&4E1yH-Kse*dO=I;;*Ol{FcXToI7hs3 zB&-)LhJ*zjv3A_y=<@mXW}}U!mQk@3Ws6L++2yEMl1F%(*jd0VvRFo?pl(GwXO^O| zj+J^AurZ-;8OFj^)?u8@MR^kk4W2k?zlnol69)}X3@T3y8lN1rrlfO^%LlF)kSXo$ zFCR?4``s`?J^)YM8E%f9O_R6;hrcIfB%&omY)Zt7^ zZEj%Nz_fZ6F@xs+Lf<&VxL^@xt!cRJJ^y3*TXPrs#zEZwx5t0{(y7UO?k<8!$_)XO5qk+{Fa6XCn(v#&ck zx!);X&cxw5U8a>Ef6VC?^?!|dk&8s$@PzyR!+B9d-h1&IiRCV{NSDaMc62w<;j2CQH4dNcYLh2fO8NccB9 zJmSUc2M%B1$-l?pGd=tPhx6lB8j=4H?irqCF214%4lx)#kPIXEv$$tC`SB}_$oUKI ziR-nJw13Uv<$Qn<{vObKiFyO#H&-;=!;o_7Joz7Wc+%kD)BB)ezn8-aV?FzMCu$KGiV;4?eN(i|1%Dk_=p^?8K=KzdVG%CP|w1bYp>(; zqhK1TXTIS0@+|VNcYGhe+2Q=imqz%v8GMgE{;qfYN{|0jhc|loZyau==jA`;Q0sMyn{C@)Y zrU3qn0REc*{`&y_rvUy!0DmQbyEkrpGuGO6E?zY8tr$+Z=F2zl$|LRd3-M_?zaSe! z#-h*QwtPb5GcAjj81CrE+y#wG$*tfEx^-8>IkB3VeyoxcA7JhBt4jvBYUOWfaabvK>@+{nprOzB6 zzZ%N=s zmq(i0J4~>#wJh&#ppKakncLPx@ngnES{fEDWYEVR!$`EB%lq-T2TVW4POvcU$3lPD zQnHPr$CbO02;AfBaWis2wmBqybfkr^*x-#tTo|i1N*y=BjC9b&F_Fgh28?6i{^$yP zO*hY^&)D%yDmbM>2*FSY2ncz@;x>nx{jSa4Smql)bLx4qZvpM5S@tM(V{cAIHwUA` zb8eh%k4iTm6S~9G?E&ldXm#se9k7mUB4a$okIaE>TN{otU(nvxFdtX9%@&T%!AUxF zYc|$a9}b#bx0>48%m;++3+Cb09K6Gmb_~CMVgA5$x}V!lsSOKF6$&{->>j+>34tC!_Rc`Z}o5q=WQM?{ZoE} zN+aRnoD9v=_F{0px5>AGI}}c;$Ps&A4(G{fh#NV)fsuX3gnzt+BWHPh2S;SDY2izM zw#DOPs>2xWhfL%1xipZ5VP~2O{}PX12|JoAJY4!sT>3yG@+Dp5TR_2Icl!LH$CvcI z)8V8|$4|m@pT`&Z4|%xg{|OJj!uh++!zG`*=;0C`+fU2KOTu5m2*F6a