NBSIR 78-879

EARTH TERMINAL MEASUREMENT

SYSTEM OPERATIONS MANUAL

•nLE coyDavid F. Wait

Electromagnetic Fields Division

National Engineering Laboratory

National Bureau of Standards

Boulder, Colorado 80303

Prepared for:

Commanding General

United States Army Communications Command

Fort Huachuca, Arizona 85613

April 1978

NBSIR 78-879

EARTH TERMINAL MEASUREMENT

SYSTEM OPERATIONS MANUAL

David F. Wait

Electromagnetic Fields Division

National Engineering Laboratory

National Bureau of Standards

Boulder, Colorado 80303

April 1978

Prepared for:

Commanding General

United States Army Communications Command

Fort Huachuca, Arizona 85613

U.S. DEPARTMENT OF COMMERCE, Juanita M. Kreps, Secretary

Sidney Harman, Under Secretary

Jordan J. Baruch, Assistant Secretary for Science and Technology

NATIONAL BUREAU OF STANDARDS, Ernest Ambler. Director

TABLE OF CONTENTS

Page

1 . INTRODUCTION 1 2 . BACKGROUND 1 2.1 G/T and G/T 2 2.2 Noise Equivalent Flux and Noise Ulterior Flux 3

2.3 EIRP 4

2.4 C/kT 5 2.5 Estimate of T Using Moon Measurements 6 2.6 Estimate of T^Using Antenna HPBW 6

3. MEASUREMENT INSTRUMENTATION 7 4. OVERVIEW OF MEASUREMENT PROCEDURES 9 4.1 G/T, G/T , NEF, and NUF Procedure 9 4.2 EIRP Procedure 10

4.3 C/kT 11

5. OVERVIEW OF THE COMPUTER CASSETTE TAPES 11

6. THE COMPUTER PROGRAMS 12

6.1 The Equipment Check Program 12

6.1.1 Key 1: Check List 13

6.1.2 Key 2: Check D\^/I 13

6.1.3 Key 3: Check Channel Voltages 13

6.1.3.1 Channel 0: Ground DVM 14

6.1.3.2 Channel 1: Temperature 14

6.1.3.3 Channel 2: Dew Point 15

6.1.3.4 Channel 3: +20 Volts, RF Unit 15

6.1.3.5 Channel 4: +12 Volt, RF Unit 15

6.1.3.6 Channel 5: D/A Output 15

6.1.3.7 Channel 6: Crystal Diode Voltage 15

6.1.3.8 Channel 7: D/A Reference Voltage 15

6.1.3.9 Channel 8: Power Bridge Output 15

6.1.3.10 Channel 9: Set Fine Voltage 16

6.1.3.11 Channel 10: Power Bridge vs. Fine

Reference 16

6.1.4 Key 4: Check Program Attenuators 16

6.1.5 Key 5: Graph Option: Check Power, Linearity,

and Stability of Type

IV Bridge 17

6.1.6 Key 5: Table Option: Check Power, Linearity,

and Stability of Type

IV Bridge 17

6.1.7 Key 6: Noise Add Test 17

6.1.8 EQUIP CHECK Annotated Printout 19

6.2 The Loader Program 28

6.3 The Site Preparation Program and Annotated Printout 28

6.4 The MEAS Program and the Summary Data Tape 36

6.4.1 The Standard Check, and Providing the Proper

Measurement Conditions 36

6.4.1.1 Meaning of Labels, and Normal Conditions 36

iii
- ' Page

6.4.1.2 Adjusting STD CK 37

6.4.1.3 "Not Normal" Display 38

6.4.2 Establishing the Antenna Biases 39

6.4.2.1 Finding the Star 39

- • - 6.4.2.2 What to Do if You Cannot Find the Star 40

6.4.3 Sky Profile 41

6.4.4 The G/T Measurement 41

6.4.5 The EIRP and C/kT Measurement

42

6.4.6 Data Storage on the Run Tape, and the Summary Tape 43

6.4.7 Changing the Run or Summary Data Tapes 43

• 6.4.8 The Use of the Special Function Keys 44

6.4.9 MEAS Annotated Printout — 46

6.5 The REWORK Program 70

6.5.1 General Information 70

6.5.2 Entry into the REWORK Program 71 - - -'6.5.3 Data Tapes and Data Statements ' 71

- •• 6.5.4 Deleting Data and Refitting Results 73

-~ 6.5.5 Typical Rework Procedure —• 74

• 6.5.6 Interpretation of Results 75

6.5.7 Measurement Pitfalls 77

6.5.7.1 Extending Results Beyond Measurement Range— 77

6.5.7.2 Abnormal Atmospheric Conditions 77

6.5.7.3 Data Deletion 78

6.5.8 REWORK Annotated Printout 78

6.5.9 Documentation of Final Results 109

7. COMPUTER PROGRAM CONSTANTS 112

7.1 Variable List Alphabetical by Variable 113

7.2 Matrix List Alphabetical by Variable 120

7.3 Function List Alphabetical by Variable 126

7.4 Variables List Alphabetical by Meaning 131

7.5 Matrix List Alphabetical by Meaning 138

7.6 Function List Alphabetical by Meaning 144

8. COMPUTER PROGRAM LISTINGS 149

8.1 X - SUBROUTINES 150

8.2 E - EQUIP CHECK 157

8.3 A - LOADER 175

8.4 B - SITE PREP 186

8.5 C - MEAS 210

8.6 D - REWORK 235

ACKNOWLEDGMENTS 260

REFERENCES 261

iv
EARTH TER>IINAL MEASUREMENT SYSTEM

OPERATIONS MANTJAL

David F. Wait

The Earth Terininal Measurement System (ETMS) was developed by

the National Bureau of Standards to make accurate measurements of

earth terminal and satellite parameters such as figure of merit

(G/T), antenna gain relative to a reproducible reference level,

satellite effective isotropic radiated power (EIRP) , and ratio of

carrier power to the operating noise temperature (C/kT) . Because

of difficulties of using the standard earth terminal parameters to

precisely characterize the earth terminal, the parameters noise

equivalent flux (NEF) and noise ulterior flux (NTJF) are introduced.

NEF characterizes the earth terminal hardware, and it is defined so that it is largely independent of frequency and antenna elevation

angle. Thus, it is easier to evaluate the "reasonableness" of a particular set of results in light of the other results taken at

various frequencies and elevation angles. This manual includes the

theory of the measurem.ents , measurement procedures, measurement

troubleshooting, interpretation of the results, and a discussion of

the ETMS software.

Key words: Earth terminal; effective isotropic radiated power;

figure of merit; measurement procedure; noise temperature; satellite communication.

This manual describes the operation of the earth terminal measurement

system (ETMS). It includes the theory of the measurem.ents that are implemented

on the ETMS, the measurement procedures, the m.easurement troubleshooting, the

interpretation of the results, and a discussion of the ETMS softX'7are. This

manual does not include details on connecting the hardware, on hardvrare maintenance, or on hardware troubleshooting. These topics are discussed in the companion ETI'IS maintenance manual [7].

The radio star Cassiopeia A (Cas A) is used as a calibration source [1] for

the measurements described in this report.

1. INTRODUCTION

2. BACKGROUND
~ 2.1 G/T and G/T

a

To determine G/T, the ratio (Y) of the output noise power when

the earth terminal antenna is pointed to Gas A to the output noise power when

the antenna is pointed to the nearby cold sky is measured.

- Y = (AT^ + T)/T , (1)

where AT is the temperature rise due to Gas A at the antenna output port, and

L<3. S T is the system temperature expressed relative to the antenna output port. The

temperature of the cold sky is included in T. The temperature rise caused by

2 the star depends on the flux density of Gas A, S (W/m /Hz) [2], and on the

2 Cas

effective area of the antenna A (m )

,

where S = (3154)e ^''^^^''^

(f /1000)°'xlO~^^, x = the number of years 9ince

1965.0, a = -0.792 + 0.0012t, f is the frequency (Hz), k is Boltzmann's con-

-23

stapt, (k = 1.38046 x 10 J/K) . The various k^'s are defined by Daywitt [3],

k^ is the atmospheric transmission correction factor, k2 is the star shape

correction factor, k^ is the bandwidth correction factor, k^ is the differential

system temperature factor, k^ is the antenna pointing correction factor, is

the polarization factor, and k^ is the system response correction factor. The

factor 1/2 in eq. (2) accounts for the fact that only one polarization of radiation can be received from a star at any one time. If the antenna is reciprocal,

then '

. . \.; " A^ c^G/(47rf^) ^3)

where G is the antenna gain, c is the velocity of light (2.99793 x 10 ra/s), f

is the frequency (Hz), so

'

AT_ = G

Gas Gas

2
where ? = k^k^-'-k^ S/(8^kf^) . (5)

For the measurements included in this report, power is measured relative to a stable and reproducible noise add reference signal, T , so

Si

Combining eqs. (1) and (4)

G/T = (Y-l)/C (7)

or expressed in decibels above one inverse degree kelvin,

G/T (dB/K) = 10 log^Q G/T . (8)

2 . 2 Noise Equivalent Flux and Noise Ulterior Flux

The figure of merit (G/T) for an earth terminal has several shortcomings

for the precise characterization of an earth terminal. First, it neither

characterizes the hardware, nor the hardware plus atmosphere, because the

atmospheric effects are excluded from the antenna gain (G). part of G/T, but are included in the system temperature part. Secondly, the noise performance of

subcomponents of an earth terminal is characterized in terms of an effective

noise temperative (or noise figure) and a gain/loss which obey familiar rules of

combination. In contrast G/T has more complex combinational rules which are sometimes confused with the more familiar rules.

Thirdly, earth terminal noise characteristics and efficiency are largely

independent of frequency while G/T is a function of frequency squared. Thus, if an earth terminal is being characterized at several different frequencies, it

becomes somewhat more difficult to identify an abnormal measurement when using

G/T as opposed to the use of a parameter that is not frequency-dependent.

Lastly, inclusion of the atmospheric component in G/T makes it very difficult to

determine the "reasonableness" of a set of results. That is, with small sets of

data it is important to be able to judge whether the end points are valid. A

reasonable change in hardware characteristics is much easier to estimate than

3
changes in hardware plus atmospheric effects. To avoid the above problems, the

parameters Noise Equivalent Flux (NEF) and Noise Ulterior Flux (NUF) are introduced .The Noise Equivalent Flux (NEF) density is a measure of the noise performance of the earth terminal analogous to effective input noise temperature for an

-2 -1

amplifier. NEF is the ideal white, random noise flux density (wm Hz ) incident normal to the aperture of a noiseless equivalent earth terminal such that

the output noise power equals the output noise power of the actual earth terminal. In terms of NEF, the Y-factor (eq. 1) is

Y = (k •••k^ S + kT , /A + NEF)/(kT . /A + NEF) (9) 1 7 cas sky eo sky eo ^

^

where k •••k , S , and k are defined as in eq , (2), T , is the noise power

J- / CSS Stcy

originating from the atmospheric losses along the antenna boresight, plus the

three-degree kelvin cosmic background temperature, and A^^ is the antenna effective area at the antenna aperture (i.e., no resistive antenna losses included).

Boltzmann's constant, k, and the antenna effective area, A , are used to convert

'^sky ^° ^ power density expressed in watts/meter . Rearranging eq . (9),

NEF = k.k_...k_ S/(Y-1) - kT , /A . (10)

. , ^ 12 7 sky eo

If the atmosphere is included as part of the earth terminal, the corresponding

noise equivalent flux is denoted NUF, or the noise ulterior flux density to

emphasize that the input reference plane to the earth terminal is beyond the

upper atmosphere.

NUF = k„---k^ S/(Y-1) - kT /A (11)

z 7 cosm eo

where T is the 3K cosmic background temperature, and no atmospheric absorpcosm

tion factor k^^, occurs.

2.3 EIRP

To measure satellite power, note that the power change, C, (watts) due

to the carrier power at frequency f^ at the output port of the antenna is

4
C = W A

o e (12)

2 where W (W/m ) is the flux incident on the antenna. The flux incident on the

o antenna depends on the effective isotropic radiated power (EIRP) from the satellite and on the slant distance from the satellite to the earth terminal antenna,

d(m),

W = k' kl kl k' k' k' k; EIRP'/(4Trd^) (13)

o L A 6 h D b 1

where the k!^ correction factors are similar to those in eq. (2) and are described by Daywitt [4], and the prime on EIRP' is a reminder that the EIRP

depends on the angle between the boresight direction of the satellite antenna

and the direction to the earth terminal. This difference in boresight EIRP

and EIRP' is an antenna pointing correction factor known as the tilt differential.

Rewriting eq. (13) using eqs. (3) and (12),

EIRP = L(C/G)/ (kj...kp (14)

2 where the space loss L - (4TTdf/c) . For measurements in this report, powers

are measured relative to a noise add reference, T , hence, C = kT B[y -h{y +y , )

]

Si 3. O T and

EIRP' = LkB[y -1/2 (y_+y ) ] /{ (G/T ) k'-.-kL} (15)

O ~T~ 3 J- /

where k is Boltzmann's constant, B is the receive noise bandwidth of the Earth

Terminal Measuring System (ETMS), y^ is the power relative to the noise add

power when f^ is centered in the measurement pass band, y_ is the power relative

to the noise add power when the frequency of the band pass is lowered so that

none of the f^ power is in the measurement pass band, and is the power relative to the noise add power when the measurement band pass is just above f^.

2.4 C/kT

The measurement of C/kT (ratio of carrier power to the operating noise

temperature per hertz) differs from the other measurements in this report in

5
that no flux standard such as Cas A is required. Traditionally, there is

accepted ambiguity between the parameters G/T and C/kT in that the symbol T is

used differently. The T in G/T refers to the noise of only the earth terminal

and is called the system noise temperature (SNT) , while the T in C/kT refers to

the operating noise temperature (ONT) of both the earth terminal and the noise

being broadcast by the satellite. In terms of the symbols in eqs . (14). and (15)

C/kT = .1 l/2(y_+y^)

(16)

2.5 Estimate of T Using Moon Measurements

The moon is an extended source (large relative to the antenna beamwidth)

for an AN/FSC-78 or AN/MSC-60 earth terminal. The temperature rise in the

antenna output due to the moon is the physical temperature of the moon diminished by the losses which occur between the moon and the antenna output port.

' moon

= k^ n , n, (T - T ) (17) 1 rad bm moon cosm ^-^'^

where k, is the atmospheric loss, n , is the radiation efficiency of the

1 ^ rad

antenna, and is the fraction of the antenna radiation pattern which "sees"

bm

the moon. To the extent that the right hand parameters in eq. (17) are known,

the moon provides a signal of known amplitude in the earth terminal which can be

used to calibrate T , and thus antenna gain.

a

°

"' 2.6 Estimate of T Using Antenna HPBW

^ a

The calculation of T from HPBW in the REWORK program involves several

a steps. First, the measured antenna HPBW and G/T^ are least squares fit to a constant plus cosecant of the antenna elevation term. The zenith fit values for

G/T and HPBW are used for the subsequent calculations for T . The zenith HPBW

a a value is corrected for the effect caused by the finite size of Cas A. Then the

antenna gain, G, is calculated using the following empirical equations relating

aperture efficiency, n , HPBW(min), antenna diameter (ft) , D, and G.

n =n ^/(HPBWxDxF/3035)^ ^^^^ apr rad

6
where n , is the radiation efficiency (assumed to be 0.98), and F is the

rad

frequency in gigahertz.

G - n,^^ (DF/0..313)^ . (19)

Using the zenith value for G/T , and the empirical value for G, the magnitude of

T is calculated,

a

3. MEASUREMENT INSTRUMENTATION

The measurement of the pertinent power ratios is accomplished using the

Earth Terminal Measurement System (ETMS). The ETMS is an automated measurement

system developed around the most accurate power measurement bridge known—the

NBS type IV self-balancing bridge [5]. This bridge as implemented in the ETMS

measures the ratio of stable noise powers to an accuracy of less than ±0.1%.

A simplified block diagram of the ETMS is shown in figure 1. The ETMS

contains eight subsystems: (1) a calculator which provides computation capability, a means of controlling each of the remaining subsystems under automatic

sequence control, a means of storing the measurement results on magnetic tape in

order to rework the data at a later time, and a keyboard to control the measurement procedures or to enter program modifications; (2) an NBS type IV selfbalancing power bridge used to measure noise power; (3) a programmable voltmeter

whose accuracy is a major factor in determining the accuracy with which the

noise power is measured; (4) a multiplexer which connects the digital voltmeter

to various measurement points of interest; (5) a digital clock needed to provide

time information required to determine current star coordinates; (6) dual X-band

solid state noise source to provide a stable reference signal needed to eliminate the effects of gain fluctuations in the earth terminal; (7) an external

cassette which allows redundant recording of measurement data; and (8) an rf

control unit which provides signal conditioning, system test signals, precision

programmable attenuators, signal monitoring, alarm circuits, and interface

circuits which allow the calculator to control the various measuring instruments.

7
LiJ a: h- or: ^ UJ

\— 1—'LU (— ct O UJ CC oS Q_ s: UJ <C

Q- 3 S LU o

UJ

Q

1— > o

ZDQ o ce _i cr oiV

CO T

UJ

I—

UJ

CO q: <:

UJ o 1— <c

ss :

DA TOR

U_ CJ O O

O

CJ

•U

CO

Pi

cu6

QJM

cn

CO S

0)C

•H

0) H

^'uuw

0)

4-1

M-lO

f3^

bO

n3 •H^Oo

0)

00 •H

X 8
4. OVERVIEW OF MEASUREMENT PROCEDURES

The measurement procedure can vary with the measurement to be performed, so different procedures will be discussed separately.

4.1 G/T, G/T , NEF, and NUF Procedure

Si

The G/T, G/T , NEF, and NUF are measured in the same procedure. Antenna

3. gain is not measured directly because there is no access to the antenna output

port. The output level of the reference noise source is calibrated but the

signal which is coupled into the front end of the earth terminal and referred to as the noise add signal, T , is not known accurately because the coupling coefficient of the directional coupler is unknown. The magnitude of T^ is known

approximately from antenna HPBW and moon measurements.

The measurement procedure contains seven steps. First , prior to arriving

at the measurement site, the date of the measurement, the earth terminal's site

coordinates, antenna diameter, aperture efficiency, radiation efficiency, operating frequency, bandwidth, and approximate G/T are entered into the computer

program, and the expected measurement errors are printed, the star positions

versus time are plotted, and the resulting data are stored onto a data cassette

to be used at the measurement site. Using this information, the on-site measurement schedule is planned. The second measurement step is at the measurement

site. The reference noise source is connected to the directional coupler in the

antenna room, and the output from one of the earth terminal down converters is

connected to the ETMS. A system check and an earth terminal system stability

check is then performed. Thirdly , offset corrections for the antenna pointing

are determined, and sky profiles (sky temperature versus antenna elevation along

the star trajectory) are established. The fourth step, measurement data for

G/T, G/T , NEF, and NUF is taken. A measurement set contains six cuts. For a a cut, the antenna is pointed to a computed coordinate position; then a string of

power measurements (typically 30) relative to the noise add signal are taken

6 seconds apart. One cut is taken on the cold sky about 2 degrees away

(in declination) from Gas A. The remaining cuts are spaced equidistant

throughout the main beam of the antenna pattern, and selected data points

are least squares fit to a two-dimensional parabolic curve. The parabolic

curve fit is used because it is the fit that requires the least computation

time and computer memory yet still provides the needed antenna

9
pointing correction information. The data are stored and G/T, G/T , NEF, NUF

3. antenna half power beamwidths (HPBW) , and updated antenna point offsets are calculated and printed out.

The fifth step of the procedure is the first level rework of the data.

Each set of data (which consists of 6 cuts) is refit to a two-dimensional

gaussian curve, and the resulting G/T, G/T , NEF, NUF, and HPBW for each set are

3. plotted as a function of antenna elevation. The gaussian curve fit is much

slower than the parabolic fit, but it is a better approximation to the true curve shape. The gaussian curve can be used to fit the entire drift curve and

thus allows a direct measurement of the relative temperature change caused by

the star, AT /T , without depending on sky profile measurements made at a

C 3.S 3. different time. This direct measurement of AT /T using gaussian curve

C3 S 3

fitting is immune from errors caused by tlirectional dependent interference

sources. The sixth step is to use the results of the first level rework to

readjust the computation parameters and then to perform a second level rework.

The seventh step is to delete any bad measurement sets and perform a third level

rework which plots the results for the remaining measurement sets. The eighth

and last step is to take the results from the last data rework and to enter them

into the program used in step one which lists all the program assumptions and

the resulting errors. The purpose for step seven is to reexamine the assumption

and to record explicitly the conditions of the measurement.

' ' " - - 2 EIRP Procedure

The EIRP of a specific frequency from a satellite is measured in three

steps. The first step is to measure G/T^ as a function of antenna elevation as described in section 4.1. Secondly , a narrowband filter in the ETMS is selected

and the power out of the earth terminal patch board is measured both in milliwatts and relative to the noise add reference for four situations: (1) the

antenna pointed to the cold sky near the satellite, (2) the antenna pointed at

the satellite and the earth terminal down-converter tuned to the satellite

frequency of interest, f^, (3) same as (2) except the down-converter tuned to

the noise floor at a frequency just below f^, and (4) same as (3) except at a frequency just above f^ . The EIRP is calculated using eq. (15). For each

measurement situation, repeated measurements are taken to obtain a sense of the

repeatability of the power level.

10
4.3 C/kT Procedure

C/kT is measured at the same time as EIRP, but also may be measured separately. The first step in the EIRP is not used for the C/kT measurement but

the last two steps are used, and the results of the power measurements are entered into eq. (16) for the calculation.

5. OVERVIEW OF THE COMPUTER CASSETTE TAPES

The ETMS has eight computer tapes, (1) the equipment check (EQUIP CHECK)

tape, (2) the site preparation program tape (SITE PREP), (3) the measurement

program tape (MEAS), (A) the summary tape, (5) the rework program tape (REWORK),

(6) the comments tape one which includes the list of simple computer variables

and meanings, (7) the comment tape two containing the program matrix variables

and meanings, (8) the comment tape three containing the special functions and

meanings.

The major programs EQUIP CHECK, SITE PREP, MEAS, and REWORK can be loaded

using a single cassette tape for each. This is made possible by duplicating

certain files.

On the first three tapes each contain an identical file of subroutines,

denoted as program "X." The rework tape also contains many of the same subroutines found in "X." Three tapes, SITE PREP, MEAS, and REWORK each contain

star, site, and equipment characteristics information filed in the matrices S,

T, and N. The EQUIP CHECK tape contains the matrix N file. Three tapes contain

very similar files denoted LOADER used to load the "X" subroutines and the S, T,

N matrices and the main program on that specific tape.

Each program (i.e., LOADER, EQUIP CHECK, SITE PREP, MEAS, REWORK, etc.)

contains a position in the computer program that will be referred to as "The

Restart Alternatives Position" (TRAP) . On every program tape one way to reach

TRAP is by pressing Key 0 (denoted f^ on the upper right hand set of program

keys on the computer keyboard) . This is the point on each program tape where

the operator can choose the major options available on the program. This

restart position is usually the position in the program where the computer stops

when a task has been completed. Going to TRAP via Key 0 normally clears all of

the adverse internal computer flags, etc., sometimes set up when a computer

error is encountered.

11
After loading the SITE PREP program, either the MEAS or the REWORK programs

can be loaded from TRAP without using LOADER or reloading the subroutines and

the S, T, N matrices. Similarly, REWORK can be reached from TRAP in MEAS.

••

• The summary tape is used in the external cassette at the same time either

MEAS or REWORK is used. The summary tape collects duplicate measurement data

when used with the MEAS tape. When used with the REWORK tape, the summary tape

is the source of measurement data being reworked and the tape upon which the

results are stored. In contrast, a MEAS tape is inserted for each data run;

and, at the end of the data run, the measurement program and the measurement

conditions are stored, the protect tabs are removed, and nothing new is ever written on it again. That is, the summary tape is a working tape, and a MEAS

tape is an archives tape.

6. THE COMPUTER PROGRAMS

Following are a brief description of the purpose of a particular program

and comment about the key structural elements of the program. These comments

are then followed by an annotated computer printout.

The purpose of the annotated computer printouts is to provide comments and

instructions in a terse form for the operation of the various computer programs

and to display the normal responses to the computer-generated questions. In the

context of the computer printout, some instructions are easier to locate, and

the meaning more obvious. Keyboard entries, which can be deduced from the

printout, have no special notation on the printout. For example, the demand for

a keyboard entry is indicated by a question mark, so the entry after the question mark is the keyboard response. If there is no obvious response, the

response is a space bar followed by execute, which is the standard response when

the value of the parameter currently in the computer memory is satisfactory and

no change is desired. Keyboard questions that are needed but are not obvious on

the printout are indicated with an asterisk, followed by an explanation of the

operation performed.

6.1. The Equipment Check Program

The purpose of the equipment check (EQUIP CHECK) program is to validate

that the ETMS is operating satisfactorily after being transported, to establish

the operating points and characteristics of the earth terminal, and to collect

12
historical information concerning normal operating conditions to aid in diagnosing which element of the system has failed.

At TRAP (e.g., via Key 0) normally the "1 = AUTO CK" option is selected.

The "0 = KEY LIST" option prints the list of manual tests that can be selected

using the various program keys. The manual operations allow a selection of

graph scales, or measurement repeat numbers, etc. that is not available with the

"auto CK" option. In the AUTO CK all the pertinent tests are performed in

sequence with ranges and scales preselected. The various tests are discussed in

the following paragraphs.

To execute a single test manually, enter TRAP to remove the AUTO CK flag

(F2) , then press the appropriate special function key. Additional information

concerning the equipment check is contained on the annotated computer printouts

in section 6.1.8.

6.1.1 Key 1 : Check List

The check list sequentially lists the nominal settings and conditions that are required for the normal operation and test conditions of the ETMS . In the

AUTO CK option, there is an opportunity to step over the check list. The stepover would be appropriate if the operator has already performed the check list once and is redoing the AUTO CK to determine if the ETMS has stabilized.

6.1.2 Key 2: Check

The purpose of this routine is to verify that the digital voltm.eter (D\^l)

is obeying the computer commands properly. The ET>iS control unit sends a com- mand to short the input to the D\^I and change scale etc. The calculator display

indicates the appropriate response, and holds this command condition until the

operator presses some key - e.g., the space bar follov;ed by pressing the "EXC"

key. If the TiVl-l fails to perform properly, check that control cables between

the "ETMS Control Unit," the calculator, and the D\'M are secure. If this does

not solve the discrepancy refer to the maintenance manual.

6.1.3 Key 3: Check Channel Voltages

The purpose of this check is to verify that the various power supply

voltages are correct, and that all of the multiplexer comimands are being prop13
erly executed. This program sequentially selects the multiplexer channels

starting with channel zero, then reads the voltmeter, prints out the results,

compares the voltmeter reading with nominal conditions, and prints out "NOT

NORMAL" for the channels which are outside the expected range for stabilized

operation of the ETMS. When the equipment check is right after the equipment is

first turned on (as it should be), several of the channel checks typically

indicate not normal. More will be said of this in the following detailed con- siderations of the channel voltage checks. If a channel voltage continues to be

out of normal range after three hours, unless otherwise indicated below, check

that all the cables are connected properly, then consult the maintenance manual.

6.1.3.1 Channel 0: GROUND DVM

When the ETMS has stabilized, the output of the DVM with its input grounded

should be zero within 10 ^ volts. It typically requires three hours' operation

before the voltage is consistently within tolerance. If the voltage is not

within tolerance after three hours' operation, the DVM should be rezeroed using

the zero set adjust on the front of the DVM. To ground the DVM, one can either

stop the program mode by pressing the "end" key, then use the keyboard entry

FNX 111, Exc, or enter the control code 111 (binary number 110 1111) into the

program switch keys on the ETMS Control Unit and press the "load" switch. For

the adjustment, the DVM is taken out of program control via the "program control"

button on the DVM front panel and switched manually to the most sensitive voltage

scale, and the "external rate" knob rotated full cw. After the adjustment, the

"program control" button must be returned to the in position, and the "external

rate" knob in the full ccw position.

. , , ^

' ., 6.1.3.2 Channel 1: Temperature

' If the remote temperature probe is connected, the Channel 1 voltage reading

is the probe temperature in Fahrenheit [8] divided by 100. The indicated temperature should immediately be within 3 degrees of the temperature as registered on j the standby manual temperature/relative humidity meter, or as displayed by the

temperature readout on the temperature/humidity unit. If the remote temperature ; probe is not connected, then the Channel 1 voltage is not important.

14
6.1.3.3 Channel 2: Dew Point

If the dew point sensor with its lithium chloride bobbin is installed

according to the site set-up instructions in the maintenance manual, the voltage

in Channel 2 is the dew point temperature divided by 100 as indicated by the dew

point readout. The dew point reading will not be accurate for at least 30

minutes. The dew point detector will not function when the outdoor temperature

is below freezing. The relative humidity calculated from the dew point reading

should agree with the relative humidity reading on the standby manual temperaturerelative humidity meter within about 10%.

6.1.3.4 Channel 3: +20 Volts, RF Unit

Channel 3 monitors the primary power supply in the ETMS Control Unit which

powers the two 10-200 MHz signal amplifiers. Check the J355/665 cable, or consult the maintenance manual.

6.1.3.5 Channel 4: +12 volt, RF Unit

Channel 4 monitors the power supply/reference voltage which powers the

simulated noise add sources.

6.1.3.6 Channel 5: D/A Output

Channel 5 monitors the programmable stable offset voltage used for the NBS

type IV power bridge.

6.1.3.7 Channel 6: Crystal Diode Voltage

Channel 6 monitors the crystal diode voltage. The crystal diode voltage is

used to activate the power alarm circuit which is used to protect the thermistor

power element in the NBS type IV power bridge. The crystal output is a negative

voltage proportional to the incident power.

6.1.3.8 Channel 7: D/A Reference Voltage

Channel 7 monitors the precision voltage which determines the accuracy of

the digital voltage to analogue voltage converter which is used as the precision

offset voltage needed in conjunction with the NBS type IV power bridge. If this

15
voltage is not normal, check

the maintenance manual.

the operation of the digital voltmeter or consult

6.1.3.9 Channel 8: Power Bridge Output

Channel 8 monitors the voltage across the NBS type IV power bridge. This

voltage requires about three hours to stabilize to within ±0.2 volts.

. , , 6.1.3.10 Channel 9: Set Fine Voltage

Channel 9 sets the precision digital offset voltage used to buck out the

voltage across the NBS type IV power bridge. This bucking voltage is used to

improve the resolution of measuring the small change in voltage caused by the

microwave power changing the resistance of the power sensing thermistor. The

magnitude of Channel 9 is approximately 1/10 of the Channel 5 voltage.

6.1.3.11 Channel 10: Power Bridge vs. Fine Reference

The Channel 10 voltage is the power bridge voltage bucked near zero by the

precision digital offset voltage as set using a Channel 9 command.

6.1.4 Key 4: Check Program Attenuators

The purpose of this test is to verify the proper operation of the program

attenuators, particularly for measurements of EIRP or C/kT. In addition, the

measured value of the standard attenuation is measured over a 16-dB range. This

check is one of the checks of the linearity of the ETMS measurement system. The

repeatability of the measured values is printed out, as is a running printout of

the drift in the absolute power level throughout the duration of the test.

Thus, besides testing the attenuation steps of the programmable attenuator, this

test also indicates short-term, and moderate-term stabilities of the ETMS and

ETMS internal noise sources. If a record of the earth terminal short- and

medium-term stabilities is desired, instead of using the internal ETMS noise

source, the earth terminal with the ETMS microwave noise sources can be connected

as the test signal.

16
6.1.5 Key 5: Graph Option:

Check Power, Linearity, and Stability of Type IV Bridge

This check is a similar check to the last check except the results are presented graphically. In this check three measurements of the attenuation of

the standard attenuator are averaged together, and the mean and standard deviations are plotted. The initial power level of this power ratio test is varied

over a 16-dB range. Any nonlinear ity of the type IV power bridge, or unusually

noisy measurement conditions are easiest to spot on this graph. The magnitude

of the nonlinearity may also be identified on the Key 4 or Key 6 tests. Any

failure of the standard attenuator, or of the relays which switch the standard

attenuator in and out are most obvious in this test. If a power supply becomes

very noisy, it can show up as a change in nonlinearity (i.e., a change in the

change of the value measured for the standard attenuator versus input power

magnitude)

.

6.1.6 Key 5: Table Option:

Check Power, Linearity, and Stability of the Type IV Bridge

A second option of Key 5 is to print out the key bridge voltages for

repeated power measurements. If one of the multiplexer relays fails to operate

correctly, the identification of which relay is malfunctioning is often obvious

from which measured voltage value becomes unstable.

6.1.7 Key 6: Noise Add Test

This check is designed to check the operation and stability of the noise

add sources. When the ETMS input is connected to the internal noise add sources,

it checks the amplitudes and stabilities of the internal noise add sources. When the ETMS is connected to the earth terminal, this test checks the magnitude

and stability of the microwave noise add. Information on the stability of the

earth terminal also is recorded.

The power of the system noise, the power from noise add #1 and noise add

#2, is printed out before the stability test begins. If one of the noise add sources is not functioning, this will be obvious here. In the main printout,

the power measurements and power ratios are printed in the first row, and the

standard deviation of the measurements are printed in the second row.

17
The power ratios listed in the five right-hand columns of the test should

be independent of initial power level. In particular, the ratio of noise add #1

to noise add #2 at a particular frequency should not change significantly over a long period of time. If it does, it signifies that one of the noise add sources

is drifting or is becoming unstable. An unstable noise add source introduces an unnecessary measurement error and needs to be corrected.

18
6.1.8 EQUIP CHECK A^TQTAIED PRINTOUT

£QJ i F' C HECK ^

RUN

KEY 0: RESTRRT

KEY l: CHECK LIST

KEY 2: CHECK DVrl KEY 3: CHECK' CHfiHMEL VOLThGES

KEY 4: CHECK fiTTEHUSiTORS

KEY 5: CHECK PWR, TYPE I¥ & STTEH STABILITY

KEY 6: CHECK HOISE fiDD STftBIi-ITY

iKEY ?il CHflHGE STflHBflRD hTTEHUhTIH VALUE

KEY ?: HEW FREQ? Bl-I. IHPUT fiTTN? SIHL SThR HOISE

X'f/ FUfJTi'^ CAU A'flt/ ^ Sro Attv i/alvs. CHaj^/i£[^

e=KEY LIST, i=HbTO

STE< fe.lStD dBK

STEc fa. Illy dBX

STPc &,1172 dBK

CKC -NC>: 1 =NC>: 4=0S@O

=NC>: 4.035e

?STB< 6.1003 dBX =HC^; 4,8733 ?4.03

Y4.085

?4.e9

tX IT

19
EQUIP CHECK (cont)

'J 'M. U=M lV L 1ST:. 1 ^^HilTf: a--

10 i„ i-iEl I- L... i r . Ir.T! -

s mC pnr iw i. n:!:.;,-:: o\v-' Lht.Fi; E:^:T PmiE Fi.'l.L fCi.r> LRhFi: DFiTH liUrPnr uUTTOil Irl'?

rihr;r'|t: PEOGEtM'i i:0.iTEriL EiiTTON IN"'' F F' : i : \ I "i" ; B fi \ i ;j i i > : . F- P E Q \? 5 . j I .

" ?' 0 II i-! z '

;

F'F 'JHIT: f\TU..\\ T TO 17 .JB'"' F'F UiilT: SIi; -Hi- hiOI'iE 0 3. '5 d&'"' PF UNIT: METER PHFiGE Kl'?' MOI'JE SOUR EE C OHriEETEIi TO RF IIIPUT"' RF Ui-JIT: OUTFUr METER 0 -5.5 dB'? CLOEF; UNIT: SET DfiTE':' FLOCr; UNIT: SET GMT TIME'''

EliL

0 -Vo^xyfr.t ^^-yfrvu-t^ ^

-

•76 1024 21.

M E; 1 E . 1. 2 : D 5 - F Ei ; £ Q U I

F' G H E G F T 1 - F 0

:

SviiVi # 6.89

PROG KEY 2:

:-;,u5 <rii-4> T2-4

:HEGK IiIGITfli.^ FiUL I IMETEE

;:UH 8

Iivri ^UJMC i I on 1 1 1 1 : FILTER OUT"' DVU FUi-IGTIOM i .,,0: FILTER iflv' U^OO VOLT RFIHGE

]08 ','OLT RFli-lijE

RRHGE # 0 I: EG Pl -'''ES 1

RhMGE # i ^ FE G '?\ OlES 3

'UL.T RFiNiiE

1 VOLT FHNGE

8. 1 VOLT ROMLiE

OLFFO-VOLl RhMGE

RFlMGE # 2

RFirlGE tt 3 DEG PL fil e

bU' PLi'n:../:: 4

PRNCE # 4 DEG PI 01 FS F

RRMGE tt

;'

Ehji

20
EQUIP CHECK (cont)

NBSie.iS <D5-Fj [T r Dl-4> 12-4

PROG KEV 3: CHECK CH9NHEL VOLThGES

ETHS 5£Klf<L /Ja chhhhel vOLTRGE sthtus NOMItiHL T

e=SC OFFSET 0

-

vk: e 1. 0ee88E-85

l=TEf1P e. 74184- 8.5 8.

2=BEi4 POINT e.4312 - f3.l3 F. 8.5 8. ir

2=-*-2e VOLTS 20 . 0 1

9

28- 8. 'd i=+i2 VOLTS 11.9S7S 11.9 0. 1 s^dhc output 4.8326 Ok 4.S333 e. 82

t=KTHL DIOBE 1.71fc80E--83 OK -8.8135 8. 8125

?=D H REF 23S7 OK fa. 24 8. 81

s=eRDG nuTFi.r OK 2.5 8. 1 9=SET FINE REF 3. 4S333 OK 8.436638 08OeOE-83

vs. ?£f -•1.6739eE--04 9 1. eaeoeE-es

21
EQUIP CHECK (cont)

\ \ B S 1 E . 1 £ < n 5 F 0 ) E I J I I I

F^' C i \ E. r K T 1 - F d

'

85 <ril-4> T

# 6,09

PROG ::E'i' 4: CHECK FiTTENUFlTCRS

RUli

SI ML Sin

INPUT HT

ST II HT

< flTTH: 3.5 clB TH: 17 dB

FN: ,6. 100 dB

A.

IF FREQs

BHDHD:

ttl/#2Qdd:

HES Ti'PE IV OUTpy

l^ALl/C /KSSUM Ed P'oit, STD

y- 0, 15£ :

HiTH

17 DB

17 DB

17 DB

17 DB

17 DB

17 DB

17 DB

17 DB

17 DB

17 DB

17 DB

17 DB

\7 DB

17 DB

17 DB

PR Gil HTT

PRGM FlTT #1 #1 PRH OR VOLT

#2 #2 PFJpIoR VOLT

2 :;

i; _3J1EHSi

I ORIG PWR/#1 pnr

STD CK 0 #2 '

'0 MHz

3 MHz

" D C: I-: : O . 8 1

#1 PF.iR/#2 PHR

NOMINRL #l/#2

Pft(M ATTIH LUeo 0 DB 0. 43343 I- - 0 . 19 ' 1^ LI y I i

1

1 DE LI u 3 4 b 3 i' +-- 0 . 1 9

' 'r

1 023 1

1

1 DL-Jf0 DB 0 . + - 0 . 13 : 0 . 010 DE 1 DB 0 J

c:- r> r, c r J y y + - 0 . 19

'

u 0 . 0 0 7 DB 1 DB-i^

0 DB 0 . 43347 -I- - 0 . 0 3

°— / g- 1^

0 005 DB 2.940 DE

-' DB LI

.

c. c!. y ci h

4.. _. 0 . 1 2 0 0 1

?' DB DE 1 tz

0 DB 0 . 43249 + _ 0 . 14 "i 0 015 DE (3„934 DK

Tip 0 ¥ ^8

.

1 f 43FJ 0 0 013 DB 4 DE-)f0 DB 0 , + - 0 . 1114

0, JiE^ Be 4.92 3 DB

5 DB 0 . 13949 + - 0 . 0 0 5 DB H-fl

0 DB 0 . + -- 0 . 14 • 0 0 i. ,; DB 5 , 3 3 DB

s DB 0 . 1115

1

H 0 , 12 : 0 0 1 4 DB 6 DB

0 DB 0 . LI . ; 0 011 DB 6 . Fi 7 0 DE

I' DB 8. 03900 + - 0 u 07 ; 0 005 DB DB ¥+ 1

Id DB 0 . + - 0 . « 0 0 1

5

DE _7.97ri

0Q

DB

DB

DB

0 u

0 . 0 .

0 b 9 0 3 43297

0 5 5 8 4

+ --

+ -

+ -

0 .

0 . 0 .

0 3

1

3

21

0

0

0

0 1

>;

0 1 Fi 01 '-1

DB

DE

DB

.LE

DB

DB

If- 8 J &

8+ 1

0 DB 0 . 43143 + -- 0 15 ; 0 025 DB 9 . S' 2 4 DE

10 DB Fi 84391 f - 0 03 0' 0 1 0 DB ' io" DE 8+i

0 DB 0 43103 + - 0 18 ; 0 030 DB 10.9 0 2 DB

1 i DB 0 0 3 5 0 2 + - 0 17 0 . 004 DB 1 1 DB /

0 DB 0 431 14 + 0 12 i 0 . 029 DB 12. 368 DB

12

Fl

DB

DB

0

8

4

+ -

0

0 13

0

0

. 00 f'

.011

DB

DB

1 2. DB

DE

8 +

V

13 DE fl 8 2 2 ..5 6 + - 0 26 ; --0 . 0 Fi 1 DB i 3

'

DE B+ f-.-H

Fi DB 0 43386 -1 0 16 0 , 0 1 DE Dl:l

1

4- DB 0 01734 ¥ 8 2 0 / 0 DB \ 4 DE

0 DB fi 43207 0 1 'S' \-:-' D B 15 DB 0 01423 0 1

3

Fl . Li t;i ... .1 1 Li 1 5 DB

22
EQUIP CHECK Ccont)

:76 1024 11.32:

;S1E . 12 <D5-F0 EQUIP CHECK Tl-FO: H.05 <Dl-4> T 2-4

•£ri tt 6 .09

-4-

RUH 0

PROG KEY 5: CHECK P W R ? L I H E H R I T i , 3 T H e OF TYPE IV

SI ML SThR hTTH: cr

. -1 , .J dB IF FREQ: 70 MM

INPUT HTTH: 'l7 dB BHUUIi: 5.3 MH

ST II HTTH: t. 100 dB #l/#2njdd: 0 . 2468

rf »^ *^ m. BRDG V V? V3 V9 FWRaiw:.' (:k err IGrlh

1 2. 4839 0. 000436 -0. 012847 0.. 000435 0. 3290MW i '-. J 'J :-j a rl' i-J - . c 2. 4839 0. 0004>:y -0. 002303 0,. 000436 0. 0804 MM 0

,

. 0179DB 0 . 0O--;

3

I-w a 4839 0. 000433 -0. 012810 0 ,. 000434 0. 328 IMW U

,

, OObODB 0

4

Jw 4339 0 . 000437 -0. oe2r-9S 0 ,. 000431 0

.

i-jS02MIm 0 . 0i74IiB 0 . 19".

cJ 2. 4839 0. 000435 -0.012810 0 .000432 0. 323 IHN 0

,

. 01 66I1B 0 . 16"; 6 J. 4839 0. 000434 -0. 002807 0,. 000429 0. 0304MW 0,. 0073IIB 0 . 14";

) 2. 4339 0. 000431 -0. 012863 0 . 000427 0. 3293MU U . 0237IIE 0 . 19V

8 b- 4839 0 . 000431 -0. 002308 0 . 000426 0

.

08O3MU 0 . 0263118 0 .11-;

9 4839 0. 000429 -0

.

012810 0 . 000426 0. 3279MW 0 . OeSSDB 0. 19;; 10 2. 4839 0. 0004^3 -0. 002314 0 . 000424 0. 0Se4MW 0 . O039r!B 0 . 1 1^;

1 1 tL. 4839 0. 000428 -0 . 012797 0 . 000423 0. 327eriu — y

,

. 001 IBB 0 = 20^; 12 "J

« 4839 0. 000425 -0. 002815 0 .000422 0. 0SO4NW 0 . eOlODB 0 . 10'.

1 ;^ ^ 4839 0. 000425 -0. 012866 3 . 0Oe'i21 0. 3292riW My .0227DE 0 . 2

1

14 2. 4839 0. 000423 -0. 002813 -0 .000420 0. 0S03MW H . 02SOIIB 0 . 10-;

1 J 2

.

4839 0. 000420 -0. 012854 0 . 000416 0. 3233MW 0 . 0225IIB 0 . 20'-i It 4839 0. 000421 -0. 002821 0 . 000416 0. 08e4HtJ 0 . OlSSDB 0 . y9^-;

1 1 L_ a 4839 0. 000413 -0. 012837 0 .000414 0. 32S3MN 0 . 0 0 9 6 D B 0. 19:. 18 lI 4£;39 0. 000417 -0. 002320 0 = 000413

r 0. 0303MN 0 . 0156DE 0 . 09';

19 "T" a 4839 0. 000415 -0. 012349 0 . 000411 0 . 3285MH 0 . 0IS6I1E 0 . 13^

20 ^ 4839 0. 000413 -0. 002329 0 . 000410 0. 0804MN 0 . 0112DB 0 . 09°.

21 'J 4839 0. 000412 -0 . 012841 0 . 000410 0. 32S3riW 0 . 0379iiB 0 . 17V

4839 0. 000410 -0

.

002332 0 . 000407 0. 0804MN 0 . 0O79riB 0 . 09°;

23 4839 0, 000410 -0. 012831 0 . 000406 0. 3230MW 0 . 0037DB 0 . 17V

24 2

.

4839 0. 000407 -0. 002836 0 . 000403 0. 08O5MH 0 . 003ODB 0 . 09°-.

25 2a 4839 0. 000406 -0. 012384 0 . 000402 0. 3292MW 0 . 0190IIB 0 . 17-; 26 4839 0. 000404 -0. 002841 0 . 000400 0. eS05MW 0 . 0l63IiB 0 . 10";

c < 28

2.4839

2.4839

0. 000404

0. 000402

-0.012350

-0. 002345

0. 000399

0. 000399

0. 3233r'1U

0. 0SQ6NIJ

0. 0044IIE

0. 001 IDB

IT IH ^CAS

23
EQUIP CHECK (cont)

'76 lti::4 21,46)

NE;S1E.12 <ri5-F0> EQUIP CHECK Tl-FC: K.&Z < 1:1-4) T2-4

fi tt 6.09

KF

SI ML STFiR FlTTN: -3.5 dS

INPUT FiTTH: 17 dB

STD FFTTH: 6. loCi dB

C H E; C f( F' U R ? L. I U E H P I T Y ? S T H 0 F

IF FREu: 79 MHz

BHDWIi: 5,3 MHz

#l.- #2add: 9. 2463

PUN U TYPE IV

#1

#2

LEVEL: r

LEVEL: 1 DB e: I'B e:

+ U liB CK

+ 1 iiB ch-;

rii Til MEHS/PLGT PI 3 UNIT = y.yiee DB

• 0 . 150

TIME

1

1

1

12

13

1415

lb

17

18

19

2 0

2 1.50'

0 5 kJ H „

1-1

. !..„.!....!.

:ER0= 6, 125 ]

0 . i J 0

I 0.250 DB

I +

-1- +

1 I

4'

-h I

+•

+ +

! 4-

!

4-

I

I 4. I

H- + I — i<r-

+ i

! + ! +

4 !

I + I + !

H ! + !

! + ! + !

I

AVE

1247DB

1 129DB

121SDE;

1 164BB

1 1 13DB

1 1 19DE

leSbDB

1202DB

1 139LB

1093Db

1 148LB

1057DB

y79CijB

leSlDB

03nDE

1 0S3DE

I 14 5.OB 1205Dd

12aiDB

1227BB

1 1 97DB

1 1S7DB

I I 69IiB

1 18 IDE

1 127DB

1019DB

1 149DB

129':n:iB 102539

1 095DB

lysaDB

07'j6DB

1095DB

1 10SIM)

1213110

. r2;-;8i.'B

#1 pup

0. 42900

0. 275MN

0. 2r=nilg 0 . 1 75iTM

0. 140MN

0. 1 1 IMN

0 . .-i69i^iN

0. 014MN

0 . y22M0

0:, 0lKr1U

0 . i <-\ 0 i'l W 0. 271MN

0, 2171

0. 1721

0. 137!

0 . 1 0 ) M U 0. 0y7MN

0. yBSMN

iZi. 055MN

0. 044MN

0. 03SMN

0 3MU

0, 022MN

0. y ISMli

0, 0l4i7i

0 4 28 MM

0. 342UM

0 . 2 ^1

U

y, 210:1')

24
EQUIP CHECK (cont)

HES1E.12 <ri5-F0> EQUiP CHEl

1024 21.55:

Tl-F0i ) ;nl-4> T2-4

# 6.89

PROG KEY b

cotuJec^re^ t> TO IJH 0

>ISE HrB TEST

SIML STAR hTTH: 3.5 dB

INPUT FiTTN: 17 dB

Sin hTTH: b.l00 dB

F= 424^d):'H'J n.-dd #1= 0.1545 nU

IF FREQ:

#l/#2o.dd

MM:

add #2= 0.1*621 nU

0.216:

U. II--; 0, 1456

B 0 . 1 1

•. 0 , 0 1 b2 ^

1 . 17°; B. 0. 48--; * 0 < I J 2^0.1721 ^0.1151 ' 0. 0620 ^0. 2423'-'

0

*0.13v ... 'Jh.ivv -fi.R6v +

v.- -- +- -

ft.

837 I 0.2560 3.

0 . 1 6°; *. 0 . Zdy.

Is. 1374 ^ 0

-' 3 0 0 . 0 4 y o ^ 0 . 19" ^0.34v .0.2

0. 2414 <» 0. 2530 S;

0.1?

O.iJ-. ^ti.2l'; 50.4 H . 30?; ^ _ ^ _ 5

>*.M . 1 H 3 , ^0 . 0 ,- 42 H . H

iw-*: ^0.37-; «1.23?; 50.31

I0. 3377 Q0. 0594 ^3. 03 15 50. 1223 * 0, 1541 J O. 2563 5

^0.15"; '*^0.27-"; o0,3S'-; '*0. ^"^^ -

o0. 1926^0.255

•C6.14V ^

2 *

y . 0 4 D y ^ 0 . 0245 0 . 0 y 5 1'

» 0 . 4 1

:

*-0 . 2^1

iZ «0. , i"-; iiO. bl". i0. 4 ^0.33:

«• u

- •« _

*

1 1 . H o . ; 3 0 . 3 '; " 0 . o b . « o . i < T ^0.0433 0, 0293 'Jo. 0156 ^0.0612 ^3.0761 0.254

o 0 . 1 7". -^0 . 34". 0 . 76'; 3 . 1

8°-. ,9 . 4

"

. K} m K} -J ^ _• ^ 0. 10°. ^i. 0. 253

0 . 0346

0.17'; 50. 16"; l.0f"^; 0.43";

i"i fi f1 4 Lj

_

i-j 3

0 . Ob 03

0 . 2 1 ;

0 . 043;

0. 253

1 . 32';

3 . 0 1 36

23";

o . 0219 6 ; 0 1 43 0 . 0 0 7 O . O 3 1 0 0 . fi i ; : 4 ; 0.20"; 0.00". 0.3]'; 0.30'-. 0.11-; o, 0.017

0. 17\

0.0118 O.oOt:; 0.32>; 1.41'.

0 . 0246

0.61".

0 . 1 1

-;

0. 330

0. 4 5-, 0 . 3 1

-.

F- p.- S2 r-- 1

-^ 2 1 D..-k dB

.-, 7631 0. 7117 0 . 5704 0 . 02 13

0

.

0 . 0 . 16"; 0 . 0157

.-, 0

.

7612

07'-; 0 . 0 . 7120

11--; 0 . 0

.

5719

0 . 01610053

77 i 2 0 . 7119 5706 0

.

0147

0

.

0 • 45"; 0 . 7720 0 . 7116 5699 :

" 021 0

1

. 0 . 4 b'-; •c - 13'. 0 . Oo40

«cJ 0 . 7695 5724 0 . 0161

0

.

y 1 N

<

cr . - =

.

•J o . 0 . 6091

'0 . 5 §0. 0 . 0 . 3120

0267

J 7669 7053 5762 0 . 6132

1 7v |0. 0 . 0062

-i 3 0 7 \

< - 7 1 4 0 \ 0 . 5638 0 . 0143

'0

: _

3 0. * -;i n 3

a. 0 . 8051

. O- 7111 5 6 3 9 0 . 0 1 -O 9

'0 ~7 V 50.

>

<• * - 47": 0 . '0 1 d 3 7441 nr - - o cr _' C- -J 0 . 3101

0 63'; 0 . 0 . 0 072

7792 !'- 7 Fi 7 2' 0 5691 -0 . 0077

0 99'; 0 . 1 i ; 0 6 . 0120

. 7662 0 . 7146 0 0 . 6014

1

1

. 7430

1 f 1 \

0 .

0 . 0 .

o 0 -' 7105

0 1 ^

'

5635

0

.

-0 ,

ij .

0177

0363

' - 3 7

1

fOfi TIKS ier

0 « '7 0 7 3 5766 0 . 6043

0 5 ^

'i 0

;

0 3

1

'. 3i

.

6264

0 . 7103 0 5639 0 . 0 1 63

1 . 47r. 0 . 79". 0 41::; 0 . 0197

25
EQUIP CHECK Ccont)

NBSIE. 12 <Ii5-F0

CHRHHEL,'

y = riC OFFSET

1=TEMP

2 = 11 EN POIHT

3= +20 VOLTS

4=+ 12 VOLTS

5 = IiRC OUTPUT

6=XThL III ode

7 = Ii. R REF

8=BRIiG OUTPUT

(.76 1024 } EQUIP CHECK T1-Fh:

REte/^TED TO 5Ee

PROG KEY 3: VOLTRCE STRTU

0 . . OK

y. 73299 OK

OK

m

OK

•

OK

OK

OK

OK

OK

'

l: ;^0^. :Iil-4> T2-4

0. 43129

20.019

11.9391 . 4.S32b

- 1 . 73300E-03

6.2367

RUI:I e

9=SET FINE REF 0.48332

10=BRriG REF 3.35000E--04

:HtCK CHANNEL VOLThGES

NOMIHflL

00.5

0.5

20

11.9

4. 3332

-0. 0125

. 6.24

*. c- C • 0.487133

0

+- RRHGE

1 . 00000E-05

0.5

0.5

0 . 2

0. 1

0. 02

0. 0125

0.01

0. 1

5. 0000OE-03

1 . 00000E-03

CONNECT ERRTH TEF:ri,SET PHP LEVEL ( ^NC): .1 ?

26
EQUIP CHECK (cont)

NBSIE. 12 <Ii5-Fy > ':7b 1924

EQUIP CHECK Tl-FQ: :D1-4) T2-4

1670:

CONT

PROG KEY b

SI ML STAR hTTH: 3.5 : INPUT HTTH: 17 dB

STD RTTH: 6. 106 dB

pi in

f' P^oraif r'^s rue e AHTH fBMMM//iL.

TEST

IF FREQ;

BHUWIi:

#l.-#2o.dd

0 MHz

3 MHz

0 . 24t.S

AS S'^VLATEH

None AJ>p TUT

P= 0.3193 nW add #1= 0. 1 152 nU add #2= 0.451'

Pd-'-iN) P+1+2 ttKnW: #l+#2 #l/#2 P.--#l P/#2

0. 3255

6. 92'-;

G. 2661

0.61';

0.2190

0 . :-:3".

0. 2197

1 . 16'-i

0 , 17 9 S 0.66";

0. 1476

0. 34'-.

0. 1 167

0. 47".

0 . 0962

1 . 67--.

0. 455'!

0 . 3732

0.61V

0 . y c "9 0.3oSl

; 0.63"-,

0 . 5694

1 . 32

0 . 4656

0 . 7 0

-.

0 . 3326

0 . 30"-;

0. 56'.

0. 2579

^.45^;

0. 2561

1 . 53'^;

2.7795 0.7119

1.04°; 0.33'-; 2.7574 0.7114

1.43V 0.16'.

2. 7756 0, 7095

1 . 10"; 0. 33'-;

p.- 1+2

0.5722

0 . 49";

0 . 4 0 ;

0 . 5720

0, 32'-;

STDck

dB

0. 0116

0 . 004

1

0 .012 9

0 .017 0

0. 0135

0 . 6027

0. 1771

0. 13"; 0. 1 19^ 0. 10"; y . 0 b o y0 . 92"; 0. 24f

0. 54'

0 . 3099

0. 12"-; 0. 2574

y . 7'^"; 2 . 1 b 0. 71230. 53^; 0. 5716

0. 13\

0 . 0 1 53

0 . 0062

0. 140^

0. 16"; 0 . yy5u0. 34V

0.y510 0.1973 0.2464 0. 0 . 29 0.4 = '539 0.7129

'yv 0.11^;

y . 5 1 yy

0 . 3

1

-0 . 0020

0. 0174

0. 1 143

1 . &6'\ y . 0

1-

1 , 46:

y . 0 4 1

6

6. 1611 0 . 2yyy

1 . 56 . y . 25:: 0 . 72" 0.7112

0 . 20'-; 0. 57190 . 27''. -y . yy2y

0 . 0034

0 .1119

0. 13"-. 0.0754 0.0404 0.1574 0.1952

0.13' 0 . 1

1

V

0 . 0. 25660 . 28"-; 7724 0.710349^ 0. 13"; 0. 573;: 0. 4i;-; y . 0 1 62

0. 0133

0 . 0393

0. 16"; y . 0603 0 . 6320 . 1 0"; 0 . 20"

y . 1252 0. ibbi

0. i4"-; 0. 1

1"-; 0. 257

0. 12".

I '730 0 .

(' 1 3^

14"-; 0,23^

0.5716

0. 19"-; 0> Olbb

M . 003:3

0 . 0554

0. Iflv C . 04 Si. 11 •

;

y . 0250

0 . 22". 0 . 0974 0.1;

0 . 46 ; 0 . 1

:

y . 2562

fi . 66V y . 23

7305 0,7123

0.52";

0. 572

0 . 34"; 0 . 0 1 06

0 . 0090

0 . ybj

0 . 5y"\; 0 . 0374 0 . y 1 yy y . y

0 .

3

0 . 0969 y . 2 J 0.41;

2 . 77b6 0 . . 1 49 y . 5 1- i 0

0. 48"- y . 01550 . 6 1 4:3

0. 044;

0. 14"; y , 02930. 13^; 0 .015 9 0. 47". 0 . 0b2y

0 . 27 '; 0 . y 0.19:

7765 0.7139

42V 0.31";

0. 5717

H. ir-;'; 0 . yyys

0 .0176

0 . y35.. 0 . fi9'; .-y.y233 0. yl2b.-. 0. 0496

0. 10-' H . :-;yv 0. 43: 0 . 06 1

6

0. 17V

0. 2543

0 . 23^; ,949 0.7121

23V 0.45"-.- 0. 5739

0. iSV

0 . yoob

0.0131

0.0177

55. 13V

0. 0123

4 2. 03V

0 . 0 0 6 3 41 . 23"; 0 . 020

1

0 . 53V

0 . 0331 0 . 333

1

42. U4V 41.50".

'9 0.71 09

; 0 . 46\

u . 5 , yy

0 . 27":

-S. 0232

0 . 0255

0.0224

0. i 7". 0 . 0 1 1 y „ 0 0 c. 0 0 , y 5

:

09"; 01: 0 . 52". 0 . 0392

0 . 0 7

"

.

:546 2 3036 0.7126

21V o,5Sv

y . 5, 22

0 . 23"; y . 0034

0. 033S

0.01,-9

0. 19". 0. 0121 0. 0064 0 . 025

0. 47". 0.0314 0.255

0.46"; 0.4;.'. ,"734 0.710039". 0.34:.

y . 57o;3

0 . 28'-; 0. y;j:73

27
6.2 The Loader Program

The purpose of the loader program is to load the key programs, the common

subroutines, the star data, the site data, and the ETMS characteristic data, to

provide an opportunity to modify any of these program constants, and then finally

link in one of the major computer programs such as SITE PREP, MEAS , or REWORK.

The annotated printout for the loader program appears with the SITE PREP program

that follows.

6.3 The Site Preparation Program and Annotated Printout

One purpose of the site preparation program (SITE PREP) is to anticipate

measurement conditions and to prepare the daily measurement tapes before traveling to a measurement site. The second purpose of the SITE PREP program is as an aid to double checking the measurement conditions after a site measurement

analysis is finished and to provide a computer printout of the final measurement

conditions in an easier to read format. An additional use of SITE PREP is to

set up site parameters or error assumptions for a data rework.

The normal means of loading and using SITE PREP is covered on the annotated

printout in section 11.2. At TRAP, option "3 = KEY LIST" prints out the key

functions on this program, option "2 = LK MEAS" can be used to exit SITE PREP

and link in the MEAS program, and option "3 = LK REWORK" can be used to exit

SITE PREP and link in the rework program.

The major features available on SITE PREP are (1) Enter site data and

sun/moon almanac data to be stored onto the daily MEAS cassette tapes, (2)

printout of the site and star data for measurement documentation, (3) printout

of expected/actual measurement conditions and errors using Cassiopeia A to

measure G/T, (4) printout of measurement conditions using the alternate stars,

Cygnus A, Taurus A, or Orion A, and (5) graph the elevation of Cas A, Cyg A, Tau

A, Ori A, Sun and Moon, and tabulate the azumuth and elevation of Cas A versus

Greenwich Mean Time (GMT)

.

28
SITE PREP

LuFin

[SITE: hr£r)^ITE DfiTRC L u- I HT > 5=E.KT > 1 0

FKiji'i iJbMi'r CHhNGE 0PTiijHO3=He>?3

ii-j. i

Nt;3lH.84 LUHUER Ol-rti"- T2-F0:

.ETHS 5£RlftL /ViJAjsSK

X. fi4;yye£>Ti-4 J iii-4

o y i n -tt t r.Ufi o

L.-To. b.-T

53 dB/K 40. 10 dB--'K

Id i3 id ;d |]i |d jd Id !d |c id |B |d id |d Id |d |d id Id id jd |d |d jd |d |d (a ! [B id Id Id jtl gjd i^yM id jd [d |d id [d ;d jd |d id jd |d id Id Id (d Id [d fl Is |d jd |d |d Id id id |d Id [d |d |d id |d [d Id id Id |d jd PROG CONS"

tiz: 0,b5

B6: 7.59224E-n:;

E : 8.67349

B3: 0.93

B9- 162.444

-rfts <;v^-,y -..v.^. ois..^ /iU^

:l; 4.75340E+iH

:i=i; x9-4^ :'; 70=9624

i 9 r b . 9 2

ii.j- y.ai29

Ii0: 0. 816515

G4: 6.9326SE-0C

G : 1237710

g5 : 4.61 m52:c.-04

C4; rY.4i!

C7: 0.23

1 . 30254E-03

Hi: 0.0S7726 H5: 1 H9; i'c^i.m'-i

M5: 4.779

W6- 3.924

M : 10232.9

Rb" 0.9i-y

r i Q ' Q d o

L7: 4.50759

ri7: 1.957

Hi: 6 H : 1

0 1 U 9 -

N6: 3 K7: 500

29
SITE PREP (cont)

Id I d id Id Id Id Id I cl I d I S I d I d I cl

i d ! d i d I d I d fd I d i d j d |ij | d iTl Id]:; |,1 \j | M iTi \ 3 Id i d | li ;Ii j d I d I d |TjI d | d | a | d I d 1 d | d I ri i d i d I c1 1 J i d ; d i d I d Ij I5 ^ J ; = I d I d hi I d I d ip ij- i]i ij? i? id id id id id | d id : d id | d ^ KEVJ/MP 5/*^ rneP TAPE

•Jf- /MSanT Afp'^OPHiATS: U A' f^^^s) 7~Afe Q<uff~t^ -t-i.^*^**^ a-^cicK.^ <La.Ajt*iL>)

CHhHi:E RUH/riHT£/SITE5 ]-','Ei'

1 . 1 1 1 1 1 1 1_' i_ 1 1 1 _ , • -.

'

-;

' -.' M 1 J H T H ( = H IJ ) H 0 W : D E C '? M iM

' ..

'

Dl^'r OF MONTH':; =NO:.iHOW: 2 ' ] 0

Dh'i' of NEEK( =HC>H0W: THU'"' i LIE" PROJ #•;; =HC)HOH: 27b. 5 4i:;i7'-'.;:,'.: ,541 :;. LOCflTiuH'; =Ho:>HOW; ft. IiETRIi K FlMi' 1t1 "CFiMP ROBbRiS ' fiHTtti SITE:W. LOHi:( =HC : 77 .41:5 '''1213. 75;; SITE:H.LnT< =NC): 39.4 43 '\ J J . 734

SITE:HLTa:N>':: ^HO: n. 1 i"i 7 . ;j 1^ ':

j

HEW F.-EW.' ElEV. i-lHT uOl,'!

,

,

; , I : ; l-J ':' 1 CEHTER frei;!'.:ghz:";: =tjij ' ERR IH FREiJcV).; :=NC:'- i:ii . 0 i

'' BHHDNiriTHaiHZ) < =NC) : J b J ELEVdiEi:) c =NC ': 5 HHT rUHh ';FT)( =HC;': t 3

':' l=flPR EFFj2=nHT HPBW,:: ^CHVL hPBN'-: -HC : u

'"1 RPERTURE EFFIi::lENi::Y( - Nlj;': i;1.bj

HPBW ERR': IS, =HC): 1.43 : RNT FT ERR; l=IiEG? 3-MiFB

Dhb':: =HC): 0.0129 Ml.

RNT PT ERR co r res Pond j t do/ t 1 1.

0. l; '804 DB:0 = TF'

- l u .J- ! ZKK-. T . 1 S/SOR'.: 4i-'T3 ) of 0.1 3F;5;:;,-'3n4

F'. Y Hi ,-,i-l J M

C H fl H E : 1 = "i y Y-. > 5 2 = G ' I ':. D E: > ,

^ G/T < DB > = ':. =NC > : 4@. 6999873

CHRHGE: 1=G. Tflj 2 = TH':: =:4-<C:': G/TR'::dB/K::":: =HC>: 32.74400

RNBIEHT TEMP(F)( =HC>: 30.

DEW PT TENP':;F;":- -HC): 4G.2

EfiTER SUN/MOON HLMINH'- '^\\ ~'

-Ni.

FOLLOW I HG INPUTS RRE IH 2 RhRTS:lf

IF DEC IS [South h: rit r f dS'H O f id n 1 r i

i b 0

SUH :GHH li" 0 GNT':: ^NC:?

MIH':; -HC): O

'"'54.7 UN :GHh 0 12 GNT':; ^=Ni: MIH': -HC>: 0

'"'55.0 H.HEC 0 0 GMT': =Ni::;:' : -2i . 94ii3

MIH( -HC); 0 '''SLS H.DEC 0 12 GMT':: =NC::': 17.459b

MHK =HC:5: U

•''39.7 MO OH :GHh 0 0 GMT':: =NC

MIH':: =HC::' : O '''SS. 1 MOOH :GHfl 0 12 GMT';

MIH':: =HC): 0

'"'38.7 H.DEC 0 0 GMTr =Hrj: 3.4'

MIH': =HC::': O '"'bTl! H.DEC 0 12 GMT'-: =MC

MIH'.: ^nlC): 0 '17. b HOR PhRhLLR:-:'; -HC:': 0.9

MIH< =^HC::': 0 '57.4

HUE '•pH^v'S'-i 11

4

4 44

zi^ 2 <a.

RR iiMrii':0-

30
SITE PREP (cont)

UBS IB. 07 SITE PREP Ll-Fl,-:; T2-FL,*:: X . 04< 0002 >T2 -4 . L

1 -4

Svin #6.09 RUN 1

PROG 2,-'0.54n rplMP ROyERlS, Hfrr#l

Tut: i y i 1^' n h i i j 1977.35

s

7.550 GO.O Ft DISH G/To. G T 32. 74 dB F 40. 10 dO

g id id Id 5 1? id Id Id i5 !fl 1? 1 a iB I d Id I? 1? y ' S ' J '3

;

r F ' F '

' '

^

' 0 J ':. 0 0 '5 0 0 0 0 0 0 0 0 0 5 0 J 0 ' ii' 0 i?' 0 0:' C' S 0 0 (? Si? 0 0 i ?' 0 0

SITE: W. LONG H. LHT flLTITUIit GHh TO^riPlLF 0 O GMT

128.753 d e ? >: 5 . 7 3 4 d e 9 0 . 3 F 9 k i ; 2 7 . 6 S id d e- =? ^CS- ic0

|5 1 tl I d 1 d I d I d 1 d I d I d 1 d I d I d 1 d I d I d l5 1 d i d 1 d I d (9 li? F 0 ? 0 i " i? 0 '5 0 0

"

' fluf LihTFi' STAR FLUX in P.O. RRHGEvGHr;-^ SIZEd'iini SPEC I HE EX

1 CPS H-*^ 3154 +- 4.5 y. 0

_ 1 9 b 5 . 0 ^0 . 9 T" + ~ rO . O 5 / V r ^T(.i,is)/io ^T{i,nyio« <-TCijiV//oo 2 CVG H 2250 +- 4.5 0 3 TflU H 1024 +- 4.5 y. 0

4 OR I R 420 +- H.5 0

5 SUH 325000 +- 7.0 °; 0 G MuOH 1S81 +- 7.9 F 0 2 F'::: 2 TO lO 32.00 2-000 +- O.FFO

J FIl: 1 TO 10

1 ij n I 2 TO 10

1 h^^Z 2 TO 10

3 Gi-iz 3 TO 10

1 GHz 1 TO 10

2 T 0

4 . b ti '1. k: 3 6

i >O„02:;

1 . 60 -- 1 . 0 9 0 i- - 0 . 0 2 0 4.00 -0.2 6 3 +

ti . 0 2 0

3 . 5 0

3' 2 . 0 0 0 . 0 0 0

- 2.000 +

0 0 3 Z' 0 . Gi 0 5

PROG FONSTS

H T C H J 1 > S ( H 5 1 ) T H ? 3 ) T ( H ! 1 3 ) T ( H ? 1 9-^-20 T ( H 9 ) T v H , 6 ) T' < h 7 T<Hj15) T(Nj1F;:' T(H!l7> T':N.4:' r(H?5

lofhtiom nisc DhTR

T R R E P 0 C H < D R Y S R F T' E R 1 9 7 7 , O > S 0 1. H R E F' i. J C H ( D fi V S R F f :: R 1 9 7 ? . 0

)

1977. 35S 130 1970.923 -^29

RT.fi S C N . Li e F . L I N E fl R P 0 L Z P 0 L 2 R N

G

GHR 0 0 GHT H.DFF 0 0 GHR -Hr H. DEC,. Mr HOR PRLF PHR-F

350.59 di;-^5 ^53.69 dt-^ Si. 5 +- ^0.0 . ^40.0 'i >0.0 jjEG

299.67 do-~ 40.66 d;:-"' S.y n- O.O '. 146.0 +- 0.0 DEG

83.23 de? 22.00 di?g 7.0 +- O.O 143.0 -i— 0.0 DEG

STRR:

SOLAR

1 CflS fl CVG fl TflU fl

4 OR I fl crJ SUH

6 HO OH

33.53 de-9 -5.40 de^ O.O +- 0.0 ". O.O +- O.O DEG

180.91 dt-g 17.53 de-^i 15.000 dt? O.Oll O.OOO dt^< O dav

269.64 d e -i -- 11.10 di s 4 .501 d ^ ? x» O . 1 1 d 9 - 0 . 9 ^5 7 d o -vi -2 2 < J o.

^Tft,*J//eoo ^n^^/iV/^fo Cj^s^/jy/eoo ^TCt.^it)

PROG FUHSTS

H Ta-M) S(H.2> S<H-3> Ta^,ll;' TUIh 12.' Tai. 13) T(Hji4

31
SITE PREP (cont)

W B S IB. 87 '3 1 T E F' R E P ( .D 1

- F J l: J 2 f \ > . y 4 : K

i e 0 2 > T 2 - 4 I) i - 4

""; ,' FROG 27i::„54:i CRHP POEERTS, fiHl^l THE: 1077 N/iV Iti " 1977. 550: F 7.5501 Qui 20.i' Ft ulSH G/To. G/T

<^I> 0;£. 74 dB -4< 40, 10 dB -

K

TYPICFIL VhLUEO; tor G-'T MEhoNJPENENT us in-? CflS H

G T RPER EPF RHli EPF FlNT HPBPI C01.;VL HPBF! EFF RRER

6 1 . 0: -4 d B 1 3 3 , 1 Y v\ . .0 2. 2 2 -J „ y 8 u . 1 3 7 1 .J e g y „ 1 3 2 2 d 1 9 1 7 2 . S fi 1

2

iBtLiiQ r JBL -33 :Befyep 3/6>e>

Rriienna Elev - 5,0 d est

PfiRRPlETER ' ERR TO G/T

"

F FPEQUENCV M;,r|:;:::. F 7.558 +- 8.01 ':f0 +- 8.88 y. e0

3 FLU 7 (F.U.-iot( 22 'U ' 5(/;^5o2 , 3

" +-- 5.38 ' S +- 5,38 % S

TCont ) = 34. 3 R (y-U*«T

Xi = l.S0:2E-e5 I- U-On-T/G,

Y V--F ROTOR / i . iOb +- 8.18 ".CS +- 8.64 '.C9**ry

YCdB = 8. 743 dB t6*UiJy K 1 H T N R B 2 0 R' R T 1 0 H F- fH 0 T i j R: K/ i- i . 0' 1 8 + 4 .

'^j 5 £ < + - 4.95 e.> o X V p f i 0, t, t. n 0 . 0! 2 9 4 d B « y* 4 y

I '1 0. t € r" 0. t- 1. n ~ 8 . 8 Oi 2 2 d B / i ; i . : 1

1

2 GS'iHSi-Si*'-^

lii 0. 1

i " d e n £ = 7 . 3 g r i

"

i

i f 2 L 7 o.tn bri.sht.-^: 25. £ K B-f site alt -- 8. Of?;? i l l CjS

o.pib tenp - 30.3 P ACj'J/'-S'

dew poii u-po 4i:.7. : F AC^)/'-*

K3 iaFFU3+-*riT/0v. 1. f. c J. K«:i.0fc:.2 ^ 12.03 ".E^ +-- 12.83 >.E»

K 9 R E F' R

H

2 0 . 1 2 r 1

' I .'? - 1. ) %9 i;) . 9 7 6 -! 8 . 4 5 £*? +- 8.4 5i Ist coruit: 1.8155 18

2rid const : o.OiOOi?

2 SIRR 3HHKE '0

4-'^i8.4:-.7i.-i.:: KLJ.908 +- 1

,

14 1 14 7 62

HPBN (+- l„43 : ; 332

3 B Nil RID EFFECTS FRCTOR KJ 1.008 +- 8

.

00 ". £3 4— 6 Pi 8 7fJ

bondi'ildth = 5. 5 W l\2: 4 niFF SYSTEM TP

5 RHT R01HT( + -- 0

I'll' .015U '..its Kf : . 000 +-- Kri , 008 +--

Oi

.

0 i

":, ey7 e.s-

+ - 8 87

81 7 es^ or U/T date i 1; =: ! 8 . ,29dPHI

b RHT R0LRR17HTI ON RRiOI /<6l.008 +- Ol

.

'. E6 + - 8

.

7 E<

7 SYS'TEM RESPONi- E l--f-!01' «r 1 . 0o8 +-- 7 ez +

- 7 C7

1 n s t. r P IaI r r 1- 0.21 I07 'CI Y ( Y

- 1 - € . J r-

:

tiauss cur

i

J.

i: 1 2. Oi }J\ AZ

0. HDIiEn riOISE (K HI 723. 3 ^ 8

.

P3 +

- 60 71^

ToTFiL ERROR? :^iuu,d un h.i. Itmi. ". reifr err +- 21.19

32
SITE PREP Ccont)

STORE GoT^N:y = Ni:i.5 = E;;T? 1M=IMT' =ir : -^U

^ states yne oat^

^

HJfJLMEAi) :Lf*. L IST RLTERHRTE STRRS . n^M I'J - - .^^^^^/^ X^yf^ -rUX. J^^jU^

HBSlB.e? SITE PREP Dl-Fli: T2--i- l./- :^ 04 : 6502 yj.? - 4 ? u --4

S i RR

1 CRS ri 2 CYG R

3 TRU fi 4 OR I H

5 SUN

6 MOuH

PROG £76.5411 ORMP ROBERTS! HhT#i

TUE: 1977 MRV IS < 1977.358)

^.550 CHr. 60. U F' LISH

FLUX in F.

243 +-

420 +- :E+07 +-

i!6305 +-

T(arrr

G.--Tii 4 dB.

RUN 1

C--T 40. 10 dB.-K

dE y 1 ( K

)

U/fffV «2 < flfir OF FHn/t our is f^eAHimuZii^

E-S FLOW

E-F FREQUENCY

E-Y Y-FRCTOR

E-Kl RTH TRRHS FflCT E-K2 STRR SHRPE

E-K3 BHTiNE EFFECTS

E-K4 -TIFF S i'ST I EMP

E-K5 HNJEMNR POIHl

E-Kb RNT P0LMR2

E~K7 SYST RESPUMSE

E-K3 RTil DIFFUS

E-K9 HTM REFRC

E-To. NOISE REIi TOTRL LINEAR SUM

TOTRL OURLRRTIC SUM

C'l'G H

8. SO

0. 08

4,90 " 1.14 • 0.00 " 0.16:

3 . 0 1 : 0 . 3b -

12.03 : 0.46 : 0.60 '

16]46

TRU F

0 -

i iO

fl . r' I

0 . 24

0 0 0

0 . 86

2: . 0 i

2 . 60

12. 03

0.46

0 . 6u

;';S . 70

ENT ERRORS:

OR I R

i 0

'

Od--

yo

0 . 00

0 . 09

3.01

0 . 3 5

12. 03

0 . 4 6 0 . 60

31 . 02

1 4 . 6

1

Ml. HJ!4 /

0 \5 0 0 9 o/-; 0/

4y

/ 9 y. r9 5

0 . 7' 2 \: 45

0 . 00 / 0 0 0 % 0.00 J:\ / 0 0

1

01

0 . 3? '/. /

12S0

0 3

"

.

Mb ••. 0 . 4 /

'; 0 . 'Ai 0

2 1

. 13

I

33
SITE PREP (cont)

EL EV GMT PPIHT OUi a

HESlB.e? SITE PRLf 1 T2-4. Iil-4

# = CRS H

o = MOiJH

;MT'0

10

11

1£

13

1.4

15

t&_

17

19

20

21

P R ) G 2 ,

' i , 5 4 1 I L hi [1 r' R ij E E R 1 S TUE: l/T" Mrii iO > 1977.353'

7.550 GHz- bH.iJ Ft riSH

RITT#i

G/Ta

32.74 dB-K

RUN 1

G/T

40. 10 dB/K

U'l'G H + = THU Fi

30^!RCE El. EV de-?

)

. = OR I R

10

I 40 60

I

-11.-1

tt

s #

#

+

I

!

I

I

Ir

! 0

I

I

I;

! +

I

l!

I

I

I

t

\ X

[

I

SUN

HOON

LOCAL

:. = SUM

CAS A AHTenn^

Poiu TINS c©o« r«

C H 'i

. CI Ri ^ 0 1 S . 2 i

1 J , f -33.3 . 4 c

1 12.79 0 V b . -f 4

1 U . -J C 3 3 9 . b

1

'

1-1 , .J 7* 4 . 1 U

iLT 1*4

-' 7 . 0ii 5 . o

:i4t' . i 0

cr 1-4 .4 .4

.1 . 0 4 S 4

4 4 . t' J

-1 cr r. i ^

4 . b b 5 . Uo

J . ? U

Q 0 -' b

-r- i ."i

. . 1 ^ 1 . .J J O . 7 1 1 r . i 4

r 10. 67 20.56

1 2 . 96 23. 7

S

15.55

18.43 29. 53

9 21.54 32. 03

24. SS 34.23

10 2;-;. 3i9 36. 13

32! 05 37. 63

11 35. S3 38. S5

39. 70 39. 59

12 43. 60 39. 30

47. 49 39. 40

-1 1-1 -1 cr 13 1

*' 55! 02

V 0 . .1 J 3b. 15

14 5:-::. 43 32 . 36

61 . 59

15 64. 17 21 ."69 66, 03 13.52

lb 66. 97 4. 00

66 . Sb 354. 03

17 6-5. 73 344.73

63. 71 336. 39

IS 6 1 . 0

1

330. 80

326. 3S

19 54.29 323. 35

50. 56 321.45

20 46. 72 320. 46

4 . 0 E' 320. 19

21 320.52

35. 0 7 321 . 35

:3 1.31 322. 60

34
SITE PREP Ccont)

24 24

2y.9o

17. 63

338.45

351.00

FOR RUfJ Tape

e=RSTRT?l=LK MEhS?2 = Lk FliRK CHdHGE RUN.--IjHTE/ Hl TE^ I=^rE:K

LIST" =NC

VEfiR< =NC>HOW: 1977?

HuNTH< =HC>H0W: NhY?

DfiY OF MONTH< =HC>H014s iuvll

DRY OF WEE^ =HC>HOi!J TUE^HEl!

PROJ it = : 276.5411^

_::^TIONt ^HCjHOW: CRHP ROBERTSj hnTsI

e;~e;u. lgng< =-hc)5 120.753

S;TE:N.LRT< =NC>: 35.734

SITE^ HL "^—-M '' =NCj: a. 369

NEW F.-b.. -RNi COriV^.l-Vco - -r RNT PI E-" -i :--::EG»2=^HPBW'' =UC:>: t? CHRNGE: 1=T^k.-I 2=G.^'T<BB>< =HC>^ W CHRMGE: l=G.^Tfl? 2=TH'; =NC): O V fiMBIEHT TEHPCFK =HC>: 80.3 ?

DEW FT TEnP<F)< =NC> s 46.2 ?

EHTER SUH 'MOON RLMINftC DRIP. ( 1 VET

"•

FOLLOulING INPUTS RRE IH 2- PfiRTS: tst =dess 2nd=riin

IF DEC IS South: enter de? and i-un NEbRTIVE

SUH :GHfi @ O GMTC =HC> : i30.91i VlSB

riIH< =NC>: @ V55.3

SUN ;GHH § 12 GMT< =HC>^ 368.921 ?0

MIH< =NC>J 0 ?55.5

N.DEC § a GMTf =HC>: 17.5316

MIH( =NC>5 0 ?47.5

N.DEC @ 12 GMT< =NC>: 17.9236 ?i7

MIN( =NC5: 0 V55.2

HOQN :GHfl § 0 GMK =HC>: £69.635 3257

MIHC =HC>i 0 V43.K

MOON :GHfi § 12 GHTC =NC>: 431.325 372

nlN =HC>5 0 ?7.2

N.DEC § 8 GHTc: =HC> : - i i. iei6 '7

t1IN< =HC>: 0 V23.9

H.DEC @ 12 GMTC =HC>; 5.5S633 "--5 NIN< =NC>: 0 '^26.

5

hOR FHRflLLRXf =NC>J 0. MIN< =HC>: 0 V56.G

RGP =TH--s .r =HC>: 22 '^VV FRT SITE-SThR DRTR<Ci=Ha:

NBS1B.07 SITE PREP ^_Dl-Fl2: T2-ri2: K.04<yeO2>T2-45Bi-4

"Sn -if C- . ts ? RUN

PROG 276-5411 RHP ROBERTS, fiNT#l

I^LD: 1977 HiiV 11 v ^977.361^

7.550 GHzJ 60.0 Ft DISH G Ta G^T

32.74 dB^K 46. 18 dB^'K

r 'J =ri .-J

35
6 . 4 The MEAS Program and the Summary Data Tape

The purpose of the measurement program is to collect and validate data to

be used in the rework program. The measurement program collects three types of

data: sky profile data; star cuts used to measure G/T, antenna half power beam

width (HPBW) , and G/T ; and satellite power data used to calculate C/kT and

EIRP.

6.4.1 The Standard Check, and Providing the Proper Measurement Conditions

Periodically throughout all of the measurement routines contained in the

ETMS program MEAS, a check procedure is initiated to verify that the proper

measurement conditions exist for a valid measurement, and to provide documentary

evidence that the ETMS is operating satisfactorily. The standard check contains

9 pieces of information labeled as follows: BRG PWR, BRG PWR+a, PWR+a/STD, STD,

Ta#, MANL, PRGM, STD CK, and FLTR.

6.4.1.1 Meaning of Labels, and Normal Conditions

BRG PWR is the power incident on the NBS type IV power bridge due to the

output of the earth terminal after being attenuated, amplified, and filtered

through the ETMS control unit when the standard attenuator is out, and both

microwave noise add noise sources are off. For normal operating conditions,

this power level is between 0.66 mW and 0.48 mW if BRG PWR is greater than

BRG PWR+a; otherwise BRG PWR should be greater than 0.12 mW.

BRG PRW+a is the power incident on the NBS type IV bridge due to the

output of the earth terminal passing through the ETMS unit under the same con- ditions as for BRG PRW except that one or both of the microwave noise add sources are commanded ON, and if PRU+a/STD = 1, then the signal has been attenuated by the standard attenuator. Which noise add sources are commanded ON is

indicated under Ta#. If Ta# = 1, then only noise add #1 is commanded ON. If

Ta# = 2, then only noise add #2 is commanded ON. If Ta# = 0, then both noise

add #1 and noise add #2 are commanded ON. For normal operating conditions, the

BRG PWR+a power level is between 0.66 mW and 0.48 mW unless BRG PWR is greater.

In the latter case BRG PWR+a should be greater than 0.24 mW.

STD is the assumed absolute attenuation of the standard attenuator (i.e.,

STD = 4 implies a 6.02 dB standard attenuator).

36
MANL is the attenuation of the manual input attenuator in the "ETMS control

unit." The value of the manual attenuator is entered via the calculator keyboard. There is no computer read on the input attenuation value, so the operator must be careful to record any change. This is done via the special Key 15.

Normally the MANL attenuator is adjusted so that the program attenuator is

reasonably away from its extreme attenuation limits (viz., 0 dB and 15 dB)

.

PRGM is the attenuation of the urogram attenuator in the "ETMS Control

Unit." This value is set by the calculator in an attempt to keep the input

power levels in the normal range.

STD CK is the measured attenuation minus the assumed attenuation of the

standard attenuator contained in the ETMS control unit. On the average the

absolute magnitude of STD CK is normally less than 0.02 dB but because noise

signals are used in the test it will sometimes be as great at 0.05 dB.

FLTR is a number which indicates which filter is being used within the

"ETMS Control Unit." The nominal identification of the filters is as follows:

FLTR Number Center Frequency Bandwidth

1 30 MHz 2.5MHz

2 70 1

3 70 2.5

4 70 5.5

6.4.1.2 Adjusting STD CK

It is important that the assumed magnitude of the standard attenuator (A3)

is close to the true value because the standard attenuator is inserted each time

the noise add is turned on in order to keep the type IV power bridge in its most

accurate range. Thus to have an accurate knowledge of the earth terminal signal

plus noise add power, the assumed attenuation of the standard attenuator must be

accurate. STD CK is the best overall indicator of the "health" of the measurement process. The STD CK can fall out of normal because the attenuation of

standard changes due to temperature changes, or because the two relays that

switch the standard attenuator become faulty, or because the RF control unit

amplifiers are nonlinear, or the earth terminal gain is unstable during the

measurement cycle, or any other number of reasons.

37
There is provision in the EQUIP CHECK program to adjust the value of A3,

but if while using the MEAS program the average STD CK should be adjusted closer

to zero, I suggest the following procedure. (1) Stop the program (e.g., pressing the END key on the calculator keyboard), (2) via the keyboard enter A3

(i.e., press key "A," then key "3," then the key "EXECUTE"). In the computer

display will be the current value of A3, (3) press key "RECALL." In the display

should appear "A3." (4) Press key "=," then enter the new value you wish for A3

and press "EXECUTE." STD CK is the measured value minus the assumed value of

the standard attenuation expressed in decibels, so if the STD CK is averaging

say 0.1 dB, then you would want to increase A3 by 2.3% (i.e., if originally A3 =

4.000, then new A3 = 4.092). (5) To check the new value of A3, add the following program to the end of the existing program.

9000 Q = FND0 + FNDl

9010 Q = FNUl

9020 Print

9030 go to 9010

(6) The program in (5) repeatedly runs the standard check. To use it you enter

via the keyboard "CONT 9000," then press "EXCECUTE." When you are satisfied of

the new average value for STD CK, press the key "STOP" twice. If the new STD CK

average is satisfactorily close to zero, you can erase your temporary program by

entering "DEL 9000," then press "EXECUTE." Otherwise repeat steps (1), (2),

(3), (4) and (6).

6.4.1.3 "NOT NORMAL" Display

If during the standard check one of the measurement conditions is not

normal, then the computer will stop with the display "NOT NORMAL (1=ADJT)

( = NC):0?" Specifically, one of the following conditions is not met.

(1) PRGM between 2dB and lOdB

(2) (BRG PWR+a)/(BRG PWR) < 4

(3) (BRG PWR) /(BRG PWR-i-a) < 4

(4) STD CK <|0.05dB|

If the operator chooses to continue with the conditions "as is," then he presses

the space bar, then "EXECUTE." On the other hand, if he wishes to correct the

operating condition, he enters "1," "EXECUTE." The operator will then be given an opportunity to change (a) the value of the ETMS input attenuator, (b) the

38
noise add source, and/or (c) whether the standard attenuator is inserted when

the noise add source is turned on.

Condition Not Met Changes to Consider

1 a

2 or 3 b,c

4 change A3 (see =9.1.2)

6.4.2 Establishing the Antenna Biases

The G/T measureinent routine does not operate well unless the star center

prediction is well within the half power beanwidth (HPB'.n) of the antenna. This

normally requires that the computer-predicted azunuth and elevation angles be

biased in order to obtain the needea earth terminal azumuth, elevation command

angles. The need for the bias corrections is due to an unknovm mix of situations such as antenna bore sight errors, elevation dependence feed sag, atmospheric refraction errors, errors in t'.ie site coordinates, and error in time.

The first step is to find the star.

With the ETMS connected to a dovm converter output of the earth terminal,

adjust the ETMS input attenuator with the meter bypass in the BYPASS position

until the output meter is midscale (at 0) on the meter x 1 scale. Then switch

the meter scale to x.l and with the meter offset knob recenter the m.eter reading. If any of the four pointing biases (hour angle, declination angle, azumuth,

or elevation) are currently in the program., it is usually best to zero them

using special function Key 5. Next press special function Key 4 and start the

star fix routine (normally for star --l = Cas A) . This routine displays the

predicted azumuth and elevation angle for the star, and this prediction is

updated about every 10 seconds. Command the antennas to the predicted pointing

angles adjusting the meter offset or sensitivity as needed; search for pointing

angle which gives the maximum star output. Com.pare the antenna pointing position readout with the predicted pointing. Stop the star fix routines by pressing the "STOP" key twice; insert the appropriate AZ and EL biases via Key 5.

Again restart the Star Fix routine (Key 4) and verify that the antenna pointing

position indicators agree with the biased pointing prediction displayed by the

6.4.2.1 Finding the Star

ETMS.

39
6.4.2.2 What to Do if You Cannot Find the Star

If for some reason you cannot find the star using the above routine, try

the following check list.

(1) If the antenna elevation angle is below 15 degrees, and there are unusual atmospheric conditions, the refractive corrections may be incorrect, or

if there is an obstruction in or near the line of sight, switch to a star with a larger elevation angle. (2) Check that the earth terminal down converter output

is connected to the ETMS control unit input. To double check, turn on and off

noise add #1 (via keyboard, FNX82 and FNX83, or via program switches, 82 and 83)

and observe change in ETMS output meter. (3) Compare the predicted Cas A

azumuth and elevation angles with those generated before the trip with the SITE

PREP Program. If an obvious difference exists, the wrong site data may have

been entered, or perhaps there is a computer load problem. If it looks like a computer load problem, turn the calculator off, and start up all over again.

(4) Check that the time is correct. The clock should read Greenwich Mean Time,

not local time. The date from which the star positions are calculated is the

date in the page heading, not the one set in the clock unit, and it should be

the proper day in Greenwich, England. To double check that the correct date is

in the calculator, gain keyboard control of the calculator (denoted by the lazy

T in the disply), enter "C6," press "EXECUTE." In the disply will be the Greenwich hour angle (GHA) to Aries at 0 GMT expressed in decimal degrees. Using "The

Nautical Almanac" or "The Air Almanac" of the proper year, look up the GHA to

Aries at 0 hr GMT. In the Almanacs this will be expressed in degrees and

decimal minutes. Divide the decimal minutes listed in the Almanac by 60 and add

to the listed degrees to obtain GHA to Aries at OGMT expressed in decimal degrees.

This should agree with the computer constant C6; if not double check the value

obtained in the Almanac. If they still disagree, the wrong site data was loaded.

If only the day is incorrect, you can correct the computer value of C6 ("RECALL,"

"=," enter new value, "EXECUTE," or "C6 = "--. ," "EXECUTE") and look for the

star again. (5) Check that the site coordinates are correct. In a manner

similar to (4) above, check the computer constants C4 = West Longitude of the

site in decimal degrees, and C5 = North Latitude of the site in decimal degrees.

If the site is at East of the zero Longitude, C4 should be a negative number.

If the site is South of the Equator, C5 should be negative.

40
6.4.3 Sky Profile

The sky profile option is selected at TRAP via option ISKY. A sky profile

is a series of sky temperature measurements made at various elevations along the

path that Cas A will take. The measurement results are then least squares fit

to a constant plus a cosecant of elevation term. The purpose of the sky profile

is threefold. First, it yields information concerning atmospheric loss.

Secondly, the curve fit parameters are used to correct for the change in sky

background temperature as the various star cuts are taken to determine G/T.

Lastly, the sky profile results are used to identify when any unusual changes in

atmospheric conditions occur.

6.4.4 The G/T Measurem-ent

Before the G/T measurement routine can succeed, the ETMS manual input

attenuator needs to be properly set, the noise add sources functioning appropriately, and the antenna bias corrections established as discussed in the preceding paragraphs. Once this is done, the G/T measurement routine is initiated

by selecting the "2G/T" option at TPvAP. One measurement set consists of 6 cuts.

For the first cut, the antenna is pointed and braked at the cold sky two degrees

offset from the path of Cas A. A "cut" consists of approximately 30 sequential

power measurements taken at six-second intervals on the output of the earth

terminal. The purpose of the sky cut is to compare the current sky temperature

with the earlier sky profile results. This helps identify atmospheric changes

and/or interference situations.

For the remaining 5 cuts, the antenna is pointed to a computed coordinate

position so that the radio star Cas A drifts through the antenna beam in equidistant, spaced cuts. After each cut, a parabolic curve is fit to those measurement points when the radio star is predicted to lie between the half power

beam width (HPBW) points of the antenna pattern. Cas A will remain between the

HPBW points for 11 successive measurements (66 seconds of time). These eleven

points are curve fit to a parabola, and the discrepancy between the time the

star was predicted to be centered in the antenna pattern and the time the star was actually centered is used to calculate and print out the equivalent antenna

hour angle offset. If it is desired that a new hour angle bias be entered for

improving the predicting of the time of the star maximum. Key 5 is pressed and

the new hour angle bias entered. The hour angle bias (or declination angle

41
bias) can be entered at anytime without invalidating the measurement data.

Remember however, azumuth or elevation biases can only be entered between

measurement sets ; otherwise the antenna declination offsets between cuts are incorrectly calculated and the two-dimensional curve fit to the data is incorrect, which invalidates the entire measurement set.

After the last cut in a measurement set, the calculator fits a parabola to

the maximum of the prior store cuts versus declination offset from the unbiased

predicted star center. The difference between the unbiased predicted declination angle for a star maximum and the actual declination angle for the star

maximum is printed out. If it is desired that a new declination angle bias be

entered for improving the biased prediction of the declination angle for star

maximum. Key 5 is pressed and the new declination angle bias entered. The

declination angle bias (or hour angle bias) can be entered at anytime without

invalidating the measurement set (but remember - do not change an azumuth or elevation bias during a measurement set). It is best to wait until the measurement set is stored on magnetic tape before changing the declination bias. If

the bias is changed before the measurement set is stored, the most graceful way

to continue is to press Key 10 (shift plus f^) to store the data.

When all the data for a particular run have been taken^ Key 19 (Last Meas)

is used to store the summary information and the computer program. When all the

information has been stored onto the cassettes, NBS recommends the computer

program be listed out.

After the program is listed out, the rework program can be loaded at TRAP

using the option "4LNK.

6.4.5 The EIRP and C/kT Measurement

The EIRP or C/kT measurement is initiated by selecting the "3 EIRP" option

at TRAP. The EIRP or C/kT measurement routine uses measurement of power at a point in the satellite spectrum free of signals within the bandwidth selected,

and a measurement of power with the satellite signal centered in the ETMS filter

bandpass. The narrowest filter provided has a nominal bandwidth of 1 MHz. The

measurements of EIRP and C/kT were not specified as being part of the ETMS

package, and these measurements have not been engineered nor programmed for the

inexperienced metrologist. The program that exists was developed to collect

sufficient data for NBS metrologists for accurate measurements of EIRP and C/kT,

42
but the accuracy considerations and the neasurement precautions required for

accurate EIRP and C/kT measurements are not dealt v;ith in this manual.

6.4.6 Data S torage on the Run Tape, and the Summary Tape

Ideally, each set of measurement data is recorded twice, once on the run cassette tape (which contains the MEAS program) and secondly on the summary

tape. The run tape has the measurement program., the site data, the star data,

the measurement conditions, and all of the measurement results for one particular run all recorded on it, and it is intended to be an archives tape which is

write protected as soon as a run is finished. In contrast, the summary tape is

a working tape. The measurement data from several runs can be accum.ulated onto

the tape, and the rework program updates the summary tape files with the latest

results

.

The particular file on the run tape on which data is stored depends on the

set number (computer variable is X7 ) . In turn, N7 is determined by the run number (computer variable is N) which is controlled by the ET^'IS operator. It is

possible to overwrite a "run" data file by intentionally or inadvertently re- using a series of N values.

The summ.ary data tape files are filled sequentially. Every store operation

is stored in the next available file.

The reason for storing the data twice is to avoid losing data when cassette

recording errors are encountered (ERROR 59). This occurs because of a flaw in

the tape, or unclean recording head, or other causes. If the problem, occurs during the read operation, the file can sometimes be recovered by cleaning the

read head and then rereading the file, but usually that data file is lost.

6.4.7 Changing the Run or Summary Data Tapes

When the run tape or summary tape data files are full, the operator is

notified and the program autom.aticaily performs the "Last Measurement" routine

of storing the summary data, etc. To continue on with the measurement process

without reloading the MEAS program, a new run and/or summary tape needs to be

inserted and the appropriate changes made to the computer variables so the data

store locations will be appropriate for the new tape. I-Thenever insertion of a new run or summary tape is desired, the "5 NEW TAPE" option is selected at TRAP

(e.g. Key 0) and the appropriate entries made in response to the computergenerated questions.

43
' 6.4.8 The Use of the Special Function Keys

In the MEAS program, the special function keys found In the upper left-hand

corner of the calculator are important for the normal operation of the measurement. The ten special function keys are labeled f^, f^' * ' •' ^g* Twenty

special functions are available by using the above keys in conjunction with the

shift key. A special function can be activated anytime the calculator is stopped

(by pressing the stop key) or waiting for an input.

For convenience, the routine activated by pressing f^ is denoted as Key 0,

and so forth through Key 9. Key 10 is the routine activated by pressing the

shift key and the special function key f^, and so forth through Key 19. The

routines associated with the special function kej's for the MEAS program are described in the following paragraphs.

Key 0 sets the MEAS program to "the restart alternative position" TRAP,

namely the position in the program that chooses the major program option. The

options in the MEAS program are "0 MASTER RESTART," which is used to initialize

certain program constants. These constants need only be initialized once, and

this is done automatically when the program is loaded. "0 MASTER RESTART" is

used primarily for the case when the calculator gets hung up waiting for a return flag from the digital voltmeter. This is a calculator quirk that sometimes occurs on the first command to read the voltmeter. The operator is warned

of this problem on the printout so no special concern for this option is necessary. The "1 SKY" option initiates the sky profile measurement routine, "2 G/T"

initiates the G/T measurement routine, "3 EIRP" initiates the EIRP, C/kT measurement routine, "4 LNK" deletes the MEAS program and links in REWORK program,

and "5 NEW TAPE" changes the calculator constants to store data to the proper

files on a new tape.

Key 1 is used to restart a "cut" in the G/T measurement routine. This key

typically is used after the operator realizes he has missed the antenna pointing

and needs to start the measurement over again.

Key 2 is used to restart a measurement set in the EIRP measurement routine.

Key 3 is used to refit a parabola to the results of a set of five cuts.

This key is used when for some reason one of the measurement cuts is replaced

and there is no need to remeasure the remaining cuts.

Key 4 initiates the star fix routine, and Key 5 is used to enter new antenna

biases and is discussed in paragraph 9.2.

44
Kev & is used to enter into the cor:puter program a change in the ETMS input

attenuator or a change in the filter being used.

Key 7 is used to change the estimated magnitude of the noise add reference,

T , which changes the scale factor for the data collecting graphs.

Key 8 is used to ch-ange the estimated value for the system temperature

relative to the noise add reference, T/T , both its zenith value, and the coefa ficient of the cosecant of the elevation angle. T/T determines the zero values

a for the data collecting graph. Because T/T is calculated automatically from

3. the sky profile measurement, and because the zenith value of T/T is recalculated after each cold sky cut, there is not much reason to reenter a new value.

However, when the measurem.ent frequency is changed, T/T can be somewhat in

error, and sometimes it is convenient to manually correct the value.

Key 9 is used to change vrhether the 6 dB standard attenuator is switched in

when the noise add source is on. Key 10 is used to store a partial measurer^ent set. For example, a single

additional cold sky cut may be taken for a record concerning the atmospheric

conditions

.

Key 11 is used to store the star and site parameters, and the current

measurement program onto the run tape. Key 12 stores the summiar}' data matrix M,

and the program constants matrix X onto the summary data tape.

Key 13 is used to list out all of the data contained in the data summary

tape. Key 14 is used to list out the data contained in the current data matrix

D.

Key 15 is used to enter a new measurem.ent frequency and corrects the frequency dependent parameters such as star flux.

Key 16 is used to change the number of points used in the parabolic fit

routine. For Cas A, 11 points are normally used. Because the fitting routine

works best when the star is between the HPBW points, fewer points are used for

other stars.

Key 17 is used primarily as an alternate way to calculate the magnitude of

the noise add, T , which in turn adjusts the scale factor of the data collecting

3. graphs. Because the magnitude of G/T is calculated after one measurement set

3. is finished, this value of G/T can be entered via Kev 17 and used to calculate

a T by using a value for the antenna gain based on the antenna diameter and the

a

° operating frequency.

45
Key 18 is used to change whether noise diode //I, diode //2, or both diodes

are used for the noise add signal.

Key 19 is used when the last measurement data have been taken for a parti

cular run. This key starts a routine which stores the summary data, and the

current programs onto the run and summary data tapes.

6.4.9 MEAS Annotated Printout

The annotated printout for the MEAS program follows. As usual, the MEAS

program is loaded by the LOADER program, which is also included here.

46
MEAS

9i lAtsenT nOfJ CtiBPti} T/\t>£ /a/ re-K \'/if u OAn^rrr

LORri

RUN t DC Ti f'l^s r/APe i.i>AoeD

rich'-- I SITE D H T Fi ( 1 i;i = I M ! , F : T > 5

V P b ri C u H S T C: Fi fl H G E ij P T I n I -I ri

=

m t-i n ERkuR 59 Iri LINE 41 '/j — Oinrf i\efi,o hsad cjIba^^ i^j^

J- UN I 4 15U — /tgM^fo r<p ^.»/t£>^ /r a)»^Ag^> '

i

V'";' 1024 . 1 4 .i N B '5 1 H . y 4 L 0 H Ii E R D 1 - F 0 > T 2 - F 0 : Y. . y Z < I) 1 - 4 > T 2 - 4

Sysi'i # 6.09

1-

RUN ; P R 0 G 2 ?' 6 . 5 4' 1 1 C fi i 1

F-' R u B E F: T S - fl N T # 1 TUE: 197? MhV lu < 1976.470)

7.551 LHzi 60.0 Ft. DISH G.--Tq G-T

34. 15 iJB/K 40. 33 dB

@

IB id Id Id Id Id Id ip m ^, I], Id Id Id id ii, @ id IP id 1^ Id 1^ iti Id id ,s id g Id id @ 15 ,d Id @ I], Id § id Id id id id id ,d IS i^, id Id Id id id id lii la IB Id Id Id id ,d Id id id Id id Id Id id id Id ,d i;-. i, PRuG C0NSTS ' '

H4: b.09

H?: -17. 55

B5: 0.190451

B : 3.22544

C4: 122.03

C7: 0.23

Co : 6 . y000oE- 03

D3: y.6

Ii9: 0. 18

G6 : 3 . 0 1 622E-0:;

H9: 523.6

fl2: 2

«

fl3: 4. 074

Fl5: 6. 24 H6: U . 32

E2: 0 . 65 B3: 0 . 9 3 86: 7. 59224E-03 B9: 170. 327

CI

:

4. 5430OE+13 C2

:

1 C5: C 6

:

270. 3 0 2 C3: 6. 1 C 9

!

0 . 2 1976. 47

Dl: 0. 1 ri2: 6

II 5: 0.015 Ii3: 0. 75

ri0: 0. 0157S45 n : 60

Fo: 0.01 F : 7. 551

G4: 6. 53155E-03 G5: 1. 11233

G : 1361370

HI : 0 . 3 H5: 1

L5: 2. 09331 Lt: 2 , ] 7 LS: 1 . 1 1961 L9: 0.01

3

M5: 4. 779 M6: 0 . 973

MS: 3. 924 N9: 7 . 9 4 9 M : 12234.

3

Nl: 6 H6:

N : 1

0 1

:

cr tr --i 04: ~' 5 i

"

0 9

:

5.634

L7: 10.1245

L : -5

N7: 1.95-

MO: 6.1

N7: 500

06: 1.25

47
MEAS (cont)

Pi: 2.375 P4:-5.S14 P6: S.-G?

L ! 0.0 S 3 Q 7

:

'

" 1 „ 7 • :> 2. y d E U 3 Q 9 :

- '4 . 7 1

9

F' 0 i U . 2 '4 6 Pi

T : ill. 3 11

IF HflRljl'ifiRE

( 1 ) STOP + S TOP

(£jKEV 0 (.3>Q '.RSTRT>

fiEM^i^eefi TO use Oreak pc^r ssr

:! ^^fEREl-iD) =Nl ' 0

RPE Eirr? PIERS IHTC ^hC): 1 — aiu e rMS <uo/vr'

3 P r H f , 1

[I E !... 1-1 % B P P P' T S : PI Li l.'.|

" "

HDli 2s-hr: Tu CPOrr |./rHlM- 1 :. ','PS ..Hf . : a ' '^U fj^y.^ ou^t^rz^-^M^c^JUL, aJUU. Xifi-^ ^ ci^ ^u^uA^ dU^ ^JU.*^ av/^ ^ aJ^. T-ku^Mxl

f"| T p : i

li ? pi r, p 1 |lj I? fi ,, = V i i:i '^^^^

i:::: ih "- i .• I. i

, .

i -

\ IJ,. ^ ij 5 7-0 -r ^.P L mmiii r'i i^7;IP ' - w:, ) ; 65

RU P:>P Ri.P: n - ii 1" ti 7' l=#i ? IHoPPT S i.i , NRcM T.;RIiiij( =HC): 1 TERR

^ M M i 1 D 0 Pi ! 0 ? 1 1'

1 1=1 \\ !., C = H 3

i

I JP !

, . T :::: E :[ i-:; P' , A L M p

,

':.

j-

' [E H F R P E -H: M

CriS m: SL Itt'. =M

/f^ TBf^r^ l>Bio potuT ffiooe A/oT

S P: V ! G H T ( HP ; 3 "\ pi F; T > 3 r 0 p , E; 1"

e

? ': 4 n 6 ? l

1 1 ^ Ci 0 1

1

3 Ri T 0 ':? 1'?

f-l W'

PI 1 Pin 'j'iPR.:":. "NC'i 0 -NO 0

(713 1024 :::.20:'

\ 1 1; R: 1 3 , I) N E: H S : U l 1 A : T J 'r 1 2 : F! . 0 3' U 1

\ >

"\ 2 1

48
MEAS (cont)

# S.yy kuil

PRfiG .:;7b,5411 CM MP ROBERT Si hNTiU

THE: 197?' MH i' 10 ( 10,-'S.47o.' 7 . Z 5 1 G hi z H b i;i . 6 F' i; 1) I S h G

^

' 1 a G

'1 :-4. 15 dB--K 46. SO .'IB TEMP DEN PT. REL HUMD WniER nEHO CLOUD COVER NINJi

S0.9 F 4b. 1 F 2S.b 7.4 ^{-^ n13 U O i'imPi

ERROR 103 111 LINE 4615 rwf /tr />£ad +>u. "'^^'^

4605 r ' = '

,

' 0 * ( 2 - '•/ y > . Q 1 * Fl [ 7 ] 1 0 ti 0 ..J

V9! V; 01 ) h'-. 7> 5 J

0 2.4 0 7 0 - 2 . 4 0 7 P 0 F - 0 6 4 '9 0 0 .

;"; 1 5 7 6 6 1 p!

F fl jJ 0 + F" ; D 1 —THIS IS A Soob KE-rBofiUP comh'MvO TO CCeAH ^' F i^A/Ajy" FL^iCi ^

1 0 F: ' r J 2 G ' T' 0 E I F. ! > -I L. F 1 1 ; ? 5 0 F: ; :

: " Fl F' Fi. s ij R 1 h-: i

^ ^^1 ! SOURCE' CH3 FlF =NC,' = 1 CPiS Fi: SETtft. -140;^: 2

£ V: V ; G i ] T ( H R 6 ) ? S T' H R T ? S T ij p ? 3 T E F' '' 4- j 6 j i

CLOUriSfO TO 9 = RFlIN>( =NC) : 0 NIHIi <i'iFH)< =NC>- 0

''

49
MEAS Ccont)

HBSlC.85 HER'; Dl-Fl. T3-F- 12 ;!e5 Di- T2~4

#6.09 ,

^ RUN Z PRUG 276,5411 CRhP KUEERTS^ HMTttl

T U E : 19 7 M H v 1 0 19 76.470)

7.551 GHz. 60. ti Ft DISH G/To G/*T

34. 15 dB - K 40. SS dB-'K TEMP HEW FT. PEL HUML NHTER LENS CLOUH COVER NINB

80.6 F 45.2 F 23. S 7.5 ?n - ,'it3 O 0 nPh

ERG PUR BRG PRH + o PWR + o-STIi? S TD Ta+F MflNL /PPGH\ STD CK FLTR

0.4900nH 0.3327nN 4.0740 0 2dB I 4dE j O.OOlOdB 4

SET # 2 CHS H ^ci^AJ^

1Z EL GNT T/Ta

18.9595007 11.19171132 READY?

4 0.568952386

25,43772698 15.69755805 RERDY?

5 0.565235416

31.12720383 21.36047576 REflPY'''

- 6 • 0.567557997

T- To. = 0.5644 + 0 . OOO;'. S 1 N L

' ^

50
MEAS (cont)

SOURCE: CRS fl< =NC s 1 FREGCHhZjV =HC>: 7551

# MEHS PTS-: =NC> ^ 3fl # PTS IN FIT< =HC): 11

CLOUDSO TO 9=RhIk>': =x\v.yi h vv WIND CMPHK ^HC>: 8 ?3

<77 1027 11.25>

NBSiC.05 riEHS <D1-F14> T3-Fi2: a. 86 <Di-4> T2-4

-7-

Svi,., #2=84 * RUN 2

PROG 276.5411 CAMP ROBERTS! HriT#l

TUE: 1977 MfiV 18 ( 1976. 478)

7.551 GHz? 68.0 Ft DISH G^Ta G^T

41.34 dB- k 43.38 dB^K

TEMP DEW PT. REL HUMD WhTER DENS CLOUD COVER WIND

35. S F 45.3 F 25.8 7.6 ^rvntS 3 3 r^ph

NERS HPBW TinE'KRS:.' OFFbET BZIKUTH ELEV CUT RUN SET H 6sec 0.1371 11.45139 Z.QSOdeg 29.62 60.81 -3227

T.-Ta = 0.6353 + 0.80I15-CSC L 'TiHB useo To S£T T/fff AH re f/A GCi:i=NEW HZ:. EL =^0^ 6 r- , PEHK# [^tF eTTS- - irrL-TB3--^^'^^:Ti^^^^^ ^W-'

14 j__ I O.euOyde^ y.OOayde? e.COOOd-es 0.08M0dt5

BRG PWR BRG PRW+a PWR+ax-STD? STD Tcs MRHL PRGM STD CK FLTR

0.5a70riW S.3S£0r>W 1 4.0S6H 0 4dB 3dB a.816edB 4

lEF.n LEVEL. 100-; LEVEL • K ¥<DB> KCP-S) £<.JN> T Ta

£1.6 276*7 0 O.9530#Tn 5 0.876 1.746 31.5 582 63. S 180.8

51
MEAS (cont)

1 u

I

1

0

1

4

-15

-16

-1? -13

-1928

21

24

TCSKY"'

H . f,

f

f..

Tn

! 1 1 1 1 i r- i 1^ 11 11 h Ir: F' F' 0.

! .[

i- •

:

'!

:

.1 ':r I ! h-:

'"'

ti

iJ

. t0C

. 0

I '^j !:J 7

I B 1 4

J „ 6 3 '^4

"

' :'

„|.. j -I- ' " ' :' :' :'

1 j_ 1,

. tl 0 r 4 0 . 0 "

-i^ f''3

J. I 0 a

• 0 . C 3 6 7

1 J- 0 . -i- i'J t;:'

1 # f {) •- i3 , G : 4 # 0 . 8 1 i;j 0„63r'5

.ij.

1 tl- ! " -' - i-J „ ^ B I 3 0 . b:j40

1 #

"

. b 0 L1

].

1:3

:.

j o 1 o

J o 1 Z

':

"

':: i + 1 "

'1 1'

1 1 d a b -J : 2

''- '

tr . " - z

ri -1' 1 l' L u _ _'

! It 0 a

j:l rl k1

it 1 fl- ! " M „~; "'

j_

" z ;:|

':' °

fl- B b y

~

0i „ -i^ l-J C'

tt 1 rr !

1

1"' 0i D

j;l kI C\ [.i'j

":

:. z, !'" t^An

+ 1 0 0 , 3314 0. 6341

1 + 0 4 0 . 3301 fi . 6 3i 3 4

+ 0 0 . 3 0! 9

+ I 0 . bPi':: 1 0 . El 1 6 0 ,, 6 3 :3 3

+ \ 0 . 60': 0 . 3321

I 0 , 60?: ,..|. 0 . i3 .629 0

4- 0 4 3 3 0 2 0„ 6331

+ 0 '3 0 3 3 . 6 3 3: i

-1-

! 0 60;:: Q 0 . 3814

! + 0 , 60?:: 3794 0 . 6409

I I ..,.!.. .

Of- TH-B 30

0 . 4:3 #PTS

30

/ r DEl// A Tiev OF rri£

H

/3/ DHlOiE

OV, //J

CJL4*. 'YUrU ^t^'\ it

52
MEAS (cont)

N <\s SET# 2

NBS1C.05 MEflS <D1-F14) T3-F12

1117 OCT 17 II £-Mr

h6 :Iu-4> Ti-4

-fi # 0.04 RUN

'ENP

PROG 276.5411 CflMP ROEERTSr hNT#1

THE: 1977 HflV 10 ( 1973.470)

7.551 GHz? 60.0 Ft DISH G/To. G.-T 41.34 dB.-K 43.51 dB.-K

DEN PT. REL HUMD WRTER BEHS ClOUD COVER WIND

45.3 F £2.7 . 7.5 9n--fiT3 3 3 nph

MERS HPBW TIME': HPS) OFhSE

1

ri^IMiJTH

0. 1371 11.52028 -0 . 069 de 3 61-33

CUT RUN SET N

GO t 33- EL ^RC ..• : 3

T/To. = 0.6349 -t- y.001l5*C3C L

ELhPSE PERK# PTS EX hR EIh3 DIL BIhS 3Z B I R 3 E :_ X H 3 14 sec 16 1 0 . 0000 di£ = . 3 3 6 0 a € ? 0.0 000d€ 9 0 . 3 3 0 0 d

s

ERO LEVEL 100". LE^ 'EL XKK) K 'mIiB:' T'.Li-i :. SCJH) T Tn. 0.636£*To, 0.'?513*Tn 2E-05 1 . 750 :l = 6 63. t. 100.0

10

-11

- \ V -13

4 0

I 60

I oO

I 100

^ A.^Y^-*' l*Jt>ICAV ' -UJ-^'-eA ^|M»-t/i.Ct, ^laJI

PWR#1 PilRfe2 P.-Po 0 . t076 0. 3304 0 . 64 1 2

0 . 60 4

S

0 . 3 S 0 £ 0 . 6 3 0. 6051 0 . 63

0 . 6050 0 . 63 45

6 . 6059 0 . 3798 0 . 6 4 0 1 0 . 6043 0. 3316 3 . 6 3 3 . : 3 3 3

0 . 62 i 6 J . : 0. 3351 ' h.

. ^ _ 4

.

0 3 3 1 3

3

-"^

! S »

1 . 3 337 3 .. !:

'- Q

3 . .

53
MEAS (cont)

it

15

16

-17 18-

19

-20

-2122

28

29

3B

#FIT

1

1

RNT HPBU

0. 12U de?

THIS LS Afpf>,OK\HsrzLY

T^f noun Atfjiie

T':ChS H)-To,

9.7337 + - 1.51-.

i n c r e o, p H f^: B IRS 1 1 f e u I-, b i t .j r- e h E ri K decrease PECL BIAS it 1st c^jt loo

H (I? SET# >•:; =NC): 9

<77 1027 1 1.33:'

.ril--F14:- T3-F12: -..06 .ril-4/ T

.(•I # 5.04

54
MEAS (cont)

FROG 276.5411 rHHP KOBEF:!

TUE:,: 19??' MfiY li-i 1976.470)

7.j';:'l GHz? 66.0 Ft UISH

HTttl

TEMP

SS.9 F DEN FT REL. HUND jriTER DEhh: '.3 ^i'l/fit.

41 . 34

CLOUIi OVER

43.3] db/\

n : l^HEW riZ? EL

TlilE' l !R-7

1 1 , 5;;-; 194

OFFSE

-0. H34d

ELRPSE

ISsec

:LKU 6.6

N3

10

-11 -12

-13

-14

-1516

"17

-13

- 1

9

-20

-21

24

LEVEL.

;;62*Tn

#FIT

11

1" a - d . 6 3 4 9 + 0 . 0

PEflKtt PTS EY: HR Ell-iS 16 1 \ 0 . 0 0 0 u d 5 ;?

10O"-; LEVEL

0. 951S*Tn

FIT

HHT HFBIJ

0. 132 de^

31. 75

115*CSC L

nCL EIFlS

0 . 0000deTi

YCriB)

1 . 750

El... CUT

1

fE T f I

HZ BIR:

0 ., 0 0 0 fl i-i

T'jjfl::

: 1 .

i:

.UHo

:i50 +

- HR Flf 0 .!"

jc; OF 1319

SET

EL EIHS

0 . 0 0 0 0 :J P

To. 100. 0

1 00

F'WR+H ¥' WR#2 p. ' F' 'J. 0 . 4304 0 . 3034

0 . 4331 0 . 3 0 2 2 01 6424

0 . 4303 0 . 3027

0 . 4319 0 . "i 0 2 2. 9

0 . 4937 0 . 3070 0 o439

6 , 4944 . 3050 0 S 5 7 2. 9 . 50 =-.9 0 , i 0 7 6 I? 6 7 3 7

0 . 5169 fj

.

3 1 1

9

0 6320

0 . 541 1 0. 3166 0 7 1

' 6

0 . 5673 0 . IJ 0 0 . 3 3 Fi 9

0 . bL:00 0 . 3 3 5i 6

0 . 6505 0 . Fi 6 6 0

0 . 6656 0 . 3 '^i- € 6 P} . 0 0 . 3740 0 , b 4

0 . 5033 0 . 3720 01 . 0 . 4349 0 . 0 0 ~. til i .TM 0 . 55mF 0 ,, i '2. yi 3i 0 . 5304 6

.

:.149 0 . 7 0 1 0

0 . 5071 0 . 3 Fi 7 7 0 . 6 7 5 9

0 . 5071 0 . i 0 '9 2 0 . 6 7 ij 3; 0 0 „ 3 0 C 2 0 . 6 5: 4 4

0 0 . 0 . 0 0 . 3037 0 . 6 :3 6 9

0 0 3035 0. 6366

0 0

.

0 . 6393

0 0 . 3024 0 , 6431

0 . 433^ 0 . 0 . 0 5 0 2 9' 0 . 6 3 9

?'

pehf#

1 A . :3 1 LEVEL CHS H

increas

dec re as

e HR bi:HS }. r F.'C.4: before FEflKlt

e DECL BTfiS if Ist cut too dcr.:p

55
MEAS (cont)

tt 3.04

TEMP

39. U F

F'RQC; 276., 5 H1 Cri!-r i''i.;. E TUE: 1977 Nfi'i' lu . 19, ^.. , 47

'i\'5'51 GMz? tiiii.H r i:- LI ::M

HEM PT 45.3 F

MEFlS HPBH TINEdHRS

bstc y. 1371 1 1 . 64359

T/Tn,

GO : 1=HEPI FiZi. EL -NC ' : 3

PEL HiJ

OFFSET

0 . OOOcie 3

T6K L,E\\i 5 3i )/rit:

FlZIliUTH

31.05

0.6349 + ti . 00 1 1'j-: CSC L

ELFiPSE

14£ec.

PEFlKft PT3

1 6 1

:ErO L.EVEL lOO;. LEVEL

0 . 6362* T a 0 . 95 1 S*Ta

FIR biff;

Fi . 0 0 0 0 d 1-

1)1"!,, BIAS

Fi . 0 ' ; 0 >:i t. -I

I! LI

6 To F,, T 41.34 dB. |:„ 43.31 clB/f CFG Fill CO'v'EP FJIIlIi

(p/t E DI ere- D c eA/ re « cUtYrji-I SET M

i 0

HZ BIFIS

0 . 000 0.: 'i-: -i EL BIFl?

crvTtH cur PKDicnon/ (^ojyiTs aRAPH scALeJ

2 . 3 2 E

" 0 5i F) . o 7 6

N3

10

1 i 12

i 2 {i

15

1

6

•17 IS

19

40 ] 00

ttFIT nor iipL|.,|

] 1 0. IFF'

PNR#1

7>f/S ifiAeH U/OOLO H^Aoe BE£tJ Fl/Ll SCALC if

i.e..

I +

T

'

Fl . c

riS H ' • I a

PNR#2

'i Fl . ;3 0 2 51

fl , 3 0 2

) 0 , 3' 0 '3

,;:! 0,304 3

' 0 . -3 0

'

' i ,'

# I # I

tt I # I

Fn MAX

0

,

0 ::5 1, 0 . 3 ti '3 F;

i:J , 0 „ 2 1 A- 2

F 1 0 . 3 2 0 3

0 . 1 2: 0, 3267

0 . 60 =1 'i 0 . 3 ,3 2 7 Fl „

:.; 1 -i 1 0 . 6 3 0. 3406 0 .

Fi . 6 S 3.4 0 . 3 5 0 4 1 J, 0

IJ . ^ c\ 0 . 2799 '3 „ 0 . F:4 :" fi 0. 2304

0

.

0. 2345 !- 1 „ 0 .

*"! J 2. 0 . 2 £; 2 0 Fi

.

' : 1 0

.

7 l-ij 13 .

t:i

.

1

7

Fl

.

0

.

J. 2 0 0. 2741 0 .

ij

.

0, 2721 0 . 3 4

.

'

' ' 0

.

4;? 41 0 . 2; 6 5 F; 0 .

"1 ; 'i 0

.

46 50 0. 2617 0 . '69 1 0

.

56 0. 3244 0 , 0 , :32 1 1 0 , 0

,

3 F) 0. 3142 0 . '' Fl '3 0 . 5 F! F4 F ! . '3 13 ?' 7'

k' . 0 . Fl „ 3 Fi 2:

7

Fi

.

Fl , '3 F'i 2- € 2} , 0 4 Fl . ,::Fi'3';' l:J .

1 ,1, 4 0 . 2:F)3'::j I.I .

rIF !-iNi

56
2-IEAS (cont)

11-

R'jU

PRGG 276.^41:

THE: 1-577 Hi-r 7.551 GHz. r

"

470>

G To G T 41,34 ciB K 43.51 dB-i

TEMP

89.0 F BEH PI.

45. S F 7. 5 •3ri-''f-it>: COVER

3 i-iPh

— — -_r-:

HERS HFBii " TIMECHRS/ OFFSET fiZIHUFH -ELEV CUT RUH SET H

6sec 0.1371 11.70167 @.834d6-=? 39.36 t.2.71 1 £ 2 11

_/^>f5 P{£S'JLTZ O fr

GO :l=HEW RZjEL i =HC>i

ELhPSE PEflKt

15

PTS EK HR Bias

e.9800deg

BCL BlfiS HZ ElfiS

0.e0a0ueg

EL ElfiS

0.eeu0de3

ZERO LEVEL

y.6362*Ta

100'; LEVEL

0.y5i8*Ta

Xi<K>

2.32E-05

K e.376

Y(De>

1.750

T<CHS>

31.6

S<JN>

582

T t3. b

To. 100.0

0 28 40 60 80 100 <5i> N3 I 1 I 1 ! , 1 Pl-JR#2 PxPa

1 ! 0.4823 e.3825 0.6408

2 + 0.4830 e.3031 0.6391

0.4317 0.3035 0.6352

4 0.4KIO 0.3037 8.6341

5 e, 4966 0.3859 0.659i

6 0.5367 0.3984 0,6721

7 0.5135 8.3108 8.6892

S 0. 5236 0.3140 0.6891

5 + 0.5432 0.3177 0.7192

-10 t ! 0.56S5 0.3228 8.7565

-11 ft 0.5969 0.3302 0.7924

-12 i 0.6362 0.3465 8.8412

-13 \ # ti. 66 j4 0.3471 8.8768

-14 ! t 0.5321 0.2766 8.8386

15 0. 5310 0.2772 0,8315

-16 ! # 0.52&2 0.2745 0.8642

-17 ! i 8.5835 8,2715 8.8456

-IS ! # 8. 484? 8. i;657 0.8059

-19 t ! 0.4637 8.2603 8.7727

-20 # ! 0 . Di^Ii-J U.3287 8.7358

21 0.5386 8.3150 6.7012

22 + e . > . I : : 4 8.6983

23 + 0,6683

24 + 0. 4936 8 . 3857 8.6531

25 + 0.4325 0.3834 0.6^, 8

26 T 0.4Si9 0. a8z6 0.63S3

27 1 e.4S26 8.3833 8.6377

28 + 1 0.4820 0.3C39 0.6344

2? + 0. 4Clio 8.30K: 8.6;i>7

36 +

! 1 1 III 0.4324 8.3031 0.6379

#FIT HUT HPBII Jif- ; . - OFFSLT I -IVEl: CHS R

li 0.127 0. 0802+

57
MEAS (cont)

P R I J G 27b. 5 -1 1 1 C h N P R n E. F R T' 3 » h N T tt 1 TUE : 12 MlTi l^'i 1 . 470

7.jSl GHzi tiJ.y Er lUSH G- To G 41 . S4 dB K 42. 31 dB- K

TEMP

8 9 . 0 F DEN FT. 45.3 F PEL HUNIi WFiTER DEFF; 7 . 5 I'l't :: CLOUD COVER WIND

3 .,ph

MEn2 EIPBN T IME' FiF

1 1 . 7i21.; OFFSET

U . U 6 9 lJ ^1

FiZj F;!J1 H

2 ' . F 4 ;lev cut fun

5 . y 5 2 2 SET H

2 12

GO : l^FIEN RZ- EL

T-T>

= HCi: 6

"I — n . I-, 349 + 0.00115

ELRPSE pEHKtt PTS e: 15 0 HR BIAS

0 . 00OOdt=

ijCL ems

0 . 0uyUi:]e-?

flZ BIAS

0 . 0 0 U 0 d e

-) EL Bins

y . 0000de?

!ERO LEVEL 100"; LEVEL

0 . 0362^; To. 0 . 95 1 9*Ta

. f: ) ::E-0' YdiB' T(CHS

1.750 31.6

S(JH) T To. 100. 0

N3

10

11

-12

-13

-1415

-16

- 1

7

-IS -19

-20

2

1

#FIT

1 1

40

I SO

I . I

Ht FT HFBU

0. 135 ikT<ChS H

0 . 7' 5

+ .Tn

1 . 47; HR fiWQ OFFSET

-O„0O24 de-^

1 00

1 PNRttl PWR#2 P Po,

0 . 4331 0.30 3 0 0 . 6396

0 . 4S29 0. 3026 0 .6407

0 . 4S30 0 . 3035 0 . 6381

0 . 4319 0 . 3032 0 . 6-365

0 . 4'^5S 0 . 3059 0 . 6-572

0. 5060 0 . 3099 0 . 6654

0 . 5072 0 . 3087 0 .6723

0 . 51 S3 0 .311

6

0 . 6362

0 . 5301 0. 3138 0 . 7046

0. 5434 0. 3176 0 .7193

0. 5433 0.3183 0 .7170

0 . 5541 0.31 95 0 . 7 3 6 9

0 . 5634 0

0 . 5310 0!327i 0 . 7679

0 . 5954 0. 3303 0 .7384

0 . 5947 0 . 3305 0 . 7860

0 . 5821 0 . 3270 0 .7719

0 . 5692 0. 3236 0 . 7549

0 . 55 9 0 . :3 1 9 6 0 .7429

0 . 5.- -. 0 0. 3148 0 . 7003

0 . 51 .;i4 0. 3122 0 . 6866

0 . 5070 0 . 30S6 0 . 6723

0 . 4949 0 . 3053 0 . 6573

0 . 4327 0. 3031 0

0 . 4816 0. 3029 0 . 6369

0 . 4825 0 . 3036 0 . 6365

0 . 4822 0 . 3035 0 . 6362

0 . 4816 0 . 3040 0 . 63.32

0 . 4317 0 . 3030 0 . 6367

0 . 0. 3035 0 . 6 364

.flf: LEVEL: c

1 44.3"-;

i r-i 1: r fi 0 e H R B I R

' ; i T f> t 0 k I. • e f o r PER K # d i c r e 0. :v 0 Ti E 1: L B I \ \ S 1 f 1 s t u t- t o o d e p

58
MEAS Ccont)

102;

NBSK PIERS <ril-F14> T3-F1E:

1 1 . 47)

:^^06 <rii-4: T2-4

-13-

oy^-n # 3.04 f.iw-i 2 PROG 276.5411 CRNP ROBERTS- HHTttl TUE: 1977 NRV 18 ( 1976.470;'

7.551 GHz J 60.0 Ft DISH G.-Tn. g.-t 41 , 34 dB K 43. 31 dB/K

TEMP DEW FT. PEL HUMD HATER DENS CLOUD mVEP HIND

89.0 F 45.S ^: 22=6 '. 7,5 ntS 3 3 nPh

|l|]i|o|did:diriididi3y;&|d|d|3|d|d!5|did

BEST FIT MJR THE 5 CUrS Jo~- lOy K #FIT RHT HPPH T^CflS RV'Tn DECL OFFSET J.- To ELEV RUN SET

5 10.263 de? 0,9162 + - 1.14"-; 8.005 dt? 0.6362K 62.4^.fg 2 "2

G G T NEF Ml IF 60.82 dB 42.78 +- 0,18 dE 8,404 K. Mt2 0.406 K.'Mt2

§|d|did!d|d|d|d§!diJ|d|u|d|d|dipi]iy|didg

1 0 0 * ( D R T Fi - F I T ) . M R 'A d T C fl S R ) . - To.)

'

CUT -2 -1 8 1 V

1.0"; -3.6", 4.6"-; -2.5;- 0.5";

TO RE PLACE R CUT:'!.:' KEY 1 then :2.^ KEY Iup

REMRRKS: ^•"•1 HIS IS A SIMULATION OF CAS A M

STORE: INT FILE 16 EKl FILE 11 EXT SET# 3

BIR T-^Tq CSC TIME TEMP NRTEP #PTS

BIRD COLE P.^Po. PMK dPud.J CliT E-C/ i i ni 'i .-t,-, p„

RUii. SET STAR ELFV C- T G -Tn, HPBNIM. HPBHll-2 FPEO LECL HEF [IUP

2.01 CAS A -0,0 0,556 8,001 10,3-13 '^^0,900 7.55r 7.54 3 4.OU0 O.Rm;; 2.02 CAS A 62.4 42.734 40.820 0.165 18.263 7.551 O.OOo 0.404 ol^-Ofc

59
MEAS (cont)

riftT ri: 1 4

1 I'i h, 1 *i:.ijt

194

1 -bi

• 1 1 3

:16k » UK i : , 1

'j.;.:'::'

-47

~ 1 - 1 1

5

- 3 0 1 34 216 4 6 9 i'' 2 6 640 921

1340

— d. -i 1617

- 2 2 1406

- 2

1 1 46

- J b

9 2 3 -47

6 i 9

- y 512 209 i -SI ~7 X ^-' 1

6202 30 1 1532 ^14:-:.l

Ar rSAK

-124 29 -91

129 504 1 150 1653 2022 2516

3 009 2301 1857 4 02 5 3 6 454 214

- b7 -19 "l2 IV3-I

- 4 Q 6 2 2' S 30 1 1643 0 3 7 0 9

""r 5 1390 13^4 2364 34 50

3890 2 9 7 9 2743 2271

958 545 177 -59

6271 30 1 1702 34 3178 1469 -34

481 731 7 3 0 1 153 1664 3140

3192 2994 2296 1876 1386 9 0 4 748 424

-55 -45 -96 -42

6305 30 1 1761 69 1937 1518 -14 - 3 9 256 r, s 9 '"i '-i 1 1 66 1 127 1401 1613

2 0 ?' 7 2046 1854 1643 1432 8 9 2 694

--64 -69 -115 -60 -64

60
MEAS (cont)

1SKY>£G.-'T j_r : \

i LlU: ':.r;h H ThPE OF'S TRT ^ ^^WC'

:

S L H \

'> T F: H H b t H i ij I ;: ! :, 1 1 - r

i l' ) : 4 . 3 4 9 ? RUP GRIN SLOPE- MHz ^HC'!- y RZ' LEG>( =HC-'; 29 . 4ti555iii92 ? ELaiEGX =NC;': 15

NO I SL FiDD : 0 = ^t 1 i 1 2-#2 ( ~NC : y

'''0 bird: SET#'.; =rli::>: 4 ?3

C L 0 Li II S < y TO 9 = P H I fi ( = !• i L > : - 8 3 WIHD (NPH;".; =HC:): 0 T'lZ CODE!0=SKYj 1=-Fj 2=Rl:k i? F> 3=+l- > 4=0THER =MC

INSERT 5DB NHEN TCRDDX =NC> : 1 '"1 FREQ(r1HZ::": =NC>: 7551 ?

y . 0635453; y

FLTP : 1 =^21530 j 2=1 §70 j 3 = 2i]i'70 ? 4 = 51? 70 ':. NRNL HTN(dB>': -NO: 4

ft MEfiS PTS( =NC>: SO ?5

NBS 10.05 MERS

(77 1027 12. 10)

:iil-F14> T3-F12: ii.Ob <Iil-4> T2-4

# 3.64

14-

PROG 276.5411 CRMP ROBERTS? hHT#1

THE: 1977 HRY lO 1976. h 70)

7.551 GHz< 60.0 Ft IJISH G/To,

41.34 dB/K dB K TEMP

9 F DEN PT. 45. S F REL HUMD

25.0 '. NRiEP DEN:; 7 . 6 •?:'! nt:; CLOUD COVER NliTD

12 r.pF,

BRG PNR BRG FRUfo. RNR + o. - STD'^^ STD

O.4330nN O.3056nN 1 4.0300

Tiife NHNL PRGM

0 4dB 4dB

STD CK FL

0.0166 d B 4

CODE: 0 = SKY? 1=-Fii 2-RCR 0 i

- 3 = -i F ? 4 -0 i . >

R

SLRNT PiTNGE

4 . y35E-i- 07Kn

RZINUTH

29. 41

El E\ PGR F BNDND ..DP 0 PUN SET

11 TERtt

4 NOISE PN 5.734 NH^

li:t. lONST

0. 1400 Ni-i 0 . 0060 ; H,:

t

IjHIN -LOPE

y . L.00u.-Mi-l : e:'1,' P:j

;.. 734 n;-;:

61
MEAS (cont)

p..p,;RDD ' PN^'Sl

0.fc-;-;731 3.04.

H.b;:532 3.04

0.638 J? --04

0.64130 3.04

0.64243 3.04

i\\ IJflL pRfiG

4 :]B 4 dB 1 2 . 1 3 1 f- 4 4 dB 12. 133^- 4 OB 4 dB 12.1 95';

4 dE 4 tif-: 12. 1-^7': 4 dB 4 dB 1^:. I J'-;-

0.63910 +- 0.5 040 -.3 +- 0.1

' Fl.iF-t;2--NPwi ' 4 . 7

5

7 6 4 +- 0

.

62
MEAS (cont)

(7? 1027 12. 12)

NBS 10.05 NEflS (Dl-FM;- T3-F12: A. 06 •'Ifl - '] 12-4

# 3.04 f;':U!.i

P R 0 G 2 7 b . 5 4 1 1 C Fl rl F' 1^ il I: ' F': T S > Hi) T # 1 TUF:: 197r MHY lu ' L^7G,-\7Ki>

7.551 IjHzj F0.0 Ft PISH . G/'lo G'T

41 . 2 4- Cil,2 4< 42. 2 2 J;:' ^'l: TEMP D E N P T . R E L. H I J I 1 D W ii T El f 2 E \-\ S f: i ii I i n f: i-| f' f? i. | j; 1 1 j'

i 85.9 F 45.8 F 25.0 2 7.2 -iK-nt^ i 12 nPh

(5 1 a Id @ Id Id \h Id I d I d i d | d I d | d | d | d id | d | li | d @ @ |]i | ii I ci

| d 3 1 d I d id Id lit I d iji Id Id Id id Q id | d id id fiii Id , d id iji | d I'd

| d fi id | d | d ; B | lii ilii ill id id jij |i;, ilj id i („ | d r Ij id | V, - :,

, 1:1

, |B | ,i 1 , d

0 . 946 : K3 0 . 99b : K9 U . OWdP ( o.dd > 40 . 35* 1 0t6 : SR 5 . 724 : BM

SPhCE loss T-'Tci. OHT/Tq ONT/SNT r-c; EIRP*G-^Ta C/kT f<UF-i SET

202.12 dB 0.6391 0,0000 8. 6090 0. 00 dBW 0.02 dB ,•• :>,

(3 Id |B I d § Id Id Id 0 Id I d I d | d | d |i | d | d | d | d | d id | d id | d 1 d 1 d | d id Id id | d @| d | d I d | d I d Id id id I d I d Id | d id 1 d il | d id | d | d id | d | d | d |ii | ri i

! d id Id id id.:' fi fE, id | d id | d id i 'iil id Id | li I'ii

i 111 f d | Ij REMRRKS: "SIMULflTIOH OF COLD SKY, OFF SATELLITE

STORE: INT FILE 18 EXT FILE 12 E;^;T SET# 4

MRT ri: 1 2 3 4 5 6 7 C -15059 *1500 -3 17-+ -Sl i^l J ibb -"3170 ~"2K2?

1 0

5 S»- 5 ?' - 1 9 Si - i Si 7' IJ - .1 ..• - F £; - 1 9 2 6 - 1 9 2

1

1944 0 121'::' 2 12iy4 121-2 12198, 12199

0 0 —» 483 0*f'*^*'* u 0 0 0 0

0 0 totau att/v (Ez-tec)

^---> 677 0 0 0

I t t I t

/** z** serf. ftf s-''" /HEAS /ACAS MffAJ MBA J MEAJ

63
MEAS (cont)

F?ESE.T MEri?' l -^VES ;' ^HC;' : y

BIF::Ii- Stiil' -Ml'; 4 CLUULS':. 0 lU 4 ^ E H I N ' -MC '

:

1.1 1 HI; aiPi-i ' : =\K M "'ly

CO in;: 0^::S;V< 1 —l- • ,::-R':;P i'i' f

"

F P El", i i H Z / i' -i C ' : 7

5

5 1 '? 7 5

4

k)

+ Fj 4 =^ 0 THLR

FLi R : 1 =-2 30 ^ E~ 1 & r 0 ? 3- MHriL RTr-K^jE) ::.HC :': # MEFiS PTi( =HC)- 5

NBS1C.05 HEfiS <Iil-F14> T 13: X. 06 > T3-4

# 3.04

-IbPROG £76.541 1 CFlMP ROBERTS, fiHTttl TUE: 1977 rlFlV 10 ( 1976.470)

7,540 GHz? 60.0 Ft DISH

DEW PT. 45,3 F PEL HUMD TP LEHi

5 9ri.-r,t;;

RU

To. ^ G/T

4. 1 .

:

CLrilJB COVER HI rill 10 i-MPri

BRG PWR BRG PPN + o. F I'J R + a / 3 T D STU Tn.# 0.5 39 0,v,i..j 0.314 3i'iN 1 4.0300 0 PRGM 31 D CK FLl!

IdB 4ciB 0.O240dB 4

CuliE : 0-SK'i' 1

SLflHT RFlllGE 4. e35E + 0 7Fi'i RZIHUTFI ELEV

3' . 0 0 1 5 n 0 0

' = RCR (ii F? 3--i-F J 4 = 0THER

RCR F 7. 540tBHD Nil >.7 F!Z

corn. MJN

Fl LTER#

4 0I3E EM ,734 MM

J

1st COf 0. 1400

2nd CONST

0 . 0000 rlri.;;1

2

GHIH SLOPE

0. 00 00.- HHi- EQIV BH

:i.734 rTH:

P/ P' FIDIJ;

0, 69756

0 , 7 0232

0 . 7 0 3 3 £

PFIR#1 PNRlr2 MFlNUflL

8. 12 4 clB 0 4 dB

PROG

4 dB

A dB

4 n B

TINE(HRS::

12. b5 66

7

1 3: . 3. 6 0 J 0

0 . b 3 7 6 2

0. 69620

12 4 di: 13 4 d!4 1 3. 2613,

•

#FT p/P(HDD;

0 . 69940 +- 0 . 5

pwi :i; i Cr.Fi ^>

-i-- 0. 1

(PilF!. r HRiM. > (imM

4 . ,^-'53b -i 0.

64
MEAS (cont)

<77 1027 i2.15>

NBilCC-i •.EiiS xI.i-Fi4; T2-ri2: '. 65 Z 1--: J2-4

-17-

PRHG 276 = 5411 CHMF RCEERTs;' HHTil

THE: 1977 MRY 10 < 1976.47ei>

7.540 GHz? 60. S lil r H b' ToL G T 41.33 de.'K 43.28 dB^ K

TEMP icy FT. kEL HISMD IWTER lEHS CLOUE COVER WINU

53. J

- 45. S F 22. y >. 7.5 ^n^f:t2 2 IS P.ph

3.946:K3 0.996:K9 3.34dP<add> 4@. 35*10t6: SR 5.734!B«

-PflrE LnrW T-'-Tf OHT---Ta ONT---SHT rc-y EIF:P*G---Ta C-'kT RUN SET

'202.11 d& 0.6391 0.6994 1.9944 e.08 dBU 0.00 dB 2 4

RESlfiRKS : ?S 1 MULHl I OH OF GH SATELLITE BUT BELOw THE CHKRIER FREO

STORE: INT FILE 20 EJC T FILE 13 E^T 3ET# 5

RflT S5 1 4 6 Q 4 1 6

-1"^SS3

e 1530

0

-2765 -2761 -2757 -2764 -2767 0 0 0

10

4

0

1097 1034 1035 1093 1100 0 0 0

0 0

-1564 -1535 -1528 -1564 -1573 0 0 0

-1553

0

0

0

12257 12253 12260 12263 12263 0 0 0

524

0 e

0

0 0 0 0 0 0 0 0

679

0

0

0

3 0 0 0 f1

65
MEAS (cont)

bird: SETtt'.: =MC> : 5

' clol'jj:^ u to f'^PiiiiE' -=mc.' - 6 WIMJj :ilPH''" =rli.:': 0 1 C ij n t 1

^

'. ; -K, V J 1 - - E " 2. - P. C f-' <}> f- f

+• r" ? 4 ij ] \ I E F; '. -- \>. L INSEE "j'be UHEr] T': hDli ' ^4;:: ' : 1 0

FREC-J-h.::- -MC': 7'j40 '-'V'j'z i F L T F; i 1 - 2. ip -3 U ? 2 - 1 1,;' . G j 3 = 2 0 ^ i J <

- (? 9 - 1 i i

, j : 4 nnrlL f.TN(dB:": ^4IC'': 4 ?6

# NEi-ii PTi.-.. :^M-|:: >: 5

(77 1027 12. 18.' NESl:: . 05 HEElS ail-F14 > T3- F12; X.Wb ::Cl-4> T:

# 3.04

ISRUN 2

R 0 Q 2 7 E . 5 4 1 1 C M i 1 f

-' F: E E E R T S < ft f H tt 1 TUE: 1977 NiVi' lu 1976.470;'

7.551 GHz! 60.0 Ft DISH G/Ta G-T

41.34 .:iB. K 43.29 dB.

"EMP .DEN FT.

45. S F PEL HUMD NHTER DEHS

7.5 ri ' fi 1

3

ELOUD COVER WIHD

0 1 fipri

ERG PMP BEG PREi + o. PNR + ':i --S TD'"' STD To^ff NflHL

0 . :3 1

-- 0 ;

•

, W 0 . ? 5 € 4 m W 0 4 . 0 8 0 0 0 6 d B PRGN STD CK FLTR

7dE -0.0030dB 4

CODE: 0^3EV5 1 = -Fi j^l^^RCR 5=+F, 4=uThER

SLFiNT PFl MGE rCZIMUTH ELEV F CP: F BNDWD C 0 D ;:. RL N SET

4. 0 35E+0 7Pn 2.00 15.00 . 551 . 7 nz

ILlERtt EC ISE BW 1st COHST 2rid r. UNST G E I

N

SLUF'E EQI'v BW

4 7 34 m\z -0. 14 00 i1H:' 0 . 0000 12 0 . 0000/ MHz 5. 734 mz

H3 P- F CFlIiD:' RNRftl PFi Rtt2 fiN UHL PROG TIME';:HRS:j

1 1 . 2 :3CC0 b . 27 1 1 . 15 6 dB 7 '1 B 12. 31944

1 . 2

'-'1 2- € 3 b . 2 7 1 1 6 dB ,

' r B 12. 321 1 1

1 . 2 Sb55 • b . 27 1 1 . [4 h, dl::? i' i_ 12.

4 1 . c. C: b IJ 4 6 . 2 b 1 1 , 1

4^ 6 dB 7 dB 12. 32444

1 . 2 34 31 , 6.27 1 1 . 1 1 dB 7 dB 12. 3261

1

p.-P', riDD' P il!:ir 1

• mH -' ': F' EP#-: -PFJRl^ 1

':> K nFJ' COL.

5 .!. . 22 ' 0 . 3 . 6 . 269 •1

. 1 Z' b L.:! '- 3 +- 0.

66
MEAS (cont)

HBS1C.05 ••£-£ T3-F12: . utJ •.ril-4; T2-4

Sysri # 3.04 RU-i 3

PROG r;flMP ROBERTS? HNT#i

TUE: :-iri i lo : 1376. 4?9>

f .obi bHzj 60. y Ft DISH G-Ta GT

41.34 dB/K 43.39 dE k

TEr-= DEN PT. ^ REL HUMIi WfiTER BENS r:Lniiri mVER I-JIND iz.i F 45.8 F 22.9 Z 7.5 9n/nt3 8 1 ,v,p.h

6.94e:K3 6. 996: K 9 3.34dP<ndd> 49. 35*19t6: 3R 5.734:6^

SPACE LOSS 1- la OHT^Ta ONT.--SNT rev EIRP*G.-'To C/H RiiN -£T

202.12 dB 0.6391 9.6994 1.9944 33.25 dBN 67.92 dB 2 '5

REMfiRKSJVSItlULflTED COMPLETE MEhSURE? BUT ONT HEhS ONLY OH OHE SIDE

STORE: INT FILE 22 EKT FILE 14 EKT SET#

MfiT n: i 2 4 -J 6 3 Q 1

9

-17800

0

1500

0

-5026 -5026 -5923 -5031 -5933 0 9

0

0

6

9

r.' --. *- -_i .II 0 -2533 -2541 0 0

CT0

1:3?

57

0

ij

1994

13-':-

1115

1

:-- :

^' 1

1094

1 r J t;

iCrS

13.-34

1129

12326

9

0

0

9

• 9

9

797

9

0

y 0 0 0 0 9 9 9 0

9

99

13 13 1 3 13 9 0 0

67
MEAS (cont)

RESLT HEJi'iS' l^'i'ES) ^=:NC:': 9 ElKl;: SET ft'.: =NL>: 7 '?6 CLOUDS ( 0 T Ci 9 = R fi I H . ' ( |- !

i : : 0 HI HI) MPH > =-Ni:;' : 0

L: ij li E : 0 = I- : V > 1 = -

f-" ? ..i: -- R i : P H F < 3 -= + f -' 4 = 0 T 1 1 £ R INSERT' 5 I'D Ml itr! 1 iTDIj' ' ^=NC : y •M FREn':MHZ) =MC'': 7z5 l '.•'Sfai F t. T R i 1 = 2 iJ? 3 U ? 2 = 1 ij? 7 U > 3 2 1::' ?' U < 4 = 5 1= 7 0 U r ; MR ML hTN<dB.)^ ^^-HC;': 6 4

# MEMS PTS' =HC:'i 5

(.77 1027 12.2:5)

M B S 1 1:: . 0 5 r^ l E H S < L 1 - F 1

' -^ J 3 - F 1 2 : 7. , kl 6 < I) 1 - \ > T 2-4

# 3.04 RUN

PROG 276.5411 CflMP ROBERTS j HHT#i

!UE: 1977 NRY 10 ( 1070. 47 O)

7 ,501 G hi z» 00,0 F t n 1 S H G / T a G

T

41,35 dB/K 43.30 dB/K

TEMP DEW PT

45.3 F PEL hiUUD

20.9

NFlTER DENS CLOUD .:OvER

7 . 0 9n ri tO 0 WIND

0 i'lPh

BRG FNR BRG PRW + o. F1.TP + a-- STD'-' STIi 0 a 5 3 4 0 r I I T 0.32 3 6 n IT 1 4 . O 3 0 O Tn# NflNL PROM

0 4dB 4dB

;:TD CK FL"^ OlOOdB 4

SLflHT RFINGE

4. 035E+07Kn

CODE: 0 = SI<Vi. 1= F

U 10 TH ELEV

0 0

•T-?OR 0 F

RCR F

7, 5610

. = 01 HER

END WD

).7 NZ RUN SET

ILTERtt

4 NOiSE BN 5.734 MH:

1 .St. CONST

0., 1400 NHz

0-;d 0 0 OS: 0000 Mri2:t2 GO IN S

0 . 0 fi 0 0 EQIV BN^.7::4 ITH

p.'P' nDD) PI R#l PNR#2 NO HURL PROG TIME HPS

1 0 , 7 6 S 4 7 3. 47 4 dB 12:.^ 0, 70873 4 dB 4 do 1 2 . 3801

0 . 7 7 0 3 0 8.45 4 do ^1 ciB 1

2'

.

0 0 0

4 0 . 7 t j

'? 3 0 0. 771 10 i'l 9 C' 4 'I r 4 (iB 4 dB

4 dB

4 dti 1 :: . ^

P.' F ODIi 0 . 7 0 '9 1-;^ 0 + ti

.

PliKtti 'nN ' JO.jr. -i 0. 1

.PI.;P#:2 1 0 fj . 1

68
MEAS (cont)

< 77 102 7" iZ. 2b.' NESlC.yS MEflS iDl-Fl-i^ T-5-F12: V:.i}6 ^1)1-4; 12-4

# 3.04

TEMP

33.6 h

-21-

PROG 276.5411 CAMP ROBERTS 5 RNTtl

TUE: 1^77 riRY 16 l';'76.47y)

7.561 GHz? 60.0 Ft DISH G-'Ta G.--T 41.35 dB/K 43.30 dB-'K

DEW PT. 45.3 F PEL HUMt

26.9

WATER DEHS CLOUD COVER WIND

7 = 6 3ri/fMt3 a 0 inph

|3ld|d|d!d|d|dld§

0.946:K3 0.996:KS 3. 51dP': add) 40.35*10t6;SR ;.734:BW

sfhce loss

202. 14 dB

T.-To. 0. 6391

ONT/Tn

0.7345

OHT--SHT

1 . 1493

rcu EIRP*G.--Ta

39.00 dBW

C^kT

66.54 dB

RUN SET

§iBid|ajdidid|d5§[d|d|d|diaid|diB@|d@jdld|dld

REMARKS! '?USES 2rid OHT? RECALCULATES C--kT USING AVERAGE OF THE TWO ONT VALUES

STORE: IHT FILE 24 EKT FILE 15 EXT SET4f 7

D: 1 4

cr

._i 6

7300

0

1500

0 -2340 -2344 -2345 8 a

10

4

0 12S0 1275 1270 1272 1273 0 0

CT

_la

J i0 -1144 -1 142 -1 133 -1 139 -1129 0 0

-1137

0 0

0 12436 12439 124 40 12442 12443 0 0

566

0 0

0

0 0 0 0 0 0 0

63a

0

0

0

0 6

69
6,5 The REWORK Program

The purpose of the program REWORK is to fit the data sets collected with

the MEAS program and curve fit it to a two-dimensional gaussian curve and calculate six primary parameters G/T, G/T , NEE, ISPJF, the half power beam width of

emission Gas A convoluted with the antenna beam pattern along a path of constant

declination (HPBW//1), the half power beam width perpendicualr to constant declination (HPBW#2), each as a function of elevation. Then the program calculates

least squares fit for each of the six primary parameters to curves of the form

y = ax + b where x is either the elevation angle (linear fit) or the cosecant of

the elevation angle (esc fit). For the parameters G/T, G/T , NEE, and NUE the

measuremerit errors are calculated. The measurement errors taken into account

are those discussed in the site preparation section, and by Daywitt [3] in a separate publication. The deviations of the data points from the fit curves are calculated for the six primary parameters, and also for the measured Y-factor.

The conditions assumed for measurement, and for the error estimate, are labeled

and printed out. The results of many of the subcalculations used in the error calculations and some related parameters are printed out. The peripheral calculations are presented to help the raetrologist using the REWORK program get a better feel about the conditions of the measurement and information to help

decide on whether to retain or reject a measurement set.

6.5.1 General Information

Basically, the REIWORK program reworks the measurement data at one of three

rework levels and prints out the results. A full first level rework is activated by using an integer rework number entered into the rework data statements

located at the end of the REWORK program and selecting option "0=REWORK" at "the

restart alternatives position" (TRAP) reached, e.g., via Key 0. The first level

rework fits the data to a two-dimensional gaussian, uses the fit data to calculate G/T, G/T , NEE, NUE, HPBW#1, HPBW#2, etc., for each data set (typically 180 a data points), and then least squares fits the results to a linear and to a cosecant function of the antenna elevation angle.

A partial second level rework is activated by using a noninteger rework

number in the rework data statements and selecting option "0=REWORK" at TRAP.

The second level rework uses the last stored fit data information and/or new

70
site or error data (e.g. site elevation, HPBW#1, ambient temperature, . . . ) to

recalculate G/T, G/T , . . ., and refits the results to a linear and to a cosecant

3. function of the antenna elevation angle.

The third level rework option is activated from "2 = AUTO" in conjunction

with "3 = DEL" option at TRAP (e.g. Key 0). For this option G/T, G/T , NEF, and

NUF are not recalculated for the individual sets , but the least squares fits of

the various parameters versus elevation are refit and the measurement errors recalculated. Primarily this rework option is for deleting data sets and recalculating the least squares fits.

The refit programs are interactive, and typically the data are reworked

four times—first level rework for all frequencies, first level rework for a specific frequency, second level rework for a specific frequency, and finally

deletion of bad data sets plus a third level rework for a specific frequency.

6.5.2 Entry into the REWORK Program

The REWORK program can be accessed via links to the REWORK program (REWORK)

available from "the restart alternatives position" (TRAP) in either the SITE

PREP or the MEAS programs, or by inserting the REWORK tape into the internal

cassette and (1) Load, execute (2) Run, execute, (3) appropriate response to

computer-generated instructions until REWORK is loaded. When REWORK is loaded

the program stops at TRAP with the display "0 REWORK, ILOAD , 2AUT0, 3DEL, . . .

." If the rework data statements have not been altered, then the program needs

to be halted by pressing the END Key (a lazy T appears in the display) and

fetching the data statements (FETCH 6000, EXC) and using the editing keys to

enter the appropriate changes. We recommend that the REWORK remark statement

and REWORK data statements be listed (LIST 6000, EXC) and taped to the cover of

the notebook which is used to collect the REWORK results.

6.5.3 Data Tapes and Data Statements for a Level One Rework

The REWORK program is designed to rework the data contained on a single

summary tape, so if data from different tapes are desired in the rework, the

data have to be collected onto a single tape. On any single summary tape, files

exist to store results for two different reworks. If the results of more than

two reworks are needed for a data set, a duplicate summary tape per two additional results is needed. The full rework is accomplished by providing an

71
integer rework number in the data statements at the end of the computer program

and selecting the "0REWORK" at TRAP.

Rules for the rework data statement are as follows. For convenience, the

identification of entries in the data rework statements is in a remark statement

immediately preceding the rework data. The rework data statement has eight

entries. First is the rework number . For a complete rework this number is an integer. To avoid confusion, we recommend this number be unique for each rework

associated with a particular measurement site. The computer program requires

that the rework number in successive rework data statements be larger than each

preceding number. This allows starting at a particular rework statement and

stepping over previous reworks.

The second rework entry is the file set (1 or 2). This entry determines

the locations where the results of the rework are stored on the summary tape.

The third rework entry is the measurement frequency (expressed in gigahertz) of the data sets included in the rework. The frequency recorded with a data set on the summary tape must agree exactly with this rework entry or else

it is not included in this rework. If the frequency was incorrectly entered at

the time the data was recorded, it has to be corrected to be included with a rework. An exception to this rule is for an all-frequency rework. To rework

all data sets regardless of frequency, a 0 is entered for the frequency entry.

The fourth and fifth entries in the data rework statement are the zenith

value and the cosecant coefficient of T/T (ratio of system temperatures to

3. noise add temperature). This is information obtained from the sky profile

measurements

.

The sixth and seventh entries in the data rework statement are the zenith

value and the cosecant coefficient of HFBW#1. Unless there has been a previous

rework of the data, these values are not known and the values 0.14 and 0 are entered

.

The last and eighth entry in a data rework statement is the value of the —noise add, T , in kelvins. The magnitude for T has to be estimated from the — a ° a printouts that occur using the MEAS program. The T used is the value that

3. makes the graph of the center cut (N3=0) reach 100%.

The rework process is an interactive process so that reasonable errors in

entering the values in the rework data statement do not effect the ultimate

results. Rather, a poor estimate may require an additional rework step.

72
6.5.4 Deleting Data and Refitting Results

One of the most critical steps in reworking the data is in selecting the

data sets to be deleted from the final results. The rule of thumb is "never

remove a data set without a valid reason." This rule leaves a good deal of

latitude, and nothing identifies a skilled metrologist more than information and care used to document the reasons for rejecting data. The design of the rework

steps is arranged to aid in recognizing invalid data. We recommend that on the

list of data sets deleted from the final results (indicated by a minus sign on

the data list) the reason for each deletion be included with the final results.

This practice encourages complete annotation of measurement anomalies as they occur during the measurement process and helps an outsider judge the reliability

of measurement process. Following are some of the reasons we have used for

deleting data. (1) The major reason for rejecting a data set is that one or more of the cuts in a set cannot be processed by the computer. To refit to a gaussian curve the computer uses a logarithmic method that requires that the

peak value be greater than the sky temperature. In cases where the amplitude

caused by the star is within the natural scatter or drift in temperatures of the

data for the sky temperature, the program hangs up trying to take the logarithm

of a negative number. This problem usually occurs because a cut is not taken

sufficiently close to the center of the star to give maximum clearly greater

than the normal scatter. To avoid this potential refit problem, attention is

required to keep the data sets centered up on the star and/or to retake data

that does not give a reasonable star signal to sky noise. (2) Another cause for

rejecting data sets is due to recognized accidental measurement conditions such

as missetting the antenna pointing, and incorrectly setting the down converter

frequency or operating the frequency lock circuit out of range. If the -oroblem is discovered in time, the data usually can be retaken. Otherwise, a comment

is recorded on the data sheets and a comment is recorded on the offending measurement or a subsequent measurement. A bad antenna set is sometimes detected from

a very poor fit of the set of five cuts to a gaussian curve, as noted on rework

printouts. A difference on the printout of greater than 7% between the measured

amplitude and the fit value generally indicates a problem in the antenna pointing.

(3) Star data other than from Cas A are sometimes collected. Until the information and software in the ETMS are corrected to properly take advantage of these

stars, this information is normally rejected from the results. (4) Star data

73
taken under abnormal or unusual measurement conditions are either omitted, or an explicit comment is given noting that data under abnormal conditions are retained.

Abnormal conditions refer to conditions abnormal to the error analysis assumptions for the computer program. In particular, hail cloud conditions, rain, snow or condensed water particles in the air are conditions with which the error analysis in the computer program is not designed to deal. The atmospheric

conditions between the star and the antenna are assumed to be uniform. Measurements, particularly at low angles where an atmospheric change occurs between the

star and the antenna, may need to be rejected. (5) A final reason for rejecting

data is that the data obviously do not fit with the reworked data collected. To

spot an abnormal data set, several techniques are available. If the frequency

is incorrectly recorded, this is usually most obvious on the G/T or Y-factor

a plot on a single frequency rework, because the coupling ratio of the noise add

directional coupler is usually frequency dependent. Normally the NEF or NUF

will not be frequency dependent, so an abnormal measurement set will often stand

out most clearly on the NEF plot on an all-frequency rework. It is unusual for

any measurement set to lie outside the error bars indicated on an all-frequency

NEF plot. Any point that lies half again farther out than the error bar should

be deleted. Any point that is near the error bars on the NEF all-frequency plot

should be scrutinized on the rework sheets as to how well the measured data

agree with the fit values. After examining the NEF all-frequency plot, all of

the single frequency plots should be examined. The HPBW//1, and HPBW#2, and Yfactor plots have only one-sigma error bars, so one third of the data is ex- pected to lie outside these error bars.

6.5.5 Typical Rework Procedure

The typical rework for data at three frequencies would go as follows:

(1) The data are collected onto a single rework tape. (2) The REWORK tape is

loaded, lines 10 through 66 are deleted from the program, the data statements

are entered for Rework #1 on file set 1 for an all-frequencies rework and Rework

#2 on file set 2 for the lowest single frequency rework. (3) Key 0, select

option 0 RW to initiate the first level reworks. At the end of the reworks, the

program stops at "the restart alternatives position" (TRAP). (4) The rework

results are examined and the data sets to be deleted from Rework #1 are determined. (5) The rework results are reloaded into memory by selecting "1 LOAD"

option. (6) The bad data sets are negated using the "3 DEL" option. (7) Re74
work #1.01, a third level rework is initiated using the "2 AUTO" TRAP option.

(8) The Rework #2 results are reloaded into memory by selecting "1 LOAD" TRAP

option. (9) The data sets to be deleted for the single frequency Rework #2 are negated using the "3 DEL" option. (10) Rework #7. .01 is initiated with the "2

Auto" TRj\P option. Steps (5-10) are needed only to obtain a reasonable fit for

HPBW//1 and a valid estimate of T to be used in the upcoming second level reworks.

a

If no data points are grossly out of line, steps (5-10) can be omitted. (11)

Now second level reworks are needed which use the newly calculated HPBVJ#1 and T

a but do not take the time to fit the cuts again to gaussian curves. The second

level rework is activated by the rework number in the rework data statements to

be noninteger, so 1.1 replaces 1, and 2.1 replaces 2 as the data entries for the

rework number. No other entry in the rework statements need be changed as the

entries for HPBW //I and T are not used (but must be entered anyway) (12) The

second level rework is initiated via Key 0, "0 PW" TRAP option. (13) After the

second level reworks are complete, the bad data are again removed and the third

level Rework //1. 11 and Rework #2.11 are performed. (14) The summary tape is

duplicated (keyboard command, DUP 5). (15) Rework data statements are entered,

etc., for Reworks #3 and #4 for the remaining two measurement frequencies. (16)

. . .(26) Repeat steps (3) through (13) for Rework #3 and Rework #4. When all

the reworks are finished, the measurement conditions should be double checked.

To do this the "SITE PREP" tape is loaded, and the measurement conditions are entered which correspond with those recorded on the G/T(dB) error table printed

in the final rework. If all of the measurement conditions are correct, the

reworks are finished.

6.5.6 Interpretation of Result s

The results of a measurement are printed out as a series of computer

printouts as the last step of a rework (any level) . The normal sequenre of

computer printouts is as follows: (1) Table of measurement sets incorporated

into the rework; (2) table of the results of the least squares fits of G/T,

G/Ta, HPBW#1, HPBW#2, Y-factor, NEF, and NUF versus the cosecant of the elevation, and versus elevation angle directly; (3) graph of NEF versus antenna

elevation; (4) graph of NUF versus elevation; (5) graph of G/T versus elevation;

(6) graph of G/Ta versus elevation; (7) graph of HPBW#1 versus elevation; (8)

graph of HPBW#2 versus elevation; (9) Y-factor versus elevation; (10) table of

NEF measurement errors, and measurement conditions at various elevations; (11)

75
similar NUF error table; (12) G/T error table; and (13) G/Ta error table. Much

of what appears on the printouts is self-explanatory, but the following remarks

are included to better understand some of the printouts. Sample printouts are

in the annotated computer printouts section (section 6.5.8).

Printout (2) is a table of results of a least squares fit of the various

parameters versus elevation. Each parameter is fit to two different curves,

viz. the parameter versus the cosecant of the elevation angle, and the parameter

versus the elevation angle. The uncertainties listed are the one-sigma deviation of the measured points to the fit parameters.

Printouts (3)-(9) are a series of plots of various parameters versus an- tenna elevation. The measured points are plotted as a pound sign, and the

measured value and the measurement label are listed on the right. The fit

points are indicated with a period. At five-degree elevation intervals, error bars are plotted about the fit values, and the uncertainty is listed on the

extreme right in lieu of the measurement lable. The uncertainties listed with

NEF, NUF, G/T, and T/T include the errors labeled and listed in the error table

a printed in SITE PREP. For the plots of the measured half power beam width

(HPBW) of the antenna-star convolution measurements and for the Y-f actor, the error bars indicate the one-sigma deviation of the measured values from the fit

value. HPBW//1 refers to the HPBW of the antenna pattern of a center cut along a line of constant declination, and HPBW//2 refers to the HPBW perpendicular to the

line of constant declination.

For printouts (10)-(13) the results for NEF, NUF, G/T, and G/T are listed

in an alternate way that shows the error contribution details at various elevations. The parameters for the error calculation are printed. Most of the

parameters can be identified with the corresponding parameter listed with more

explanation with the SITE PREP error table. Other parameters are labeled with

the computer variable table. The meaning of the computer variables are given in

section 7. The entry labeled G-diff denotes the difference in (1) calculating

the antenna gain using the antenna HPBW (see section 2.6) at zenith and using

the measured G/T curve to obtain G at a particular elevation, and (2) calcu3. lating antenna gain directly from HPBW at the given elevation. For futher

explanation of the various items in these tables, consult the annotated printouts.

76
6.5.7 Measurement Pitfalls

As with any computer printout, the results flow so easily and the valid

results flow out with no more effort than the unvalid results. It becomes such

a bother to worry about which is which, that sometimes the effort is not taken,

and the quality of the measurements slowly ebbs away. In the opposite direction, as certain operators gain more experience, they gain a sense of the

quality and conditions of the results that transends what can be programmed, or in some cases —even what can be easily communicated to others. My experience is

that neither the computer results nor measurement intuition should be given the

upper hand—but equal weight given to each. Documenting measurement conditions

and explicitly stating measurement concerns will ultimately give rise to an improved measurement procedure. Certain measurement pitfalls occur regularly so they will be discussed explicitly.

6.5.7.1 Extending Results Beyond Measurement Range

One should be particularly careful of extending the measurement results to

antenna elevation angles beyond the elevation angles of any measured data sets.

The computer printout tables print out the results at 10 degrees; but if no data

sets were taken lower than 15 degrees elevation, the validity of the error uncertainty should be seriously examined. Measurement experience and reasonable

measurement implications of the extended results need to be intelligently considered.

6.5.7.2 Abnormal Atmospheric Conditions

The model used in the computer is that the atmosphere has a typical profile

of temperature and humidity. Primarily, this excludes condensed water, or a dramatic change in temperature/humidity as encountered when a weather front moves near the measurement site. Problems with the model atmosphere are easiest

to spot on an all-frequency NEF plot. The NEF of an earth terminal should be

independent of frequency and antenna elevation within about 5% due to small

changes in antenna gain with elevation, small changes of the system temperature

due to increased thermal radiation into the antenna side lobes at low elevation

angles, or small changes of system temperature with frequency. t\fhen abnormal

atmospheric conditions exist, the error estimate listed on the computer printout

may be too small, especially at low antenna elevation angles.

77
/ 6.5.7.3 Data Deletion

By the process of deleting the data sets farthest from the fit value, one could obtain a data set with relatively small deviation. Despite the appearance,

the accuracy of this truncated data set is actually poorer (unless the data sets

deleted were truly abnormal) because the measurement set is smaller. Because of

the nature of random errors, the various measurement sets will naturally have

somewhat greater or smaller variances, especially when the numbers of measurement data are small. The true uncertainty of the ideal measurement should not

be variable.

6.5.8 REWORK Annotated Printout

The annotated printout for the rework program follows.

78
REWORK

LORB

PRINT .^L OH a=YES>?l

I REwUkKI SITE DRTflf 10=IriTj5=E:n

' KKun LUHST CHANGE riPTI0Na:i-=^H8>?y -* 16. 3

NBSll=l.04 LOADER <D1-Fe> T2-F0:

/AJre,HAj^l CA3JMTTS U li I r

Y. . m<0002 >T2-4 > li 1 -4

PROG 276=5411 HflRROGfiTE EHG

SflTS 1.977 HfiY 28 C 1977.409.)

7.550 GHz! 60.0 Ft DISH

RUN

G^To. '^•"T 33.02 dB-'-K 46. 16 dB^K

(33!i|cl|3?§|?|d!l@l?|B||@iaiB§yfa(B!39iSi?§id

FROG COHSTS

fl2: 2.3

B2: 0.65

B6: 7.59224E-03

B35 0.9S

B9: 170.827

85; 0.150451

B : S.2943

Cl: 4.54421E^^

C5: 54

C8: 0.1

C : 1977.4

Di: -0.

1

D5: 0.01615

D0: 0.0157887

F6: 5

G4: 3.61841E-03

G : 1361510

Hi: 0.151166

C2^ 1 CSi 245.421

C9; 0.2

D2; 1.34754

D8: 0.75

D 5 60

F0: 0.01

G5. l.S9405E-^4

H5: 1

C4: 1.683

C7: 0.23

C0: 0.5

B3: 0.6

D9: 0.18

F : 7.55

G6: 3.35159E-04

H9: 679.844

L5! 2.00457

LS: 1.02064

L6: 2.17

L9: 0.013

L7: 1.08241

L : 5

M : 10366

Hi: 6 H : 1

03: 3.22653

08: -0. 0485

T : 131.343

W : 5.5

21: 0.0377515

fd Id I? <i Id fd 1? id id Id e Id la Id id Id @ Id IB id ;i

H6: 3 N7: 530

07: -0. 0439

79
6010 DFlTFl 2? 2' 4? 0 , 1 20H'i 0. n0b6:" 0. .14 ! 1 Ibb

L I S T 6 0 0 0 6000 REM l--RUr?KttjJ^=^do.!

6010 DflTH 2)2<f. 34>0. I ~r ^

^ V/A SKI' PO^OfiLS

^ T\ejui,r OA/ pRitJT OUT

\

\/ALue uieo TO o^TA/Ai

p i/ztT oar

-X TO PftSJENT \ME.HOHy SMOHrAae^ A-^-f-yult kjLyhw^Aj *>f^ I>eL /o, 66 \

0 R W , 1 L 0 H IN 2 H U T i:i j 3 =^ D E L . 4^ i ]

- , '5 P L T

-

' 1 1 ! R < - hi C >: 0 « SUM ThPE tt< =NC): 0 v Vl

QPHpH HhTH': 0 = NU) ( ^M-IC): 0

v 1 •*«— tf /JA/W OPT/t>f) uses A kor e>e

:-. T fl R T 1^ RE W 0 R H: # ( = N i; > : i3 '? 1

\

^ /M TUP HeuioUK

IHIii'lHY -r-^ I :i,..,.:b6 HHkkULHi h'-- tHl. MjN/ -c, i U

-:b('3 H DI463C. 81< 8694? ;::701 > iMiTH CULLECT TS-^iJJ j L 1 -h 1 4FkLi..! ^-'^^ st^y r/io^,^e ILE

ILE ^

-|- U|

I ! |v| H

,

. ;| c, 7 ^ ^ 6 U n P \< U G H T E ' E M G; '^^^^^

>l S H n U 6 :3 C . S i 3 6 9 4-

8

7 0 1 > I) Fl T H C iJ L L E C T T 3 - F 0 ' D 1 - F 1 4 F h: E I!

80
REWORK (cont)

PEIIOPK TRPE 1

,

, , '^rr' i-^'J

'"'^

I

. I -o- T -^ I in -J Afa)o«K

THU" i

i::;.i:J r

•

1 y 7 7 . 4 Q y :j ISH

susjuou T/zve USED S) am/vC

TEMP

46.2 F DEN PI, REL NFlTEP DEHS

7,4 ?iM/i.vt3 jLGUn COVER

4 NiHD

y I'ir-'h

MEflS

h -. P C

flzinuTi- 352= 4^ HPBUI

f 1 , 1 4 '^i fi

HT- ruy2:^^- JU* Jta CAS A

TiNEa-iRs; nppscy ELEV CUT RUN SET N

+ Ci . fi i.^ h 9 * C S f: L.

'-' U i' H

Kl K2 K3 Kb Kb 13 K PpR-etf R"?!^

0.991 @ . 90 1 1 . 000 1 . 000 0 333 1 = 000 0 . 83 1 0 . 6500 0 . 93

: <:. F U >

i 9 5 . Ci i22E-0^

ZERO LEVEL

0. 1274*TH

100"-. LEVEL

0. 1553*TH

H3

1

10

1

1

12

13

14

15

16

1713

19

20

21

24

24

0

10

I

K-FRCTOR

0.SS1

TOCflS: 32.45

S(Jn> Tfl 595.0 1166.0

10

scA ue

i» o/c

)

pwR/puR<Hriri;

e . 1

2

0. 12

0. i; 0. i; 0.1;

0.1;

0.1;

0. i;

b o d

6 9 9 610

,-'08

0.12

0. 12

0.12

0. 12

0.12

0. 12

0.12

0.12

0. 12

0 . 1 ;3 y. 1 0. 1 0. 1 0. i: 0

0

2751

'41 '46

'40 '17

b y 9 796

274-

12

12

0. 12 0. 12

371

r' 8 0 343

0. 1 0. 1 0. 1 0. 1

2303

•-I -y cr --I

;:oi '51

T Tm

0. 127^ 0. 15 •. LErin ttFT': 30 143.

81
REWORK Ccont)

TAPE 1

DW63C. 3KS694' 8701 > DhTh COLLECT T3-FCi < 1 1 - F 1

4

do in. 2 HB31II.4J RElJOPk xHl-Flb; T4-F12

DFN^ JPWj HOOPhV

i

REWORK 2.00

. 5£<S699>T2-4.Dl-4

FROG ZbS HhRROGhTEj EHG

THU: I'-i.T Mh I J'.;. 1977. 486>

7.34y GHz' 60.0 Ft DISH

RUH 1

TEMP

46.3 F DEW pT

43.3 F

C F I _

f-i i 39. 4 WHTER DEH:- 7.4 •9n/nt:

:L0UD COVER WIND

4 0 riph

HERS nZIHUTH

6sei- 314.40

dT= 0.02S

PASS #FIT DET(C>

1 :3 0 0 , 0 3

1

2 13 31.262

ZERO LEVEL

0. 1262*Tfl

HPBN TINE':. MRS) OFFSET ELEV CUT RUH SET N 0.1400 7.874 -0.163 dt? 33.17 -2123

Tfl = 0.1208 + 0.00660*CSC L *HPEW

0 , 1 3 0 d -9 100^; LEVEL

0. 1541*Tfl

T. Tn. DT(CFlS R>- Tfl PEAK*

0.1262 0.0059 +- 3.01"; 13.55

0.0061 13.38

V'-DE) K -FACTOR T<CAS> S'-Jn>

0 . 865 1 Q . S8 1 32 . 45 595 . U

CflS H SLOPE T-FIT

-1.23'i -4.4"i

Tfl

1 166.

0

N3

1

4

5

6

(' 8

910

1112

13

14

15

16

17

13

19

29

21

22

23

24

25

26

C 1

' TiQ 29

3^1

I

.

40 80 i0t1

p«r' PIC non

Oe /vr TK*

run

at M<

0.

FAS:; #FIT DE

30 0

T ( C )

. 031

-:HPBW

0 . 1 jude- 0. 1364

.!....!,...'

DT(CH8 fl>. Tfl 0.00j9 +- 6.85*;

PWR/PWR(ADD::'

0. 12752

0. 12698

12719

12771

12764

12693

12763

12667

0. 12699

0. 12737

0. 12750

0. 12855

0. 1 0. 1 0. 1 0. 1 0. 1 0. 1 0. 1 0. 1 0. 1 0. 1 0. 1 0. 1 0. 1

D

I

2994

3083

3058

3254

3209

3233

3205

3211

3020

2952

2884

2803

.0. 12701

0:li64? c^^f^'^-v-*

0. 12643

0 . 1 2676

1 PEAK# SLOPE'

18.88 -1.34";

T-FIT

0.4?;

82
REWORK Ccont)

ThFE 1 data 2 NBS1D,42 REWORK ;L1-F16> T4-F12 REWORK 2.90

DFWjJPlJjHOORHf !

DI.J63C . 8 1< 8694 5 878 1 > DflTfl COLLECT T j-FQ. Iil-F14> ; • . 52 < S699>T2-4 • H

1 -4

-4-

RUN 1 PROG 276 = 266 HflRROGfiTE. EHG

THU: 1977 MflY 26 1977. 400.

J

7.340 GHz? 60. e Ft DISH

TEMP

46.2

DEW PT. 43.2 F REL Hum

S9.4

WATER DENS

7.4 •=in.-^fMt3 CLOUn COVER4 WIND

0 i'lPh

MEflS 6£ec 31

dT= 0.023

flZIMUTH

37

HFBW TIMECHRfiJ OFFSET ELEV CUT RUN SET

PRSS #Fir IiET(C) *hPBW

1 30 0.029

2 13 31.262 0=132dP5

ZERO LEVEL leo^i LEVEL Y'.J!B>

0.1480 7. 933 -0.129 dt3 82.74 -1

pT-'TR = 0=1 196 + 0. 00668-^CSC L

~]

T. Ta I LTCCHS riJ/Tfi PEhK#

1 CHS R

0. 1262

0. 1262+TR 0. i540*Tfl 0.865'

0.0141 +- 4.2S-;

0.8146 +-$$$$$$•;

K-FflCTOR T(CflS>

0.S31 32.45

SLOPE T-FIT

17.59 -0.71'-; -0.2^;

18.09

S<.Jn> TR

595=0 1166.0

0 20 40 601 80 100 (:;> N3 1 1 1 1 ,

1 1 1 * 1 1 0. 12715

2 * ! , 0. 12724

3 * ; 1 0. 12759

4 * ! , 0. 12694

5 * ! 1 0. 12750

6 * i 1 0. 12737

7 * !

' 0. 12712

8 * 1 1 0. 12778

9 * ! 1 0. 12842

10 * 0. 12896

1112

*

*

0. 13040

0. 13226

13 ^ tut -JOULO 0. 133S6

14 0. 13613

15 0. 13846

16 0= 13916

17 0. 14011

18 I *

' 0. 14089

19 * ! 1 0. 13941

20 * -

1 0. 13884

21 * ! 0. 13823

22 * ! 1 0. 13557

23 * ! , 0. 13295

24 * ! ' 0. 13179

25 * \ 1 0. 12997

26 * 0. 12369 P/^^Pff/^eA/Cf 27

28 * 29 * !

1 0. 12689 i fo.p.i>icreo

30 * I

1 1 1 1 '1 J 0. 12564 sxr r^np

PRSS #FIT

3 30

IiET':Cj 0. 029 13J'.:j^riT< CR3 h>---th 0144 +- 2.70!^

pehk#

18.09

SLOPE I T-FIT , - 1 . 39';

83
REWORK (cont)

ThPE 1 dato. 2 NBSiri.4,;j REHuRK <Til-F16> T4-F12 REWORK

DFl^ JPN? HUURfii' I

D N 6 ;3 C , 3 1 < S S 9 4 ? B 7 Q 1 ) ri h J f\ C 0 1.... I, C T T F 6 ^ D 1 - F 1 4 ? '<

. 5 2 < B € 9 9 > T 2 - 4 » D 1 - 4-

RUN 1 PROG 27

THil: 19

7.340 GH;:

;:66 HRRROGflTE' EHl

NmY 26 1977.400;'

60. 0 Ft DISH

TEMP

46.2 F DEW PT43,2 F

iliND WATER DEN

7 . 4 3Pi.-'nt CLOUD COVER WIND4 0 f iF:4-|

MEflS

dT= O.Si

R2IMUTH

310. 37

HPBW

0. 1400

TINE': MRS OFFSET ELEv

- 0 , 0 0 : j CUT RUN SET

0 1 2

T/Tfi

PASS #FIT DET'j:

1 3 0 0 , 0 2' i-HPB

0.1195 + 0.0OS60*CSC L

T/To. DTCCaS R;'/Tfl 0.1254 0.0£5£ +- 2.93°L

0.0254 *-$$$$$$•:

ZERO LEVEL

0. 1254 + TR

100;; LEVEi.

0. 1532+Th

K-FRCTOR T'::CflS; 32. 45

PERK#

IS. 06

S '; Jn)

595 . 0

CHS

SLOPE T -0.07';

TR

1 166.

0

N10

-FIT

N3

1

9 10

1112

13

14

15

1-6 17

13

19

20

21

£4

26

4ti 100 (

)

. . ! PWR/PWR(RDD)

0, 12737

0, 12601

0 . 12 6 5 6

0. 12693

0. 12675

0 . 1 2693

0. 12787

0. 1301

1

0, 13223

0, 13465

0. 13325

0. 14198

0. 14563

0. 14720

0. 15019

0,15134

0. 14971

0. 14334

0. 14689

0. 14324

0, 13997

0. 13740

0. 13436

0 . 1 3076

0. 12922

0. 12329

0. 12639

0. 12585

0. 12531

0.12544

PflSS #FIT DET'::

-; 3 0 0 . 1-1 -i-IPBW 0, 133d--'3

ET'. COS R)--Th

0 . 0 2 5 1

-f- - .3 . 2 <

FEfiKti- Slope t-fi

15.93 0.18". 0.5

84
REWORK (cont)

TRPE 1 data 2 NBSID.^2 FtWuRK Dl-FlS T4-F12 REWORK 2.W

riFh5.JPW,HGripHV!

DW63C.81<8694jS701> DflTfl COLLECT n- fO^Cl-FH. k.52<S699>T2-4»Ll-4

PROG 27C.i:6C hRRROCfiTEj ENG

THU: 1977 HFh' 2F c 1977. 4883

7.340 GHz? 60.0 Ft DISH

TEMP

46. 2 F DEW FT.

43. 2 F - ?el humd WRIER DEHS

7.4 -^riyi^ifj CLOUD COVER WIND

4 3 I'ipr

flERS fiZIMUTH

38S. 33

HPBW

0. 1480

TInExHRS)

S.07S

OFFSET

-0.051 des

ELEV

31.77

CUT

1 RUN1 SET2 H

11

H3 1

1 * 2 *

3 *

4 * 5

6

•?

13

910

1112

13

14

15

16

17

IS

19

28

21

22

23

24

25

26 - 27 * 23

29

30

PRSS #FIT

3 30

DC r I 0. o; ^ —^ FErsK* SLOPE T 1.2^

85
REWORK (cont)

TAPE 1 data 2 HBSiri.42 REUORK aU-Flb^ T4-F12

DFW-JFlJ>HOOf,h', i

DW63C.Sl<3694<S7til > DhTH CuLLECt T3 -FO - H 1 -F 1 4

.

REWORK 2.

52< 8699 >T2-4 5 111-4

PROG 276.266 HflRROGflTE? EHG

THU: 19;' 7 PlHY 2'- 1977. 406

7. 340 GH::5 bW.O Ft DISH

RUN

TEMP

46.2 F DEW PT. 43.2 F REL HUHD WHTER DENS

7,4 =11 -I. fit 3 CLOUD COVER

4 WIND

0 fl F-"' h

HERS

bit c RZINUTH

307. 56

dT= 0,02f

PRSS #FIT DET(C>

1 30 0.027

2 13 31.262

ZERO LEVEL 100

0.1247*TR 0.1

|j:ni4yoJ 3.

I

I . I rt ^ y

I *HPBW

\ - 0

. LEVEL '.''DE;' ^26*TR 0.374

N3

12

3

4

5

6

7

8

16

1112

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

PRSS

1 0

I .... I 40

I .

HR3> OFFSET ELEV CUT RUU SET N 144 -0.012 d€? 31 . 30 I 2 12

.1131 + 0.00660*0 S C: L IRS H

T--To DT'.CRS R

)

• Tfl PERK# . SLOPE T- FIT

, 1247 0 .0192 +

16 . 16 -0. 55"; - 0 . 0

'; 0.01 9 6 +

t$ 15 . 64

K-FflC'OR T ^CflS.:' TH

0. 331 2.45 95. 0 1 166 . 0

60

i 30

1 1 1 in1 0 ( ' ;

)

PWR/PWR (RDD)

12542

12601

12532

12531

12563

12576

12712

12365

13062

13266

13525

13374

14006

14296

14365

14450

14335

14221

13980

13680

13443

131S9

12980

12830,

12"^92

12717

12571

12546

12519

12580

#FIT

30

DET'rO

0. 027

I

I DTOJRS r:' -- tr

t irt ' H |-| Q |13 1^ |-j |3 Ijl I :

PERK# SLOPE

15.64 0.67';

! a I c !d la I J \ii ; ij

I "1 Id |«l Id i b |ci|0|b|i| ~i

I

r • - 1

T

86
REWORK (cont)

Id |d Id Id Id Id |d id Id 10 1 = |o 15 1 la id 15 10 1 ip |c ,a |u , u , u .0 iu ,u ,^ ,^ ,^ , , , .

,

TRPE 1 data 2 hjBSlC,42 PENORK <ril-Fl'5> T4-F1?

DFW? JFH- HOORhV i

DW6:5C.Sl<Si;94j37ei> DflTFl COLLECT T 3-Fa , P

1 -F 1 4 . a.5Z<

REWORK 2.m

5699>T2-4r Dl -4

PROG 276.266 HfiRROGfilEs ENG

THIJ: 1977 riflV 26 1977. 409>

7.340 QHz-, 60.0 Ft DISH

RUH 1

TENP

46.2 F DEW PT,43.2 F REL HUME

89.4 ^: WfiTER DENS

7.4 giM-^fvTS

CLuUB COVER

4 WIND

0 OiPh

|B id §id § id Id 15 Id Id Id Id Id Id Id Id Id id @ Id Id jd id i Id ih fa id Id Id 5 Id Id id ,ll id fi ,d @ id Id id id id id Id id Id Q13 id Id id id id id id fd fd id Id id § Id i5 fd id Id Id id id id id id id id i= , d id id BEST FIT FOR 5 CUTS s^ev of o <^or REWORK FILE TAPE TIME(Hr;

2.0 9 1 8.014

EPF fiREfl TaCK) SKY BRIGHT

170.8 iMt2 1166.0 2.31 K ELbVvde ^) RUH1 5ET

PASS #FIT DETCC) *HPBN T/Ta

1 5 15.236 0.142dt3 0.125?

2 5 7.203 0.142de5 0=125?

DTCCfiS R>/Ta

0.0274 +- 1.91°

0.0276 -i-- 0.91°

DECL OFFSET: CRS H -0 = 063d6-?

-0. 063de3

*HPEW#1

0. 139de?

Y-FflCTOR T<K)

1.2195 146.33

DT(ChS H> G<dB> G-TCdB) KEF HUF

32.13 K 61. S5 39.40 2.346kFU 2.336kFLi

|?(riid|d|d|]l|^|]liBld|d|d|dididi]l|d(d|5@|?@

100*'::DHTH-FIT)/aifl;K IiT(CflS R>/Tfl)

CUT -1 0

0. 79"

1 -0.02^ 0 • y 4

'=

-tHPBW #1 = 3. 14000 + C, 000000 CSC L = &. 1400 ( ant = 0.13 9 y

.'

Kl K2 K3 K6 KS K9 K fiPR-eff R-ef f S<FU> Xi '::k> 0.991 0. 501 1 . 000 1 . 000 0.'-SS 1.000 y .381 6.6500 0. 98 5mS, fi 2.52 2E-05

SITE ELEV oxy attn i.in.i, er attn zenith attn REFR #1 REFR #2 ant -DIflrl 0.500 ki=i 0 .03209 dB 0 .0060 dE'd^n; 0.O3S1 dB 1.062 6.01 30 60 . 0 ft

£ rc.

87
REWORK (cont)

2

Q PW J 1 LORD 2flUTiJ ? 3 = IiEL. ? 4G -T 5PLT/EF:R ') ' 6

FETCH6Q0M

btifiy PEH{_1 ttj. drit 0. SET :i J-F J 4--T 'THi?4y , 5s:,- , *|£; = HPB!.Ti]ii98 ? *7 = c

6 Q 1 y D H T H 1 £ . 2 ? 2 11 7 . :3 S 5 ? f i , 1 ,;: i -i P; ? 8 „ Q Q 6 6 ? 6 . 1 4 ? 9 ? 1166

LlSTSyuu

6060 REM 1=RWPK#

6010 DRTfl 12.23 2

5 E „ : 9

-:r f

:: , ^ f /' J Pi 0 0 , S " C :E. r. , * 6 = H P B Pi 0 9 6 J *

1 ,;J 1: 1 ; ' > ti .

! Pi t;. 6 jO. 14?0) 1166

(p! pp)J L U Fl D ? 2 h U

[ 0 J ^ D iP i... ^ 'T G . "I" 'i "

: f-' L T ' E: iP P: = N G : O SUM fPiPE =:4!G>= 10 ^ \

G R f1 P PI D H T Pi ( 0 = H 0 ) H P : O 0 \ \

START !? RENORKttC ^=:NC): 12.21

FILE

lU FOR M/vT/^A/ ON BhCH SUMMAKY Tfi^pE FilF is Lisre P

T U E I I H i i 0

1

? c. 7 6 . 1

- I- 1 i Pi i ^ i P' R 0 o E P: T' P. ? Pi \ \ T if 1

:Ta

erfs fl DPlb i 6 9 4 > 3 7 0 1 :> D fi T Pi C O L L E C i T 3 - F 0 n D 1 - F- 1 4 F R £ i^! O

FILE 10 T U E M ATI 0 1 y 7 7 2. ? fa . 5 4 1 i. iJ fl II

F^ R 0 B E R T S i fl li T # 1 RUH/SET 1 . O;

TTT:. H D W 6 3 C . 7 fa < 8 fa 9 4 > 2

,

' Pi 1 > Ii Pi 1 H C 0 L L E C T' T 3 - F j H 1 - F H F R E Q 7 . 5

FILE 11 rrrs a

T U E

M

Pi I 1 13 1 9

7

7 2.

7

fa . 5 -rl 1 P i'- i fl P^ R i J B E R T P. ? H N T # 1 F; U LP ^i-S. n U 6 3 C . 6 3 6 9 -4 ;3 7 0 1 ; U i3

1' i3 C 0 L L E C T :3 - F O . I) 1 - F 1 4 F" P' P

TAPE 10 data 2 HPS ID. 4.1 REUuPR Qil-Flfa) T4-P12;^ REWORK 12,20

AHT SET F4P0PL1 II:. ^

n PI P 3 C: . 7 6 < 3 6 9 4)3701 y 1 1 F1 T H C U L L, E P T i" : J - F 0 i D 1 - F" 1 4 :99 n2-4, HI -4

PF:'i;iG 772'^ ! 1 1 Till--: ^<7' AMV li LAMP ROBERTS 5 HMT#1

'.. 1977,400.:'

.0.M Ft liJSH

88
REWORK (cont)

TEMP

49.3 F HEW PT.

4 3.3 F

Ii Id Id Id Id Id Id Id Id la i S § Id Id Id | d I ]i | d id | d | d ; ,.1 ; S | ,j | , 1 1 i:i , ,

,

PEL. PLlHl!

r 9 . T ' . NRTER DEHS

7.3 -?n--nt3 CLUUD COVER WIND

b 3 riph

^ 1 3 3 i' lif

1 J § \s I? I? W I? @ 333 @ 3 3 3 3 3 3 3 g , « 3 1 d iii 1 d 1 a 1 d i a .ifiia f" farammAvt}> y 3 BEST FIT FOR 5 CUTS

R E W 0 P: K FILE T fi F E T I W E Fl •

- s. > E F F' ft P. E H T a ( K ) 3 K; 'i' B RIGHT E L E ',' ( d e 9 :> P U ^^ 3 E T

1. 13 170. 3 I'l 1-3 331 . 1 9.73 !< 1

PRSS ttFIT riET(C

1 21

+ HPBW

3. 17;; 3. 17(

T--Ta DTCCfiS H>.-Ta

i::l e ? 3 . 3 d 2 9 3.3903 -r - 5.65

d e 8 . 3 o 3 '? 8.3933; -r - 5.21

LECL OFFSET: CFiS Fl 0. 8,-'5dt9

8. 075de?

*HPBW#1 V-FFICT3R J(.K DT'JShS Fl'.' GdriE' G/T(dB NEF HUP

8.808de-? 32.2949 8.93 29.14 K 68.93 61.29 -8.8S3kFU -6. OQSkFU

Id Id Id Id Id Id Id Id Id @ Id id Id id Id Id Id Id Id Id 1 B

I d id id i ]i 1 1? |]:i 1 li I = y Id Id Id q id Id id Id id id Id Id Id Id Id Id Id id Id Id : d Id Id 10 Id Id ,11 |ii id (S Id 1 d Id Id id id I d id Id id id id Id Id id id Id id id id

1 8 8 * ( li Fl T Fl - F- I

T' ) / ' : W fl X D T' ( 3 Fl S fl ) -

- T fi

)

CUT

-4. 26"-; -1

9. 46^. 0

-4.6!:

1 -2 . 03"; 1 . 49'

*HPBW #1 = 8. 14741 + 0.000241 CSC L = 0.1435 ( ant HPBW = 8.14 7 9

)

Kl K2 k3 Kb K3 K9 K flPR-eft R-sff S' FU) X i ( K

)

3 . 963 8.911 1 .038 1 . 330 8 . 9 4' 7 3 . 9 9 '5 3.327 8.6538 8.93 5:'2. 2 2.326E- 85

SITE ELEV A n. 1 1 i

' 1 uio. t er attn zt nit. h ati n REFF #1 REFR #2 nfit -DIHH

8.500 ki'i 8. 83176 d6 8 . 8 868 E; d 6- ri 3. 8 . 8 3 7 ;E; d G 1 . 055 8 . 8

1

3 8 6 6 . 8 f t.

C <f Ay 01 TJON s

FILE 12 T U L M fl '

1

' 1 8 1 9 7 7 2 7 C . 5 4 ] 1 C; h M P P 3 E E R T S ? H h T # 1 R U M / S E T 1.84

C H S fl n W 6 3 C , 7 6 :. B 6 9 4 j 3 7 n 1 > D H T H C 0 L L E C T T 3 - F 8 1 1i 1 - F 1 4 F R E Q 7.6

FILE 13 T U E M flVl 3 1 •?

7

7 ?

7

6 . 5 4 1 1 3 1 i M P R 0 B E R T 3 , H U T#l R U N / S ET 1.85

C fl S H D W 6 3 C .

, 6 ' 3 6 '9 4 > 3 7 0 i D M T ; i C 3 l . L E C T T 3; - F 0 ? D 1 - F 1 4 F F: E 3 7 .675

FILE 14 TUEMfl^'181977373. 54 1. iriiMF- ROBERTS- HWTtl l

' RUW/SET 1.86

C H S fl n W 6 3 C . 7 6

-." 3 1. 9 4 j 3 7 8 ;• U i 1 1 Fi C 3 L L E C T T j - F 3 - D 1 - F ! 4 F F : E; Q 7 . 3 3 5

89
REWORK (cont)

T H F' E 1 U d n. t. 0 2 N t: s 1 D „ 4 :

; R E l\ 0 1 ' K ., D 1 - F 1 6 > T 4 - F 1 2 F: E N i J R K 1 2 . 2 Q

HONE

n t'i 6 3 C . 7 6 S 694' 8 7' 0 1 H !l T ll l: ij L F. F: C T J

'3 F 0 ? L 1 - F 1 4 ? X . 5 2 ^ S 6 9 9 > F 2 - 4 1. Ii 1 - 4

F'UH 1

F^' F: LI G 2 7' b .541 i C h M P R 0 B E R T S < fl H T # 1 TUE: 1977 MRV It) 1977.499)

7. 985 Qiz^ GO. 0 Ft DISH

TEMP DEH Pi. REL HiJMD WATER DENS CLOUIi COVER WIHH

43.7 F 43.2 F 31.4 '. 7.4 =! n .- |V| 1 3 5 Q nPh

I]. Id I J Id Id id Id Id , c ! Id Id I J y Id Id 1]; id fa fa id i d y | d i d i l, : „ ; d id id | d | d ; d | j id | d id | d | d id j d | d | d | d id id | d id Id | d | d | d | j i a it. |d id id id | d id | d id | d | d | d id id id id Id ih | d , d id | d id id fa BEST FIT FOR 5 CUTS

REWORK FILE TAPE TIME'Hr;;' EFF hPER Ta<K> SKY BRIGHT ELEV(dt?> RUN SET

12.2 11 10 y.359 170.3 I'l 1 2 321.1 5.60 V. 23.9 1 6

PASS #FIT riET(C::' *HPE;W T-To, IiT(ChS H)/Ta DECL OFFSET: CAS A

1 5 21.342 O.lbSdts 0.6085 9.0362 +- 7.92°-; 0.0b3de-=i

2 5 6.613 9.158db^ 0.0905 0.9399 +- 5.37-; 0.068de'5

-:jHPBW#1 Y-FflCTCR T<K) DTujAS A) G(dB) G.-T(dB) HEF NUF

O.gOOde^ 179.0370 9.16 28,59 K 69.71 6S.66 -9.067kFU -0.021kFIJ

Id id Id Id Id Id Id Id Id fu (d Id |]i 1 d I d id Id Id Id Id id 1 d ; d id id Id I iJ Id Id Id I u Id id I ri Id Id Id Id Id id Id Id Id id id la id id id id id id Id Id Id id i ri i d Id i d 1 d |B |]l Id id | d |a | d id | d fa fa id | d id id id | d fi

1 0 0 * ( n A T Fi - F I T > / ( M A Xi D T ( C; A S A > T A

)

CUT

4.31';

-2

-9.53';

-10

5.39"; -9.

1219-; -0.43;-:

*HPBW #1 - 9.14741 + 9.000241 CSC L = 9.1430 (ant HPBW = 0.1474)

Kl K2 K3 K6 KS K9 K APR-eff R-€ff S(FU) Xi<K)

0.979 0.91 1 1.999 1.990 9.':'t9 0.993 0.363 9.6599 9.93 592.. 2 2.427E-05

SITE ELEV oxY attn tmler o.ttn zenith attn REFR ttl REFR #2 ant-DIAM

9.599 kn 9.03133 dB 0.00.16 JB/dens 6.6379 dB 1.956 9.9136 66.6 ft

90
REWORK (cont)

v3 f d tem/^e UJO ^ ^ 1

asun Th

dhth s

Tn.-'iiUTQ? 3=I<FL ? -^G-- Tj f.f'L T 'Ei-iK'.

l = lSTj2=2rid4. =Hi: ; . J.

-rii.

e RW ? 1 LOHD ? 2HiJTU (S-I'Ll^ SEL: RUH^^SET(e=EXI i J v jr- DEL : R1JH-''SET ( 0=EK I T > ?e

I) Tfr*" OP£fi^T>0V pun A fJEiATUe sum Ujitm THS SLe^Ar/O^ A^AftLB.

0 RU J ILOfl D .^hUTC-} 3=iiEL ? 4U.--T okl I • £k

R

' =N C s 3 (l)

TEMptFK =rnrrT-5^ ? ^

DEW PT(F>< =HC>? 30.9

REWORK #< =NiJ): lo.ei

t

:>/tf/r TO /AioicfiiTB

WHICH 3'-^ LEfEi.

91
REWORK (cont)

TfiPE 9 d 0. t a 2 NB;>lIi. 4i RE!4URK :'S4;Eo 8e06> T4-F12i Dl-Flb REWORK 15.81

HBSlH.Ql LOFiliE ^12-4 -4

PROG 276.5407 FT. DETRICK FlHT #1

THU: 1976 DEC 2 ' 1976.920)

7.319 'IWz^ 60.0 Ft DISH

/s /for /AJ c Luoeo /M THE- T e ujorh

JH- SET- STfiR 1 J G/T G.'TH HPBW#1 HPBW#2 FREQ T -f ac HEF HUF

OS CflS h 40.084 31.891 0. 136 0. 135 7.319 1 1 . 945 0 6 5 02 CFlS H '•J

.

0 4 0 . 2 4- 0 :3 2 . 2:

4

0. 143 0 . 151 2 -3 9 1.31

6

051

03 CFiS H 1

1

'. 1 40.471 32.422 0. 145 0. 136 7.319 1 .259 •1 . 736 1 Q V 3

05 CPS P 12. 4 4 0 . 5 1 6 3 2 . 5

0

0. 139 0. 120 7.319 1 . 265 1.726 1 S 9 3 07 CPS P 9 0. 144 0 . 1 3 0 7.319 1 . 3; 1 5 1 . 559 648

1

1

CPS P 6 4 !3 . 7' 9 9 3 2 . 3 9 8 0. 146 0. 129 7.319 1 . 299 1 . 654 1

13 CPS P 4 41.896 32.543 8. 142 0. 123 7 . 3: 1 9 1 . 324 4 CT cr 1 a _' _' I— 1 686

1 86 CPS H 6 1 . C. 140 0. 139 7.319 1 1 . 590 623

09 CPS P 64. 6 40.343 32.157 0. 143 0. 1 64 7.319 1 . 3 1

0

1,657 1 695

92
RHTORK (cont)

TAPE 9 data 2 HBSlD.4i REiJUKK <9S4S,dQ26> T4-F12j Dl-Flb REWORK 15.01

NBSlfl.ei LOflDER <9yl3j0eo3> TS-FeiBl-FQ^ X. y4<00y2>T2-4i ni-4

-56-

PRGG £76.5407 FT. DETRICK RNT tl

THU: 1976 DEC 2 ( 1976. 920>

7.319 GHr^ 60.0 Ft DISH

RUN

L,/T<dB>

# PIS = S

f. 41.1930 +- 0,125S> + < -0.14234 +- g.02341>*CSC L 40.4494 +- 0.2434) + ( 0.0093S +- S. 08419>*ELEV

G/TH'::dB> =( 32.3407 +- 5.1315) + < 0.03342 0.02446>*CSC \l G'TflfdB) =: 32.5340 3.1357:^ + ( -0.06452 +- y . 00132>*ELEV

HPBUSKde?)

HPBW#l(dt-9J

(. 0.1423 +- 0.0027) + C -0.00081 9.@e«349>*CSC L 0.1435 +- 0.0026) + C -0.00802 ^- S. 38084 ) *ELEV

HPBl'i#2<dsg;

HPBW#2':de5;

0.1385 i-- 0.0153) + ( -0.00045 +- 8.002S4)*CSC L 0.1279 ^- 8.0136) + < 0.80030 +- 8. 00y23)*ELEV

Y-f actor

Y-f actor

1.3394 +- 0.8036) + ( -0.01546 +- 0. 00161 )*CSC L 1.2562 0.0221:. + < 0.80114 +- 8. e0038)*:ELEV

NEF(kFU)

HEF(kFU)

1.5377 +- 0.0497) + ( 8.04083 ^ 1.7399 +- e.S318:> -i- < -0.00253 +- 3.00925)*CSC L 8.00i39)*ELEV

NUF(kFU)

NUF<kFU)

1.5323 +- 0.0511) + ( 0.07731 i- 0.00951)*CSC L 1.9416 +- 0.1193) + < -0.06550 +- 0. 00206)*ELEV

93
REWORK (cont)

TAPE 9 do.t a Z HeSiri.4l REUORK <9843»00O6> T4-F 1 2 < D

1 -F 1 6 REWORK 15.81

HESlfl.Ul LCiHUER 99 1 3 ^ 0063 , T2-FU < D

1 -FO ^ /!. 04 :;6802 ' T2-4 < D 1 -4

PROG 276.5407 FT. DETRICK RHT ttl THU: 1976 DEC 2 ( 1976. 920

>

7,319 GHsj 60.0 Ft DISH

RUN

. TEMP DEW PT. PEL HUMU WRTER DEHS CLOUD COVER WIHB

53.0 F 30.9 F 43.0 4.5 •5i'i-nt3 74 0 nph

5= FIT # = CHS H I? = CVG H 0 = TRU R + - OR I R

FIT TO _ 3 DhTR

HEF(kFU> =< 1.5377 +- 0.0497) + ( 0.04003 +- 0 . 00925 *CSC L 1.000 1.200 1.400 1.600 1.300 2.000 OJHIT= 0.0200)

ELEV ! ! !....! I

! ! !

1 .... !

1 VRLUE RUN SET

9.0 .# 1.8160 3.02

10 - ! . 1.7632 +- 0.243

11.1 # 1.7357 2.03

12.4 - - # 1.7260 3.05

15 ! .! 1.6924 +- 0.201

20 ! . ! 1.6543 +- 0.177

24.9 # 1.5594 2.07

25 • -

. ! .

! 1 . 6324 +- 0. 164

26.6 . # 1.6545 3.11

30 I .

I 1 . 6173 +- 0. 155

35 ! . 1 1.6075 +- 0.149

33.4 . # . 1.5524 3. 13

40 •

• '

! . ! 1 . 6000 +- 0 . 1 45

45 ..

! ! 1.5943 +- 0.142

! . ! 1.5900 +- 0.140

'§S '

[ I . 1 1.5366 +- 0.133

60 ! .

! 1.5339 +- 0.137 61.2' # 1 . 5397 1 . 06

64.6 . # 1.6565 33.09

I .... I ... I I I I I .1 .I . .

I .... 1

94
REWORK (cont)

TAPE 9 data 2 UBS ID. 41 REUORK < 9848 > 0006) T4-F 1 2 - D

1 -F 1

6

HESlH.Ol LOftDER <99l3jyo0 j.> .T2-F8» Dl-FO* X . 04< 0082 >T2-4 > D 1 -4

REWORK 15.01

RUN

PROG 27b,

THU: r:V7» 7.319 GHz

5407

IihC FT. DETRICK ANT #1

' 1976.920.'

60.0 Ft TISH

TEMP DEW PT. 53.0 F 50.9 F

= FIT # = CfiS H

REL HU11D 43.0 :

'G R

WATER HENS

4.5 ^fi- I'ltS

0 = THU fl

CLOUD COVER

74

+ - OR I Fl

HIND

0 I'iPh

HUF<kFU)

FIT TO 8 1.5323 +- 0.0511) +

ELEV

9 .

0

10

11.1

12.4

15

26

24. 9 25

26 . 6

30

35

38.4

40

45

50

55

60

61,2

64.6

1 . 000 1 . 400 1 . 300

I .... I ... I I .i 2. 200I

DflTH 0.07731 + - 0. 00951 >*

C

2.60 0 3 . 0 0 0

I . . .I .... I . . .1

#

#

#

< .... I .... I . .

I 1 I I

(UNIT= 0 .

i;1400)

VRLUE RL IN - SET

2. 0507

1.9775 + - f:i . 2 1 2

1 . 9234

1 . 3925

1 . 3310 + - 0 . S; i 3 1.7583 0. 138

1 . 6401 2.07' 1.7152 + - 0. 1^2

i .7319 . 1 i 1.6869 + -- 0. It3

1 . 6671 J

0. 156

1.6061

1 . 6526 + - 0.151

1 . 6416 0 . 1 '\ 7 1.6332 + - 0. 145

1 . 6267 + - 0. 143

1 . 6216 0 . 1 4

1

1 . 6232 1 . 06

1 . 6945 1 : , 0 3

95
REWORK (cont)

T H F' E 9 d 0. t n 2 l\ B 3 1 IJ . ^l- 1 R E I'-i iJ R R. \ 9 8 4 B j U 0 6 6 ; T 4 - F 1 £ ' D 1

-- F 1 6 R E U 0 F: R 1 5 . 0

1

\\ E: 8: 1 H . 0 1 L Ci H Ii

L

R < 9 B 1 3 - B u B 3 : T 2. F B ? !. : I -RB, K . 0 4 < 0 0 y 2 ; T' 2 4 ? D 1 -

4

-59-

. RUN

PROG 2 ?F. 541:17' FT. DETRIGK RNT #1

THU: 19:"o UE:C 2 ( 1976.928.:' 7.319 GHzh 68.0 Ft lUSH

TEMP DEW FT. RE I,. HUMH NflTER HENS CLuU]? COVER NINlJ 53.0 F 30.9 F 43.0 "i 4.5 ?ri.-nt3 74 B nph

: — ~ n iz zr ~ z: ::: — TM ~ ~ :z -: :r :::: ~ zn — r- rj ~:. — .-z; :r z:: = — z: TM z: rr — — ::: z: zz z: ~ :r — ~; r: ~ z: zr z: z: :z: :^ FIT tt = CHS H e = CVG H 0 = TRU H + - -OR I H

FIT TO 3 lifiTR G/T(:dB) = 41.1 930 4 0. 1258;' + ':; -0. 14234 +- 0.02341)

CSC L

40., 000 40.400 40.1 3 0 B 41.200 41 . 600 4 2 . 0 0 0 ' UNIT = 0.0400

ELEV 1 1 1 i 1 1 1 1 1 1 RLJJE RUN. -SET

9 . 0 #. 40 . 2403 3. -02 10 i 40 i 0.543

11.1 . # 40 " 4714 2. 03

12.4 # 40 . 5162 S-.'OS 15 1 1 40 .6430 +- 0.453

£0 40 . 7763 + -- 0.-4i3

24. 9 41 . 0392 2. 0

':^ 5 40 . 8552 + - 0.3';^

5

26 . 6

#' . 40 . 7991 3. 1-i 30 .

! 40 . 9033 +- 0 . 330

i .- - - , 1 40 . 9443 +~ 0.369

38. 4 . # 41 .0961

48 i ^ 1 40 . 9716 + - - 0. 362

45 1 1 40 . 9917 +- 0.356

50 1 1 41 . 0072 +- 0.352

55 1

1 41 . 0192 +- 0.343

60 1 ... - ! 41 , 0236 + - kI . 3 4 6 61.2 #. 41 .0199 1 . 06

64.6 # 40 . 8476 33 .09

1

96
REWORK (cont)

TAPE 9 data 2 NbSIH. 41 REWUi-K < 9840)8006) T4-F 1 2 : Ii ] -F 1

1

NBSlH.ei LOhDEF: <9913j0083:> -FO.Dl-Fyr

-r,fi-

, 04< QQQ'd >T2-4 J D 1 -4

REWORK 15.01

RUN 3

PRi

THi 540^ DEr FT. riETRIUK HHT #1

19 bH:? bO.O ht niSH

TEMP

53.0 F

= f:

DEW PT. 30.9 F REL HUMIi

43.0 . WATER DENS4.5 =in.-^nt3 CLOUD COVER MIND

74 0 riPh

# = ChS H y = uYu H 0 = ! hu a + = OR I H

G/Ta(dB)

31 . 000 31 . 400

ELEV

9 . 0 10 - 11.

1

12.4

15

"

28

24. 9

26 .

6

39

35

33.4

4y

45

50

-J60

61-. 2 64.

&

FIT TO _ 8

= ( 32. 3407 +- 0.1315;' + DATA

0 . 0 3 3 42 + - 0 . 8 2446 * C S C L

c! 1 . yyO

I I I 33 . 680

!....!....!

3 3 . 8 0 0 ( U H I T = ti . U 400;

ALUE R JN- SET

.5243 02

IT *"> -~. + - 0. 545

. 4220

. 5893 05

. 4693 + - 0 . 461

. 4384 + - 0 . 4;-: 8

. 5345 87

.4198 + - 0 . 3 9 7

. 3^77 ii

. 4075 + — 0.

. 3998 + - 0

. 5488

+ - 0. 364

. 3388 + - 0. 359

. 3343 + - 0 354

. 3815 + - 0. 351

3793 + - 0

. 3776 1 86

. 1573

i . . I

97
REWORK (cont)

TRPE 9 do.t,o ; nuSl D. 'l L RE'NOKk 9843,UUUb> T4-F 1 2 ^ D

i -F 1 6 REWORK 15.01

HB31H.01 LUHHER 09 1 3 ? Oyy.J T2-Fti - H 1 -F0 X. 04<0O82 >T2-4j Iil-4

- 6 I -

PROG 37'^.. 5

4 'J

7

IHU: 1973 DEC

7.313 GHz'i 60. y Ft DISH

FT. DETRMP: FINT ttl

.RUN

TEIIP 53.0 F DE30

= FIT

.^ F Ch3 H

PEL HUMLi

43.0

WFiTER DEH5

4.5 9n.|'rt2

0 = TFlU R

CLOUD COVER WIND

74 0 riph

+ = OR I H

HPBNttl (de-g;

0. 130

FIT TO

0 . 1 428 +- 0. 002'

DhTh

-0 . 0000

1

0. 0004'?)* CSC L

ELEV

9 . 0 1011.1

12.4

15 20

24.9

40

45

50

0. 1 34

I .... I 0. 1

bO

61 . 64.

0. 142 0. 146

!....!..,.!....!..

#

I I

I .... I

#

I ... I

0. 150

I .... I '::UHIT= VALUE

0. 142?

0. 1427

0. 1446

0. 1390

0. 1427

0. 1427

0. 1444

0. 1427

0. 1462

0. 1427

0. 1427

0. 1423

0. 1427

0. 1427

0. 1427

0. 1427

0. 1427

0. 1396

0. 1431

0 . 0004 ) R JH/bET

3 . 02

+ - 0. 002

3 .03

+ - 0. 002

+ - 0. 002

2. 07

+ - 0. 002

3.11

+ - 0. 002

+- 0. 002

3.13

+ - 0. 002

+- 0. 002

+ - 0. 002

+ - 0. 002

+- 0. 002

1 . 06

33. 09

I .1

98
REWORK (cont)

TRPE 9 d 0. t n NBSlIi.4i REUORK <.9S4B>m&6> T4-F 1 2 1 L

1 -F 1 6 RENORR 15.01

HBSlfl.Rl LOflriER < 95 13, 550:::: X , e4\ 5352 T2-4 ? D 1 -4

PROG 27'r;:,-.|.Mr FT. DETPICl:: FlHT #1

THU: t97>: DEC 2 •.; 1976.920'

7,:319 GIIsh 60.0 Ft l!l:3H

RUN

TEflP 53.0 F DEW PT

3 0 . 9 F REL HJMD

43.0 ". WRTER DEHi4.5 ?;'i/irt-:: ::LOUD COVER WIND74 0 nph

= FIT Ch:3 fl CtG H 'hlJ H OR I H

HPBW#2(deg: 0. l: FIT TO 2

+ - 5.0153) + DRTR

-0 . 0004': + - 0 . i.'iM2:-:4 ;;c L

ELEV

9 . 0 10

11,1

12.4

15

20

24. 9

5 26. 6 30

40

45

50

60

61

.

64,

0.120 0.130 0.140 0.150

!....! ! f.... ! !..#

I

,

0 . 160

I

#

0. 170

I ... I :UHIT= 0.001

'hlue run/

0

.

0.0.

0 . 0 . 0 . 0 . 0

.

0.0 . 0

.

00

.

0

0

0

0

0 . 0

;9 +- 364

204

374 +-

:3 7' 6 +

- 377 +-

3 78 +

-

3 7 F: +

- 3 79 +

- 379 +- 3 3 0 +

- 390

641

0.

0

.

0 .

0.

00.0

.

0 .

1

y :• SET

02

015

03

05

015

015

07

015

1 1 015

0 1

5

13

015

015

015

015

015

06

09

99
REWORK (cont)

'flPb. 9 do to. I D -::> J. V .

' I- J. r\ l: i < l.' i'-. r' y 4 y ) 0 t.i U b

'

r 4 - r i i;: ' ii 1 - h 1 i REUORt: 15.01

tlBSlH.Ml LOhDER 3 J O0u3 : T£-F ij 1 .[1 1 - F' 6 > U4\ 0002 >T2-4 H ril-4

PROG .dr€.54ij? FT. nETFICi:; HhT ttl

h! IJ : 1

9

7 b D E C 2

<' 1976. 929

7.31? GHz? 60. iJ Ft LISH

RUN

TEHP

53.0 F

= FIT

BEN FT,

30.9 F

# = Cms Fi

REL HUMIi

43.0

& --- CVG H

NHTER jEHS

4.5 ? I i .

• I i '\ 'S CLOUn COVER NINIi

74 0 riF-'h

0 = TflU H + - OR I H

FIT TO

'-f n et o r

1 . 200 1 . 240

ElEV

9 , 0 10

11.1

12.4

15

20

24. 9

''i 26.6

30

5U

60

f, 1 ^ V 64. 6

1., 230 1.3 20

i I I I

i - - I

! -. - !

I - . - I

= #

DflTR -0.Gi54r

1 . 360

0, 00161

1 . 400

I

*CSC L (UNIT=

VhLUE

1.2594

1 .2504

1.2593

1.2653

1.2796 H-

- 1.2942 +-

1 . 3148

1.3023 +-

1.3035 +

1.3124 +- 1.3243

1.3153 +- 1.3175 +

1.3192 +- 3205 +- 3215 +- 3 2 1

3

0 '9 5

0.00

RUN

+ - 0

1

40;

SET

02

003

05

1 1 0 0 i;

OOi

0 0 ;

I i I

100
REWORK (cont)

TRPE 9 data 2 NB:5lIi.4l REWORK -. 9848 > 6886 > T4-F125 D

1 -F 16 REWORK 15.81

NBSlH.yl LOADER < 99 1 3 - 80:33 ) T2-F0 D

1 -Fy ? X . 04< 0082 >T2-4 j D 1 -4

-64-

RUN 3 PROG 27t.548? FT. DETRICK HhT #1

THU: 1976 DEC 2_ 1976.928..' 7.319 LKz? 68.8 ht LISH

TEMP DEW PT. PEL HUND WATER DENS CLOUD COVER WIND

53.8 F 38.9 F 43.8 . 4.5 •;i'i.-n ; 3 74 8 nPh

FIT TO 8 DflTH HEF kFU> =( 1.5377 +- 8.0497) + < 0.84803 +- 8 . 68925 ) *CSC L

+ = L I i i E ri R U u i 1 T K I B U T I U i J

10.8de=i: HEF'kFU) = 1.763 +- 8.56 dB < 13.7 JO ' 7.319 GHZ

_E-S E-F E-Y E-Kl E-K2 E-K3 E-K4 E-K5 E-K6 E-K7 +E-K3 +E-K9 E-TP

J. 96'; 0.68 6.51 2.66 1.39 8.80 8.86 3.52 8.35 2.57 5.65 8.14 8.62"';

G<dE) ij-dif f TOO TaOO Y-fac hPBWe rr data fit c<l-K2> bright effftRER

61.15 0.11 119.6 727.1 1.2566 1.81 % 8.147 dE 13.18"; 13.11 K 174.8

2.38=h2 0.26 = C9 8.1=D1 3 . 1 4345=H ( 2

1

j 1 ) 460=T< 1 ? 9) 8. 9243= J

1

0.75=DS 8.1o = D9 8. 1==C3 8 . 0e2b0=H ' 2 i ? 3 ) 15 = T<1)11) i. 8269-82

*HPBU ttl = 0.14276 +-8.808886 CSC L .= 8.1427 (ant HPBW = 8.1419)

Kl K2 K3 K6 KS K9 K _ RPR-eff R-eff S(FU) Xi(K:'

8.951 8.984 1 . yya 1.088 8.932 8.992 8.795 8.6461 8.93 593.4 2.388E-e5

SITE ELEV oxv attn wut.tr uT-tn zenith attn REFR #i REFR #2 ant - BI AM

8.187 kn 8.83443 dB 8.8837 dE'dens 8.8331 dB 1.831 8.8138 68,8 ft

28. 8d>;-9:

E-:

WEFa::FIJ; 8.45 dB 18.4 319 gh:

E-K3 F-K4 E-K

8 . 8 R 0 . 8 h 3 . , E-K6 :-K7 +E-K8 +E-K9 E-TAi: . 67 2 . 99 8.84 8 . 65

E-F E-V E-k:1 E-K2

6 . Li9". 8 . 88 8.48 1.41 1 , 4 / 4

1 # # # # # ^i£iiMlMl * ^ «

^-^:.;:dB

61 . 85

G-dif

f

0. 8)

T(K) To.'K.'A' V-fcc- HPBNe rr dct-a fi'

, .86.6 1 . 2936 1.31 *. 8. 147 d!

i:.38 = fl2 8.28 = C9 8.-I-I11 8 . : ^::|'^^i'>^:<j^ 1 468 = T

' 1 - 9

^ir_r.-. ,-, ic.--,.r, 1..,-..

ifi . 0y£"68--N 2 iTX'"^ 1 5 = T ( f J 1

1

8. 75-118 8.18-ii9 8,1-

*HPBW #1 ^ 0. 14276

1-K2) bri-5ht

13. 10". 6. 74 K 0.9611 = .J1

1 . 8856=82

€ f

f

hREH

178,

8,8t:iy886 CoC L - 8. 142i 8.1419

Kl K2 K3 \:C 6 .975 0 . 9 84 1 , 8 y 0 ] . 0 8 8 8

.

T.'J K hrR--i + 8 . 998 y . 848 8 . 6459 8 . 93 2. 455E-85

3 1 IE ELEV o

•.<••• at tn Mat e r attn _z-nith nt-n REFR ^1 REFR #2 ant-DIiUl

8.187 kn 8.83443 'it: 8.863.' iJP u^irr^ y.0381 d3 l.OJl 0.8138 68.0 tt

i«#nSi!<5#<}f!##ti^#S#'itft#4;tr}!.ijTi{i +1 +! It h- W if •., it ir 1! it it ;t u ii- # ^^ \: 4 - r :; ir; k ti # s .; tt s It « ii ii- n47 # # iMi # ;-i ti 'A 'A nil it

101
REWORK (cont)

30.6de-g: HEF'AFU"' = 1.613 +- 0.46 dB 9.7 ':') 7.319 GHZ

E-S E-F E-V E-Kl E-K3 E-K3 E-K4 E-r5 E-K^ E-h:7 +E-K3 +E-k9 E-Th

b.lU'; O.UCi y,4j 0.93 1.43 O.fty U.Oo 3.bl 3.3C 2.58 1.9/ W.u3 d,h3'-:,-<

G(dB) G--ditf T'f:::) Ta'.:K> HF'BNfrr do.^" a fit c. 1-K2> Dri?hT tffRREfl

61.03 -0.82 102.7 737.1 1.3039 1.31 '. 0,147 dE 13.10\ 4.63 K 169.0

2.30=R2 0.20=09 0.1=111 0, 1 4345=N 2 1 J 1 460 = T(1. 9 j 0.9732 = 31

0.75=Ii3 0.1S = D9 0.1=03 0 . 002fcO=N f 3 i - 3 ' 1 5 = T 1 ; 1 1 j 1.0521=02

*HPBU #1 = 0.14276 +-0. 300000 030 L = 0.1427 (ant. HPBU = 0.1419)

Kl K2 K3 K6 Ky k9 K HPR-e+ f R-=ff SCFU) Xi';:K)

8.983 0.904 1.000 1.000 0.976 0.999 0,366 0.6453 0.93 593.4 2.506E~O5

SITE ELEV oxy o,tt.r, uott-r ottn zenith attn REFR ttl REFR #2 ont-DIRM

0.107 kn 0.03443 dE: 0.0O:;7 dB/di=ns 0.0331 dB 1.031 0.0 130 60.0 ft

#############################tt#tt####tt##lT#####ii###4tt####tt###tt#tttt####tt*tt##tt#tttt###tt

40. Ode-?: HEF'.kFU) = 1.600 +- 0.38 dB ( 9.1 7.319 GHZ

E-S E-F E-V E-Kl E-K2 E-K3 E-K4 E-05 E-K6 E-f;7 +E-kS +E-K'9 E-Tfl

6.04'-: 0.00 0,43 0.72 1.41 0.00 0,06 3.57 0.36 2.55 1.51 O.Ol 0.62';

G ( d B G - d i + f T K. ) T o, ( f : > V - 1 o, c h F B N e r r d o. t n, tit .- ( 1 - h: 2 > b f " i ? f1 1 € t f H R E H 61.01 -0.03 100.9 727.1 1.3165 1.31 0.147 dB 13.1 Q': 3.61 K 163-4

2.30=h2 O.20=C9 0.1=D1 0 . 1 4345--H ( 2 1 ? 1 ) 460=T':i» 9) y.9791=Jl

0.75=ri8 0.13 = ri9 0.1=03 0. OO260 = H(21 J 3) 15 = Ta)ll> 1.0411=02

*HPBU #1 = 0.14276 +-0.000OO6 CSC L = 0,1427 (ant HFBN = 0.1419)

Kl K2 K3 Kb t.3 K9 K flPR-eff R-eff SCFU) Xi(K)

0,936 0.904 1.000 1.000 0.931 0.999 0.875 0.6453 0.93 598.4 2.531E-05

SITE ELEV oxy attn water attn zenith attn REFR ttl REFR s2 ant -HI AM

0.107 kri 0.03443 dB O.00:::7 dB/dens 0.0331 dB 1.031 0.0130 60.0 ft

#tttttttttt#######tt###########lf#tt'jl##tttttt#f!##MtttttF###tt####ttt##ttlt#tttt*ttttif####

50. Ode-g: HEFCkFU dB 7,319 GHZ

E-S E-F E-Y E-Kl E-K2 E-K3 E-K4 E-t; 6.01'-; 0.00 0.43 0.60 1.40 0,00 0.66 3.5E-K7 +E-K3 +E-K9 E-TFl

2 , 5 1.26 0.0] 0.62"

#####tttt###tt####tt##ttttftft-,^tt#T: iNiiMtttlrtitttttti i,tt*,##fitttttttf#;;,t###t>T;##ttStt#tttt#+Ut ffttiUftttttt##ttiM:ttrt G ( d B ) G - d 1 f + T ( K ) T a K 'r' - f o c H F' B H e r r d o + a tit c 1 - K 2 ) b r i 3 h t. ^ t f H F' E H 61.00 -0.04 1 1 1.31 0, 147 dB 10- : . 0 163. 1

2.30=fl2 0.20=09 0.1 =D1 0. 14345=H(21 ! 1 ) 463=T':l) 9 0.75=113 0.13 = H9 0.1 = 08 Ci. fn3260=H'- 21 j 3> 15=T'ljll0, 9824- J

1

1 , 0353=02

*HPBW #1 0,14276 +-0.000006 .0 L 0, 14: (ant HPBU

Kl K2 K3 K6 Ky K9 K 0.939 0.904 1.000 1.000 0.934 1 . OoO 0.8HKR->.?tt R-er

0.6453 0.93:

0,1419

)

FU

2. 545E-0'

SITE ELE V o X y o. % t n i .j o t a r a t t r i z e- n i t h -jt.t.n PEf-P ttl- R f F i

' ». 2 a n t - D I p ri 0.107 k I'M 0 . 0 3: 4 4 3 >.\ y 0 „ 1 3 0 3 7 6 B / d t r i : 0 . O 3 :? l d B 1 . 0 ; 1 0,01 3 0 ^ 0 , f t # tt tt tt tt # tt tt tt tt # tt tt fl tt tt tt tt tt # tt # # # # # # it # # tt # tt tt tt tt tMt !i # fl # If tt tt # # 4 S ii B -rr # # S 1 tt # it # # +t it # (I +1- li ti il it tt tt -ft # ^ #

102
REWORK (cont)

TAPE 9 data 2 NE:SlIi.41 REWORK < 9848 » 0096 > T4-F 1 2 - D

1 -F 1 d REWORK 15,01

HBSlH.yl LOhDER < 99 1 3 » 0003 • T2-F0J Dl-FO? K. 04 : 0002 ; T3-4 > D

1 -4

RUH 3

PROG 276.5407 FT, DETRICK RNT ttl THU: 1976 DEC 2 ' 1976. 920 ; 7.319 UH-:< 60,0 Ft tISH

TEriP DEW FT. REL HUMD WFlTER DENS CLOUD COVER WlfH)

53.0 F 30,9 F 43.0 X 4.5 .it3 74 O fiph

FIT TO 3 DhTh

NUFCkFU) =< 1 . 5323 +- 0.0511' + ( 0.07731. +- 0. 00951 )*CSC L

+ = LIHEHR CONTFIBUTIOH

10.0de?: HUF(kFU> = 1.97S +- 0.55 dB ( 13,7 7.319 GHZ

E-3 E-F E-Y E-Kl E-K2 E--K3 E-K4 E-K5 E-K6 E-K7 +E-K3 +E-K9 E-Th

5.94'; 0.00 0.51 2.66 1.39 0.00 0.06 3.63 0.35 2.57 5.64 0.14 0.61';

#################### tt########fitttt#«###fl#?tttt####it###############tf###tt###tt####tt####

G<dB> G-diff T(K) Ta<K> Y-f ac HPBNe rr dax-a fit. c(l-K2) bright ef f fiREfl 61.15 0.11 119.6 727,1 1.2506 1.81 0.151 dB 13. 10^. 13.11 K 174.0

2.30=h2 0.20=C9 0. 1.-111 0. i4345-Hv2i » 1> 460=T:i5 9/ 9. 924S-.J1

0.75=D3 0.13-D9 0.1 =C3 0 . 00260=.H 2 1 ? 3 > 1 5=T ( 1 j 1 1 1.02-.15 = C2

*HPBW #1 = 0.14276 +-0. 000006 CSC L = 0.1427 (ant HF'BW = 0.1419)

Kl K2 K3 K6 K3 K9 K flPR-eff R-eff S(FU) KKK)

0 . 95 1 0 . 904 1 . 000 1 , 000 0 . 932 O . 992 0 . 795 0 . 646 1 0 . 93 593 .4 2 . 300E- 05

SITE ELEV OX/ attn wo.ter o.ttn zerath nttn REFR #1 REFR #2 ant-DIflM

0.107 kn 0.03443 dB 0.0037 dB dens 0.0331 dB 1,031 0.0130 60.0 ft

####################tf#»tt#####Tttt#rt##tt##S»##tt##tt<f#tt#####tttt##Stt#tt#####ttfftt###tt##tt###

2a.0dpg: NUF(kFIJ:' = 1.753 +- 0.45 ( 10.9 ^) 7.319 GHZ

E-S E-F E-Y E-Kl E-K2 E-K3 £-K4 E-K5 E-K6 E-K7 +E-KS +E--K9 E--TFi 6.26'; 0.00 0.43 1,40 1.46 O.OO 0.06 3.32 0,37 2.66 2.97 0,04 0.65";

tt####»tt####»######«#######tt#tttt#tt###ttrttt#tt#####tt#########tttt#tt##tttt###tt###########^Ftt

G':;dE) G-diff T(K> To-(K,:' Y-ta- HrEWerr do.' o. fit r(l-K2) bfi^iht effflREri

61.05 0.01 106,6 727.1 1,2936 1.31 '; 0.151 dB 13. lO"; 6.74 K 170.2

2.30=Fl2 0.20~C9 0.1=Tii o. 14345-H': 21 j 1 ^60 = Ta) 9) 0.9611=31

0.?5=D8 0.18=D9 0.1 =C3 0.00260 = 1^21.3) 15=Ta.ll) l.G796 = C2

+HPBN #1 = 0.14276 +-0.000006 CSC L = 0.14 27 (ant HPBW = 0.1419)

Ki K2 K3 K6 KS K9 K HPR-^;ff R-efi S(FU;' XKK'

0.975 0,904 1,000 1.000 0.965 0.'^93 0.848 0.6459 0.9S 593.4 2,455E-05

SITE ELEV oxy at.tn wattr attn zenith at-n REFP #1 RF.FR »2 ant-DlHM

0.107 kn 0.03443 dB 0.0037 dC- defii 0.0331 dB 1.031 0.0130 60.0 1

1

103
REWORK (cont)

30.0dp?: HUF'kf-U' 1.63? +- 9.40 dB ( 9-? 7.319 GHZ

E-S E-F E-Y E-l- 1 t-R2- E-K3 E-K4 E--K5 E-K6 F-K7 +E-KS '-^E-K9 E-TFl b.09'; 0.00 0.44 0 . j2 1.-^2. 3.00 3.06 3.73 0.33 3.57 1.97 3„ 33 0.6::".

# # # :H4t tt # tt tt tt # tt # tt # # it tt # ^ # # It It it t|: tf it tl' it -ff ft ff tf TF # It tf tt » ti: # tf # t? # # S # # # # tf tt It tt # # # It tF f, it it tJ It It :|t It # # # H tt # It G ( d B ) G - d i f f T ( r ; :> J a

>" K > V - 1 c H F E N t r f d o t. ,t f 1 1 r f i - i ^ i t: r- : -i i- -i t. p i' t U P E fi 61.02 -0.02 102.7 72,-,1 1 . :5kiS9 1.31 0.151 d& 13.10'. 4.63 K 169.0

2 . 3 0 = H 2 0 . 2 0 = i: 9 0.1-^ I.i 1 0 . 1 4 3 1 5 -- N - 2 1 1

:

' 4-60 = T 1 ? 9 3.97 2 - J

1

0.75 = Ii3 0.13 = ri9^ 0.1=C3 0 . 00260 = ii 2 1 ? 3 15-T:i<11;' 1.0493 = 32

*HPEW #1 = 0.142 36 ! 0.0O000O CSC L = 0.1427 cani HFBW = 0.1419:'

Kl K2 l<3 Kb KS k:9 K FiPR-ttf R-eff S(FU3 vvifK:.' 0.933 0.90^^ 1.000 1.000 0.976 0.999 O.Sfab 0.6453 3.93 593.4 2.506E-05

SITE ELEV oxy attn uciter o.tt.i-i zenith attn REFR #1 REFR #2 Fint-Iill-iM 0 . 1 0 , ' k r i 0 . 0 9; 4 4 3 d B 0 . O 3 3 7 '-.i V ' d e n r 0,0 3 3 1 d 3 1 . 0 I' i 0.01 ::i 0 60. Ci f t. ## tt tt tt # It ## tf #### it ### tt # ti: tF ft tl it # iT # tf 1i^ # # # It tt tl # it # t|: # # # # # it # # # ?t it # it # # tF # # ti # ±F t^ tt it it « # # ii^ it it # # tf # ^- # tt tf

4o.0d€?: , ^ . NIJF(kFlj> 1.553 +- 0.33 dB ( 9.2 ;) 7.319 GHZ

E-S E-F E-Y E-4-a E-K2 E-k3 E- K4 E-K5 E-t06 E-K-7 fE-KS +E-fF:9 - E-TiH

6.03'; 0.00 0 . 4 J 0.72 ], . 1 0 . 0 0 0.06 3.63 3.36 2.54 1.51 O . O 1 i3 . 6 2.

"

.

# # tMt tf # # tt # tt it tf it # ft # # tf tt tt :ff tt it It ii^ tf i f ft ti' tf # :ff it tf # # # # # # # # tf it # # tf # ti it It # * # # tt # # tt it tt tt tt It tt # tt it # tf it tt it It tl^ tt it # tt tt G ( d E! ;> G - d 1 1 f T ( h: '} T k: Y - 1 c!. c H F E N e r r ^ j • j. '- o. f 1 1 r. i: 1 - f: : 2 > h r i -=i ki t e- f i ' i"i F: [: H 61.01 -0,03 100.9 727.1 1.3165 l.Sl 3.151 dB 13. lO'. 3.61 K 163.4

2.30 = 02 0.20=39 0.1=111 0, 14345-ii'- 21 - 1 ) 460=T- l? 9;' 3.-9791=31

0 . 75 = ri3 0 . 1 3 = Ii9 0 . 1 =33 0 . 30260 = |-t ( 2 1 j 3 > 1 5 = T 3L ? 1 1 1 . 3333 = 32

*HPEU ttl = 0.14276 +-0.000006 iJSS L = 0.1427 (ant HPBN = 0.1419;'

Kl K2 K3 K6 K3 K9 K HFR-eff P-eff rvFUY k;i(K>

0.936 0.904 1,000 1.000 0 . 9 '2 1 3 . 9 9 3 . Ek?' 5 0 . 6 4 5 3 0 . 9 '9 3 9 2 .4 2.5 2\ 1 E - 0 5 SITE E L E V o X

y

' o. 1 1 n w a t. e r a 1 1 n z e n i t h a 1 1 n REFR #1 R E F R # 2 o. n t - D I fl

M

0.107 k rii 0.0344 3 d B 3 ,, O 3 3 7 d B

' cj n 0 . 0 :3S; 1 d B 1 . O ? 1 ' 0 . 0 1 9; 0 •

< 6 0 , iJ f t, # tt tt # # tt tt. it tt tt it # it tt it tt # # # tt tt tt tt tt tf # it # # tt tt tt It if tt tf ti- ^ tf ti tt tt tf it tt tt tt # # # # tt # tt tt # tt = t tt tt ft tt tt tt tt tt tt tt tt tf it tt tt ;

i ft x\ tt k tt tt

5 0 . 0 d e 9 : ti U F ( V F 3 ' 1 . 6 3 3 + - 0 . 3 7 d B ( 3 . 9

') 7 . >i 1 9 G H

Z

E-S E-F E-Y E-Kl E-K2 ^ E-K3 E-K4 E-K5 E-KS E K7 +E-K9 +E--K9 - E- Tl-i 6.00". 0.00 0.43 0.63 1 . 4 O 0 . 3 3 3.06 3 .67 ij . 3 3 2.5 '3 1 . 3: 6 O . O 1 Li . t. 2'.

tt tt tt tt tt # tt tt tt # tt tt it tt tt tt tt it tf tt tf it it tt tt li ii tt It tt tt tt ft it# tl tt tt # tt tt tt tf tt tt tt tt tt tt ^^t it tt' tt tt tt tt # ;l^-# tt tt tt t,- tf tf tt^ tt # tt tt il it tt tF ft tt tt tt tt tf G ( d

B

) G - d i,t f -T: \- > 1 o, < K > 2 - \ c H F B I'i e r r d c.

' m f 1 1 1

- i-: 2 ) b t- ,l s h 1 e f f i'i P. t

R

61.00 -0 . 04 99 . 3 327 .1 1 . 3209 1.31 0.151 dB 1 3 .13". 3 . 33 K 1 63 . 1 2.30 = H2 0.20 = 39 O.l^Jil 0 . 1 4 3'i 5 = fi ' 2 1 < 1 ) 460 = T-1. 9 ' 3.9324 = 31

0 . 75 = Ii3 0 . 1 3 = 119 0 . 1 = 33 0 . 002i3Y:3-i ( 2 1 3 ' 1 5 = T : 1 j 1 1 l . 3343 = 32

* H R E: W #1 = 0.1 4 2 76 + - . 3 3 3 3 ^ - C 3 31 = 0 . 1 4 3' 7 n i-, r H 2 U 0.14]. 9

Kl K2 K3 Kb K3 K9 K HFR--ff R-eff 3'FU-' .•:3i.':'K^3:

- 0 . 9 3: 9 0.904 1.000 1 . 0 ij fj kl . 3; -t j . f i ij fi 0 . 3

7

? 3.64 3^ 3 i3i . 9 3. 5 9 3 . 4 2 ,. 3i 4 '3 3 - 3

5

BITE RLE V o x -v n f; , ,

' , ,

i

, , , i i z e n 1 1 1 , „t-n 2 L - r tt 1 R 13

!" ^k,. o r : f [lull

0.1 Of' kri 0.0344 3 <i2 0.0333' 3r ::-h- Fl 3.0;331 22' 1.33 1 3.t3. 3fi - !i:3.3 lt

tttttttttitttttttttt ii ttttttFtttttttttttttff tFtttf itttttifi Ft It I li It littthFittttiMtHti ti it'i FttttiFti ;-; ttFt:-;T'ttttti ti ttii n .i ti li ii itii !i tittii \r< .

104
REWORK (cont)

TFiPE 9 data 2 HBSlIi.41 REWORP: <vS4S,dmG> T4-F 12 < B

i -F 1 6 RENORK 15.01

NESIH.QI LOhLER <5913'8003; T2-Fy, Dl-Fo? K . 04-: 9082 >T2-4 . l! 1 -4 ~SS~

f:in\ 3 PROG 276.5407 FT. DETRICK FiNT #1

THU: 1976 DEC 2 i 1976. 928

>

7.319 GHz? 68.8 F^ PISH

REL riUnii WATER DEHS CLOuri COVER NINL

43.8 •. 4.5 9ri--"nt3 .74 8 nph

FIT Tn_ S DFlTR U/KdB) =< 41.1938 +- 8. 1258) + ( -8.14234 +- 8.82341)*C3C L

+ = LIHEHR COHTRIEUTIUH

DEU PT. 30. 9 F

10. edt-?: ;/T(dE 48. +- 0.54 dB 13.3 V; 519 GHZ

E-3 E-F E-Y E-Kl E-K2 E-K3 E-K4 E-K5 E-Kb E-K7 +E-KS +E-K9 E-Tfl 5.Sy'; w.ya 0i5y ^.59 1.35 e. a 9 0.0b 3.12 8,35 2.51 5.51 8.14 0 . 6y'i

####»###########################################################################

G<:dB> G-diff • r<-K>" Td<K:> Y-fac HPBHerr dar-a fit c.<l-K2> bright effflREFl 61.15 e;il 119.6 .727.1 1.2586 1.81 ^; 8.133 dB 13. 18"-; 13.11 K 174,8

2.38=fl2 8.20=C9 0. 1=D1 0. 14345=N<21j U 460=1 a? 9) 0.9248=J

1

e.75=DS 0.1S=D9 g.l^CS 0.8O268=H<2i53;' 15=T^i,ll;' 1 . 88e8=C2

*HPbW #1 = 0.i4ii,'t +-e.8O0yyb Uol: L = 0.142.' ant HPBW ^ 0.1419;

Kl K2 K3 Kb KS K9 K flPR-eff R-eff

0.95i;0i904 1.000 1.008 8.932 8.992 8.795 8.6461 8.93 ;93.4 2.388E-e';

SITE tLEV oxy attn water attn zenith attn RE PR #1 REFR #2 ant-DlHM

0^107 kfi 0^03443 cJE 8.0837 dB-^dens Q.OSSl dB 1.031 0.0130 68.8 ft

20.0de?: jG.--T' un 8.42 dB

E-S E-F E-V E-Kl E-K2 E-K3 E-K4 E-K5 E-K6 E-K7 +E-KS +E-K9 E-Tfl 5.80':" 0.00 -0.44' 1.30 1.35 O.OO 0.06 3.12 y . 35 2.4b 2.75 S. 04 8.68'

G(dB> G-diff Tf:K> 61.05 8.81 186.6"

Ta^^; ^27. ] 1.29o.

HFBWerr -ua-.a fit

2.30=h2 0 8.75=113 8.1S=Ii9 8.1=18=C9 e.l=Iil vi. J '1341,^ n ^'i < 1 ^ 46o=T 1

*HPBN #1 = 8.14276 +-0.088886 CSC L = 0.142

^15 = "^ " 1 . 1 r:

c-a-K2> br-isht effHREfl

13. 10'; 6.74 K 170.2

o . 96 1 1 = J l*-K3 ^

ont HPBU 8 . 1 4 1

.-^

Kl

0.97 = Ki K6 KS K9 HPR-eff R-etf.

8 . y04 1 , 000 1 . Oyy 0 .965 8 . 993 8 . S4o 0 . 6459 0.93

SCFU;' XiCK)

598.4 2.455E-0^

IITb ELEV OXY attn uioter uttn zenith ot^n REFR Itl REFR #2 nnt-riI9M

[ 8.1 37 J 8.03443 dB 0. 0'.V3;' uC -i? uh- O.OC'-l .jn 1.831 8.0138 68.0 t

•

105
REWORK (cont)

30.0de-?: • G/TCdB •• =. 40, yy:-: +- u. dB < 9.1 ";) 7.319 GHZ

E-S E-F E-V E-Kl E-t2 \r.--'. !>K4 E-K^ E-K? fE-Ky+E-K9 E-TFl 5.80'; u.yy 0,4£ y.89 1.33 y.uy 0.0^ 3.iii y.3j 2.45 1.3? 0.02 O.Sy';

G(dB:.' G--diff KK.;' To'/f ) Y-fac HPBll^rr do.^o. fit- p-(l-K2) bright effHREfl

61.02 -0.02 102.7 727.1 1.3039 1.31 ". 0.133 dB 13. 10'. 4.63 K -169.0

2.30 = fl2 0.20 = C9 0. 1^:111 0. 14345=M'-2i J 1> 469=Ta> 9> 0.9732= J

1

0. 75=riS 0. 1S = II9 0. 1=C3 0 . 0H268-H ' 2 1

< 3 ) 15=1:1)11) 1.0000=02

*HPB1J #1 ^ 0.14276 + -0. 000006 CSC L = 0.1427 (n,nt. HPBW = 0.1419)

Kl K2 K3 Kb K3 KS K RPR-pt f R-eff 3(FU) Mi<K>

0.933 0.904 1.000 1.000 0.976 3.99? u.36b 0.6453 0.93 593. 4 2.506E-05

SITE ELEV oxy attn i.iater attn zenith atth REFR #1 REFR #2 ant -D I AM

0.107 ki'i 0.03443 dB 0.0037 dB - dens 0.0331 dB 1,031 O.OISO 60. 0 ft

40.0dt?: G/T(dB) - 40.972 +- 0.36 dB ( 3.7 ;•.) 7.319 GHZ

E-S E-F E-Y E-Kl E-K2 E-K3 E-K4 E-K5 E-K6 E-K7 +E-K3 +E-K9 E-TR

5 . SO"; 0 . 00 0.42 0 . 69 i . 35 O . OO 0 . 06 3.12 0 . 35 2.45 1 , 45 0 . 0 1 U . 60';

G dB ) G-diH T<K) Ta(K) Y-fac HF'BWe rr da*. a fit 1-K2) bright ef f fiREfl 61.01 -0.03 100.9 727.1 1.3165 1.31 \ 0.133 dB 13.10V 3.61 K 163.4

2.30^h2 0.20 = C9 0.1=Ii1 0 . 1 4345^H 2 1 5 1 ) 460 = Tvl) 9;' 0.9791=.J1

0. 75=118 0.18 = 119 0,1 -C3 0 , yy260 = hh; 21 J 3) 15=T< 1 > 1 1 > 1.0009=02

*HPEi'J #1 = 0,14276 +-0.080006 CSC L = 0.1427 (ant HPBW = 0.1419)

Kl K2 K3 K6 K3 K9 K FiPR-c ff R-tff S<FU) Ki<K)

0.936 0.904 1.000 1,000 y,9Sl 0.999 0.37';i 0.6453 0.93 593.4 2.531E-05

SITE ELEV oxy attn water attn zenith attn REFR #1 REFR #2 ant-DIflfl

0.107 ki'i 0.03443 dB 0.0037 dB -dens 0.0381 dB 1.031 8.0130 60,0 ft

50.0deg: G/T(dB) = 41.007 +- 0.35 dB < 3.4 7.319 GH2

E-3 E-F E-Y E: 5 . 3

0 ". 0 . 0 0 0.41

-i;i E-K2 E-K3 E-K4 E-K5 E-K6 E-K7 +E-K3 +E-K9 E-TR

53 1,35 0.00 0.06 3.12 0.35 2.44 1.22 O.Ol 0.60?

G ( d B ) G - d i f f T ' : K ) T 0. c I- ;. )

'{ - f a c H P B W e r r d a t a fit. c 1 - K 2 ) bright 6- f f H R E fl 61.00 -0.04 99.3 727.1 1.3209 1.31 0.133 dB 13.10'; 3.03 K 163.1

2.30"H2 0.20 = 09 O.l-^IH 0 . 1 4345 -N v 2 1 ? 1 ) 460 = T':iii 9) 3.9S24=J1

0.75=D3 0.18 = Ii9 O.l-OS 0 . 00260-N ( 2 1 » 3 ) 15-T(1>11) 1.0000=02

*HPBIJ #1 - 0.14276 +-0.000003 030 L = 0.1427 (ant HFEU - 0.1419)

Kl K2 K3 K6 K8 K9 K PPR-.i-ff R-eff S'TU) Xi<K>

0.93? 0.904 1.000 1,000 0.93'1 1 , OOO 0.379 0.6453 0.93 593.4 2.S45E-05

SITE ELEV cxy attn uater "•ttn zenith attn REFR ttl REFR #2 ant-DIRN

0. 107 k.'i 0.03443 dp H.0O:7 dB/deri: O.USSi dB 1.031 0. 0130 60.0 ft

# tt tt # # # tt tt # tt # tt # tf # # tt » h li If H li +1 tt It W ; I It # It It tt tf V, ti if tl tt II II it ft It it # It -t It It t! # # it It 1^ # It tt It it- # » # # H tilt # I : H- tl tt tt # tt it

106
REWORK (cont)

TAPE 9 do. to. 2 NBSlIi.4l REi-JORK 9848» O00t.-> T4-F12j IH-Flt* REWORK 15.61

HBSlH.01 LOhDER ;9'M3iifiye3 - T2-Fy ^ Iil-Fy> X . y4 . oyy2 >T2-4 » Ii 1 -4

— (5 7

— RUH 3. PROG 27o. 54:17 FT. DETRICK RNT #1

TrilJ: 1;EC 2 ( 1576.923-'

- 7.319 GHz' 60. U Ft LISH

TEMP DEW FT. ^ REL HUrlD WRTER DEHS CLOUD COVER WIND

53.0 F 30.9 F 4 3.0 ". 4.5 rit3 74 9 nph

FIT TO S DRTfl G/Tfl(dB> =( 32.3407 +- 0.1315) + ( 0.03342 +- 0 . 02446 *CSC L

i- = LIHERR CONTRIBUTION

la.Odt?: G.-'-Tfl<dB'.' = 32.533 +- 0.55 dB ( 13.4 7.319 GHZ

E-S E-F E-Y E-Kl E-K2 E-K3 E-K4 E-K5 E-K6 E-K7 +E-KS +E-K9 E-TR

5 . 80"; 6 . 00 0.50 2.59 1 . 35 O . OO 0 . 06 3 . 26 0.35 2.51 5,51 0.14 0 . 60'-;

#######tt############fr######tt##############################4f #####################

G<dB.> G-diff T < K > TaOO Y-fo.c HP BW err do.- a fit c < 1-K2> bright ef f fiREfl 61,15 0.11 119,6 727.1 1 , 25o6 1.81 0.139 dB 13. lO'-; 13.11 K 174,0

2.30=R2 0.26=C9 0,1=B1 0. 14345=N<21» 1> 46e=T<l » 9) ©.9248=J

1

0,75=DS 0.13=D9 0. 1=C3 0, G0260=N': 21 ? 3) 15=T<1<11::' 1.0000=02

*HPBW #1 = 0.14276 +-0.000096 CSC L = 0.1427 (ant HPBW = 9. -1419)

Kl K2 K3 K6 C3 K9 K RPR-ef f R-eff 3(FU> Xi(K)

0.951 0.904 1.000 1=000 0.333 0.592 0,795 0.6461 0.93 593.4 2.300E-y5

3ITE ELEV oxy nttn woter ottn zenith ottn REFR #1 REFR #2 ant-DIRM

0.107 kn 0.03443 dB -0.0037 dB-den;. 0.0331 dB 1.031 0.0130 60.0 ft

28. Ode?: G.'TH^dB) = 32.433 +- 0.42 dB ( 10.2 'O 7.319 GHZ

E-S E-F E-Y E-Kl E-k2 E-K3 E-K4 E-K5 E-KS E-K7 +E-KS +E-K9 E-TR

5.30'-;: 0.00 0.44 1,30. 1.35 0.00 0,06 3.26 0.35 2.46 2.75 0.04 0.605.

#############s####tt#########.#####4t#.#######tt###ft##4####ft###±t#####tt#tt#-#.S4f #######

G'-dB) L,-ditt T(K) - To-(K) Y-fac HPBWerr do.to. fit c(l-K2> bright effflREfl 61.05 0.01 106.6 727.1- 1.2936 1.31 0.139 dB 13.10"; 6.74 K 170.2

2. 30=h2 0 . 20=09 0. 1=D1 0. 14345=N'- 21 < 1 > 460=T<1< 9) 0.9611 = 31

0.75=D8 0.13=D9 O.l-CS 0 . 00260- 1 i 2 i . 3 ^ i5=T.ijll> 1.0030-02

+ HPBW #1 = 0.14276 +-O.O0O0O6 C3C L = 0.1427 io.uX HREN = 0.1419)

Kl R2 K3 Kb. , KS_ R9 K flPR-eff R-ett S<FU) Xi(K)

0.975 0.904 1.000 1.000 0.565 0.998 0.848 0.6459 0.93 598.4 2.455E-05

SITE ELEV ovy at t ..niter aMr, zenith o,*-n REFR tt 1 REFR #2 ont-ITRM

0.107 k fi 0.03443 dO 0. 01! dB- dens 0.0331 dO 1.031 0. 0130 60.0 ft

107
REWORK (cont)

jti.Udt'?: , G/Tii': dE' J./,. fMr: +- 0.33 ciB ( 9.2 ".) 7.319 lHl::

E-S E-F E--V E Kl E-f-2 f, -i -:

- K4 E-F5 E-Kb E-K7 fE-K3 +E-K9 E-Tfl

J . So". U . y ti 0 , 43 u , o9 J, „ 35 U . mU i:J . 03 3 .36 m . 35 2 . '15 1 . 8 ," U . 02 0 . b0".

^: # # |;t # # # # # ij:

.|:f # # it fl: # # # # tt it it # i ff I t 1t il ^IT it it » S # it # # # # # tt ft # # 1? # # 4 ft Vi tt 4^ ?|- # ft tt ft # ft ft ft fl^ ft ft # ft ft it # ft I f ft ft ft ft^ ft #

i: ( d B ) G - d i f t T '

: f :: > T ii '

. \-'

> V - * n, i:;. I-I P E; e i- r d o ^ a f 1 1, z. a - K: 2 ) ti r i 5 t'l t. f i Fi F: E H bl.W2 -0.02 102.7 727.1 1.30C.9 i.31 ":, 0.i39 dB 13. jM"-. 4.63 K . 169.0

2 . 3 0 = Fl 2 0 . 2 0 = r: 9 0.1 = I) 1 iZi „ :! 4. . j .t 5 = I-I ' 3; 1 < 1 4 6 3 = T a i 9 ) 0.97 3: 2 ^ J

1

0 . 7 5 = n i3 0 . 1 ;3 ^ 1) 3 0 . l

^- r. 3 I'J - Id Id 2 6 O H ^ 3: [ ^ 3: ) 1 5 = T ; 1 1. 1 1 1 . 0 0 0 0

- 13 2

+ H F'' B t'-i ft 1 - 0.14 2 ? 5 + - Id . (J 0 0 0 0 b i3 S C L = 0.1427 ( a n t H F' B W = 0 . 1419 >

Kl K2 l<3 Kb KB K9 K flPR-eff R-eff Sa-U) Xi(K>

0 . '9 3 3i 0.904 1 , 0 Pi 0 i . id 0 i;? fi . 3 7 b 3 . 3 9 9 0.366 0.645 3 0 . 9 13 593.4 2.5 0 6 E -- 0 5

3i I T E E L E V r. : < v o t t i,i n. t, ^ r o. X- 1 i-i z e n i t h a t t. n F; E F #1 R EI F R ft 2 o, n t - D 1 13 H 0.107 I 0 . 0 3i 4 4 3 d B Pi . Ci d 3 7' ci B ' d n s 0.0 3i SI d B 1.031 3.01 2 0 60. 0 i' tft ft ft ft ft ft ft # ft ft ft ft ft ft it ft i\- ft ft # S ft tt ft: 11 ^ % ft: ft: ft ft' !! it il il ft ft ft tf ii # # # # # ft « ft ft ft ft ft ft # ft # # ft tf # ft ft ft ft ft ft ft ft ft ft ft ft ft ft ft ft # ft ft

40.0de3: , 'G/TFl(dB) = 32,393 +- 0.36 dB ( 3.8 '<.')

. 7.319 GHZ

E-S E-F E-Y E-Kl E--K2 E-KS E-K4 E-K5 E-Kb E-K7 +E-KS +E-K9 E-Tfl

5 . i3 0 0.00 t;i

. 4' 2 0,6 9 1 , 3 5 id , P 0 3.06 3.26 0 . 3i 5 2.45 1.45 0,01 0 . 6 0

",

ft ft ft # ft # tl ft ft # ft: ft ft t, :!:| ft :» ft ft ft # ft ft: ft ft: ft: :i:i: # ft ^ # # Xf 9 # :i:i: # # :F^ ft ft ft tf :|:| ft # # ft ft 4 It ft ft :ff ft ft rt ft :tf ft ft ft ft ft :tt ft ft ft ft ft ft ft ft ft: ft ft ft ft ft ft G ( d B ) 1 J - 1 J 1 f f T .: I : ) J .1. l- . ) r' - 1 G, I : H F' E N € r r

- d u . o i- 1 1 c . 1 - B. 2 ) b r i ? I 'i t e f f h R £ Fl 6 1:01 -0.03 100.9 727.1 1,3165 1.81 ". 0.i39 dB 13.10". 3.61 K 163.4

2 . 3 0 = fl 2 0.20=:: C 9 0 . 1 ::::: Ii 1 0 . 1 4 :3 4' 5 = I' -I P 2 1 ? 1 ) 4CQ=1 \ I f 9 0 . 9 7

pi

1 = J

1

0,75=:ri3 0.18 = 1)9 0:, 1-P3 0 . i;i02PO:::4P' 2 1 ? 3 > 15-1 :i^ 1 1 ) 1.0000:^02

* Fi F' B I'i ft 1

:=^ 8 . 1 4' 2 ?' 6

+ 0 „ 0 0 0 0 0 6 C 3 C L = 0.1427 C

.i r, t H F B W = 0.1419

)

Kl K2 K3 Kb KB K9 K flPR-et f R-eff S'TU:: KiCK)

0 , '9 i5 6 Pi . 9 0 4 1 , 0 P^O 1 . id 0 Bi B . 9 8 1 0 , 9 9 9 0.375 0.64 pi i3 3 . '3

:3 5i 9 8 .4 2 . 5 3i 1 E - 0 5

3 I T E E L E ij X y a 1 1 n i ,i

: r' o r t n z e n 1 1. Fi o. t. : :-, R E F F: ft 1 R E F R # 2. a n t - D I fi M 0,107 k r. 0 . pi 3i 4 4 3 id B B . B B ": 7' di' d r. -i B . B 2 B I dB 1.031 6. 9130 60.0 f t

tt # # :|:t # # ft ft ft ft :ii: tl ft tt # ft tt :ff ^ Xt # ^At 4 ft 1:|4|' :|:| if Ii # ft: S ft ft ft ft ft ft ft if ft i+ i± ft ft ft # ft ft ft # ft ft tf :|? ft: ft tf tt ^ # ft # tt 4 # ft: ^ # ft: ft

50.0 d 6 ^1 : G T H ( d £i ) = 2 2 . 3 3 4 + - 0.3 5 d Pi ( 8 . 5

'\

') 7 . 2 1 9 G IH Z

E-S E-F E-y E-Kl E-4<2 L-K3 E- K4 E-K5 E-K6 E-K7 +E~KS +E-K9 E-Tfl

B . i3 Pi . Fl . 0 0 0 . 4 1 0 . B 2 1 . 3i 5 B . 00 0 .06 :3 . 2 6 0.35 2.44 1 , 2 2 0.81 0 , 2. B v

tt # tt tt # # # ft ti: # tt tt tl: ft tt tt ft tt tt t^ tt tt tt :|:|: tt tt :|:|: tf :|:i: ft :|t It tt ft ft it tt It tt tt tt tt :|t tt tt # tt ft ft tt tt \'i ft tt tt ft # i:t ft ft tt tt tt ft :tt # It ft tt tt tt tt ft tt tt tt tt tt tt G ( d Ei ) G - d 1 + 1 T B: ) T o !

:

':< V - + c. c H P B 14 e r r da- o. f i i c 1- B 2 ) Fi r i \ i t t i- !"i F? E

H

61.00 -0.04 99.8 727.1 1.3209 1.81 ', 0.139 dB 13, lO": 3,03 K 163.1

2 . 3 0 = Fi 2 0 , 2 B B 9 0.1 :::: Ji ] 0 . 1 4 ' 5 :'

' t] 2 1 ' 1 ) 4 F, 0 T 1 < 9 ' 0 . 9 824= J

1

0 . 75-118 0 . 1 3-ri9 0 . ] 3 0 . 00260 ::: !1 2 ;[ , 3 > 1 5-T : 1 < 1 1 1 , 0300 = 32

* H

F'

E: B tt 1 = 0.14 2 7 6 i 0 . 0 id (i id

0

B B 2 B L == 0.1427 ( 0 n t. i t F' B B = 0.141 9 ) .

y. 1 f::: 3; b j \ : c y. b v k a f- b - 1- f f : - € f t 3: c f' u :> v. 1 k > 0 . 9 8 9 0.904 1 . yuO i . i i u o FJ . •> : J 4 I . '- .: B u . 3 7 9 3 . 3 4 5 3 Fi , 9 ? 5 9 3 . 4 2 . 5 4 b C ~ 0 5

SITE ELEV o.\y d t T n mo f -itfn ZHniM-i iVi-- n f^'EFF tti, REFP ft 2 dni PI till 0.1 U7 III 0.03443 dP i:.id:j';F' iF' i;.! ;

I : 3.0331 P : i . 3 i. id.Ul3P -O.P it

tl it it ti tt tl tt tt tl it ft :i:|: tt :it tt 4 tt tt tt ^ it ti Tl H ii il ii ii H 4 ti ii i: „ tl ll S If tt it' tl It it: ft i: tt ii U it li ii tl H

'i -Pr tt i:i it ti tl' 1:1 ti- It it ii it tt It tt ft il ii' ii- t|: tt

108
6.5.9 Documentation of Final Results

The last step in the measurement procedure is to enter the results from the

last data rework into the SITE PREP program, which lists all the program assumptions and measurement errors in a more explicit form. To better understand this

procedure, an annotated printout of the important entrees is given in the following paragraph. For this illustration, the final rework is assumed to be the one used in the annotated printout for the third level rework in the immediatelypreceding section. The information used from this rework is encircled on the

G/T error table printout, and corresponding use of this information is encircled

in the data entry portion on the following annotation. The SITE PREP error table printout contains the same information as the REWORK error table printout.

To facilitate the comparison, some of the information on the following SITE PREP

printout has the corresponding REWORK table printed next to it.

109
FINAL RESULTS

CHflNGE PUri-DflTE/S I TE; 1 ^^Hi : m 1 RUN HUMBEP' =HC>: 3

VEhR':: -NC ^HUi-i: 1976''' NOHTH': ^NCniON: liEC"

IiflV OF MOMTH'' •---NO Null; j

DhY of WEEK';, ^NC^NOW: 1 NM>

PRO J #< =Ni:.>HOW: E?b . j4h?'-' L 0 C H T 1 0 N =: hi C N 0 1'J F T ]j i: : T i-; i

: ^ f] \ \ ] # i SITE:w. LGNG^. =HC:-: site: H. LRT';- -NC;. : Jj\__^___

S I T E : H L T (

I

N < = H C > \ lu, ] NEN F BN-ELEV/RNT rrifr-__^____ i-- - CENTER FREQ(GHZ)'; =Ni .| • . • E F' F: I N F R E Q

( . '> ( = N f; : ^-m '

E;

H

\\ n W I II T H M H Z ) =Hr i , ELEVdiEG :' =NC:' t ^'-^ "|

RNT DIhM 'TT 'v =M! .-.n o

1=-HPR EFF.2 = HNT HPRWn:.^:r

RNT HPBWaiEGX ^HC

HPBW ERR UG , . ^N HNT PT ERR: I^DEGj £==".H|-'r-r

DEG< =Nr:>s 0,015 ?

„.,|fr;:W'

r

RNT PT ERR

dB

f r e s- P o n d i. 1 o Q T d o, t o f SQR(ftpTS 0 . 129 7 8 7 J 0

1

0. 120737507 DB ; O^^TR'f RGM lr^ HEG':; =HC>: 0.015 ? = 01i:; RNT Pi ERk correspond-- t G T ,-irr dB

1

1

1 S y Q R # P T S o

+' 0 , 1 :3 6 9 5 7 1 3 6

0.13695 7 1 3 6 H B : 0 T F: \

' H f\ IN' N C : 1 DEG' =NC,.': O.OIE ?.0iS8

':'U

RNT PT ERR correspond- tn

dB

1 S S Q R ( # P T S o f 0.1 3 3 6 4 8 3 5 9

0 . 1 3: 3 6 4 8 8 59 Ii B : 0 = T" F' 'i ' R G Fi ! N IiEG( =HC::': 0.0158 '"=01573

RNT PT ERR c o r r csponn

t

dB

0.. 1329 91832 D B : 0 = T P T Fi 8 R

i -i -^n i

i' Ci-IRNGE: 1=T' K

;> " 2=-7 T '- ^ i 0

G.- T(riB '^( ^NC;' : |4r'. ; , ]

, u i CHRHGE: 1=-G.-'TR< j-iri'-. m

R ri n E D W 0 1 3. E f

f:: ) ( = N C '

\ \ R N B I E N T T E r"! P F ( = N P -

' ' DEW PT TEMPCP;-. =NC)^ | ENTER 8UN.T10nN RLrllNll:- I'.i'ir :/['-:

PRT SITE 8TRP DRTR' O-THi :^ -Wr < : 1

110
FINAL RESULTS (cont)

NBSlB.e? SITE PREP <rii

fiMT

r DISH

32,43 dPG 61.04

ZFF

f

kHS EFF COHvL HP3

a. 143S dspHRfiriETER

T

Ki

K3

K9

K2

K3

K4

K5

Kb

K7

Ta

=319 ^- e.ai

r?,4 ^- 5.88

59. ?

-REQUEHCr <GHz)

FLUX fF.U. = 19t':-26

Tiont) = 31.2 K

Ki = 2.45SE-g5 -XJ^O

v-FRCTOR

¥<dB> = 1. 119 dE

RTM RBSORPTICH FHCTOR fUD.?;

oxy-3e-ri at.t.n= a.ti:j14 cr o^'^Attn

water attn = a.@037 dB ^ i^^ fO «/*tffr «.tt^ watfc-r dsn£= 4.5 - Qtft bright = i^;,? V >r; 9ht

site alt pi

DlFpSS^a./sUi

REFRHC-t5<,^. 18*t IxKy-i

1st cTrAt! 1.6393 Rff^A/

2nd const: 6.8138^5/^ *i

STAR SjjKcO-Kd^-^-

HPEU (^- 1: . : I HPBWerr

BNDWD EFFECU. t-aCTOK /y : . 888

bandwidth = 5.5 MHBIFF SYSTEM TEHP 1.089 ^- HNT POINTf+- 0.81153 ri.- -i ' -

_ aftO

- 8.18^^8

+- 1.30 ^

KS 8. 965

^7 J. 998

2.75

8.04 %

yhy5 +- 1.34 ^

ii.r G- T data tii- = HHT POLfiRIZfiTiuH FfiC^ J(4^008

SYSTEN RESPOHCE FhCY i?08S ^- instr pwr rtsp 'J= 2Mi8'..'C7 Y/'tY-l>= 4.482

gauss curve fit(+- 2.38y';<»^

fiDDEB NOISE -.i fc^^K)

NRfH

effAf{BA

EftR TO G.'T — 8.88

8. 44

1.30

+-+- 2.75

8.84

1=,34

£-5

8.83 ^ +- y . yo

0.86 Z 3.11 ^ + -

0. 86

3. 1

1

% z-K*

8.35 Z 2.46 :^ +- 8.35

2.46

-

9.68 8 , 6 TOTHL ERROR? «iuad sun + .j.t " f r e r f

111
- , . 7. COMPUTER PROGRAM CONSTANTS

The meanings of the computer program constants are listed in this section.

Some of the program constants are used more than once so that the appropriate

meaning must be deduced from the context of the program. For convenience, the

simple program variables are listed first, the matrix variables listed next, and

the defined functions, key functions, flags, and multiplex functions (FNX functions) are listed last. Each of the lists are printed twice, once in alphabetical order by the variable name, and once in alphabetical order by meaning. The use of these definition lists with the use of the cross reference lists included

at the end of the program listings makes it possible to rapidly locate a specific calculation within a program.

As a courtesy, the program and file tapes to generate these lists have been

included in the software library of the ETMS . To use the program, tape 6

is inserted into the cassette unit, LOAD 10, then RUN. Then the appropriate

tape needs to be inserted into the cassette unit (tape 6 for the variables

list, tape 7 for the matrix list, or tape 8 for the function, key, flag list).

The computer generated messages will guide one through the required steps.

To print out a program constants listing, at the TRAP select 5 = LIST. For

the question PRT: X,A,B,C,D (0 = NO, 1 = YES, 9 = ALL), 5 keyboard entries

are required before the sort and list are initiated.

112
7.1 VARIABLES LIST ALPHABETICAL BY VARIABLE

wbS2.00 <KfcS 9915, 00G7> T6 & D5-i-10

REVISION t -1-

VAFcIABLES LIST # 9 for NBSIX.02, N3S1A.01, NaSlB.02, NBSIC.OI, NESlD.02

1 A

2 A$ ,B$

3 A { N7 )

4 AO

5 Al

A2

7 A3

a A. 4 fA5 ,A6

9 Ab

10 E 11 B ( I , J ) 12 BO

13 El

14 tl

15 c 2 , 5 3

16 b4

17 B 5 io B 5

19 bS

20 b6

21 b7 ,b8

22 bS

23 b :^ 24 c

25 C(I ,J)

2G CO

27 CI

28 CI

2y C2

30 C2

31 C3

32 C4 ,C5

33 C6

34 C7

35 C8

36 CB

37 C9

3o C9

39 u

40 D$

4 1 b(T6,I)

42 DC

AZIUMTH(deg) OR DUMMY

DuW-lY

SET DATA: SEE MATRIX LIST

RCV;ORK *

' fiLTER S GAbSS CoRVE FIT ERROR, % CT

ATTENuATIOi, OF STD ATTN {abS>l , NOT dB), RELATED TO N(13,10)

SYST CG:jSTS:FKGM OSES N ( 1 , 4 ) ,Ln ( 1 , 5 ) ,N ( 1 , 6

)

RAIIO ?1 aGc/#2 add uses N(1S,5 cr 10)

KFBvNtKirin cf ere) ,AS MEASUKED-NO KANLA CCRKECTION'

du:-:ky matrix

HPbV* {iT.inutes) with Kanda correcticn

DECL OFFSET (deg)

CODE FOR SATELLITE CARRIER HEAS : 0 =SKY , 1=-F , 2 =RCR % F , 3=+F , 4 =GTHER

A.NTEi-.;NA AFERTuRE EFFICEinCY, ANT RADIATIGlm EtrlCIENCY

ATKOSPKLRIC BRIGHTNESS TEMPERATURE, K TEMFERATLRE (F)

T/TA ZEMTH

DLW POINT (F)

T/TA CSC COEFF

G/Ta(cB) ZEi'ilTK COEFF, CSC COEFF

F(OkT) ,iP.K=(F5+F8)/2: in C/kT yEAS

ANTENNA EFFECTIVE AREA

DATE, DECI.VAL

G(I,J) INVERSE OR bUhNY

SITE ELEV (Kl?) C"2/ (8*PI*K*F*2)

SPACE LOSS

Er.i OR enhancciT.ent factor for NEF,NUF ccrr^pared to G/T

FLAT-5db ATTN IN NOISE ADD PKR KEAS : 0 =N0 , i=YES

FLAG-imOISE ADD: 0 = #1&= 2 , 1= = 1 , 2=?2

SITE: V, .LONG (deg), N. EAT (deg)

GHA TO ARIES Is 0 GKT (hrs)

G via HPbW - G via G/T a, d3

Y-FACTOR ERR,%

FILTER EREQ (MHz)

li.STRLf-'.ENTAL POWER RESFOMCE ERR,%

FILTER upJiiLFASS (MHz)

ANTENNA DIA^^ETER (FT)

REMARKS

DATA MATRIX: SEE kATRIX LIST

SKY t-ACKGROuND ERR, 0.9/F''2

113
NBS2.00 <NbS 9915, 0007> T6 & D5-F10

REVISION « 9 -2-

vAKIABLLS LIST # 9 tor r.bSlX.02, NESlA.Ol, NBSlb.U2, NBSIC.OI, NBSlD.02

43 Dl STAR SliAPL ERR,%

4^, D2 . ilPbW UNCERTAINTY, %

4 5 D3 Annrij mjisf frror % 46 B5 , ; ANlLI>iiMA PCIImTING ERROR (deg)

4

'/ L;B LIFE'USIVE ATTEUUATION ERR,%

4£ L)9 FrFRAri'TVF ATTFNIlATinrJ HRROR %. 49 E HOUR Ai.GLE (deg)

bO E L1RP*G/Ta

^ i- r 52 EO G/T ERR-FREQ

53 LO ATTEl^LATI0l4(dB) OF PROGRAM ATTENUATOR, TEMPORARY VALUE

-J M 55 LI YEAR

56 LI G/T ERR-ATKOSPIiERlC ABSORPTION

~j 1 r 1 5b E2 ATTUuATION (dB) OF PROCRAI"! ATTENUATOR

59 L2 G/T LRR-STAR SHAPE

f. 1

1

vi\J i n f UA

I

0 I L3 G/T LI.r-EANDVilLTH

6^ L3 'ilML DELAY TO SCI ANTENNA (SEC)

63 L3 LIRP :PVvR+noise aad #1 (mK)

64 C4 G/T i:.Pi.-Dit 1 1. 1 L,j'i lA). Li.;y 'i'i:i".p 65 L4 TRANSMITTER POWER, KATTS

66 E4 LIRP :PV;R + ncise add #2 (mK)

67 L5 TlML/.''.EASURLMEtMT (hrs)

68 E5 G/T ERR-ANTENNA POINTING

69 E5 YEARS (JULIAN) SINCE 1900 /4

70 E5 LIRP :PhR+noise add #1 & #2 (irW)

71 L6 YEARS SINCE 1977

72 E6 G/T ERR-ANT POLARIZATION

73 E6 ATTUNATION (cB) , MANUAL ATTENUATOR

74 L6 KiEASUKEMENT # OF t IT GAUSSlAi^ CURVE TO DRIFT CURVE

75 E7 G/T ERR-SYSTEM RLSPONCE

76 L7 S'iANT lvAiMGL,10''6 Km

77 E7 HPol-; t IT bY GAUSSIAN CURVE TO DRIFT CURVE

76 E8 Tir';L( l.rs)/ (ARC deg)

79 E8 G/T ERk-ATMOSPHLRIC DIFFUSION

E9 GriA To ARIES (deg)

114
..Bb2.00 <i»£S 9915, a0u7> T& & D5-F10

RLVISICN i 9 -3-

vARlABLES LIST f 9 for r.BSlX.Oz, N3S1A.01, .-iDSlb,02, NBSlCOl, N3S1D.02

81 E9 G/T ERR-ATKC SPHERIC KEFRACION

b2 E9 PWR(irih) Ou SAT SIGl-AL

83 F FREC OF MEASUREMEisT ( GH Z) 84 F RLCEIVCF. FBEQ{GHZ)

bb F(i) c"u:;yY "j^irix

C6 io FRE^ LRR,%

87 FC vALoE OF C2 lit FNW

88 Fl FLAG: 0 =STAR, 1=SATELLITE

89 rl Si? ACL LOSS: in C/icT MEAS

9U tl FLAG-GRAFn:0=wO,l=DATA,2=&FIT, 3=FIT,4=£XIT

91 Fl FLAG: 1=SU£R0UTIKE LOADED

92 H FLAG:Q = rRT PKR & VOLTS, 2=GRAPH PV:R FJ^TIO (in E)

93 F2 tLAG-rFT:tj=ALL,l=rRGG DATA , 2=IiNPUT ASSUMPS , 3=G/T EKR,4=ANT ELEV V£ GMT

94 t2 P/Pc for LOWER FF^Q CWT: in C/kT reas

95 t2 FLAG: 0 =l\"OR.'.AL , 1=E IF F PLOT DATA,2=i:iFF PLOT CF 5 CUTS

96 F2 FLAG:C=CSC fit, l=LIi-,EAR fit

97 F2 ELAG:0=NG AUTO CHECK, 1=YES (in E)

53 F3 FLAG: 0=MAL^UAL READ TEMP , HL^I C ITY , 1=AUT0 TEMP , LEW "pT

99 F3 FLAG-SORT & FIT:l=G/T-ELLv ,2=G/T-CSC, 3=DIP-ELEV ,4=DIP-TIME

IOC r3 FREC{GhZ) SELLCTLL tOR RL'^ORK, 0=RE'v.OFi; ALL FREC

101 F3 FLAG:0=XTAL,1=TYPE IV bridge (in E)

102 F4 FLAG IN E : 1=S I lVULAT EC nCISE ADD,2=EARHT TERMINAL

103 F4 FILL LCAL ?

104 F4 FILE S OF u7 = l, STARTING M{4C,1)

IQb F5 FLAG lu D:1=PRGM REwORK

106 F5 FLAG IN L:1=«0ISL ADD ;1 ViORKS

107 F5 P(G«T) e -F: in C/kT ireas

108 F5 FLAG-PROGR REWORK PATTERiN : 0=NO

109 F5 FLAG: 0,1= volt table in LINEARITY ck, 2 , 3=£tability GRAPH (in E)

110 F6 FLAG TASK:1 = :,E,. SITE , 2=MEAS , 3=REW0RK ,0=KANL VIA KEYBOARD

111 F6 FLAG-AuTO 5ECbENCE:l=YES

112 F6 FLAG:0=RESTART,1=SKY,2=G/T,3=EIRP ,4=LINK

113 F6 FLAG IN E:C=rRGyi A1TU,1=STD ATTN

114 F6 FLAG IN E:1=.nOISE ALL J 2 WORKS

115 F7 FLAG: 0=CAS5ETTE BEIuG USED,1=DISK

116 F7 FLAG-PWR LEVEL: 0=CCN5T, 1=STEPPED (in E)

117 F8 FLG in E:(KEY 5) 0 =GRA? il , 1=L 1ST , ( KEY 6)0=SIKL NCISE ALD,1=EARTH TERM

118 F8 P(ONT) e +F: in C/kT rreas

115
NBS2.00 <NBG 9915, 0007> T6 & D5-F10

REVISION I -4-

VARIAELES LIST # 9 for wBSlX.02, NbSlA.Ol, NBSlb.02, NBSIC.OI, NBSlD.02

FLAG IN D:1=N0 FIT CUTS

STORE SET # OF SUMMARY OF REWORK DATA

ATT« VALUE OF LAST PROG ATTEN IN FNW

T{sky)/Ta: in C/kT rreas ANTENNA GAIiM ,REL

CURVE t IT MATRIX

OXYGEN ABSOFPTION (QB/Km)

IvATER ALSOFFTION ,« 1 CONST ( oB/Km)

VvATER ALSORTICN, #2 CONST ( oB/Km)

HOUR ANGLE OFFSET (deg)

S1!-ULATED STAR NOISE (dS)

MAIN PROGRAK HEADING

FIT TO G/T or i^LF data { 3 * 1 S/S QR { # PTS ) ) , dB

INSTE Pv;R RESPOimCE FACTOR

ADDED nOISE,K

LOOP VARIABLE

HPBW

PLOT UNIT

DRUG Pi.R when imOISE ADD sources ON

riAXIKbl-: FLUX IN F.U.

SELECT FUNTION:19=G/T,2 0=G/TA, 21=HPEWj;l, 2 2=#2,24=DL>.i.,2 5 = NEF,26 = NUF

KB for POINT SOURCE

LOOP VARIABLE

K1*K2*. . .*K9

ATMOSPHERIC ABSORPTION TRANSMISSION COEFF

STAR SHAPE FACTOR

bANDV;iDTHS EFFECTS FACTOR

DIFFERENTIAL SKY TEMPERATURE FACTOR

ANTENNA POINTING FACTOR

At^TENNA POLARIZATION FACTOR

SYS'i'EM RESPONCE FACTOR

DIFFUSIVE ATTENUATION FACTOR

REFACTIVE ATTENUATION FACTOR

LLEVATlON(deg)

FREQ,DIAM,G/T HEADING

ELEVAT10N--tjO REFRACTION CORRECTION

FLAG IN D:0=GRAP1j, 1 = ERR PRT OUT-no V AR lA BLES , 2 =w it h variables

ELEVATION REFRACTION CORRLCTI ON , deg

119 F8

120 F5:f

•

121 F9

122 F9

123 C

124 G(I,J)

125 G4

IzG G5

127 G6

128 H 129 h

13u H$

131 El

152 h5

133 h9

134 1 135 1

1 jc li. 137 J lib J

139 J 140 Jl

141 Jl

142 K 143 Kl

144 K2

145 K3

146 K4

147 K5

148 K6

149 K7

150 K8

151 K9

152 L 153 L$

154 LO 155 LO

156 LI

116
NBS2.U0 <NBS 9915, 0007> T6 & D5-F10

REVISION # 9 -5-

VARIABLES LIST # 9 for NES1X.02, NBSlA.Ol, NBSlb.02, NBSIC.OI, NBSlD.02

157 LI 158 L4

ICQ liD 16 0 L6

161 L7

I >« liO 163 L9

164

Id d M ( N / , J ) 166 Mi

16 7 Kl

1 ^ n lo C Vii. , . . ri 4 169 K2

170 M3

1/1

172 K6 . . .M9

173 N

1 T >l i /4 N

1" 5 N (1 ,o ) 176 NO

177 Nl

178 N2

179 N3

180 L<<4 161 N5

182 n6

183 u7

184 N8

185 N9

186 01,02,03

187 06 ,07 ,08

188 P

189 P$

190 PI 191 PI

192 PI ,P2 ,P3

193 P6 ,P7 ,P8

194 0,QO,Q1

ELEVATION FOR FITTING G/T OR G EFFECTIVE OXYGEN LENGTH, Km

KATER PATH LENGTH CONST*

1

\s^ATER PATH LENGTH CONST* 2, Km

WATER DENSITY (gm/m'3)

REFRACTION CONST #1

REFRACTION CONST #2

G/T RELATIVE

SUIiMARY DATA: SEE MATRIX LIST

LOOP VARIABLE

SUM ON P ATTN OF PGM 1,2,4,8 @ 30 MHz, PGM USES N (13,1... 4)

SUM ON X SUM ON Y MEASUREMENT # g MAXIMUM AMPLITUDE

ATTN OF PGM 1,2,4,8 g 70 MHZ, pgm uses N(13,6.,.9)

DATE, DECIMAL t OR MOON DATA

MEASUREMENT NUMBER

iNPul' DATA CONST, SLE MATRIX LIST

STAR NUMBER, CURRENT

NO. OF STAR SOURCES

CUT NUMBER

Pl.R MEASUREMENT # WITHIN A CUT

LARGEST N3

PAGE NUMBER

RUN # SET # SUMMARY DATA # = M(50,l) = N7+F4

NUMBER POINTS IN FIT

filters! (2. 5MHz & 30MHz) CON STS : N ( 1 5 , 1 ) , N ( 15 , 2 ) , N ( 15 , 3

)

FILTER*2(lMKz (§ 70MHz) CONSTS : N ( 1 5 , 6 ) , N ( 1 5 , 7 ) , N ( 15 , 8 ) POWER MEASURED, MILLIWATTS

PROJECT HEADING

STAR SHAPE ERROR,

%

RECEIVER GAIN SLOPE/mHz

FILTERS (2.5MHZ @ 70KHz) CONST S : N ( 16 , 1) , N ( 16 , 2 ) , N ( 16 , 3

)

FILTER1r4 {5.3MHZ & 70MHz) CONSTS : N ( 16 , 6 ) , N ( 16 , 7 ) , N ( 16 , 8

)

DUMMY

117
WBS2.00 <NBS 9915, 0007> T6 & D5-F10

REVISION # 9 -6-

VARIAELLS LIST # 9 for NBS1X.02, NBSIA.OI, NBS1B.02, NBSIC.OI, NBSlD.02

J.1 Q7 ^^ niiN MV

196 Q3 hPBW, ANTENNA ALONE(i.e. with KANDA CORRECTION)

197 Q3 POWER WITH NOISE ADD ON

199 Q5,Q6 dP(aQd) in C/kT n.eas: g -F, @ +F

200 R REMARKS: SEE REKARK LIST

on 1 202 Rl i-LRO FOR GRAPH

203 R2 RESIDUALS FROM CURVE FIT

') I, A uIlMPrP nP POT MT'^ PIT TO PJ^KfiRDTJi 205 s G/T ERR -FLUX

206 S TIME(hrs) , CURRENT

20b S(1,J) STAR DATA: SEE MATRIX LIST

209 S3 l^REDICTED MEASUREMENT # FOR MAXIMUM STAR PKR

1 1 I sy s t J 211 T(NO,J) INPUT STAR DATA: SEE MATRIX LIST

212 Tl TIME OF 1st MEASUREMENT

1 X 214 T2 CURRENT MEASUREMENT TIME

215 T2 RUN/SET

216 Tt N-6* (N7-1)

217 U PCV;ER NORI-IALIZATICN

218 V VOLTAGE ACROSS PWR BRIDGE

219 V -ALPHA , GAUSS IAN COEFF

220 VI SUM ON X*4

221 V2 SUK ON X''2 222 V3 SUM ON X"3

223 V4 SUM ON P*X*2

224 V5 SUM ON P*X

225 V5 PARABOLIC FIT PAPJVMETER h 226 V6 Tstur/Ta=EXP(X-F(2) *Kl"2)

227 V6 SUM ON P"2

228 V7 aT(star)/TA

229 V7 DV ,# 1 RF OFF

230 V7 N3 OF STAR MAX

231 V8 DV , RF ON

232 V8 DISK OR TAPE «

118
<dS2.0C <NES 9915, 00C7> T6 a L5-F10

REVISION

-7-

VARIABLES LIST S 9 fcr N3S1X.C2, NBSIA.OI, NBS1B.02, N3S1C.01, N3S1D.02

233 V9 DV ,12 RF OFF

234 V9 CT ( STAR ) /TA P Rt OICTF.U

^35 ;i A.^i'?-: 1 i.-'i':*. {;""•. Z ) 236 Wl VARIENCL OF F { STAR) /P (ADD)

237 X TIME VARIABLE, 2*I/N4-1

2 3& x$ SUBKCuTINE HEADING

23S XI Xi = G/dT ( Star)

24C XI LOOP VAR^IAbLE

241 XI TIiVE VARIAELE, 2*(N3-M3)/N4

24 2 X2 GAh:>-A,FARAECLIC FIT

243 X2 VARIAELE IK FNG{N3)

244 X4 K*S/2/k

24 5 X5 AZUMuTH BIAS (deg)

246 X6 ELEVATION BIAS (deg)

247 V Y-t ACTOE

246 y (I) MATRIX USED IN CURVE FIT OR DUMMY

24S Yl G/T EBR-Y factor (C8*Y5)

25U Y5 Y/(Y-1)

251 COLD SKY POWER / TA

252 2,1 2,ENITh ATM ATTN, dB

2bj SERRGR VARIABLE

25'. i5 C/kT Kx£AS:T(ONT) /Ta FCR UPPER FREQ

119
7.2 MATRIX LIST ALPHABETICAL BY VARIABLE

ULS2.00 <NBS 9915, 0007> T6 & D5-F10

REVISION # 9 -1-

MATRIX LIST I 9 for iMBSlX.02, NiiSlA.Ol, NdS1B,02, NbSlC.Ol, NBSlD.02

1 A ( 1) BUN/SLT = 100*N6 + N7: i^5=RUNt(, N7=SETI

2 A( 2) FREQ (MHZ)

'i J A { 3 ) A^lbih^ii iL^)^r^t) lu

4 A ( 4) BEW PT{F) *10

5 A ( 5) RELATIVE HbKIDITY(%) *10

cD A 1 Li-iUULJ L-UvLK iUU + WiNU(inpn)

7 A ( 7) * PV.R LEVEL, ir, icrowatts

8 A ( 7) X COBE(ul) :0 = SKY, 1 = -F, 2=RCR @ F, 3= + F, 4 =OTHER

r. A 1 o ) rWK KA i i u lh LLK : m icr ODe X i S/ lU

10 A I 8) rw T/Ta*10"4

11 A ( 9) * U*10*4: REFEREUCE PWR

12 A 1 9) X NUi UbLL>

13 A ( 10)* hPbW#l* 10'4

14 A ( 10) X SLANT BIST(KiP,): LGT(E7)*1000

15 0 ( 1 , 1) X AZIKiUTH: (AZ ( deg) -180) * 100

lb D ( 1 , 2) X LLEV (aeg) *100

17 u 2, l)x FLAG C2: 0 = NO STB ATTN WiiEN NOISE ABB ON , 1=STB ATTN WHEN

lb B ( 2 , 2) X KANUAL ATTN SETTING, dB (E6)

19 B( 3 , 1) X hUMBEK OF MEAS (N4)

20 B 3, 2)x ULTLR bANBWITH,HHz (K)*10

21 D 4 , 1) X P/PacQ(ave of se t) : LGT { P/Padd) 10"

4

2^ b 4 , 2) X TRX PV;n:LGT(B4)*10"4

23 D 5, l)x PWR#l,ir.U ( ave, noise add OFF) :LGT( PkR) *10 "

( (E2 + E6) /lO) *10"4

24 L 5, 2) X GAIN SLOPE OF RCR (Pi) * 1000

25 B 6, 1) X PWR due to NOISE ABB,ir,V\:LGT{PWR#2-PWR#l) *10*4

26 B 1 , tM3+2) X PWR WITH noise add OFF i? BOLO: LGT{PVvR)* 10'4

27 B 2 ,N3+2)

X

PWR(noise add ON): LGT ( BOLO PKR)*10"4

28 U 3 ,w3+2)

X

PWR/Padd : LGT ( P/Paad ) * 10 4 29 D 4 ,n3+2) X TlF,E,nrE (El) * 10 "3

30 B 5 ,N3+2) X LGT (PWR METER V OLTAGE ) * 10 '

4

31 B 6 , N3+2)

X

ATTN, TOTAL: E2+E6

32 B T6, D* AZir-:uTfi: (AZ(deg)-lBO)*100

33 U [TG, 2)* ELEVATION (deg) *100

34 B T6, 3)* ^ OF HEAS(N4)

35 B T6 , 4 ) * TIME OF PKEBICTED STAR MAX: El*1000

36 B T6, 5)* BLCB OtFSET FROM PRBBICTEB STAR CENTER: (Bl+Ll)deg *1000

37 B (T6, 6)* LOG ( ( (Tst ar + Tsy Stem) /Tad d) /U) *10"4

38 U [ T 6 , 6 ) r w LGT{ oT/Tadd) *10"4

39 D [T6, 7)* FIT MEAS » AT PEAK * 100

40 B (T6 ,N3+7) LOG { P/U) * 10*4 : P=FKR MEAS mV, , U = PWR REF

41 M (40, 1) NUMBER OF SUMMARY SETS STOREB IN MATRIX M 42 M (40, 3) NUMBER OF FILES USEB IN BISK STORAGE

120
ijBS2.00 <NES 9915, 0007> T6 & D5-F10

-2-

REVISION # 9

MATRIX LIST # 9 for iNBSlX.02, IMBSIA.OI, NaSl£.02, NBSIC.OI, NBSlD.02

43 ro(iM6, 1) LLEV(ceg) + STAR#/100

44 K(NS, l)c STAR S/10 0

4 5 l)x CODE + .07

46 h(N8, 2)* G/T(gB)

4 7 h(.^8, 2)d T/Ta ZENITH (b5)

4 8 /. (N& , 2) X PV.R/Pa

45 3)* G/TA(dB)

50 tidMb, 3)d T/Ta CSC COEFF (B6)

51 K(IvS, 3)x PWR(ir,Vi)

52 H(.N8, 4)* hPBWifl (deg)

5 3 !-(N8, 4)Q TIKE, DECIhAL HRS {FNT2)

54 .\(w8, 4)x FV;r cue to Ta (mW)

55 r. (W8, 5)* HPbV.-#2 (deg)

56 MCWb, 5) o TEMPERATURE, F (A(3)/10)

57 ?;(1>;8, 5)x C/kT(dB)

58 l:(:-S, 6) PRLt (GHz)

59 M(iM8, 7)* y-f actor

6U K(NS, 7) a \%ATER DEhSITY (L7)

61 r:(i\i5, 7)x EIRP ( dBw) +G/TA (db) = E

:.{tvb, 8)* .-Ef (KfU)

63 Fi(iJB, 8)d ImUKEER OF POINTS IN DIP CURVE

64 M(n8, 8)x OiJT/Tadd: (F2+Z5)/2

65 h(NO, 9)* NUF (kFU)

66 H(N8, 9)x Pacc(Kw) : (E5+f8)/2

6 7 M(N8,10) RUN/SET: N6+N7/10Q

66 im( 1, 4) SYSTEK # + (DATA REVISION #/100)

69 »( 1, 5) DAC REE vol t : * 3= 6 . 3 1 3 , # 4 =6 . 3 6 7 , # 5=6 . 2 84 , # 6=6 . 24 7C N( 1, 6) DAC nult=-(chnl*9-?8)/*7:«3=0,3173,s4=0.32,#5=0.3187,#6=0.32

71 N( 1, 7) ATliv+ir.eter (db/10) 5 . 3 §70 : # 3=16 . 15 , # 4 =17 , 3 5=1 5. 27 , # 6=- 17 . 5 5

72 N( 1, 6) RATIO #1 add/^j2 add & MICROWAVE FREO

73 N( 1, 9) NUMBER OF POINTS IN FIT

74 N( 1,10) REWORK t

75 N( 9&10,1) STORE STRING PS

76 N(13, 1) ATTN of Idb prgm g 30MHz : # 3=0 . 96

1

77 1^(13, 2) ATTN of 2dB prgm 30v'.;z : i 3 = 1 . ril

'lb N(13, 3) ATTN of 4d& prgm g 30KHz : # 3=3. 947

79 N(13, 4) ATTN of 8dt prgm m 30MHz : # 3=7 .8 81

80 N(13, 5) ATTN of STD RES 30KH z : * 3 = 5 . 9 2 2 , # 6= 4 . 779

121
NESZ.OO <NES 9915, 0007> T6 & D5-F10

-3-

REVISION t 9

MATRIX LIST # 9 for NBS1X.02, NBSIA.OI, NBS1B.02, NBSIC.OI, NBS1D,02

81 N ( 13 , 6) ATTN OF IdB prgm e 7 0 : t 3 = 0 . 9 76 , # 4 =0 . 94 7 , # 5=0 . 9 38 , # 6 =0 . 97

3

82 L-i 13 , ATTN OF 2dB PR&M fi70**3=l 890 . (14=1 95 it5=l 854 #6 = 1 957

83 l\ ( 13, 8) ATTN Of 4db pcgm @ 70 : ; 3=3 . 909 ,# 4 =3 . 87 , # 5= 3 . 957 , # 6 = 3 . 924

84 13, 9) ATTN Of 8aB PRGK ^ 7 0 : # 3 = 7 . 8 9 6 , j} 4 = 7 . 8 6 , iJ 5 = 7 . 84 5 , # 6= 7 . 949

fa 5 i\ 13

,

10

)

AlTiN of STD (>J 7 0 • # 3= 5 . 9 66 . # 4 = 5 . 92 .# 5=6 11. #6=6 1

86 15 , 1) FILTifl {2. 5fe30) NOISE BW : # 3= 3 . 91 5 , « 4 = 3 . 8 87 , # 5= 3 . 64 3 , # 6 =3 . 5 52

87 w 15 , 2) FILISI (2. 5Cd30)Nl,N!Hz:# 3=0. 009 38 ,i;4 = 0. 01526 ,#5 = 0.0178

88 15 , 3) E ILIERS 1 ( 2 . 5Mhz y 30KHz):2nd CONST

89 N ( 15, 4) FILT*1(2. 5^30) LOSS,dB:#3=3.09 2,#4=2. 711,#5=2.391,#6=2.560

90 IM ( 15, b) FlLTif2 (1@70) NOISE BW : # 3=1 . 1 93 , # 4= 1 , 22 5 , t 5= 1 . 2 3 , # 6 =1 . 250

91 15 1 7 ) F ILT^i 2 ( 1 (270 Uvl . MH z : i 3=-0 1043 . i 4 = 0 0817.^5=0 1271

92 N 15 , 8) F1LTEF#2 (iMHz @ 70Mhz):2nd CONST

93 l\ 15 9) FlLl?f 2 (1G7 0) LOSS, dB :Jf 3 = 4. 970 ,#4 = 4. 910 ,# 5=4 . 87 0 , # 6 =5 . 6 34

94 N 16 , FILli;3f2 5(a701NCISE BW*t3=2 B08 44=2 910 tS=? 937 #6 = 2 875

95 16 , 2) FILT#3(2. 5070) Nl , MH z : jf 3=- 0 . 1 0 2 , # 4= 0 . 0 108 , # 5 = -0 . 1 30 96 N 16, 3) FILTLR*3 (2. 5MHz @ 70KHz):2nd CONST

97 N 16 1 4 i FILT#3(2 5fa7 0 1 LOSS . gB • # 4 =5 78 . # 5=5 84. #6 = 5 814

98 U 16 , 6) FILT{f4 ( 5. 3?70) NOISE BW : # 3= 5 . 73 4 , # 4= 5 . 8 0 , # 5= 5 . 8 56 , it 6 =5 . 6 71

99 N 16 , 7) FILTi;4 ( 5. 3@70) Nl,MHz: # 3 = -0 ,14 ,# 4=-0.0782,#5 = 0 .011

IOC 16 , FTIj1FR»4(S 3Mhz 0 70f-'.Hz1 •2nd COi\iST

101 N 16 9

)

LOSS,aB:M = 4.18,#5=3.14,if6 = 4.08 3 102 U 17 6) HLT#6 (0 .06^70MHz) NOISE BW ,MHz : #6=0 . 08 3 103 N (17 7) F1LT#6 (0 . 06e70l>jHz) Nl ,KHz : # 6= 0 . 0 0178

104 N [17 9) F1LT#6 (0 .06ia70MHz) INSER LOSS , dB :# 6=4 . 719

105 N (lb 5) RATIO #1 ada/#2 add (3 30MHz

106 N (18 10) RATIO #ladG/#2add @ 7 0 : # 4=0 . 515 , # 5=0 . 526 , # 6=0 . 2468

107 N (19 r 1) G/T(dB) INTERCEPT

108 N (19 , 2) G/T(dB) ZENITH

109 W (19 , 3) G/T(dB) INTERCEPT IS ERR

110 N (19 , 4) G/T(dB) liiENITH IS ERR

111 N (19 r 5) G/T(aB) ELEV COEFF

112 N (19 , 6) G/T(dB) CSC COEFF

113 N (19 , 7) G/T(qB) ELEV COEFF ERR

114 N (19 , 8) G/T(cB) CSC COEFF ERR

115 ( 20 r 1) G/TA(6B) INTERCEPT

116 N ( 20 r 2) G/TA(dB) ZENITH

117 U (20 , 3) G/TA(dB) INTERCEPT IS ERR

118 N (20 r 4) C/TA ZENITH IS ERR

122
NUS2.00 <NBS 9915, 0007> T6 S. D5-F10

REVISION « 9 -4-

KATRIX LIST # 9 for NBS1X.02, NbSlA.Ol, NBS1B.02, N3S1C.01, NBS1D.02

iiy on -> ) kj/ I Pi \ Cu } LXiLV cutrr

120 20 , 6) G/TA(dB) CSC COLFF

TO! 1 Z 1

KlJN ' ZU f

•7 \ ' ) 1TOOz z L\ ZU /

ft ^ 123 N 21

,

1) HPB'vN* 1 ( aeg) IiMTEPCEPT

i Z4 Kl 9Z X1 f ^

;

UPh^U"'**^! 7PMTTH

1 Z D N ^ X f 3 \ J

)

iir^DwrTX\Utryj PPl^V. ^1 ( nci n\ TMTPPPPPT llNitLxxk^Ltl XO^ ^ PRR I-ir\jA 126 N 21

,

4 ) HPBV;#l(deg) ZENITH IS ERR

N Z X f c \ J

)

i z 0

r Z9 XT

r 129 N 21

,

7) HPbVv#l(aeg) ELEV COEFF ERR

LnM 9Z X1

r ft \ t-:p-;i>o*^i per* phppp ppp

X J 1 fi Z9 Z9

f 1-

)

nI-iPRl*''^ r L>\i r 9Z

(Vt-'^y' r\Ci n\ TrJTPPPFPT lWiurv'*^£jirX

132 LN 22, 2) HPclWjf2 ZENITH

X J J ^ ^ r

"5 ^ J / X ^ N 4 1 135 W 22, 5) riPBV.# 2( deg) ELE'v COLFF

X -5 O I

J

L-i ( 9 9 o

;

X J / IN Z9 9Z f 13o N (22 , &) tih^-.,^2{aeq) CSC COEfF ERR

X J ^ LH 1- 1 X *1 w ^

)

141 u 24 n-l^FCL ( dpol TNTFRCrPT IS CRR

142 N 24 , 4) D-DECL(ceg) ZElUTH IS ERR

143 N ( 24 , 5) D-DLCL(Qeg) ELEV COEFF

144 N (24 , 6) D-DECL(ceg) CSC COEFF

145 N (24 , 7) D-DECL(Geg) CLEV COEFF ERR

146 24 , 8) D-DECL(oeg) CSC COEFF ERR

147 (25, 1) NEF(kFlj) intercept

148 Iv (25, 2) NEF(kFU) zenith

149 N (25, 3) NEf(kFU) intercept IS ERR

150 N (25, 4) WEF(kFU) zenith IS ERR

151 N (25, 5) NEF(kFU) elev coeff

152 (25, 6) i>iEF'(kfU) esc coeff

153 N (25, 7) NEF(kFU) elev coeff err

154 N (25, 8) UEF(kFU) esc cceff err

155 W (26 , 1) NUF(kFU) intercept

156 N (26 , 2) NUf(kFU) zenith

123
NbS2.00 <NBS 9915, 0007> T6 & D5-F10

REVISION # 9

MATRIX LIST # 9 for NBS1X.02, NESIA.OI, NBS1E.02, NBSIC.OI, NBSlD.02

157 K 26 , 3) NUF(kFU) intercept IS err 158 26 , 4) NUFlkbLi) zenith IS err

15 9 u 26 , 5

)

NLjf (ktU) elev coerf

160 26 , 6) NUF(kFU) CSC coeff

161 u 26 , 7) NbF(kFU) elev coeff err

16 2 u 26 , 8) NUt(kFU) CSC coeff err 163 I ,J ) PROG COi.STS 1<26:I, 1=A , 2 =B , e tc ; J , 1=1 , . . . , 1 0 = 0 , 11 = N0 SUBSCRIPT

164 s NO , 1) STAR FLUX (F.b.) y STANDARD FREQ

16 5 s NO , 2) S'IAR=RT ASC (oeg); SOLAR=GHA & 0 gmt (deg)

166 uo

,

3) STAR=N. DEC. (deg); SOLAR=N . DEC. % 0 GMT (deg)

167 s NO , 4) ELUX AT THE WORKING FREQ (F.U.)

168 T 9 , 1

)

Si ORE STRING P$

169 T 14 , 9) DAYS(STAR EPIC) SINCE 1977=#DAYS SINCE 1900 - 28125

170 1 14 , 10) LAYS (SOLAR EPIC) SINCE 1977 = i;DAYS SINCE 1900 - 28125

171 'i NO , 1

)

STAR/SOLAR NAME

172 l' (NO, 4 ) * SPECTRAL INDEX SECULAR E XPANS I ON ( %/ Y r ) * 10 00

173 T (NO , 5) * SPEC INDEX SECULAR EXPN UNCE RTAI NTY ( %/Y r

) * 10 00

174 T NO , 6) SPECTRAL INDEX * 1000

17 5 ( iJO , 7 ) * StLCTIAL INDEX ERR * 1000

J. 7 0 - n'o , 8 ) * fLuX ERR & STD FREQ {%) * 10

17 7 ( ivU , y

)

DISK SIZE (ARC MiN) * 100

17 8 nO , 1 U ) t LUX ERR F(%) * 10

179 T ( NO , 11) * LINEAR POLZ (%) * 10

180 T (NO , 11) s GilA/hr * 10 00 181 T

1 ( NO , 12) * LINEAR POLZ LRR(%) * 10

182 'i (NO , 12) s N. DLC./hr * 1000

183 T ( NU , 13) * POLZ ANG (deg) * 10

184 1 (ijO , 13) s HORIZONTAL PARALLAX * 1000

185 1 ( ^'O , 14 ) * POLZ ANG ERR (deg) * 10

186 1 (NO , 14 ) c AGE OF ^;00N (oays)

187 T ( NO , 15) * FLUX EPOCH, YEAR* 10 188 T (NO , 16) * :=ECULAR DECAY of flux (%/Yr)*100

189 I' ( NO , 17) * SECULAR DECAY of flux ERR (%/Yr)*100

190 1 (NO , 18) * STD FREv(GHz) * 100

191 T { NO , 19) * ^;IN FREQ (GHZ)*100 WHERE FLUX CALC VALID

192 1 (NO , 20) * i\AX FREiw (GUz)*100 WHERE tLUX CALC VALID

193 1- (NO , 21) FLAG: 0=STAR DATA, 1=S0LAR DATA

194 1 (NO , 22) s GhA/HR (aeg) * 1000

124
tML<S2.00 <I>iDS 9915, 0007 > T6 & D5-F10

REVISION

-6-

I-iA'iF.IX LIST # 9 for KLS1X.02, liESlA.Ol, NBS1B.02, NBSlC.Ol, iMBSlD.02

195 T(N0,23)s N. DEC./hr (ceg) * 1000

125
7.3 FUNCTION LIST ALPHABETICAL BY VARIABLE

.^LS2.00 <UBS 9915, 0007> T6 i L5-E10

REVISION it 10

-1-

fUNCTlON, KEY, £, FLAG LIST « 10

tor NES1X.02, NdSIA.OI, iMBSlb.02, uBSlC.Ol, NBSlD.02

1 FLAG 1

2 FLAG 1

3 FLAG 1

4 FLAG 2 5 FLAG 7 6 F LAG 9

7 FNA(NO)

8 fUo (Q)

9 FNC(Q)

10 FND(O)

11 FNL (NO)

12 FwFa 1

13 FiMFb 0 14 f nFc 0 15 FNFc 1

16 fi«Fd 0 17 FI*Fq 1 18 F 1<F d 2

19 FKFd 3 20 FNFd 4 21 FNFq 5

22 t KF a 6 23 F imF d 7 24 FhF d 8

25 FNFd 9 26 FNFd 10

27 FNFe 0

28 FNG (Q)

29 F m (Q)

30 FNI (Q)

31 f-NJ (Q)

32 FNK(NO)

33 FNL 1

34 FNL 1.1

35 FNL 1.2

36 FNL 2

37 FNL 2.1

38 FNL 2.2

39 FNL 3

40 FNL 4 41 FNL 6 42 FNL 7

STAR FLUX CALC FOR SPECIFIED FRCQ & DATE

l = LIi:'K DATA INPUT

DISK STORAGE (F7) <r-rgm A>

G/T ERRORS CALCULATED FOR SPECIFIC FREQ & DATE

PET OUT EKR :l = V./0 COinSTS

HEADING:1=EYPASS DATE , F REC , ATN DI AM , G , G/T , G/T

a

ANT POINT:NO=STAR # I N : H , LI , B 1 , E 1 ; OUT:A,L,L0 < NBS7 4 11 , 7 4 49 , 8 3 3 9>

BEEP: Q=# OF BEEPS

PAGE HEADING: Q=<; SPACES BEFORE PRT HEADING

INIT HARDWARE: 0=VTVy ,BRG, NOISE C= NOMINAL, 1 = INIT PV.R BRG

ERROR CALC FOR G/T: nO=STAR # REWIND IIJT CASSETTE

SITE: W. long, N. lat, alt

SET* CHAimGL

SOURCEt CHANGE, RESET KAT A & KAT D RESTART

ques DATA ON TAPE/DISK , TAPE # head ing G/T , G/T a, NEF , iJU F , Y- factor

heading Kl,. . . K9 , K . A-e f f , R-ef f ,S , Xi

BEST FIT 5 CUTS

heading *HPBW #1 =...+. ..CSC L= . . . (ant HPBW = ) neacing: G(ct) G-dif£ T(K) Ta(K) Y-fac HPbwerr data fit c(l-K2) . ques: DATA SLT#

A$= 1....!....!....!....!....!....!....!....!....!

prt Xl,K2,K3,K6,K8,K9,K,A-eff,R-eff,S,Xi

prt A2,C9 ,D1,N (21, 1) ,T(1 ,9) ,C8,D8,D9 ,J 1,N (21 ,3) ,T(1, 11) ,C2

ATTN SETTING, FILTER IDENTIFICATION HEADING

CURVE FIT:0=INIT,-99=CALC FIT ( ou t : I , R2 , W 1 , V 5 ,G ( I , J ) , Y ( I)

)

HEADINGS: 0=FIT #, 1=TAPE # DRAW LINE:1 -;2 — ;3 ==;4 ##;5

KEY SUB: 0=KEY SEE KEY LIST

K-FACTOR CALCe.g . K1,K2,...,K9

G/T plot (J=19)

G/T err TABLE: no print variables

G/T err TABLE: print variables

G/Ta plot (J = 20)

G/Ta err TABLE: no print variables

G/Ta err TAELE: print variables

HPBW#1 plot (J=21)

HPbW#2 plot (J=22)

Y-lactor plot (J=24)

NEF plot (J=25)

126
iMBS2.00 <NBS 9915, 0007> T6 6. D5-F10

-2-

REVISIGN # 10

FUlICTION, key, & FLAG LIST t 10

for NBS1X.02, NbSiA.Ol, WESlb.02, NBSlC.Ol, NBSlD.02

43 FNL 8 44 Fi>W (w)

45 t NN (Q)

46 FNO (ij) 47

48

4 9 I iNR(Q)

50 BiMS{Q)

51 FNT(g)

52

53 F:JTd{L)

54 FNU(C)

55 t LtV (01

56 F NV d 0

57 FlJVd 1 58 f NVd 2 59 F l>iV d 3

60 FNVd 4 bi F uV Q 5 62 F NV Q 6

63 iUVd 7 64 FNVd 8 65 t NVd 9

66 FNVd 10

67 FNVq 11

68 FNVd 12

69 FNVd 13

70 BWV. (Q)

71 FNX 24

72 FNX 27

73 FNX 28

74 FNX 29

75 FNX 30

76 FNX 31

77 FNX 3 2

78 FNX 3 3 79 FNX 34

80 FNX 3 5

Ml plot (J=26)

KETEORGLOGICAL INFG:G=INPUT DATA,1=PRT DATA , 2=SELECT HAN/AUTO

ANSWER ROUTINE: DISPLAYS Q, SPACE = NO CHANGE

AIMS ROUTINE SEQUENCE

PRK yi£AS:0=#l,l = #l,2 = #2,3=PKR,mw (IN: A3 ,C 2 , E2 , V , FNDl

)

PRGM conEt(MAT N ) : 1=LI ST , 2 =cor rec t , 3=N ( I , J ) to variables

READ (ENTER DATA) LEV ICE : 2=DVH , 3=CL0CK ,4 =BREAK ShITCHS

SPACE PAGE Q SPACES

TIME,DECIKAL KRS:1=SET UP El (IN: E3,E5,N4)

DUKKY USED IN ERROR P RT OUT IN DW63B

calc: ANT hPBW#l(min of arc)

PRW RATIO CHECK: IN:C2,E2,C3 CUT : A ( 7 ) ,A ( 8

)

VOLTAGE READING: volt range + channel #/10 0 RESTART

calc: G/T,G/Ta,NEF,NUF errors

til X=EXF(V* (V2-W1) '2)

calc: GRAPH RANGES for AUTO SEQ

celc: LINEAR S. CSC FIT PARAMETERS

(.= FNf-2 & RETURN

reao: RV\RKt,bLT ,E , T/Taif 90 , esc , HPoVs e9 0 , esc , Ta

FIT #1 OF 5 CUTS

FIT #2 OF 5 CUTS

calc Ta via G at zenith =B2* (D*F/0 . 313

) '2 , B2

f set FLAG F8 if REWORK* not integer

loaa PI OR SUMMARY I-iAT H, MAT N STORE MAT K & MAT N calc B,B0,B2,G via b2 , G-d if f =C 7 ,Ta=H9 ,B9

V.AIT Q MILL I SEC

DVM AUTORANGE

0. 100000 V DVM RANGE

1. 000 00 V DVM RANGE

10. 000 0 V DVM RANGE

100.000 V DVM RANGE

10 00.00 V DVM RANGE

DC FILTER OUT

DC FILTER IN RATIO: FILTER IN

AC VOLTS (not installed)

127
iMbS2.00 <imBS 9915, 0007> T6 & D5-F10

REVISION t 10

FUNCTION, KLY, & FLAG LIST # 10

for NbSlX.Q2, NbSlA.Ol, NBS1B.02, KBSIC.OI, NBSlD.02

81 FNX 40 OHMS ( not installed)

b 2 FNX 48 PRGM ATTN = 15dB

83 FNX 49 PRGM ATTN = 14dB

84 FNX 50 P RGM ATTN = 13dB

85 Fi«X 51 PRGN ATTN = 12dB

b6 tlMX 52 PRGM ATTN = lldB

87 FNX 53 P RGM ATTN = 10dB

bb Fnx 54 PRGti ATTN = 9dB

b9 FNX 55 PRGM ATTN = 8dB

90 fcNX 56 PRGM ATTN = 7dB

91 FNX 57 PRGM ATTN = 6dB

9^ EM 58 prg;-i ATTN = 5aB

S3 FNX 59 PRGM ATTw = 4dB

94 FNX 6U P ROM ATTN = 3dB

95 INX 61 PRGM ATTN = 2aB

96 FNX 62 PRGM ATTN = IdB

97 FNX 6 3 P RGM ATTN = OdB

98 FNX 64 NO RF to BOLOMETER & STD PAD IN 99 f l.X 65 RF tc BOLOr:ETER & STD PAD OUT

10 0 t na 66 STD ATTN IN

101 F NX 67 STD ATTN OUT

102 FNX 68 NO RF TO BOLOMETER

103 tNX 69 RF TO BOLOMETER

104 FNX 72 NO RF to HOLOMETCK & STD PAD IN (avoid-USE FNX64)

105 t lmX 73 RF tc' BOLOf-ElER & STb paa OUT (avoid-USE FNX6 5) 106 FNX 74 STL ATTN IN (avoid - use FNX66)

107 FNX 75 STD attn OUT (avoid - use FNX67)

108 FNX 70 NO Rt tc BOLOMETER (avoid - use FNX68)

109 FNX 77 KF to• BOLUMEIER (avoid - use FNX69)

110 FNX 80 NOISL ADD tl & #2 ON

111 FNX 81 NOISE ADD #1 & #2 OFF

112 FNX 82 NGISC ADD ifl ON

113 FNX 83 NOISE ADD #1 OFF

114 F NX 84 NOISE ADD #2 ON

115 FNX 85 M)i sr; AUIj

116 FNX 88 NOISE ADD 11 & #2 ON (avoid - use FNX80)

117 FNX 89 NOISE ADD )fl S, 12 OFF (avoid - use FNX81)

118 FNX 90 NOISE ADD 11 ON (avoid - use FNX82)

128
INBS2.00 <NES 9915, 0C07> T6 & D5-F10

REVISION # 10

-4-

tUNCTIOw, KEY, & FLAG LIST # 10

tor NBS1X.02, NBSlA.Ol, NBS1B.02, NBSIC.OI, NBSlD.02

119 fhX 91

120 f NX 92

121 FNX 93

122 fNX 96

12 3 F NX 9 7

124 FisX 96

125 fuX 9 9 126 f NX 10 0

127 t NX 101

128 f NX 10

2

129 F kX 1 0 3

13u t NX 104

131 I NX 10

5

t uX 10 6

133 f NX 10

7

134 F NX 10 e 1 J D t l^^A lU y

136 FNX 110

137 J:..X111

13 9 140 KEYa 0 141 KLYa 1

14 2 KEYa 2 143 KEYb 0 144 KEYb 1

145 KEYb 2 146 KCYb 3 14 7 KLYb 4

14b KEYb 5 149 KEYb 6 150 KEYb 7

151 KEYb 8 152 KEYb 9 153 KEYb 10

154 KEYb 11

155 KEYb 12

156 KEYb 13

NOISE ADD #1 OFF (avoid - use FnX83)

NOISE ADD fe2 ON ( avoia - use FNX84)

NOISE ADD #2 OFF (avoid - use FNX85)

OPENS l-'ULTl PLEXEP so can use front panel inputs

OPENS MULTIPLEXER SO can use front panel inputs

OPENS IvbLTIFLEXER SO can use front panel inputs

OPENS ^'ULTIPLEXEF SO can use front panel inputs

j 357 INPUT(e.g. ext p\vr meter ): channel #11 = 110 0100

PV:R BRDG vs FINE REE: channel #10 = 110 0101

PKR BRDG vs REF VOLT, set fine vclt:ch #9 = 110 0110

PRK BRDG OUlPbT: channel #8 = 110 0110

D/A REFERE.mCL voltage: channel #7 = 110 1000

CRYSTAL DIODE voltage: channel #6 = 110 1001

D/A OUTPUT: channel #5 = 110 1010

+12 volts, RF UNIT: channel #4 = 110 1011

+20 volts, RF UNIT: channel #3 = 110 1100

DH> POINT: channel if 2 = 110 1101

TENP (F/lOO): channel #1 = 110 1110

GROUi^D i-VK: channel #0 = 110 1111

PLOT DATA: 1=PRT HEADING

Xi = FNK (NO) *C1*S (NO, 4)* IE- 26

RESTART

CMAinGE PRGNi CONST & MODIFY CORRESPONDING N(I,J)

LINl : 1=S1TE PREP, 2=MEAS, 3=RFV;0RK

RESTART :0=RE ST A Rl , 1=LI NKMEAS , 2=REW0RK , 3=KEY LIST

oP DAT E : RU N# , DATE, SITE

UPDATE: FREC,&V. ,ANT PARAMETERS

UPLA1E:ANT POINTING ERROR

UPDATE:T,G/T,Ta,PVvR RESP

UP DATE: TEMP, DEW PT

UPDATE :SUN/^lOON ALMINAC DATA

PRI :SITE & FLUX DATA

CALC:STAR FLUX ? f PKT:TYPICAL G/T VALUES AND ERRORS

STORE: S,T,N

PRT:LIST OF ALTERATE STAR ERR

PRT: ELEV VS GMT

UPDATE: N(I,J)

129
iMBS2.00 <NBS 9915, 0007> T6 & D5-F10

REVISION t 10

-5-

FUNCTIOK, KEY, & FLAG LIST I 10

for iNBSlX.02, NBSIA.OI, NBSlb.02, NBSIC.OI, NBSlD.02

157 KEYC 0 KESTAFT:1SKY,2G/T,3EIRP,4LNK,5NEW TAPE ,OMASTER RESTART

158 KEYc 1 STAR: RESIART i? N

i5y KEYC 2 EIRP:START e SET ? 160 KEYc 3 REFIT 5 CUTS: USED AFTER ONE OF THE CUTS IS RETAKED

161 KEYc 4 SIAR FlX:routine to estab ANT BIAS

lu / KL Yc c3 CuANCjL BlAb:hK ANG, ULLL, A^ , ELEV

163 nEYc 6 ChAiJGL: input ATTN (db), FILTER # 164 KEYc 7 CHANGE: TA = ADDED NOISE,

K

16 5 KEYc 8 CiiANGE: T{syst)/Ta

166 KEYC 9 CHANGE STD attn(C2) :0=OUT when noise add ON, 1=IN

16 7 KEYc 10 STORE CUTS TAKEN

16 8 KEYc 1

1

STORE INT: MAT N,S,T and PRGM

169 KEYc 12 STORE:^AT M ( suinir.ary data ) , N ( prgn; consts) on ext CAS/DISK

170 KEYc 13 LIST G/T SUMMARY

171 KEYc 14 LIST CURRENT DATA MAT D 172 KEYC 15 CHANGE FREQ & calc new STAR FLUX

173 KEYc 16 CHANGE # PTS IN PARABOLIC FIT ROUTINE

174 KEYc 1 7 CHANGE: G/TA (aB)

175 KEYc 18 CHANGE NOISE ADD SOURCES {C3 ) : 0 = # 1&# 2 , l = it 1 , 2 = # 2 , 3=PWR (mW)

17o t.L\C 19 LAST KLASUREi-iEi^il : initiates storage steps

177 KEYd U RESIART :0REWORK, ILOAD , 2AUT'C' SEQ , 3UEL , 4G/T , 5F IT , 6PLT , 7ERR

176 KEYd 1 RESTART & N=?

179 KEYd 2 calc:STAR FLUX VALUES , Ta, eff area

l&O KEYd 3 EuTEK TEMP, A (3) ,'AND DEV^ PT ,A(4) USED IN REWORK

161 KEYd 4 prt: G/T DATA SUMMARY with page heading

182 KEYd 5 SORl ,FIT and LIST DATA

183 KEYd 6 prt: G/T DATA SUMMARY (no heading)

184 KEYd 7 STORE MAT M & MAT N 185 KEYe 0 RESTART:0=KEY LIS'I,1=AUT0 CK,2 = N0 AUTO(F2=0)

186 KEYe 1 CHECK LIST

187 KEYe 2 CHECK DVM

188 KEYe 3 CHECK CHANNEL VOLTAGES

189 KEYe 4 CHECK PRGM ATTENUATORS

190 KEYe 5 CHEK PWR,TYPE1V & ATTN STABILITY

191 KEYe 6 CHECK NOISE ADD STABILITY

192 KEYe 9 cues: NEW FREQ, BK, INPUT ATTN,SIKi STAR NOISE

193 read CLOCK ENTER( 3 ,*)C,D:C=«1 THUMB SW,D=SK «2 #3 #4 HHMM.SS

194 read DVM ENTER(2,*)A,B: A=FUNCTION, B=VOLTAGE

195 read KBYTE 4=INTEGER SUM OF BINARY SWITCHES

196 read Sis Y BIANb(R0T(K£YTE4 ,Y) 1) =1 IF SWITCH Y IS UP

130
7.4 VARIABLES LIST ALPHABETICAL BY MEANING

NbS2.00 <NBS 9915, 0007> T6 & D5-F10

REVISION « 9 -1-

VAPIABLES LIST # 9 for NBS1X.02, NBSlA.Ol, NBS1E.02, NBSIC.OI, NBS1D.02

1 V -ALFKA, GAUSSIAN COEFF

2 D3 ADDEL NOISE ERROR,

%

3 H9 ADDED NOISE,

K

4 32 ,83 ANTENNA APERTURE EFFICENCY, ANT RADIATION EFFICIENCY

5 D AN1ENNA DIAKETER (FT)

6 B9 ANTENNA EFFECTIVE AREA

7 G ANTENNA GAIN,REL

S D5 ANTENNA POINTING ERROR (deg)

9 K5 ANTENNA POINTING IfACTOR

10 K6 ANTENNA POLARIZATION FACTOR

11 B4 ATMOSPHERIC BRIGHTNESS TEMPERATURE, K 12 Kl ATKOSPHERIC AESORPUGN TRANSMISSION COEFF

13 A3 ATTENUATION OF STD ATTN (abS>l , NOT dB), RELATED TO N(13,10)

14 EC ATTENUATION (cB) OF PROGRAM ATTENUATOR, TEKPORARY VALUE

15 Ml. . .M4 ATTN Ot PGh 1,2,4,6 @ 30 MH2,PGK USES N(13,1...4)

16 K6 . . .b'.B ATTN OF PGM 1,2,4,8 @ 70 KHZ, pgm uses N(13,6...9)

17 F9 ATli, VALUE Of LAST PROG ATTEN IN FNW

18 E2 ATTNUATIOn { db) OF PROGRAM ATTENUATOR

19 E6 ATTUNATICN (dB) , MANUAL ATTENUATOR

20 A AZIUMTH(deg) OR DUMMY

21 X5 AZUMUTH BIAS (deg)

2 2 oANDVriDTH(MHz)

23 K3 LANCV:iDTHS EFFECTS FACICR

24 J BRDG PV:R when NOISE ADD sources ON

25 Z5 C/kT MEAS:T(ONT) /Ta FOR UPPER FREQ

26 bl CODE FOR SATELLITE CARRIER MEAS : 0 =SKY , 1=- F , 2=RCR & F,3=+F,4=

27 Z COLD SKY POV.ER / TA

rn "1 TZ CURRENT MEASUREMENT TIME

25 G{I,J) CURVE FIT MATRIX

30 n2 CUT NUMBER

31 CI C"2/(8*PI*K*F*2)

32 L ( T6 , 1

)

DATA MATRIX: SEE MATRIX LIST

33 C DATE, DECIMAL

34 N LATE, DECIMAL FOR MOON DATA

35 E DAYS SINCE 1900.00

36 Bl DECL OFFSET (deg)

37 B6 DEK POINT(F)

38 K4 DIFFERENTIAL SKY TEMPERATURE FACTOR

39 D8 DI tE US IVE ATTENUATION ERP ,

%

40 K8 DIfFUSlVE ATTENUATION FACTOR

41 V8 DISK OR TAPE # 42 A$,B$ DUMMY

131
NiJS2.00 <t>iBS 9915, 0007> T6 & D5-F10

REVISION # 9

- 2-

VAKIAELES LIST t 9 tor NBS1X.02, NbSlA.Ol, NBS1E.02, NBSIC.OI, NBSlD.02

43 W,QO,iJl DUMMY

44 iw2,Q3 DUMMY

45 B (I DUMMY MATRIX

46 I (I ) DUMi^lY MATRIX

47 V8 DV , RF ON

4b V7 DV,#1 KF OFf

49 V9 DV,#2 RF OFF

50 L4 EFFECTIVE OXYG EW LENGTH. Km

51 E EIRP*G/Ta

52 £1 EIRP:PWR no noise add (mV*) 5 3 E3 r I RP • PWR+noi se add #1 fmW^

54 L4 LIRP :PV;R+noise add it 2 (mW)

55 E5 ElKP :PKR+noise eca #1 f. #2 (inW)

b G

57 LI ELEVATION FOR FITTING G/T OR G

5o X6 ELEVATION BIAS (aeg)

60 LO ELEVATION —uO REFRACTION CORRECTION

D 1 ERROR ennancen.ent factor for KEF,NUF compared to G/T

0 ^ t 4

[.Tri-' 4^ r^p ft"7 — 1 c^' A 1 Kir^ m / yi n l \ t'lLit. ft Ur U / — i. , aiAKIlNb M(4U,J.J

6 3 F4 Fir.F LOAD t 64 Al FILTER # 65 C9 FILTER BAiiLPASS (MHZ)

66 C8 FILTER f REQ (MHz)

67 01, 02 ,03 FILTERU ( 2. 5MKZ @ 30MHz) CONSTS : N ( 1 5 , 1 ) , N ( 1 5 , 2 ) , N ( 15 , 3 ) 68 06 , 07 ,08 FILTLR#2 (iMllz @ 70MHz) COUSTS : N (1 5 , 6 ) , N ( 1 5 , 7 ) , N ( 15 , 8 )

69 PI , P2 ,P3 tILTEP«3 (2.5MHz @ 70MHz) CONST S : N ( 1 6 , 1) , N ( 16 , 2 ) , N ( 16 , 3

)

70 P6, F7 ,PB F1LTER#4 (5.3KHZ 70MHz) CONSTS : N ( 1 6 , 6 ) , N ( 16 , 7 ) , N ( 16 , 8 ) 71 HI FIT TO G/T or NEF data ( 3* IS/SQR ( #PTS) )

, dB

72 F5 FLAG IN D:1=PRGM REWORK

73 FB FLAG IN D:1=N0 FIT CUTS

74 LO FLAG IN D: 0=GRAPH , 1=ERR PRT OUT-no VARIABLES , 2=w ith variai

75 F4 FLAG IN E : 1 = SIMULATED NOISE ADD,2=EARHT TERMINAL

76 F5 FLAG IN E:1=N0ISE ADD #1 WORKS

77 F6 FLAG IN E:0=PRGM ATTN,1=STD ATTN

78 F6 FLAG IN E:1=N01SE ADD #2 WORKS

79 t6 FLAG 'IAEK:1 = NEW S 1 TE , 2 =H EAS , 3=REW0RK , 0 =MAnL VIA KEYBOARD

80 F6 FLAG-AUTO SEiJUENCE:l=YES

132
i!Jt)S2.G0 <NBS 9S15, 0007> To & D5-F10

REVISION # 9 -3-

VARIABLCS LIST # 9 for N5S1X.C2, HBSIA.OI, uBSlE.CZ, NBSlCOl, NBS1D.02

81 Fl f LAG-GRAPU:0=N0,1=DATA,2=&FIT, 3=FIT,4=EXIT

82 C3 fLAG-NOISE ADD: 0=# 1&# 2 , 1=# 1 , 2=#

2

0 ^ t D 84 E2 FLAG-PKT:G=ALL,1=PRGG DATA,2=INPUI ASSUMES , 3=G/T EER,4=AHT ELEV

65 F7 FLAG-PWR LEVEL: 0=CONST, 1=STEPPED (in E)

O D r J FLAG-SCRT & FIT : 1=G/T-ELLV , 2=G/I-CSC , 3=D I P-ELE v ,4=CIF-TIKE

87 f 5 FLAG: 0,1= volt table in LINEARITY ck, 2 , 5= stability GRAPH (in

06 F7 FLAG: 0=CASSETTE BEI'iG LSED,1=DISK

0 3 r J tLAG: C =f-A.rUAL READ TEXP , HUMIDITY , 1=AUTC TE.V? ,CEV, FT

90 F2 FLAG: 0 = NGRf--AL,l = DIFF PLOT DATA, 2=D IFF PLOT OF 5 CUTS

91 Fl FLAG: 0=STAR,1=SATELLITE

r J- FLAG: 1=SUBR0UTINE LCADED

93 t 2 FLAG:0=CSC fit, l=LI:iEAR fit

94 f 2 FLAG:C = NO AUT-Q CUECK,1=YE3 (in E)

1

1

r X FLAG:0=PF.T FKR & VOLTS, 2=GF-APB PKR FATIC (in E)

96 r 6 tLAG :G=RESTART,1=SKY,2=G/T, 3=EIRP ,4=LINK

97 f 3 ELAG:0=XTAL,1=TYPE IV bridge (in E)

i—

ELAT-ScB ATTri Ii-. NCTSE ADD ?WR v EAS : 0 =N0 ,1=YES

9S t£ i-LG in E: (KEY 5) 0 = GRAPU, 1=LIST , (KEY 6) G^SIKL fiOISE ADD,1=EARTH

IGG FLG:(LGC SITE DATA) . (f 6=TASK) ( F4=PRk CKAUGE? ) { F7=DISK

)

X X r U FREC ERR,%

102 f" tREg OE MLASLRmENT(GHz)

103 E 3 FRLQ(GhZ) SELECTED FOR REWORK, 0=REWORK ALL FREC

FREt ,DiAK,G/T HEADING

J. u ^ r 7 G via MPbV.' - G via G/Ta, cB

106 C{1,J) G(I,J) INVERSE OR DUMMY

107 Tl G/T OR G/TA VAiUE

108 E5 G/T ERR-A;,TEM.A POINTING

109 L6 G/T ERR-AiNT POLARIZATION

110 El G/T ERF-ATMOSPHERIC ABSORPTION

111 L8 G/T ERR-ATK-GSPHERIC DIFFUSION

112 £9 G/T ERR-ATfX)SPHERlC REFFvACION

113 E3 G/T ERR-BANDV*IDTK

114 E4 G/T ERR-DIFFERENTIAL SKY TEMP

115 S G/T ERR-fLUX

116 EO G/T CRR-FREC

117 E 2 G/T LF.R-STAR SHAPE

116 E7 G/T ERR-SYSTEh RLSPONCE

133
i>iBS2.00 <Ni3S 9915, 0007> T6 (. D5-H0

REVISION « 9 -4-

VARIABLES LIST # 9 for NbSlX.02, l^lbSlA.01, NBS1E.02, WbSlC.Ol, NBSlD.02

119 Yl G/T EKF-Y factor (C8*Y5)

X ^ u K C/T Rri.ATTVF

121 B7,B8 G/Ta(GD) ZENITH CGEFF,CSC COEFF

122 X2 GAy,MA , PARABOLIC FIT

123 A2 GAUSS CLlRVE FIT ERROR.* dT

124 C6 GHA TO ARIES 0 GKT (hrs)

125 L9 GHA TO ARIES (deg)

X ^ D F

127 K HOUR AKGLE OFFSET (deg)

128 I HPBVv

X ^ 7 hPhW FIT RY f,Ali^STAN TilRVF TO IJRTFT ("I1K\;F

130 D2 HPBVv UNCERTAINTY, % 131 B HPo.VsKmin of arc), AS t-;EASURED-NO KANDA CORRECTION

± ^ A. C \J

133 ^3 HPBvv,AWTEiMNA ALO.MC(i.e. v/ith KANDA CORRECTION)

134 N(1,J) INPUT LATA CONST, SEE t'.ATRIX LIST

A. J D T ^ ijfi 1 \ X \ f

\J ) XLNirUX k>lr\l\ L>rij.H. oLiU PirilJvXA uXDi.

136 H5 INSTR PV.R RESPONCE tACTOR

137 C9 INSTRUMENTAL POWER RESPONCE ERR,%

A 4

139 K K1*K2*. . .*K9

14C Jl K3 for POINT SOURCE

141 N4 LARGEST N3

142 I LOOP VARIABLE

143 Jl LOOP VARIABLE

144 Ml LOOP VARIABLE

145 XI LOOP VARIABLE

146 H$ N.AIN PROGRAM HEADING

147 Yd) MATRIX USED In CURVE HT OR DUMI-iY

146 J MAXIMUM FLUX IN F.U.

149 E6 l-.CASUREMENT # OF FIT GAUSSIAN CURVE TO DRIFT CURVE

150 M3 MEASUREMENT # ^ MAXIMUM AMPLITUDE

151 N MEASUREMENT NUMBER

152 E2,L3 MONTH , DAY

153 T6 iM-6*{N7-l)

154 V7 n3 of STAR MAX

155 Nl NO. OF STAR SOURCRt.

15o PS NUMBER OF POINTS FIT TO PARABOLA

134
IXUS2.00 <NBS 991 5, 0007> T6 & D5-F10

REVISION « -5-

VAKIABLES LIST # 9 tor NBS1X.02, iMcSlA.Ol, hBSlb.02, NBSIC.OI, HBS1D.02

lb? tiS> NUt';bLR POIr^TS Iim f IT

15b G4 OXYGLh ABSORPTlUi'J (dB/Km)

t b irvUivi) e +r; in l/ki ireas

Id U f 5 P{0;iiT) (? -F: in C/kT neas

ioi Lo P (UiNiT) ,n-il'.= (£ 5+J&) /2: in C/kT MEAS

16 2 f 2 P/Pa for LOmLR F RLU' OwT: in C/kT meas

Id 3 to PAGE i^uMtER

164 V 5 PARABOLIC FIT PARAKETER h

16 5 1

5

P LOT UNIT

io 0 P FUr.LK KLAbUkLb , i U Al lb 167 U PO'WER NOR>'ALIZATION

10 c rUVvLK IVlin WUibL AUU UN

10 9 b J fKLL'lLlLl/ r. Lftb Ul.LKLrJ i n t UK MAXir.Ufv biAK rWK

17 u PROJECT HEADING

1 / ± 3 P.,K f-jEAbUl.EKLiV 1 s l^'.iinllN A (_U1 1 / Z ririK(r-V. ; UiM bai blbNAL

173 A8 RATIO #1 aaa/t2 aao uses n(18,5 or 10)

1/4 RU RAilO ^i£cio/#zaaa y /u MHz, pgin uses i.'<(io,iU) 1 / r f FvDCLIvtR tRLvlGriZ)

1 / 1, i-i ELCLI VLR GAII. S LOP E/r.H Z

177 Ks REFACTIvE Al TENOATI ON FACTOR

178 Lb R£FI-:ACTIOlv const #1

179 L& REERACTIOn CCwST If 2

IbO L9 REFRACTIVE ATTENUATION ERROR,

%

ICl L$ REMARKS

1B2 R REK/vRKS: SEE REKJiRK LIST

183 R2 RESIDUALS FROM CLFVE FIT

184 AO REWORK * 185 n6 RUN *

186 T2 RUN/SET

187 J SELECT FUNTION :19=G/T, 2 0 = G/TA, 21=HPBVJtl, 22 = 12,2 4 188 'Lb SERROR VARIABLE

189 N7 SET # 190 A ( N7

)

SET DATA: SEE KATRIX LIST

191 K SIMULATED STAR NOISE (dB)

192 CO SITE ELEV (Km)

193 C4 ,C5 SITE: W.LOnG (deg), N. LAT { deg)

194 DO SKY BACKGROUND ERR, 0.9/F"2

135
iNbS2.00 <NBS 9915, 0007> T6 & D5-F10

rCVlSION # 9

-6-

VARIABLES LIST # 9 for NBS1X.02, N3S1A.01, NBSlB.02, NBGIC.OI, NBS1D.02

X I? J n

196 Fl SFACE LOSS: in C/kT K.EAS

197 E7 STANI RAl'^GE,10'6 Km

X J o K'T A R DATA- SFF MATRIX

199 S$ SiAR NAKE

2u0 NO S1AR uu::ber, current

2u 1 ijl ^'[•AR 9,-iAPF FRR % 202 K2 star SliAPE FACTOR . 203 Jrl STAR SHAPE ERROR,

%

204 F' 9 ^Ti'jRr SFT t i)F NUMMARY OP RTWORK

20 5 x$ SUBROUTINE HEADING

206 Ml SuK ON P

V *i C 1 1 r t,\i U * Y 9 oUr'- UlN r^ A 20b Vb SuK ON P*X

2u9 V6 SU^. ON P"2

CjUM UN A 211 V2 SUM ON X'"2

212 V3 SUM OW X*3

V i bUl-. UW A 4 Ilk i'.3 Sur: Ou Y

215 M (N7 ,J) SOi-iMARY DATA: SEE MATRIX LIST

216 NB SUNKARY DATA # = N"(50,l) = N7+F4

217 A4,A5,A6 SYST CONST S:PRGH USES N(1,4),N(1,

218 K7 SYSTEM RESPONCE FACTOR

^19 F9 T(sky)/Ta: in C/kT rr.eas 220 T T ( syst)

221 B6 T/TA CSC COEFF

222 b5 T/TA ZENITH

223 B5 lEMPERATURE (F)

224 L3 TIME DELAY TO SET ANTENNA (SEC)

225 Tl TIME OF 1st MEASUREMENT

226 El TIME OF STAR PEAK (hrs)

227 X TIME VARIABLE, 2*I/N4-1

228 XI TIME VARIABLE, 2*{N3-M3)/N4

229 S TIME(hrs) , CURRENT

2 30 E8 TIME ( hrs) / (ARC ceg)

231 E5 TIME/MEASUREMENT (hrs)

232 E4 TRANSMITTER POWER, WATTS

136
i,HS2.00 <NBS 9915, 00C7> T6 £. D5-F10

REVISION * 9 -7-

VARIABLES LIST S 9 for N5S1X.02, NBSIA.OI, lMcSlB.02, NBSIC.OI, NBSlD.02

Z J O V 0 i S t c; r / i c— LAr(A~t(ZJ''lrii /)

234 I 0 VALUE OF C2 IN FhV

z J :? \ T A ^

z J o 237 V VOLTAGE ACROSS Pi\R BRIDGE

Z ^ 0 po I?R

^ J 37 G6 I r'r^ /K

24U L7 WATER DENSITY (gm/i:."3)

241 L5 WATER PATH LENGTH CONST SI

242 L6 WATER PATH LENGTH C0NSTS2, Km

243 XI Xi = G/dT{star)

244 Y Y-FACTOR

^45 C8 Y-FACTCR ERR,%

^4 G Y5 Y/{Y-1)

247 LI YEAR

248 L5 YEARS (JULIAN) SINCE 1900 /4

24 9 L6 YEARS SINCE 1977

250 2-1 ZENITH ATK ATTiM , dB

251 Kl ILRO FOR GRAPH

cP(ada) in C/kT r>eas: ? -F , ^ +F

.53 ^9 gt(star)/ta predicted

254 V7 dT(star)/TA

137
' 7.5 MATRIX LIST ALPHABETICAL BY MEANING

iMbS2.UC <NBS 9915, 0007> T6 & D5-fl0

REVISION t 9 -1-

MATRIX LIST # 9 for NBS1X.02, NBSIA.OI, NBS1&.02, NBSIC.OI, NBSlD.02

1 D(T6, 3) * # OF MEAS(N4)

2 T(N0,14)S AGE OF KOON (days)

3 A( 3) AMBIENT TE.1P{F) * 10

4 J(13, 6) ATTN OF IdB prgrf @ 70 : # 3 = 0 . 9 76 , # 4 =0 . 94 7 , # 5=0 . 9 38 , # 6 =0 . 973

5 N(13, 7) ATTI^ CF 2dB PPGM 070 : ? 3 = 1 . 8 90 , # 4 = 1 , 9 5 , # 5= 1 . 8 54 , # 6 = 1 . 9 57

6 N(13, 1) ATTN of Idb prgm @ 30KHz : # 3=0. 961

7 u(13, 2) ATTN cf 2db prgir. ^ 30KKz : # 3=1 . 881

8 Im{13, 3) ATTN cf 4dB prgii g 30NH2 : # 3= 3 . 947

9 N(13, 8) ATlix; of 4dB prgm ^ 70 : # 3 = 3 . 9CS ,fe 4 = 3. 87 , t 5=3 . 957 , # 6=3 . 924

10 N(13, 4) ATTN Of 8dB prgir 30F:Hz : s 3= 7 . 881

11 N(13, 9) ATTiM cf 8uB FRGi-i 1? 7 0 : # 3 = 7 . 8 9 6 , # 4 = 7 . 86 , # 5=7 . 84 5 , # 6 =7 . 94 9 12 N(13, 5) ATTN of STD RES 30MH z : # 3 = 5 . 92 2 , # 6= 4 . 7 79

13 1^(13,10) ATTN cf STD @ 7 0 : # 3= 5 . 9 66 , # 4 =5 . 92 , # 5=6 . 1 1 , it 6 =6 .

1

14 L'j( 1, 7) ATTw+.T.eter (dB/10) 5 . 3 ^;70 : # 3 = 16 . 1 5 , * 4 =1 7 . 3 , # 5=1 5 . 27 , # 6=-l 7 . 5 5 15 b(6,N3+2)x ATTN, TOTAL: E2+E6

16 L( 1, l)x AZIMUTH: {Ai-(oeg) -180)*100

17 i:(T6, 1)* AZIKuTH: (AZ(ceg) -180)*100

18 M(N8, 5)x C/kT(oB)

19 A( 6) CLOUD COVER * 100 + VilND(inph)

20 K(n8, 1)x CODE + .07

21 A( 7)x CODE(El) :0=SKY, 1 = -F, 2=RCR & F, 3 = + F , 4=0THER

22 N(24, 1) D-DECL(deg) INTERCEPT

23 N{24, 2) D-DECL{oeg) ZENITH

24 N(24, 3) D-DECL(Qeg) IN1EPCEPT IS ERR

25 N(24, 4) D-DECL(deg) ZENITH IS ERR

26 h(24, 5) D-DECL(Geg) LLEV COLFF

27 N(24, 6) D-DECL(deg) CSC COEFF

28 N(24, 7) D-DECL(Qeq) ELEV COEFF ERR

29 N(24, 8) D-CECL(ceg) CSC COEFF ERR

30 N( 1, 5) DAC REF vol t : « 3=6 . 3 13 , # 4 =6 . 36 7 , # 5=6 . 28 4 , # 6 =6 . 24

31 N( 1, 6) DAC ir.ult = -(chr.l#9-#8)/#7:«3=0,3173,fi4=0.32,#5 = 0.3167,#6=0.32

32 T(14,10) DAYS(SOLAR EPIC) SINCE 1977=SDAYS SINCE 1900 - 28125

33 T(14, 9) DAYS(STAR EPIC) SINCE 1977=#UAYS SINCE 1900 - 28125

34 D{T6, 5)* DECL OFFSET FROM PREDIC1ED STAR CENTER: (Bl+Ll)deg *1000

35 A{ 4) DEW PT(F) *10

36 1(N0, 9)* DISK SIZE (ARC MIN) * ICQ

37 K(n8, 7)x EIRP(gBw)+G/TA (dB) = E 38 M(N8, 1) ELEV(Geg) + STARf/lGO

39 L( 1, 2)x ELEV(deg) *100

40 D(T6, 2)* ELEVATION (deg) *100

41 N(15, 1) FILT*1 (2. 51330 ) NOI SE BW : # 3 = 3 . 91 5 , # 4 = 3 . 8 87 , # 5=3 . 64 3 , # 6 =3 . 5 52

42 N(15, 2) FlLTtl(2.5@30)Nl,MHz:n=0. 00938, #4 = 0. 01526 , #5 = 0. 0178

138
i\l;S2.00 <NBS 9915, 0007> T6 & D5-F10

REVISION « 9 -2-

KATKIX LIST t 9 for uBSlX.02, NBSIA.OI, NBS1B.02, NBSlC.Ol, NBSlD.02

43 w 1 5

,

4 ) fILT#l(2.5f30) LOSS ,6L:#3 = 3.092,<r4 = 2.711,#5=2.391,#6 = 2. 560

44 u 15, 6) t ILT# 2 ( 107 0) NOISE BW : #3=1.193 ,#4 = 1 . 225,* 5=1. 23 , #6 = 1. 250

45 N 15, 7) FILT#2 (1(^70) Nl , MHz: # 3=-0 .1043 ,# 4 = 0. 0817,# 5=0 .1271

4 6 N 15

,

9

)

FILT#2(lg70) LOSS ,cE:#3=4.970,#4=4.910,#5=4.870,#6=5. 634

47 i\ 16 , 1) F1LT#3 (2.5 U70) NOISE LW : # 3= 2 . 8 08 , # 4 =2 . 91 0 , # 5= 2 . 9 3 7 , #

6

=2. 875

4b N 16, 2) FILT#3 ( 2. 5e70)Nl,MHz: #3=-0 . 102 ,#4=0. 0108,# 5=-0.130

49 N 16 , 4 ) FILT#3(2.5(?70) LOSS ,dB:#4=5.78,#5=5.84 ,#6 = 5.814

50 16 , 6) FILT#4 ( 5. 3ti7 0) NOl SE DW : # 3= 5 . 73 4 , # 4 = 5 . 80 , # 5= 5 . 8 56 , # 6 = 5.G71

51 Iv 16 , 7) FILT#4( 5.3l?70)M,HH2:#3 = -0.14 ,# 4=-0 . 0732,#5=0.011

52 N 17

,

6

)

FILl" #6(0. 06^70 MHz)NOISE BK,I-;Hz:#G=0.083

53 ii 17 , 7 ) i-lLT#6 (0 .06&70hHz) N 1 , J-.H z : # 6 =0 .0 0178

54 i'« 17 , 9) FILT#6(0.06@7CMiiz) luSER LOSS , dB : #6=4 . 719

55 L. 3

,

2) X FILTER BANLiWIlh ,NHz (VV)*10

5C 115, 3) FILTERS 1 (2. 5KKZ fei 30KHz):2nd CONST

57 I. 15, 8) FILTER#2 (IKHz t? 70MHz):2nQ CONST

58 I'. [ 16 , 3) F ILTER#3 ( 2. 5MH z i3 7 0WHz):2nd CONST

59 1^ 16 , 8) FILTER#4 ( 5. 3MHz @ 70NHz):2nd CONST

60 L T6, 7) * fIT KEAS # AT PEAK * 100

61 L/ 2 , i)x FLAG C2: 0=NO S'i D ATTN WHEN i^uISE ADD ON, 1 = STD ATTl>i V-JHEN

6 2 1 no

,

21

)

FLAG: 0=STAR DATA, l=SOLAn DATA

63 NO, 4 ) fLUX AT IHE V.ORKING tREQ (F.U.)

64 T WO , 15) * FLUX EPOCH, YEAR* 10

65 T (NO , 6) * FLUX ERR It? STD FREQ (%) * 10

66 ± (NO , 10) * ELUX ERR 0 F(%) * 10

67 y (N8 , 6) EREQ (GHZ)

68 A ( 2) FRLQ(MHz)

69 ( N6 , 2) * G/T(dB)

70 IN (19 , 6) G/T ( cB) CSC COEFF

71 N (19 , 8) G/T( dB) CSC COEFF ERR

72 N (19, 5) G/T(oB) ELEV COEFF

73 N (19, 7) G/T(cB) ELEV COEFF ERR

74 N (19 , 1) G/T(dB) INTERCEPT

75 (19 , 3) G/T(aB) INTERCEPT IS ERR

76 (19 , 2) G/T(gB) ZENITH

77 N (19 , 4 ) G/T(cB) 2.EN1TH IS ERR

78 N (20 , 4 ) G/TA ZENITH IS ERR

79 M (N8 , 3)* G/TA(dB)

80 N (20 , 6) G/TA(aB) CSC COEFF

139
1MBS2.00 <NBS 9915 , 0007> T6 & D5-F10

REVISION # 9 -3-

MATRIX LIST # 9 tor NBS1X.02, ivIBSlA.Ol, NBS1B.G2, KbSlC.Ol, NbSlD,02

k

"1 O X It ^ u , 82 N 20 , 5) G/TA(dB) LLEV COEFF

8 3 IM 2U , 7 ) G/TA(dB) ELEV CGLFF ERR

ft 4 IN ^ u ,

1 \ X , lj/J.A(GL>J il\ILhU Lir i b5 N 20 , 3) G/TA(cE) INTERCEPT IS ERR

66 l-j 20 , 2) G/TA(6B) ZENITH

ft 7 T , D f X 88 T M , 22) s GKA/HR (deg) * 10 00

8 9 T UQ , 11 s GHA/hr * 10 00

y U

T' i l\\ \ s 91 ( [\& , 4 1 * hPBWiil (deg)

92 N 21 , 8) liPBK#l CSC COEFF ERR

N 1 f HPBrt # i Z ENI TH

94 i<l (21

,

1 HPDKfKceg) INTERCEPT

95 N 21 , 3 HPBW#l(deg) INTERCEPT IS ERR

N 4 HPd.. i { CG g) ZLNllH IS ERR

97 N 21 , 5) ilPBK#l(aeg) ELEV COEFF

98 IM (21 , 6) hPBV»Sl(Geg) CSC COLFF

G (J

<1 1 , 7 HPtv>fi(Geg) ELLV CijEFF ERR

luG A IC) * iii-bui 1* 10 "4

ICl ^. ,X'0 , 5) * iiPbV,S2 (oeg)

102 N 22, 2 KPBU'S2 ZEiMlTH

103 N 22, 1 l.Pi.k%#2( deg) INTERCEPT

104 N 22, 3) nPBV, #2(Qeg) INTERCEPT IS ERR

105 Im 22 , 4 ) liPbV.?2 ( ceg) ZENITH ERR

106 22, 5) hPBV.i2(Geg) ELLV COEFF

107 N 22, 6) HPBV:i;2(ceg) CSC COEFF

108 £4 (22, 7) liPbhi) 2 ( dec) ELLV COEFF ERR

109 N 22, 8) HPbv-;!* 2 ( ccg) CSC COEFF ERR

110 D 5 ,iN 3+:I) X LGT(PKR i\ETEP VOLTAGE) *10 " 4 111 D T6 , 6) r V. LGT(oT/Tadd) *10'4

112 T NO , 11) * LINEAR POLZ(%) * 10

113 T NO , 12) * LINEAR POLZ ERI<{%) * 10

114 D T6 , 6) * LOG { ( (TEtar+lsy£:terr.)/Tadd)/U) *10"4

115 D T6 , N 3+7) LOG(P/U) *10'4: P=PKE MEAS niK , U = PWR REF

116 N 16 , 9 ) LOSS , Ob 1*4= 4. 18, #5= 3. 14, #6= 4. 08

3

117 U 2 , 2 ) X MANUAL AlTw SL'lTING,oB (E6)

lie T( NO , 20) * MAX FREC^ (GHZ)*100 WHERE tLUX CALC VALID

140
ui:S2.00 <N5S 9915, 00u7> T6 £ D5-F10

REVISION t 9 -4-

MATKIX LIST tf 9 for KbSlX.02, NBSIA.OI, Nt:GlB.02, NGSlC.Ol, NESlD.02

lis 'i 1 1.0 , 19) * KIN FREt (GhZ)*100 UHLRL FLbX CALC VALID

120 'I( t;0 , 12) s li. bEC./hr * 1000

1 ^ X 1 NKi nU f J ) c> 122 i\ \ n8 , 8) * nEF ( kFU)

123 l\ 1 25, 6) i-iEF { kfu ) C£C ccef f

isLr^Kru; v-cjtii err

125 H 25, 5) i>iLr (kfu) elev coef f 126 25, 7) NEt(kFLi) elev coeff err

0 Q -L ) i\Er{kt'U) intercept

128 25, 3) iMLt(kFU) intercept IS ERR

129 IM 25, 2) iMEF(kFU) zenith

130 it 2 5

,

4 ) i^Ei(kiU) zenith IS ERR

131 9) X ImCI USEb

132 9) * iMbl: (kFU)

13 3 li 26 , 6) uui'(kFU) CSC coeff

134 26 , 8) wuf(kFU) c£c cceff err

135 IN 26, 5) ivbF(kFU) elev cceff

136 26, 7) i4ijr{kFb) elev coett err

137 26 , 1) Nbt(kfb) intercept

13o 26 , 3) ivuf(ktL) intercept IS err

13!? 26 , 2) i,bF(kFb) zenith

26, 4 ) iibr(Ktb) zenitn lo err 141 b 3 , l)x imLKEER OF MEAS (N4 ) 142 i-] •.O , 1) :viU!'iL>LR OF sbK;-;Ary sets stored lu matrix

143 (40, 3) NUr XER OF bILES USED Ii^l LISF STOPJ^GE

144 vi'a , 6 ) C i.bI-,bER Of t-OlNTS lu blP CURVE

14 5 Li 1

,

9) i.U:-;dER OF POIi,TS IH FIT

146 ^ N& , 8 ) X Oi>;T/l£Co: (F2 + Z5)/2

147 b 4 , l)x ir/Pc!Gc(£ve cf set) :LGT(P/Peod) 1C''4

14B 1' (hO , 13) * ir^uLZ At.G (aeg) * 10

149 I- I.O , 14 ) * PCLZ ANG ERR (deq) * 10

15U t. (I ,J ) PROG COi,SXS I<26:1, 1 = A , 2 =B , e tc ; J , 1 = 1,.

151 A ( 7) * PKR LEVEL, i?icrcwatt£

152 A ( 8) PWR RATIO CtiECK :r.icrcfcells/10

153 L. (1 ,N3+2)

X

PV.R V.ITh noi£G aca OF F (? EOLO: LCT{Pl\B)*

154 L ( 6, l)x PUR out tc NOISE ACb,r:.V. :LGT(PV.RS 2-PV,R*l)

155 ^ (W8 , 4 ) X PWR due tc T£. (n.V^) 156 ( 5, l)x PV.Rjf l,n,U ( eve, roii c iidd OFF) : LOT ( H\ j; ) *10 *

141
NBS2.00 <NBS 9915, 0007> T6 & D5-F10

fevision I y -5-

h/ViRIX LIST # 9 for lMclilX.02, NnSlA.Ol, NiiSlu.u2, NtsSlC.Ol, 1mBS1D.02

157 M ( i\.B , 3 ) X Pk-.RdrV.) 1 Do r> / Lf \

159 M( we , 2 ) X 160 D{ 3 ,n3+2) X PVvR/P£Co:LGT( P/Pado) * 10 "4

XO1 A 1X

fv fc: Q \ V IMO , y } X

162 u ( 1, 8) i'A'ilO #1 aod/U aoQ e t'.lCnOVvAVL kRlQ

163 18, 5) RAIIC jfl ado/* 2 add 30^ Hz

N 1 o / 1 U ; ivA i 1 u ffiacc/r^aco 19 / u : w 'i — u . di d , s d-u . dzd , s d — u . Z'Ido

16 5 A( 5) 1;ELA11VE HuMlblTY(%) *10

16 6 1,10) REWORK * io / i )

16 8 M u8 , 10) KU:s/£LT: in6 + .m7/100

16 y T ,16) * iLCULAR DECAY ct 1 1 ux (%/Yr)*10U

1 /U T NC , 1 7

)

bLCULAR lECAY of flux EPF (%/Yr)*100

171 A 10) X SLAUT DlSKKir): LGT(E7)*100C

172 1 KU, 5)* SPEC luDEX SECULAR EXPN UNCE r.TA 1 wTY ( %/Y r ) * 10 00

1/0 r.1 iirLLlivAL. LliLiLfi oLLUliAh L A rAi.>lc> i v^iM I t / I t ) i U U U

174 1 ivU, 6)* SPECTRAL INDEX * 1000

175 T uC, 7)* oPLCiFAL INDEX ERR * 1000

11 Kj i.MO , 1)0. SimR 5/100

17 7 X 1 1 c U , i ) oiAK CTiAD ETTiiV /t I' \ f^ CPAvIPlAOT tDL''»"l rJjUA (r.U.; e dIAlNUAKu rKLv

178 T [i^O, 1) STAR/SOLAR NAME

179 S (NO, 3) STAR=N. ULC. (deg) ; SOLAR=N . DEC. @ 0 GMT (deg)

180 & (NO, 2) STAR=PT ASC (deg); SOLAR=GHA ^ 0 gmt (deg)

181 T (uO , 18)bTD FREt(GlIz) * 100

182 N ( y£.io,i) STORE STRING P$

183 T [ 9, 1) STORE STRING P$

184 ( 1, 4) SYSTEM # + (DATA REVISION #/100)

185 ^, (IiS, 3)6 T/Ta CSC COEFF (B6)

186 K ( N8 , 2)6 T/Ta ZENITH (b5)

187 A ( 8) rw T/Ta* 10 '4 188 M ; w8 , 5 ) d TLHPERATURL ,F (A(3)/10)

189 D (16, 4)* TIME OF PRLLICTED STAR t'AX: El* 10 00 190 h (N8 , 4 ) d TIME, DECIMAL HRS (FNT2)

191 D (4 ,u3+2)

X

TIME, hrE(Ll) *10"3

192 D ( 4, 2)x TRX PWR:LGT(E4)*10"4

193 A ( 9)* U*10"4: REtERENCE PV.R 194 M ( w8 , 7 ) G V^ATLR DENSITY (L7)

142
«bS2.00 <NiiS S915, 00U7> To & D5-H0

REVISION

-6-

KATKIX LIST # 9 for NtSlX.02, N3S1A.01, NES13.02, NBSIC.OI, UBSlC.02

195 M(N8, 7)* Y-f actor

143
7.6 FUNCTION LIST ALPHABETICAL BY MEANING

wbS2.00 <NBS 9915, 0007> T6 & D5-tl0

RLVISICN # 10

fUl^lCTIGi^J, KEY, S. FLAG LIST # 10

tor uBSlX.U2, NbSlA.Ol, WbSlL.02, hBSICOI, NBS1D.G2

1 FimX107 + 12 volts, RF UMl: channel *4 = 110 1011

2 FwXlOS + 20 volts, Kt bMl : channel U = 110 1100

3 t NX 27 0.100000 V DVM RANGE

4 FNX 28 1.00000 V DVM RANGE

5 Fi.X 29 10.0000 V DVM RANGE

6 f 1\.X 30 100.000 V DVM RANGE

7 Fl\X 31 1000.0 0 V DVM RANGE

b FLAG 1 1=L1FR DATA INPUT

9 FNFd 8 1 r 1 1

10 FNX 30 AC VOLTS (not installed)

11 FNo(w) AuS ROUTINE SEQUENCE

12 FNN(i) ANSWER ROUTINE: DISPLAYS Q, SPACE = NO CHANGE

13 FNA(NO) ANT POI NT : NO =STAR S I N : H , LI , B 1 , El r OUT:A,L,L0 <NBS7 4 11 , 7 44 9 , 8 33 9

>

14 fNFe 0 ATTN SETTING, FILTER IDENTIFICATION HEADING

15 l:i»B(w) BEEP: Q=9 Ot BEEPS

16 tNFc 4 bLSI FIT 5 CUTS

17 read SV. Y t-I A.,l; ( ROT {RbYTE4 , Y) 1

)

18 KLYb b CALCrSTAR FLUX @ f a IF SKITCH Y IS UP

I'j KEYC 16 CLANGb # PTS IN PAr<ABOLIC FIT ROUTINE

zO KLYC 5 v,H/',NGL BIASiHR AwG, ULCL, h^, LLEV

zl KEYC 15 ChAwGE FRLi^ 5, calc new STAR FLUX

^ '^ t.L\c Id CtiANCL iMUloL ALL SOURCES ( C 3 ) : 0 = ? 1 & i! 2 , l = if 1 , 2 = S 2 , 3 = PV.R ( rr.h ) 23 KEYa 1 ChANCL PRGK COwSl & i\OOIFY CORRbSPONbING N(I,J)

24 txLYc 9 ChAuGE STD at tri (C2) : 0=OUT when noise acd On, 1=IN

25 KEYC 17 CEANGE: G/TA (dB)

26 KLYC B CHAiXiGE: T(£yst)/Ta

27 KEYC 7 CiiAi.GE: TA = ADDED NOISE,

K

28 KEYC 6 CiiANCE: input ATTN (db),

2S KEYe 3 CHECK CHANNEL VOLTAGES

30 KEYe 2 CHECK DVM

FILTER If

31 KEYe 1 CHECK LIST

' 32 KEYe b CHECK NOISE ADD STABILITY

33 KEYe 4 CHECK PRGK AT1ENUAT0RS

34 KEYe 5 CHEK Pl.R,TYPLIV & ATTN STABILITY

35 hNXlOS CKYSIAL biGbb voltage: channel #G = 110 1001

jG FnG(C!) curve FlT:0 = lNn ,-99=CALC FIT ( cu t : 1 , R 2 , 1 , V 5 , G (I , J ) , Y ( I ) )

37 FNXlOG b/A OUTPUT: channel #5 = 110 lOlO

3b trNX104 L/A REFERLNCb voltage: channel tf7 = 110 1000

3 9 f NX 3 2 DC f ILTER OUT

4U FNX 33 DC t ILTER IN 41 FNX109 DEK POINT: channel K2 = 110 1101

i2 tLAG 1 DISK STORAGE (F7) <prgii, A>

144
KaS2.00 <NES 9915 , 000 7> T6 f. D5-F10

-2-

KEVISIGN # 10

FUNCTION, KL'Y, & FLAG LIST # 10

for 1.BG1X.02, NbSlA.Ul, t^'^^rilL . 02 , ImBSIC.OI, lMi:.SlL.02

43 FM(^) LRAt. LI..E:1 - ; 2 — ;3 ==;4 0;5 (?e 44 FN'Kv) L/LMI.Y USCL IN LliHOL t'f.'T OUT IN UV;63B

4 5 F^X 24 uVK AUTO RANGE

4 6 KLYc 2 LI RP: ST ART f SET ? 47 ^LYc 3 LuTLI TLMP,A ( 3) ; AuL uLV. PT ,A(4) USED IN REVvGRK

4c reea DVK LwTLR ( 2 , * ) A ,tj : A=tUNCT10N, L = VOLTAGE

4i» reac CLOCK Li.'i LR ( 3 , * ) 0 , L: C=f 1 Tiluhb SW,D=SV. 2 #3 #4 HIIKM.SS

5U tNL.(NG) LRRuR CALC FOR G/T : NO=STAR #

51 fNVd 7 FIT #1 OF 5 CUTS

52 F .'VG 8 FIT if 2 Of 5 CUTS

53 FNvo 2 FIT X= LX P ( V* ( V 2-W 1

) " 2

)

54 FLAG 2 G/T LPROPS CALCULATEL FOR SPECIFIC FRE(^ 5. DATE

55 r.^L 1.1 G/'i err VABLE: no print variables

5o FinL 1.2 C/T err TAlLE: print variables

57 FNL 1 C/T plot (J=19)

5^ FNL 2.1 G/'i a err 'lAbLE: no print variables

Ds> FNL 2.2 G/Tc err 'lAtLE: frint variables

t)U FimL 2 G/T a Diet (J = 20)

6 1 ti/'lll Gl^^uUL, i^VR: enamel sO = 110 1111

tLAw 5 hLaulNL : l = bYPASS L-ai l , t Rl.i^' ,A'iivi Li A>. , G , G/T , G/T a

63 FtMri(i^) ni^AuiiNiGS: 0 = FI'i tf , l='iAPL # 64 FNL 3 hPtWtrl plot (J=21)

65 FnL 4 HirDV,j}2 plot (J = 22)

66 FNb(v^) INII hARDwARE: 0= VTVK , bRG , NOI b E & UOMNAL, 1=INIT PV.R bRG

07 tiMXlOO J 357 lr.i:'UT(e.g. ext pwr neter ): channel tf 11 = 110 0100

6b FlmK(wO) K-F actor CALC, e.g. K1,K2,...,K9

69 FNJ (Q) KEY 3Ub : C:=KEY #, SLL KEY LIST

70 KCYc IS LAST IS EASURLI'iENT : in i t ic te s Storage steps

71 KEYa 2 LINT: 1=SITE PREP, 2 = hEAS, 3 = RLv,6rK

72 KEYc 14 LIST CURRENT DATA NAT D 73 KEYC 13 LIST G/T SUM^"ARY

74 FNK(C) y.ElEOPOLOGICAL INFO:0 = lNPUT LATA,1 = PRT LATA , 2 =S ELECT ^;AN/AUTO

7 5 FNX 76 NO RF to bOLG>;bTER (avoia - use FNX68)

70 FNL 7 NEt plot (J=25)

7 7 FNX 0 8 NO RF TO BOLCN.ETER

7 8 FNX 64 NO RF to bOLO!''ETLR 6. ETD PAD IN 79 FNX 72 WO RF to bOLOKETER & SI u PAD IN (avoiu-USE FNX64)

80 FNX 80 NOISE ADD #1 & j# 2 ON

I

,i

i 145
iMbLi^.OO <NbS 9915, G007> T6 { D5-tl0

-3-

REVISION « 10

tUNCTlCu, KLY, & FLAG LIST # 10

for i,B5lX.02, UBSlA.Ol, UbSlb.02, WEblC.Ol, NBSlD.02

a 1 t NX 8

1

NGISL AUD #1 & #2 OFF

b2 I NX 82 NOISL AUU n ON

d3 t uX 83 ADD #1 OFF

r. i t uX 84 imOISC ADD #2 ON

65 I M 85 NOISE ADC #2 OFF

86 I i jX 88 NOISL ADD #1 & {f2 C.\ (avoid - use FNX80)

c 7 r iiX 8y L\OlSL Abi^ *1 & 52 Otb {avoid - use tNX81)

t i,X 90 NJISC ADD #1 Oi, (avoic - use FnX82)

b i k 1N.X SI NOISL ADD #1 OtF (avoid - use FnX83)

9U I 1>,X 92 NOISE ADD #2 On (avoio - use FnX84)

91 t i\X 93 nO 1 S E ADD #2 OFt {avoid - use fNX85)

jz i- uL 8 NUIr plCt (>J = 26)

t nX 40 iwll i-.b ( not in stalled)

3 1 96 OPENS ;;bLTlPLLXLR so can use front panel inputs

3 5 t i,X 97 O'PLhS KULTIPLEXLE so can use front panel inputs

96 I ivX 98 OPEuS I-.bLTIPLEXLR so can use front panel inputs

97 t hX 99 oplns i^:ULTlPLLXER so can use front panel inputs

98 PAGE HEADING : U = # SPACES BEFORE PRT HEADING

99 iiJ's (C) PLOT DATA : 1 = PRT HEADING

1 Ji 1 4t p F,c^; A'iTi; = 15dD

101 t ..X 49 PPG/j ATTi. = 14db

102 t imX 50 PPGM AT'I N = 13db

103 t UX 51 PRCM ATTN = 12dB

104 t uX 52 PRGM ATTl^i = lldB

105 i .NJX 53 PRGM ATTi, = 10dE

lu6 t nX 54 PRG-^i ATTN 9ab

107 t NX 55 PKGM ATTN 8dE,

103 t NX 56 PRGM ATTN 7dB

109 t wX 57 PRGW ATTN 6ab

110 t M 58 PRGM ATTN 5dB

111 tNX 59 PRGM AT TN 4dB

112 FNX 60 PRGM AT I N 3dB

113 t NX 61 PRGM ATTN 2dB

114 t NX 62 PRGM ATTim laB

115 f NX 63 PRGM ATTN OdB

116 HviO(Q) PRGM const(['iAT N) :l=LIST,2=correct,3=N(I ,J) to variables

117 FLAG 7 PRI OUT ERR: l=W/0 CONSTS

118 KLYb 12 PRT : ELEV vs GMT

146
UES2.00 <NBS 9915, 0007> T6 (, D5-F10

-4-

KEVISION # 10

FUNCTION, KLY, 5, FLAG LIST « 10

for NbSlX.02, WLSIA.OI, NbSlL,02, NESlC.Ol, NBS1D.02

119

IzU

KLYb 11

KLYC 7 PRT:LIST OF ALTLRATL STAR ERRPRT:SITL & FLUX DATA

121

122

123

KLYb 9

F1X.X10 3

Fi>.P(Ci)

PRT:TYRICAL G/T VALUES AND ERRORS

PRW LRLG OUTPUT: channel #8 = 110 0110

PRVv KLAS :0=#1J.« 2 , 1=* 1, 2 = « 2 , 3 = PV;R,ir,w (IN: A3,C2, E2 , V,FND1)

124

125

126

FUU (0)

f;mxioi

FMX10 2

pnv> FJ>iTlG CLECK: IN:C2,L2,C3 OUT : A ( 7 ) ,A ( 8

)

PV,R BRDG vs FIiNiL REF : channel *10 = llO 0101

PWR bRDG vs REF VOLT, set fine volt:ch #9 = 110 0110

127

12b

129

F Nvd 5

t NX 3 4 read SW

C=FimF2 & RETURN

RATIO: FILTER IN KBYTE 4=INTLGER SUM OF BINARY SWITCHES

130

131

132

FuRiQ)

rLYC 3 ri\Fd 0

LEAL (ENTER DATA) DLV IC L : 2=DVN'i , 3 = CLOCK , 4 =LREAK SWITCHS

RLFIT 5 CUTS: USED AFTER ONE OF THE CUTS IS RETAKEL

RESTART

133

134

135

FiMVd 0 t;CYa 0 KLYd 1

RESTART

RESTART

RESTART @ N=?

136

137

13B

KEYb U KLYe 0 K^'io 0

RESTART :0=RESTART, l = LlNKMLAS,2=REVvORK , 3=KEY LIST

RESTART :U=KLY LIST,1=AUTG CK,2 = NU AUTO(F2=0)

R L. ST' A RT : 0 REV, 0 FR , 1 LOA L , 2 AU TO S EC , 3 DL L , 4 G/T , 5F I T , 6 P LT , 7 E RR

139

141

KLYc 0

r lit a I FNX 6 9

RESTART :1SKY ,2G/T,3EIRP , 4 Li:,K , 5n LK TAPL,OKASTER

RElvIND INT CASSETTE

RF TO BOLOMETER

RESTART

142

143

144

r NX 6 5

FtiX 7 3 FNX 7 7

RF to BOLOMETER & STD PAD OUT

RF to BoLO;-;ETER & STD pad OUT (avoid-USE FNX65)

RF to BOLOKLTLR (avoid - use FNX69)

145

146

147

F NFc 0 FNFb 0 KLYd 5

SLT# CHANGE

SITE: W. long, N. lat, alt

SORT, FIT and LIST LATA

148

149

150

FNFc 1 FNS (Q)

KLYc 4

SOURCEi; CHANGE, RESET MAT A & MAT D SPACE PAGE Q SPACES

STAR FIX:routine to estab ANT BIAS

131

152

153

FLAG 1 KEYC 1 FNX 6 6

STAR FLUX CALC FOR SPECIFIED FREQ (. DATE

STAR: RESTART @ N STL ATTN IN

154

155

156

FNX 74

FNX 6 7 FNX 7 5

STD ATTN IN (avoid - use FNX66)

STD ATTN OUT

STU attn uUT (avoid - use FNX67)

147
1-IUS2.00 <NBS 9915 , 0007> T6 & D5-F10

REVISION I 10

-5-

I-UNCTIOu, KCY, & FLAG LIST # 10

for i^l-'iJ'X/^»V^f L'*UOX/^*UXf lil-'kJXLJaUA, L4L^>^X\^*UXf L>lL>kJXl<'*W^

15b

FNVd

KLYC

12

10

^THRF f-'AT ^ t MAT N STORE CUTS TAKEN

15y

16 0 161

KEYC

KLYd

KLYb

11

7 10

STOKE INT: KAI N,S,T and PRGM

STORE MAT M & MAT N STORE: S,T,N

162

164

KLYC 12

t NXllO

STORE :KiAT t;(suniniary d ata ) , N ( prg.T, consts) or. ext

I'Vlii- (F/llJOl • channel #1 = 110 1110

TIi'':E ,DECI1'-AL HRS:1=SET UP Ll (IN: L3,E5,N4)

CAS/DISK

16b

167

KLYb

KLYb

KLYb

2 13

3

UPLATE: FREC;,BV. ,ANT PARAMETERS

UPDATE :ANT POINTING ERROR

16 8

110

KEYt

KLYb

KEYb

1

6

4

UPLATE: RUN* , DATE , SITE

I ] p r AT r • ^ 1 1 M / NTin tv Aii.ii map data

UPLATE:T,G/T,Ta,Pl^R RESP

171

173

KEYb 5 FNV (0)

t'NW (0)

UP DATE: TEMP, DEVJ PT

WAIT Q MILLISLC

174

17^

176

F NZ ( N U ) FkL 6

F N"v c 13

Xi=FNK (NO) *C1*S (NO ,4) * lE-26

calc L,B0,E2,G via li2 , G-d if f = C7 , Ta = H9 ,b9

177

178

179

t IMV d 9 Fula (L)

FNVd 1

calc Ts via G at zenith =b2* (D*F/0 , 313) '2 , 82

c p c ' Ai\.n HPi-l'jil/min of p\t' c\

calc: G/T,G/Ta,NEF,NUF errors

180

161

lb2

FNVd

E NV Q

KLYq

3

4

2

calc: GRAPH RANGES for AUTO SEQ

cclc: LINEAR & CSC E'lT PARA^:E'IERS

calc: STAR FLUX VALU LS , Ta , ef f area

183

184

185

E NEg

FNFo

FNEd

5

23

heading *HPBV; #1 =.,.+ ... CSC L= . . . (ant HPBVJ =. heading G/T ,G/Ta, NLF,NUF, Y-f actor

head ing Kl,...K9,K.A-eff, R-ef f ,S ,Xi

. .

)

186

187

188

FNE d

FNVd

F UF d

6 11

10

heading: G(aB) G-diff T(K) Ta(K) Y-fac HPBWerr

loaa PIOR SUMMARY MAT M, MAT N prt A2,C9,D1,N(21,1) ,T(1,9),C8,D8,D9,J1,N(21,3)

oata fit c(l-K2)

,T(1,11) ,C2

189

190

191

E NFd

KEYd

KCYq

9

46

prt Kl,K2,K3,K6,K8,K9,K,A-eff,F-eff,S,Xi

prt: G/T DATA SUMMARY with page heading

prt: G/T DATA SUMMARY (no heading)

192

193

194

FNFa

F Nt d KEYe

1

79

ques DATA Oh TAPE/DISK , TAPE # ques: DATA SETf

ques: NEW FRLQ, BW , INPUT ATTN,SIML STAR NOISE

1S5

196

E NVd

F wV d

6 10

read: Rv;rk# ,SET, f , T/Ta(390 , esc , HPbK 90 , esc , Ta

set FLAG t8 if RE^-ORK* not integer

148
8. COMPUTER PROGRAM LISTINGS

In this section, the flow diagram for the computer program is printed

followed by a listing of the program. Following the program listing is a cross reference list of the program constants and of all the line numbers where these

constants occur. The meanings of the program constants are given in section 7.

The numbers circled on the flow diagrams are the "R" numbers. For example,

405 corresponds to the location in the computer program of the line where R = 405 occurs. The purpose for the R numbers is to label program segments in the

computer listings; and, in the case of a hardware or a software hangup, to be

able to identify which part of the program was being executed at the time of the

hangup. To obtain this identity, the current value of R is examined using the

computer keyboard command R, "EXECUTE."

149
8.1 X - SUBROUTINES

6 9 I J ij T iJ J 'J 0 . 70 DEF FN:''. Q' ' ' - 80 FOFNfiT B 90 NPITE 4j SO N'JE'/TEij;

100 NRIT 100

lie RETURN 0 120 HEF FNR(a ' 122 IF Q-4 THEN 14;:: 124 URIT 40

130 ENTER •iN*.Ql,Q

140 RETURN Q

142 RETURN REVTEJ

150 DEF FNIKO::. 160 IF Q THEN ISO

170 F E T U

R

H r N :

t

y. + F r

i

C

7

F ii '

:

' .:' i

: 4 :

:

:

1 S0 c-FH::vSS+FN;^^23-i-FN:-: 1 0::; i-r ri! i-; -:'+ \-

1 9 0 y = F

N

Y. b s -t F N : : 2: 9

+

f n :^ 1 u ^ - i

;

n ':;.

\ Zm RETURN 0 210 DEF FNPCQ/

220 IF E2 :>= 0 THEN 240

230 E2=0

240 IF E2<16 THEN 260

250 E2-^15

260 IF Q>2 THEN 440

270 ',' 7 = F H X 6 7 + F N i 6 3 + F i R

' f

'-\ t" 2 ' -i

• F \ I

:

230 V3 = FH:^:69 + FHW4:::0 + Fh2::: 298 V 9 = F N V, ( 6 7' - 1: 2 :: + F N :

: ' r i .i

: ..;'! . ', ' ]

i 300 V 3 = F H ( 3 i -i' 2 0 -i- F N : : b

:

' + r r i N 4 > 9 <- . 310 IF H B '::

' ,' 7

+ '

,

' 3

+

'

,

' 9 :: > It '^7 O T ! 1 1 \\ - 320 Qi^-VS-ri: 2*','-V3::' 330 Q2 = ','9* 2*'v'-V9

)

340 Q3= ( 1 -C2+C2*h3 :: *Q2

350 IF I J 1 :> 0.096 0 R C! 2 :: 0 . 0 b T i-i E N 360 E2=E2-1

370 IF Ql< 0.132 HND 02:0.132 THEi

3S0 E2 = E2-:-l 390 RETURN 01 vOS Ql:-

400 PRINT "REZERO" ' 410 E2=E2+i

420 Q 1 ^ F 1 1 :

' t. 2 - £ 2 : 1- - N iuj -i f- N i:: 1 430 GOTO 220

440 v 7 = F t i

;:

: 6 s I F N :: 1 0 1 T r N ' 2-: 7 i1 N i-'i 6 0 450 V 8

-- F N y, 6 9 + F N W 4 6 0 + F i i f : 2 460 V 9 = F

H

y

e

8 + F N W 4 6 0 + F I r 2 470 \> =F\\ : : ] 0 3 -1 F N y 2 2^ -i- F N ;

.1 ; r. : j ;

, N 430 IF fl S

c

'

' 7

+

' ,' 3 + V 1 1::: i-. u I ' 1

1

490 Q 1 = ( V7+V9 2- V3

560 RETURN Q U s 2-. V -Q l :> ,.-5

r r'h FN:' 1 1 1 -i-FN':2^ "NNl 00

-i: ;:i+fn:^^j N: :2 ?' + FtiR4 60 + FNR

RNR2

NR2:;'/;

150
X - SUBROUTINES Ccont)

510 BEF f HH' MO •

549 E9=( (El+H -Lt: -- 2-4 : - 55U IF TCHyf.21 ]-0 THl., . _ 560 E=>[ ^^^^2 El -H/' t i L i i J. xu.-j570 ijJTO 650

580 F3-E9+Cb*i4/360

590 IF_E9 24.0657O-:^x- THEfi 5lU

600 GOTO 6 30

610 b?=E'3-24

620 GOTO 590

630 E3=E9^360^24

640 E = E9 + 360-S[ (JO- 3 ]-C4

658 IF E >= 360 THEN 670

660 GOTO 690

670 E=E-360

680 GOTO 650

690 Q=3LN0:.3]+T[Ha.2i j^El^TlU-- 13 J.- lOOO^Ll+Bl

700 L=S I HC5*S I NQ+C0SC5*L-: :E 710 L=fiTM (. L/SGF: < 1 -L*L* 1 E - .- 720 H = S I r i Q C Li S C 5 - C 0 S L - T H f i H ! i L 730 H=hT!I(3uR': 1-H*ri>- <R + iE-93.^ >-r3^^HTrUE + 99*';a-: O J 740 IF E <= -ISO THEtj 733

750 IF E <= 0 THEH 820

760 IF E ISO THEH 730

770 GOTO 790

730 h=360-R

790 IF T[H0j21j=0 THEH 020

800 Q=TCH8j 13].- 1030

810 L=L-flTH ( COSL*S I HQ-- < 1 -S I hL 1 1\9 '> 820 Q=L0=L

840 FOR 1=1 TO 4 850 O0=(L3.--THNQ-L9/<THHQt2 : .'.-60 860 Q=Q0+L

370 NEXT I 330 L=Q

390 RETURN H 900 DEF FNB(Q>

910 FOR 1=1 TO Q

920 BEEP

930 WRIT flBS<l@e*<I-4>>

940 NEXT I 950 RETURN 0

960 BEF FNNfQ)

970 DISP •'< =NC>: ' IQ,

980 IMPUT B$

990 I- ef[ljlJ=" • THEN 1010

1003 RETURN VHL(.Bt>

1010 RETURN Q

1020 LEF FNICQ)

1030 Rt="- ====####i?Ow0"

1 040 H

*- = R$[ 4? U-3 ? 4*Q ] 1050 Hf[5>RI

1060 fi4[9] = R:? 1070 FORMhT F5. 1 lOSO WRITE '::i5jlO70>H*?H+'n4ir;-f;fi^

1090 RETURN 0

151
X - SUBROUTINES (cont)

1 1 iJ0 DEF FHK(Nu:.

1 120 ^TEXFaj= 1 1 1 * ! f-|[ 4 ] 1 !,;• in,;.

,

i'8> /"*^ fiC 3 j/i

1 1 3 0 21 I.' 1 + 0. 2'-^ i -c !• : 'i

' ,

1 1 4 0 ( i;Fi[ 3 ] IM -

1 1'^^e 44E 03*^ 1 -n . 022 ''.2 '00 ;

!' 1 ii„ 52^*^iG2-|-2. 73-G

1 IbU 0-1--0., 022 1 5* ( 1 1 = M 2 Gu ' '-i'/i

1 1 7 0 45/02+ l -i;!i ' G. '\ 7 , 7 7 3

1 1 80 Q= ( 1 + 493 , 3 / F T 2 ) ( I , :/ p \ j

1 1 9 0 G5=l .

4

5 1 E i-05-^:' ( 1 -0 . 0225,:^*G0 .' l': , 2d2-*GKP ( -644*

1

"' M fl L 5 J . 0 9 + 0. 2 7* ( 1-/J 1210 G £ 2 . 5 29E'-02*' 1-0 . i;i ::';::;! 5 2 ^H jG i -i ;:

. 2G2-*f- •t^2 / ( 1 / 02

1 £20 LF = £, 1

1 2 ' ' i'i "7 1 - r ^1 .f. L4+05*L5+Gn : 1... C 1240 ( 0 . 9 2: 2 7 :f 1.; 1 - C-^ \?\ 2

i-; j ]; i; "| ;. i- 5 ^ 2 5 ;, ! 0 . 02 0 2 * L 1250 L 9 - 0 . 0 13

1200 !: 1 = 10 i (-Z1.- 10/SlN

1270 .•Q2-:-c. 1-4: 1

- 1230 02= (ii: M0 II 9 ]

- 1 00

1240

1 2: 0 0

1 3 1 0 ni(W.-F /2E + 03':i T2 1320 K4= 1 1330 K5=l

1340 Kfa = 1 1350 K7 = l 1360 .1 1 = 1 0 t

(' -0 . 000 1 1 4-' - S IMG.' 1370

1300

K3=l-;

0=1 -i- (2 1- Jl :.'*E/P^ -

. 904E 04) 1 -2*X.\} 1 riNL ) /( GIUL) t /

1390 3=1/0

1400 1-3 :'*EKP(-0 . 4£7-*-02

1 4 1 0 K-Kl 2*K3*K4*K5-v

1420 PFTUM- K 1430 DEF Fh U iJ

1 4 40 UNIT G 1450 PET0R0 0 1400 DEF Fl' Z<N0) = rHI\'.ri G' .-' ': iG 1

:'

;:> i, G0 j „i-^'GI.:2^^''.:6

152
X - SUBROUTINES Ccont)

1479 BEF fHC'fi

1-30 H5=H5-:

j 3TBI3=6 THEN - 1^-^ :=FHR3

1529 IF Q<10ty THEN 157%! 1530 FRIHT

1540 BISP "CLOCK RESET" t 1558 IHPUT lai 1560 GOTO 1490

15?a FORMBI 20; . 7- ,F5.0 : 1539 I4RITE <15j 1 57B>Q 1*1 et3nr i NT < u - i 8 T 4 1- * I NTQ^ 1 89- 1 ^ HJ c fi/- 1 fi f4 > 1590 a=2a

leee friht H*r':

1610 FRIHT

162H FRINT

13?? -3FilHT 35"-'^-.?- - ..'^ '^^--,6iy,"RUH%F3.0

--'HE <15. - : - HI i.4:ijH6

=;SHhT "

. ^-?.3. ' —

PRIHT

FORiIRT 20K-"FRCG -^Fi. - ^- WRITE <i5? i67e>PjT43?2. : .pi[21]

3? IF FLRG9 THEH

17B0 PRIHT TfiB(Q>?Pf£i,::- :- '" ? P^E 9-. 12 " ".;?*[ 4, j; • -JF/rT^S]!

718 WRITE (15? 165"^

^729 FORMRT 13K5F?,;^ .

- llIsH" i73@ WRITE <15j 1733 - - I. [740 IF FLHG8 THEH 1778

"3 -3RflHT iSK.-QyJc 3- T" . . ^ :2,. 2? " dB-- K

" ^ F7. =

' cB^K"' ?? --"HE <15j i75H>io«LGT<G^"Hy>? IfeLGI^G^^Ti.

-3IHT

1780 RETURN 6

1790 DEF FNSCQ>

1800 FOR l-i TO Q

1810 PRINT

1820 NEKT I 1830 RETURN &

153
X - SUBROUTINES Ccont)

¥.$ 50 1600

FNX 70 170 i ;•'!.! 1 ;i 70 1 n 130 130 1 £:0 1 '9 10 1 9 0 190 190 i 90 2 7 10 2?'3 £70 ?' 7 0 2 8 Q 2 9 0 2

'-> 300 3 03 420 443 4h0 440 450 430 470 4;-'0

70 90 120 122 130 130 140 150 160 130 210

270 2 ';;) 0 :;:'0S 33i,! 730 3 0 0 9 1 ID 8 1

0

820 350 3 "i ' ! 3f7.j o3ii [njij 9 1 0 9 S 0 1010 102

1040 1040 1 130 1 ! :3:i J l',;0 ;. 170 1170 1139 i 190 1310 133

1390 1430 1 4 4 >.! 14:'0 149 0 1-190 1530 153

1590 1700 i 7 9 0 1300

120 130 1 3 ti ]. 9y 2i-'ti 2a u 2 9 0 3 0 0 4 40 450 460

470 1510

130 3 2 0 3 5 0 420 490 500 500 155

F41R

Ql

1530

FHIi 150 420 420

F N N 1 El 0 1

'4 0 1 99 2 7' 9 2 3 3 29 Q ;3 0 0 448 45 0 4' 6 0 4 7 0 1430

V 190 320 330 470 500

FHP 210

E2 220 230 243 250 270 360 360 333 383 413 410

420

V? 270 290 300 310 4~!.u 433 493

V8 230 300 300 310 320 323 453 433 '493

V9 290 313 ':330 333 463 433 493

C2 290 340 340

Q2 333 343 353 378 1140 1153 1163 1173 1190 1193 1200

1210 1243 1270 1233 h,:90 1290 1373 1433

Q3 340 393

H3 340

FHFl 510

Ho 513 538 553 563 5b3 643 693 690 690 790 380

1133 1233 1463 1460 14 63

ES 533 540

S[ ] 530 563 640 693 14 63

[9 540 530 530 590 o J 3 610 630 633 640

El 5 4 3 5 (:: 0 G 9 0

H 548 563

T[ ] 553 563 690 6''''0 790 333 1233

E 563 640 650 6i'0 r.7i.i T'tiO 743 . 750 760

154
X - SUBROUTINES (cont)

560 640

C6 580

Li 690

Bl 6-3e

L 760 -10

M~a ^

O-Z'tA

T

1 O'tO •Z-'?Cl

O = 'i,

0-_it!

L y C= -SO 1 c-oU FHE 980

FHN 960

B$ 9£3 990

FtJl 1820

H* 1039 1940

cui-- 1 it Ci

1 -? L : 1 i "-•11 1 1 "-'Ti 1 1 t-l i i o*:^

i X ilt' 1 i CO 1 ^ S i-j i 1 ^"L" c1 I 1 -i=ri I I -rH

1 il ->

t-tJ

1 1 — ri -1 L4 1 1 i O 1 i-r-y

i £_ -_ U

i ^

L-J 1 -'TiO

1 i r-i 1 il 1 1)1 -Z'Z'-'-i

L6 1220 1238

1261::= M 1 c, _ L

E:4 1270

B 13£0

.330 1330

810 bin 3 1 0 310

.0 7SU f'Sy 390

300 1920

1 J3U .=60 1960 1036 iS30 1030 1089

124h

1210 1310 1360 1360 1738

155
X - SUBROUTINES Ccont)

K2 1290 1410

K3 1300 I41y

U 1 3 1 0

f:4 1920 1 4 i fi

r b loJO 1 4- 1 u

Kb 1340 1 4 1

0

K7 lobO 1 '^1 1 !J

.J 1 1 -!hO 1370

1370 1 4 1 iJ

1390 1 40 0

K9 1 4' 0 0 1 4 1 Si

K 1 4 1

0

1 423

FHZ 14 60

C

1

1460

FNC 1470

N5 1 430 1480

FHS 1490 1790

h*

N[ ]

1 6 0 01

1640

H6 1 640

?$ 1630 1630

C

D

1 7 1

0

1730

G 1760

|-!9 1760

1760

156
8.2 E - EQUIP CHECK

CHANNEL VOLTAGE

CHECKS

(508)

ATTENUATOR

CHECK

STABILITY

LINEARITY CHECK

157
E - EQUIP CHECK (cont)

37fiy P " 5 0 0

' S ? fi LISP "PPGM: ^, = F':-:' r Ti l' ''i 1

i

r

i

. T iRPF";

o'-iuy IMPUl y

3 9

1

Q PPIMT 0 39£y LORD KP'i' #

"

' - 2' 3 9 3 y 3940

Q^PF3

riEPGE #Cn4> 50-50

39Cy f^^="^iPSlE. i 3 Ii5^ ;"!"!' FRIJ j

'p i-i-lR:' F ~ 1 -FO

39bo LOflP HRVh ttPE S N

3 9 b 1

'

PE::i.jlMr: fiPL'-. 3970 DIM H::r[72]- p f [ 1 i 1 : III , s , F V ; 25 i - F - "S : 1 -.L .

f 3930 P-R-Hl-:fl2-C . r .:p4 = rN: [::,:; r f 'H J 5 9 9 0 H=I = i5=^I6 = J -Jl-N ^NJ f-i.:: i: !! '

' ; - M5 = N6-^0: -J 4000 p.:Fy=pi=^p:; = :;-i i4-fvl=^R - ^-F :::::Th^ r 4 0 1 0 ./ f; = V 9 - Q

4 0 3 0 4 = ^ 0 4023 R3= 1 y 1 ( N[ 1

3

- ly lu ' 4024 Hy = N[ 18- 10 ] 403U 63 = r'y 4032 C9^5.

3

4034 H--=3. 5 4040 F=:7 - .. ... 4050 E2^1

4060

4070

4080

4090

Li = 60

T-100

Pt[ 1-12 ]=" " - - 4 1 00 3FLHG 9 4110 Q^FN jy

4120 STOP

4122 BEF FNF<Q,>

4126 G 0 r 1 J 8500

4130 R"50

1

4140 DEF FHV':R '-^^ FN:'(3i -

! W) I

'l -i-FNi-v: 111- ( R I NTQ .> * 1 00 )-rFNNlt yy tFNRS

4 1 50 R=-5y2

4160 DEF FMJ'Q'

4 1 70 GOTO 0 OF 4 530) ^ i S 3 0

' '

1

i"! " 5 8 2 0 - 5 7y} :: S560 - 9509 - A 1 S 0 - -i- y 4130 Pf[ 13 ]="KE't 0: CFl!':K list hNH \ I'i LIST"

4190 Q-FNS2

4200 R=5y5

4202 F2=^0 4204 STRNDRRD

4210 DI::;P "0-KE'i LIST- HN Vn CK/'

;

4220 Q=FNB2+FHN1

4230 GOTO Q OF 4466 '

" 4240 PRINT

4250 PRINT

4260 H-l 8 4270 PRINT TRPh'

4230 PRINT TRPH' FE'i 1: CHECK i...ISr" 4 2 9 0 PRINT TRpy

4300 PRINT TRBh' \ E'{ 3: i 'li-iN i \{f\\\tf i 'i! TRCES"

4310 PRINT TRBR' FEY 4= 1, NEiF ynCNi':'

4320 PRINT TholV hEV 5: l ilKlF ILH'- ! I'i •F IV RiTEM stmd H I ! 't' " 4322 PRINT TRBR' FEY I-,.: Nul .:. Ti ST hp 1 CITY"

4324 PRINT TRBh' f.:E',' : ; CNRN',1 STiril l,! i' hTTFNCHTMi vRCi.lC

'

4328

4330

PRINT TRBR' y^FN:2F,EY y: NlN f Ff 0, FN- ilihUT M

" iN:. .;INL Si Fr: r-OIS 4340 GOTO 4210

158
E - EQUIP CHECK (cont)

4:?5y R = 5y4

4370 EISP RUN #"!

43oG H6 -r mB5 tF hUHo

43?U mSP 'FILTEP FRLk- I'liii.y'j 4400 C8=FNHC3

4405 h3- 1 0 r ( N[ 1

3

' 5-!- C3 49 5 ] 1

0

4407 fl3 = H[ IS:' ?+0::3.: -r7 j 4410 DI3P "FILTER SflNDPrr .3 ^ i lH:: > "

? 4420 Cy-FNHC?

4430 DISP INPUT fiTTN : dP V"

;

4440 E6=FNNEe

4450 riI3P "SIMUL STAR NU I SE Ji : ? 4^160 n = FNfU-l + FHS3

4464 RETUPri 0 44bb R = 504, 1 4467 F2=l

4465 IiI3P 'TiU CHECK LIS!" :i- jjVfl (U-"NO>"?

446 ? INPUT Q

4470 IF Q = 0 1_HEH 447S

4476 Q = F N J 1 + F H 3 6 + F N J 2 4473 Q = F N 3 4 + F r TJ 3 + F N 3 9 -ii " N J 4 + F N - J 5 w 1 1- F H 'E: 3 ^ F N J 5 + F r

-i . J 6 + F N J

:

4480 DISP "CONNECT EARTH TERM? SET PWR LEVEL";

4490 Q=FNB3+FNN1

4500 Q=FNS5+FNJ6.

1

4510 STOP

4530 R=506

4540 DISP "PRINT RLL iJN" ; 4550 INPUT fl* 4560 PRINT "8 fiC PWR SWi'TRFS ON "5 4570 INPUT

4580 PRINT "DflNfi: EXT PRTE FULL CCW'S

4590 INPUT fl* 4600 PRINT DRNh: DhTR OUTPUT BUTTON IN"; 4610 INPUT

4620 PRINT "DflNfl: P R 0 G R H N C ON T R 0 L B U T T 0 N I N"

?

4630 INPUT m

4640 PRINT "RF UNIT: E-flNDPflSS/FREQ 0 5 . 3l1z/70MHr "

" 4650 INPUT fl* 4655 E6 = INT(HBSNC 1 . 7 J) 4660 PRINT "RF UNIT: flTTEN SET T0"?E6;"dE";

4670 INPUT fl* 4672 PRINT "RF UNIT: Sill SThR NOISE 0 3.5'dE";

4674 INPUT H$_

4630 P R I f-l T " R h U N I T : L 1 1 1< K M N u L K

1

" ? 4690 INPUT fl$ 4700 PRINT "NOISE SOURCE CONNECTED TO RF INPUT"?

4710 INPUT H*

4712 Q=FND0

4720 PRINT RF UNIT: uUTPiJ f NLIER \S ' iJ 0*SGNM[ 1

?

"? Jr < 4730 INPUT m

4740 PRINT "CLOCK UNIT" SET IiUTE^^; 4750 INPUT HT 4760 PRINT "CLOCK UNIT: SET GH T TIME";

4770 INPUT ht

4730 DISP "END"

4790 PRINT

4800 PRINT

4810 RETURN O 4320 STOP

159
E - EQUIP CHECK (cont)

A S 3 0 K - 0 K: ' 4 3 ' M F-' ¥ 1. 1

;; T ..... " I.' l" '. .1 " ;i 3 Fl i" L .[ 3 1 1 riL 1 iUE T [ M Z T F

A 3 - '3 Ij I- rj i_ P '

i i,

i pi "i"

t 1 . i--3'i' ^,.3,. 4 3 3 f'1 PR I 3 T " liVM P 3i-l3 !,

:' ; PlL '

'

"x 03 T"

4 3 7 0 I 33 J T Fi 4830 Q.rFr!;: 4 3 9 0 R I ri 1

"

iJ'',' I'l F" '.J'3L' 1 0 N 1 i J

i: j ; p i. [. ! J Pi 5 4900 I M P li 1 Pi i 4910 P i,J \\ i -0 T3 4 4 9 il 0 \' i': 111 1 3 [

'.. -.J ~ i '1

i ! i 'l 1 T r . V 1.1 L !

' I'-lMCE " FFi ,' ' L

' ' h Fi I 'l C 4 9 0 r P. 1:1 1 4940 IHPUl FI* 4950 NEXT i 4960 PR I Ml ' RUTO-VOi E".. FN V "EhHG E i 4970 FOR J = 1 TO 5 4930 PPIN'-

4 9 9 0 NEXT' I 5000 DiSP "EHri"

;

5010 RETUF \\ 0 5020 k - 5i 0 5 0 3 0 PJ[ IC ;:i=:"PEV 4: 3HECK nTTEH33]'

5 0 4 0 9 F N

I

5050 F3^1

5060

5070

5030 R = 33

5 0 4 0 THEI-I 5130

5100 '0 = XTTiL.? 1 = 5 1 1 3 i3 4i-FHNl 'i FN J 5] 43 D I F '# REPPFiT 31:: nPf 3 '3ET "

!

5 1 '-ifi H-Filt ;2 + FNNH

160
E - EQUIP CHECK (cont)

5180 R=51U

51':^0 GOSIJB 5620

52Fi0 P0 = F' 5210 Q-^^ Fl l :^F^!22H-NF^^^K^^22

5 2: 2' F) i F F :• T H E; ; J '3 2 6 0 52 20 FiJRi'iril 2:2^ "CF','S i r.i !::^U ri 'iiV^^" . r

:i; •' VOLTS

52m 0 WRITE 15h 5220)r'O? S'i ri 1 5250 LUTU b2oy

5260 FORilST 32. "i'lBS T':'FE IV ijii T Pi !

i "

^ 2 9. S« " MH + 5270 NRITE a 5 5260 ) F'O 2 h hi 5230 Gu3US 5201;;: 5220 F 0 R ; i ri J 2 ; 2.

'

' 'o F 1) f; F : " F 6 .-. 3 " . 5200 FJRITE Fl5?52y0;>Q

5310 PRINT

5320 PRINT

5 2: 2 0 F R I N T

'

' 12 Fi T T 1 1 i'RQn h> ' U # ftl F-T?H OR ',' 5340 PRINT ' ttl Pl.lK/#2 PilR" 5350 PRINT " PRGM FVITN #. : #2 F'NR OR V' 5360 PRINT ' NONIiJFiL tfl/tt2'' 5370 PRINT

5380 PRINT

5390 FOR hi=0 TO 8 5400 IF F2 = 0 Ti-iEN 5420

5410 IF hi THEH 5590

5420 IF Hi =3 OR Hi ---5 OR fll^--'7 THE ..; 5 -:! ij 5430 FOR fl2=l TO 15

544)3 Q = FN2;Ft3--Hl

5450 GuSUB 5620

54r,i;i pi=p

5470 Sl=--S 5480 Q=FN2(b3-fl2)

5490 GuSUt^ 5620

5500 P2-F

5510 82=8

5520 G0SU2 5S00

5530 FORF:.-T F3. O^ " Db' ^ i- ,2, y ^

' ijH ^Fi -:.5j" +-",F

5540 WRITr (15:i5530>F6 211 F '

^ 21, 1 O -i' Lj2T',:F0/T--1 i , j 5550 FORMOT Fl2. 8' " LL; ' ^ F' 1 2 , 2. , r:5^ 2? "

? F 5560 p\ F:: I r F:: ( ]. 5 ? 5 5 5 O ) F'i 2 , P 2 S 2 : 2i ? fi 2 - 0

1

5520 PRINT

5530 NEXT h2

5590 NEXT Hi

5600 U-FH88

5610 RETORN 0 5620 R^511

56:;0 REM **^:*PHR: F3^-.1 FOR 22'ii-iL ]iLT> F3==l EOF 5640 S = M:-V1=0

5650 IF F3^:-0 THEN 5670

5660 Q^^^FNIH 56;-0 FOR I:=l TO N 5620 IF F2 1 HEN 5 '20

5690 NMll 50

5700 P5--FNV ( 4 = 05

)

5710 GOTO 5730

5720 F5=^FNP3

5730 Fi-^fl i f 5 5740 '4=-Vl+p5^;fp5

57S0 NF2:i I 5 220 P- H N

5." n IF ir^l ifJ|,.|J '-79ii

5. i 2^-1 y > ':-k\'< VI H - ii n ' -i i

• .:

161
E - Equip CHECK Ccont)

5!JViu F?-5 1.2 ' ' • 53 1 H Ptfi 1 Tie CriLLUri U-.iif K ill I I'B = Q

53 3 W Z=P

53 3 y U-FN>-;6t: 53 4 u G03UE; 5330

5 3; 5 U 0 F r -I : i ':i - 1 o -d. i". f (

r"'

' 3 ;• i 1 1.1

i r;; "i { j. • r', j 5860 r:3TUFM

5370 F-.513

5330 F?L1 3 ]= FEY 5 : CHFCK I'vih > I.. I Hi ri;- i ty , sThB OF T'i'PE 5832 F8==^:L0-'r<r:--IfirQ 5390 C3=3

5300 Tl^F-riP3

5310 Q^FHIiO + FHEl

5320 Fi=F5=-2

5930 F7=^l 5940 F6=12

5950 15=0.01

5930 H3=5 3

5932 Hl=0

5934 fl2=l 5970 IF F3==0 THEN 3000

5975 Fl=F5-0

5990 R=514

6000 IF F2 THEM 6480

6010 niSP "0=^PPT Ft.JR;i;V'3? 2=^GRRPH F NR RRTIO";

6820 Fi = FNB3 + FFiHFl

6030 IF F1=^0 THEN 62 SO 6040 D 1 3P " PPH LE "'EL : fl = i. uNST h 1 =^STE PPED "

;

6050 F7=FMNF7

6060 IF F:' = 0 then 6090

6070 F6=l

6080 GOTO 6110

6090 DISP "MEFl3:0^^T-'Ri.M H I ! iP. 1 --STli i-iT i N'

;

6100 F3:::FrifiF6 61 10 H 1=0

6120 Fi2=l 6130 TP F6 THEN 3170

6140 riI3P "tM. L.EVELjvF- EE-E;..,. ^ pRGN flTTEfP:'"; 6150 INPUT R1?R2

6160 GOTO 6130

6170 F6=12

6130 DISP "tt UP PIERS. PLOT";

6190 N3=FNHN3

6200 n I sp ' shrllest i.;rhF'H un [ r < m>

"

; 6210 I5=FNHI5

162
E - EQUIP CHECK (cont)

fc23a Qy=y

6340 GOTO

€250 DISP -PWR VIH mi\.£ i,Vd> = 6260 QO=Fr:H0

6270 C2^8

6289 F5=Fi-i-yO

6290 IF Q9=0 THEM oo'-iij 6300 DISP "flDS SOURCE: 0=' ft ; > • i ^' 1! 1 / - 2=<t2> " ? 6310 C3=FhNC3

6320 DISP ' INSERT €DB kHEH ^. . .

^ =YES :

'

;

6330 C2=FHNC2

6340 10=0

6550 DISP "INPUT HlTEH iW)"^

6360 E6=F^ '^Et 6370 IF - -: - -EH 6425

6380 DISF .E:;-...:LflTED SThF; r:OISE Ll£vELc:UEO "

;

6390 H=FHHH

6400 FIKE5 4 6405 DISP STDi";i0*LGTH3r'dB> ; 6410 H?=-[ 1,3 3=FHHh3

6415 E^- : -RD

6420 i :3F IF FREQC.I1H2:'' j 6430 C3=FHHC8

6440 DISF "BfiNDWIDTH^MHZJ I 6450 C9=FHHC9

6480 R=515

6490 Q=FHC2+FNF0+FHS2

6540 IF F5>1 THEN SSSO

6550 FORMRT " HQ. BRDb V7 V8 V9 PUR<MW>'"

6560 NRITE <15»655fi>" Ck ERR SIGHH"

6570 PRINT

65S0 Q=FND1

6590 H 1 =R2=N=H 1 =N2=P2=y 1 =V2^S=S 1=82-8

6600 P=FNPC3

6662 IF F2 THEM 6650

6610 Q4=FHR3

6620 IF IHT(Q4^10)-INT' Ti.'l0^=0 THEN 6650

6630 Q=FNC2+FND0+FHDl

6640 T1=Q4

6650 N=H+1

6660 IF N. 2-IHT<:N^2> TiiEN 6710

6670 Q=FKy67

6630 N1=N1+1

6690 Ml=Ml+P

6700 Vl=Vl+P*F

6710 IF Nl=l THEN 6730

6720 S=SQR < < y 1 -M 1 *I1 1 .-'H i : • M -Mil ^160

6730 GOTO 6310

6740 Q=FNK66

6750 N2=H2+1

6760 M2=H2+F

6770 V2=V2+P*P

67S0 IF H3 = l THEN SS^'d

67y0 b=SQr ^" ( v2-' I

- H.': = !i2--t ^ ' - : 03

eSoO FGR':rT F-. .

- , SFlZ. 6^ T ; 1 . : F9. 4? 'BB" F7. 2?

' 6810 IF N>1 THEM £830

6820 P2=P

6830 UPITF <15?6HU0>H.V. ^-' - -i ^H*1h,.LGT::P2.-P>-10:^LGTh3j8

6840 P2=P

€S50 IF N. 2-INTiN. 2> 1 HLH 2

6860 PRINT

6862 If F2 HNB N.^27 1 MlN -.^G'i 6S7n GOTO 6600

6872 RhTL'Rh 0

163
E - EQUIP CHECK (con

bS'vU REM SlHE'il 1

i " iiKi'il il byfiy FOF-i'il'iT i "# ; !,..! ' ' v , k'-^ " by 1 0 F JKI'lh T F:]: . U i " M: i- 'Ki ii-,

6 9 £ Id F 0 k i"' i I 'i T F' 3 . fi

'

" IJ b i I '1-1 0

'

'

€ 9 5 0 F Li f'-: i i h T 5 ; : ^ "I I i;: :

i

!

!. .

; j

' \ F' i ' ^-

^

'

'm 5 6940 NRITE < Tj •m /ST:: 1 , l".

-

:, 6950 IF Fb TriFN Fy.jO

69 bO WRITE 1, J' Fyiyjfii. -i 6970 GOTO 3990

6930 RIRITE t ij - 6920 >!i I 6990 II RITE ( 15? 69 jOMI

7000 FuRMRT 5Xi"#3 LF'.'L M " ? 3 .. 0 ^ " 7 0 10 F 0 R n H T 5 X ?

' I. J H IT F „ 4 ?

'

' D

t

7'0 2 0 M R I T EI ( i 5 ? 7 d 0 O ' E 6 < 7030 IF Fb THEN 7060

7040 WRITE C 15? 6910) hi 2? 3 7050 60T0 7070

7060 WRITE ( 15) 69 20;.' M2f

' 7070 WRITE ( 15;. 7010) 15

70S0 PRINT

7 0 9 0 F U R N Fi T 5 X ? f" 6 = 3 j 4 Y. > F G = 1 m 3 . 1- :, 7100 W R I r E ( 1 5 n 7 IJ 9 0 > 2 5 ^ I 5 1 I : ^ 7110 H + ^^=" I ....!.„..!..., i . 1 7120 PR 1 1- IT ThBSjI'-I?

7130 N^l

7140 J 1=0

71:50 T3-FHR3

7 1 6 0 G 0 3 ! J D 7 6 9 0 7170 R5-R2

7 ISO I6 = R5

7 1 90 FORflHT " #.- T I NE "

, 2 i X h " 2ER3^=^ " < \ 7200 WRITE 15!. 7190) If

7210 i^OTO 7340

7220 R=jJ7

7' 230 [•i^H+'l 7 2 4 1; 1 I F r

!

: 2 6 Fi 11 iJ F 2 -= 1

1

' Fi E !-| 7 3 9 O 7250 IF F7=0 THEN 7290

7260 31==: J 1+1

72 70 IF Jl< 16 TliEN 7290

7 2 8 0 3 1 0 7290 U~FNX 63 .1 1

)

7 i 0 0 i; F FF : O IX' I T < ! -i

'

2 FJ

' \\\ E. F! , ' 3 2 i;? 731 Fi PR I FFF TF.p::;HFi$ 7 3 2; 0 G U 3 L.i B 7 E E E 7330 R5=(9 + R5 + R2;' /:i O 7340 X3=(R2 - I6)/I5 + 25

7 3 5 0 1 F H B 3 ( F R 5 - I 6 ) / J, ::> '1 fi F \ \ IF I ! 7 7360 I6=R5

7370 WRITE ..; 15; 7190;.' i 7330 IF X3-::0 OK :;3>5Fi iHEX 7360

7390 ENTER kE^ -- )0, T4

7400 ! r INT (T4 1 Fi ;. -]; 0': r X-] H/ TFiE 7410 FORFUiT F4.u»4F;

7420 WRIlL m5?7410.)N-.

7430 00:-: FN in 7440 LiOTO 7430.

4 7 . F

DB

164
E - EQUIP CHECK (cont)

74.50 74 C0

7470

74S0

7 490

7500

7510

7520

7530

7540

7550

f'560 7570

75S0

7590

7600

7610

7620

7630

7640

7650

7660

7670

7630

7690

7 7 0 0 7710

7720

7730

7740

7750

7 6 0 7770

7 7 2 0

r r o 'j 7790

7 3 0 0 7304

7310

7320

7 3 3 0

7 3 4 0 7350

73G0

7370

7330

7390

7900

FOPHmT F6. 2^ 2'/. NR I TL 1 5 j 7450 : [ l iT i' 4 ! .::'T -I* I , i '

\ 4.- !. 01' 4 )

)

IF ::4>1 THEN 75l.y

I F ( y. 3 - y. 4 • ; 0 Fi H !) + : ; i- ;

•

'

• 5 q

' r Fi i,,': i \ ? g 5 0 IF ; '3-: :4 : 0 THf.'[! IF j

'

'

i

G I J T 0 7 6 3 0

F' 0 F: M h T 4 y. < "

( 0 F F 3 '31 i.. [ .

' f ; fi T : 0 •

'

' ? f" 3: " D NRITE (15. r56e)R2-::.v,

G 0 T I J I F 3 0 P R I !4 T T B r

. 3 ?

'

' + " ; T' R B v 3; 3 K' , 43:' j

'

' !

'

' ! 'f fi 13 5 0

.

GuTU 7630

P F' I N T T' Fi B ( 3; 3 - 3 4 ;

'

' "i 1 R 3 ; : 3 .

'

'

^

" 5 T R B '3 Fi

,

FORhiRT F10, 4? "I'E' . F7. 3;. ^4414 ' ? F3. 4 NRITE ( 15, 7620)R3h-^'

G 0 1 0 7 2 2 0 PRINT THB333r " + " ' THB5a?

FGRMRT 43!. "SIGMh • > Fi:- , 3:, " Jb ' NRITE ( ISh 7660 js

G i J T u 7220

R^513

REM **** PNR sue; P = PNR'. S=-=SIGNFi 131 DE S=^M1^M2^V2 = 0 Q^4-HD1

FOR i=l TO N3

i": = FH3: 63-Rl-iF6>

F^FHFCB

P6^=P

Ml =M1 +P6

P - F H 3. ( 6 3 ~- h 3 + F 33:' f i p 3 IF P=0 THEN 7304

I F K F 6 / P ) ' = 0 1" H E' r i 7 3: i3 4 Rl-10*LGTi:F6

GOTO 7310

PRINT "7304: F6j P' ! P6? P

M2=4'12 + R1

V2-V;:. + Rl*Ri

HE3;T I P-MINJ

R2=4'i2-4T;i IF M3=l THEN 73'i0

3=^ 1 0 -LGT 1 r3uR ( V3 R3 -H li. Fi3 - !43- i > )

)

RETljRH

0-FH3:6

RETUFH 0

1 0 0 <

4;^:. F

165
EQUIP CHECK (cont)

79 id P = 513

T'yiU P$[ 15 ]=="f i- V " :

'' \\f<:Y i":!--iMi!r::L i ; 7930 OsFNCH+FMruHFUni

7940 RESTORE 7940

7950 formht 'iiu "CHflNiiCL '? '::,> "vui-UsCE.

7960 URITE a5j79':.0)

7970 Q=FNS2

7930 FOR J"0 TO 10

7990 RERD H-$'FilnH2

8000 GOTO I H T Fi 1

. ' 100'' ; i j

: •: i J 2 1?! • 0 i 0 'i b

0

S 0 1 0 I J 0 T 0 3 0 8 0 3020 Fll = 10 + FNv7. 09

3030 GOTO 3030

8040 Hl=H[ 1>5]

8050 GOTO 3030

8060 Q=FHv7.09

8070 Hl=FliV7. 03-HC 1 j k ]: FriV? . 07

8030 0 = FH'.'(7+J 100:' 8090 PRINT Fi4 1 TFiB15j Qr TiiL 8100 Hi=" OK"

8110 IF Q-.;h1 + Fi2 HMD G-Hl R2 TiiEll 3140

8120 HJ-"--HuT HORMmL I " 8130 Q^FHBB

8140 PRINT ThE45j FN ^ f]Z 8150 PRINT

8160 NEXT J 8170 Q=FN310

8130 DFlTFl "0=110 OFFSET 0 ? 1 E 05

8190 BRTH " 1^1 EMP" ^ 0. '5-. u. 5 8200 DfiTH "2=IiEW FO I NT ^ 0 . 5 * 0 . 5 8210 DhTFi "3 = + 20 'OLTS" ' 20. 0. 8220 DflTfl "4=+ 12 V 0LT3 " ^ 1 1 ,. 9 0 . l 8230 DhTh "5-DhC OOTPUT" j 100< 0. 02

3240 DRTfl "6-XTRL DIODE"- -8. 6125^8. 0125

8250 DhTR "7-D/R REF" : h. 01 8260 DRTH " S=DPDG OUTPUT " ? 2 ,5,0.

1

8270 pRTH "9 = SET FINE PEF " , 300 , 0 . :,h35 8230 LiriTR "

1 0 = BRDG REF "

' 0 ? 0 . Ou 1 3290 Q=FM312

8300 RETURN 0 3500 R=520

85 1 0 FORMRT 1 OX " 3 1 NL STRR RT [ N :

' ^ F4 , 1

• 8520 FORNRT 10X,"IriFUr HTTii:"<F3.0

8525 FORMRT 1 OX - " 3TIi i \ FT N : " F 3 . 3 8530 NRITE a5>3510)H?C3

8540 WRITE ( 15> 3520>E6? 09

8545 NRITE H 5 < 8525 ) 1 0 I R3 » nO

8550 RETURN 0

hT

dB

ii;

1 ]

:

IF

166
E - EQUIP CHECK (cont)

85^a PfC 1 : > r.EY 6: 85S9 FS=1u*'..^I-IHTQ;

S5?0 H=3

Seiy IF F2 RND HOT F3 THEfi t-722 8623 F4=2

8735 IF F2 THEN 8722

8710 DISP ••l=SiriUL5 2-i:;-.p:i.-i it^r;-;

8712 F4=FNB2+FHHF4

8714 BISP "^MEBS-^SET' ? 8716 H=FHNH+FHD0+FHDl^FS!J-3

8722 C2=l

724 P=FHPe

726 IF Q-^Q1>0.5 THEN S?4y

728 C2=9

8749 Ft[21 ]="SIMULHTEii Hdibh iiDl) ]> i i 8760 IF F4=l THEN 3772

8779 P$C 21 ]=-EH'^-^ "^ ^ ' - 8772 U=FNC4+Fr.^ : - -

- 76 P^F--:----- - - - : "'s ^1=2'- : 2- ^ - 87S9 F2 = ri1,:22•rF'[^.^.-^^" - : ^ V 8782 FORMnl " P="jF-. -. uj" ? 5H> "ad-J #1 = "

5 F7. 4j "

j SX^ "add #2=" ? F7, 4? F4. 8

8784 WRITE (15.8722-- .-z-.- ,.,|4 iv,eas/set. = "

5 N 5755 IF <Pi^P-l) 2.

:

5756 F5=l

87S7 IF ::P2^-F-l)<y.l THEH 3790

872;: F6=l

3729 Q=FHS2

8860 FORMhT •' P<iMbi:. p+li-2 #Ur=fcl> ff2<iMH> #l+#2 #l^tt2 P-Sl ' 8810 WRITE aS'SSey;' P. if2 p.a-2 STSck

8815 FORHnT 76Kj "dB

'

8816 WRITE (15j88i5>

8817 E2=-l

8820 N9=H 1 =H2=N3=N4=05=06=N7=-H8=N-'-»=ri8=M 1 =H2=ri3=M4=H5=f1t =H7=R8=H5'-6

8824 F7=E2=E2+1

8826 IF E2=ie AND F2=l THEN 5460

8828 IF E2=16 THEN 8772

8830 FOR H=l TO N 8832 E2=F7

8849 C2=1+FHK81+FND1

8842 IF F5=0 THEN 8945

8870 p=FNPi

8852 E2=F7

8860 IF Q2/Q1>0.5 THEH 8390

8870 C2=9

8830 P=FHPl

8832 E2=F7

8890 H7=N7+P

8990 n7=M7+Pt2

3998 Pl=5*cQ3-Ql>

8910 N3=H3+P1

8920 N3=H3+Plt2

8930 H1=N1+5*Q1

8940 Nl=Nl+25*Ult2

8945 IF F6=0 THEH 90bN

8950 C2=l

8960 P=FHP2

8962 E2=F7

167
E - EQUIP CHECK (cont)

8971-3 IF C2/Q], >0,5 THLH vuyy ^ S9SU Cc"0

899a F-FHP2

i3992 E2 = F7

9000 H8 = r-i8 + P 9010 N3-Ml3-i-pt2 ^ 9013 P2^5*(Q3-i:!l >

' 9020 N4=:H4+P2 • 9030 M4=M4+P2t2 ' 9040 H1--H1+5*Q1

9050 Ml=r^U+25*Ql1 2 9055 IF <F5+F6)=0 THEM 9210

9060 C2=l

9070 P=-rNP0 ^

9030 IF Q 2 / Q 1 > 0.5 THEN 9 1 i

0

9090 C2=0

9100 P=FMP0

9102 E2=F7 •

^ 9110 N9=H9 + P

' 9120 i19"h9 + Pt2 . 9130 05=05+5* (Q3-Q1)

9140 M5= M 5 + ( 2 5 * ( Q

3 - Q i ) f 2 > 9150 H1=H1+5*Q1

9160 Ml=Ml+25*Qlt2

9162 Q=P1/P2

9170 0Hv-0b+Q

9180 i16 = M6 + Q*Q

9190 I-I2=H2+5*Q2

9200 M2=M2+25*Q2t2

9210 P:=FHX67 + FNP3

9212 E2=F7

9220 N1=H1+P

9230 r1i=Ml + Pt2 . , 9240 P1=FNX66+FHP3

9250 Q = 1 0 * L G T P P 1 .? - 1 9 * [,„ G T f-i 3 - ' 9260 H0-H0-I Q

9270 M0=N0+Qt2

9275 NEXT H 9280 FORMAT 10F3.4.

9282 Q = ( H- F 5 + F 6 + ( \ F 5 -i F 6 > # S ) ) > 1

1

9290 WR I TE (15? 9280 ) N 1 / 1! ? H2.--H ' M3 -

r ! ' ri4. H ? 05/ H > 06/H ? N7/N > NS- H , H9/N ? N0/H

9300 FuRMhT F6 . 2 !

' " ^ F6 . 2 ; "

/; "^ F6 .2

9301 E-H-1

9302 Q 1 = ( M 1 - H 1

1- 2 / Q ) / (. Q - 1

! ( Q 1 :0 9303 IF Q1>0 THEN 9305

9304 Ql=l

9305 Q2=(M2-H2t2.-H).-E

9306 IF Q2>0 THEN 9309

9307 Q2=l

9309 N2=N2+(N2=0)

9310 WRIT E" ( 1 5 1 9 3 0 0 } 1 y w u F: 0. 1 N 1

' - 1 fi " * Q. P

! "i 2 " H 2 * H

;

9311 N3:=N3+(N3=^0)

9312 Q1^='H3-H3t2/N>/E

9313 IF Ui:.0 THEN 9316

9314 01=^1 ^ . 9316 H4=H4 + (: 114 = 0/

9317 Q2=<H4--N4 r2/N)/E

168
E - EQUIP CHECK (cont)

IF Q2>u THEH 93 JO

05=05+<05=H>

9324 IF Ui:y 7. _ 9325 Ql-1

932o !Jt>=Ofc+i;ijb==0 > 932? Q2=(M6-0S-0o- N - E 9323 IF Q2>0 THEH 9330

9329 Q2-i

9338 URIIh ( IS: 93eaMUd-^iUFQi JU5^rh 100:^3QpQ2.^^nr^+^^

9332 H7=H7+'::H7=0>

9333 Qi = ';M?-H?.rH7.'H>.-E 9334 IF Qi>0 THEN 9336

9335 Qi=l

9336 NS = N8+(NS = 0 9337 Q£=<H3-H8*N8/M;>.-E

933S IF U2>0 THEN 9340

9339 Q2=l

9340 WKITE 93O0> lUM^SuRQi.- H7^Nf Iy0-SQRU2/N-;*H.

9341 H9=N9+<N9=0)

9342 Ql = ai9-H9^H9/H>/F

9343 IF !;!l.>0 THEH 9345

934^ Ql=l

9345 H0=N0+<MR=0)

9346 Q2=(MO-H0*NS.'H>--E

9347 IF Q£>0 THEN 9350

9348 Q2-1

9349 FuRMhT F6.2!"°i !F3=4

9350 WRITE a5? 9349> ioo^SQKQ j /Hy^-H, ?.mRQ2

9352 PRINT

9390 GOTO 8820

9400 RETURN 0 9500 R=522

9510 F$L 13]= "KEY 7: CHRNGE STHIiURKD RTTENUflTION VRLUE"

9515 FIKED 4 9520 PRINT "STDC " 5 10*LGTR3; "dB> "

?

9530 m3 = N[ 1 ? 3 ]^FNriR3

9570 GOTO 9515

9900 GOTO 9998

169
E - EQUIP CHECK (cont)

R 3700 3980 4 1 30 4 i. 50 ! i: l:j0 4 350 4466 4530 4830 5020 5030

5130 5 6 5SO0 '^:::rO -.-n) I

- -:30 6330 7

f q 1^ 7910 8500

O -.1 b 0 9 b 0 0

Q 3900 3 9 1

0

3920 3930 3940 4 000 4 1 1

0

4122 4140 4140 4140

4 1 4 0 4 1 6 0 4 1 70 4' i. ''0 V^:, ;0 ' i 230 -' 3 3 0 4 4 6 9 4 T 7 8 4476 4 4 7 8

4 4 :^ 0 4ri3 43:4:1 4r}\\^ 5 4 0 5210 5 4 4 0 5430 5 5 6 0

5600 6 6 0 5830 5r-:50 53;;:; 5910 6490 6 5 8 0 6 6 3 fi 6670

6740 7 3 9 7390 7

.-'30 ?7^T0 1 ' 2: 9 0 7930 7970 3030 8090

8110 if; 1 1 0 8130 &i7'0 3290 8580 3790 9162

9170 9130 9130 9u:;:50 9260 92 70 9 2 9 0 9 6 0 2 9 302 9302

9310

m 3960 3970

HSL ] 3965 3 9 0 4407 4720 4720 6410 8040

3070 9 5 3 0

fi$ 3970 4550 4570- 4590 4610 4670 4674 4690 4710

4730 4750 4770 4370 4900 4940 7110 7120 7310 7 9

0

8090

B$

ri$

L$

p$

fli

8 1 0 0 3970

3 970

3970

3 9 7 0 3970

3980

8830

2: 9 3 0

6 1 1

0

8 1 1

3 9 8 0

7 7' 8 0

8120

4090 4130 4840 58 ;0 5830 7920 8570 3740 5770 9510

4260 0 12?0 4 300

5390 54 10 5420

6150 69i-4l fi':iftM 8140

5430 5430 5560

7 9 9 0 8 J, 1 0 8 1 1

0

'40 7990

3140

;1 0

K0

100

43 4:;

M>'i.-I HH4|.i

J 9 1! 5070

962

110

i80 5964 6120 6150 7048 I'ObO

E6

Fl

F2

3980

9060

3980

3980

8540

3980

3 0 0

5 0 7 0 6 2 7 90 90

980 5390 6310

4030 4-4 00

420;i

6 J 10 6600

405 440;

4032 4420 4420 6h50 6450

440 4 140 46

540

540 6368 6360 6940 7020

60.:-:4:i 6020 f:4:i30 6230 6370

0 9 i-J 1 4- kj 0 6 C' 0 0 6 6 O 2 6 8 6 2 7 2 4 0 ::610 870!:

F: 3980 5050 5110

170
E - EQUIP CHECK (cont)

F4 3930 3600 3620 8712 37 1

2

Sf60

F5 3950 5930 C- Q "? CT

•J y 1 V.' 6280 6540 3 7 8 6 3342 9055 q r, - 9 2 3 2

Ft. 3930

o i- 33

5940

3945

60 re 9055C 1 0 0 i.lK-O 9 2

.

'

6130 6 1 70 6 9 5 1

3

7 iJ '3 'O 7 740 7730

r 1 3992 90 72

pj 9102 9212r M r . M 9242Is '-I f-. ^-

Fy 3930

H o"-'90 4 0 3 4 446 0 4460 6590 6390 3530

T 3990

7730

4910

7y30

4920 4920 4 9 2 0 4920 4950 4970 4990 5670 5750

15 3990

7340

5950

7 3 5 0

6 2 i 0 6210 7070 7100 7100 7100 7100 7100 7 1 0 0

16

J

3990

3 9 9 0

7130

7930

7200

3030

7340

O 1 C M

7350 7360 7370

Jl 714 0 7260 726 0 7270 7 2 £' Fi 7290

n 3 9 9 0 5640 5730 5730 5760 5780 5730

Ml 3990

y C' ii! y 6590

O Q J. M 6690

'_j .i i~4 6 6 9 0

Q Ci S ''A 6 720 6720 6720 7710 7770 7770 7840

H2 3990

7S70

6590

7S70

67fc0 6 7 6 0 9200o^'^O 9200

6790

-9305

6790 7710 7310 7310 7350

H 3990

6590

7130

8330

5060

6650

9 2 2

5150

6650

c'2-::0 9 2 9 0

5150

f. t. : ::: 0

r

..

' 1

0

5240

6 6 6 0

3 i ^ 0

^"'290

5270

7300

5670

6330

7420

9290

5760

9290

5770 5730

6350

3716

9290

5730

6862

9290

930

1

9 3 3 3 9305 93 1 0 9340 9340

Q -; 1 7 9342 9346

9320

9350

-' —

'

- i1

•-' - 9330

HI 3990

9940

6590

9040

6680

9150

6630

9150

6710

9220

6720

9220

6720

9290

6 ' 0 9302 93 i 0 8930 3930

N2 3990

9390

6590

9305

6750

9309

6750

9309

6730

9309

6790

9310

6790 6 7 9 0 8320 9190 9190

N3 3 9 9 0 5960

3910

6 190

89 i 0

6 1 90

9290

6990

931

1

7 7 3 0 93117340

9311 9312 9320

7370 7370

H5 3990

H6 3990 4330

05 3990 3 320 9130 9290 9 3 '? 2 9330

ri6 v q q f.^ ^_ j_ _, '4 1i ( MU q7 1i 1 t' Q -J p O "' 'J M

P 4000

6700

7730

C; "7 O C| 9 1 00

5200

6760

9110

5460

6770

7 1 ,-'0 8350

9 1 20 92 i ti

7

'

'

2:'

': 0

9 2 i- 0 92o0

6 3 3 0 3^60

9 2 5 0

6600

o ,'3 4 9000

669 Oi 7759

9010

6700

7760

9070

P0 4000 5.200 524 0 5270 ' 5540

171
E - EQUIP CHECK (cont)

PI syyy 5460 55 49 5543 554 0 3V73 3734 87 35 89!j3 3913 3320

9162 9240 9250

P2 4000 5503 554 0 553i::i 3590 6 3 23 3330 6343 3733 3734 3737

9013 9020 90.J0 9132

P 3 4000

P5 4000 5700 5720 5730 5743 5740

P3 4000 7730 7770 7793 7330 7304

00 4000 62.3 0 6 2; 3 8 6 2

'< 3 3

:: "33 3

3

Ql 4000 3726 3363 3933 3930 3940 3973 9013 9043 9053 9033

9130 9140 9150 9160 9332 9333 3' 334 9313 9312 9313 9314

9320 9323 9324 9325 9.":Li>0 9333 9334 9335 9343 9342 9343

9 3 4 4 9 3 5 3

Q2 4330 3360 3970 9833 9193 9200 9305 9336 9337 9313 9317

9318 9319 9320 9327 9328 9329 9333 9337 9333 9339 9348

9346 9347 9343 9358

Q3 4330 3903 9313 9138 9148

Q4 4300 6618 6628 6643

Rl 4008 7300 7310 7328 7328

R2 4000 7170 7330 7348 7578 7630 7350

R 5 4000 7 1 7 8 1 B tJ 7' 3 3 3 7 3 3 3 7 3 5 8 7 3 6 8

S 4330 5240 5270 5470 55 1.0 5648 5738 6598 6728 6798 6333

7488 7578 7678 7718 7378

31 4380 5470 5540 6590

32 4888 5518 5563 6 5^;? 8

T0 4 888 6348

Tl 4000 5900 6628 6643

T2 4000

T3 4383 7158 74 30 7470

T4 4038 7396 7433 7463 7-138 i'470

'

.

' 4010 6 3 3 3

Vl 4310 5640 5740 5740 5733 3593 6733 6733 6733

v 2 4 318 6 5 'ii' 3 677 8 6 7 7 0 i i-' 9 3 7^10 7 320 7 8 2 0 76: 7 0

V 7 4 8 1 8 6 3 2:

8

V8 4010 6833

V 9 4 3 1 0 6 8 3 3

X2 4020

y, 3 4> Id 2: 0 7 3 4 3

?'

" 3 i j I- ' C;'' .

• i ;

! "513 , ' 5 l 8 7' '7> 2 0 5 3 8 754' 0 7 5 4 8 7 5 4 8

7 590 7' 5 9 0

' 3 i 0 7' 1 3 7 3 5 -. i

172
E - EQUIP CHECK (cont)

.K4 4020 7430 7490 7500 r'510 7S10 7520 7530 7540 754 0 7590

7610

4020 5320 5 350

h3

9250

4405

9 5 2 0

5 ' 5 0

':> 5 3 0

I-;: 4 0 '5 3 ti 61 1'" 6 1 1

0

G 8

0

3545 3773 37Sf

h8 4024 4407

F 4040

E2 4050

9 Oi 7 2 '9 1 0 2 9 2 1

2

9 2 4 2

33:;;;: 6

o o J

Pi 3332 3852 3332 3962 3 9 9 i;

4060

n 4 0 7 0

T 4030

FN J 4110

5110

4160

87 1

6

,4 7 f, 4476 4473 4478 4478 4473 4478 450i;

FHF 4122 5210 6490 3772

FHV 4140 4920 4 9 6 0 5 7 0 0 3020 3060 3070 3 070 3030

fh:k 4140

7740

4140

7730

4350 4330

0 {' \' 0 5440

3 730 3340 3 2 1

0

6 6 1^ 0 6740 729(

FNW J- 1 4 0

FNR 4140 5900 6 G 1

0

7150

FHS 4190

5600

4330

6 490

4460

7 3 9 0 4476

?' 9

1''' 0 44-73

3

1

7 0 3290

4478 4 5 0 0 4350 5210 5211

FHB 4330. 4490 5 1 1 0 5150 6020 3130 8712

FHH 4220

6 1 0 0 8712

4380

6190

3716

4400

6210

9530

4420

6260

4.441:;! 6310

4 460

6 3 3 0 44906360

5110

6390

5150

6410

6020

6 4 21

0

645

FND 4712

7 9 3 0 43507930

5040 5 G 6 0

3

7' ""' G 5910

3340

6530 6 6 3 0 6 6 3 0 7430 r 1 ci

FNC 4350 5210 6 4 9 id 6 G 3 0 7930 o r r'

FHP 5720

'5 9 3 0

6 6 0 0

9 0 7 0

7 7 0

9 1 00 9210 2 4- 0 3850

FS

m

cr 1-1 ,-. -, 5970

9 2 6 0

3530

9260

3610

9 2 9 1

J

9345 934 5 m 9020 9 0 2 0 '-5290 9316 9316 9 3 1 6 9 3 1

7

9 3 2 0

N7

HS

8320

8320

3390

9 0 0 0 'i 0 0 LI

9290

929t:i 9 3 6

9 3 . -1 ;-i 934 0 9340

H9 9110 3 1 1 0 9290 9341 3341 9341 9 3 '+ 2 9350

M0 8320 9270 927iJ

173
E - EQUIP CHECK (cont)

M3- : y ^£0 Sy2!^ 89 £0 "£1

M4 - S :..;u yyju 9li £31

M.5 i 3£0 9140 -.'i'Ti:i

::£y 9180 91oU

N7 S 2 y 8 9 1 J 6 89i:i0

lis S 2 0 9 f1 1 & :'iU J

M9 8 5 20 91 £ y -il£M

E y 301 9 3 0 fi H'-; i , -'

174
8.3 A - LOADER

LOADER

175
A - LOADER (cont)

] 0 C0i1 iJf [ J H..l:i: "ij "! ::

I.

'

' i C "J ^ m i. [ : J D I [ o . 75 J Mu j iCFC 2 1'hb. I L 3 ] 3700 Rtrl '1 ML'-- 7: -! : i - J t or '

! SI: 37u5 liin M-i [ r:: ],Li[ 71. i i.. ; i

' 3

7'

; 7 li ill i : I j c l 7 1 j 7. 1

> 7: j , i i h

'

' : J - i ^'i ] ^ r i [ 7 r- 1 1. 1

• £ s [ i. 0 4 :] 3770 171 M T i[ i 4 77! 7l o j:i 7I[ 1. ,1

,

3725 p-NOi

3 70 7 FLfih 1 - / . 37 .0 I' FLO''. 0

' - 3702 lilO.?' " PRINT i-iLL On 1 ^•^O'lO ) " i 3703 IMl-'UT 0 3704 GUT'': 27':'0 3750 01 OP '[ilOP STORhOt70::;i:::.:r:U'r ; 3760 INPU : F7

37C0i IF F7=0! TREFi ::7':^0 3770 SFLFli: 1 3790 REM " TflSK ( Ffa ' : 1 =5 I TE:: OF 01" ? 2 ^^O-jFriO ^ :7^=REN0RK j U==7EYB0hR0 L I MK "

> 373Z Fl==F!--:: = e 3795 F6=3 ' \ 3309 H*^- 'R EH ORE"

3805 D I SP H$ ; ' 0 I TE Iif7TH 1 V= I HI < 0 -i77T

)

3310 IMPUT QO

3815 DISP ^'PRGM CONS'r OHiii FOF OF' 1 I Oi O.. 0=^00 )

?

3S20 II- i POT F4

3 3 25 0 3 -~ Q 3 Fi 0 4T- 1:7 1 0 F 4

' I <d 0 -3840 PRINT Q3 -

' 3915 IF Fl=:l THEM 3900 ' ^ - 3 9 2 0 L I J 1 1 1 1 ^ E '

1

' It < i 0 5 r F L Fi 0 j 2

3 9 4 0 M E R G F: +1 ' 1 V 5 F L fi f: I

^ 4 s 'j 0 > S O

3 9 6 0 li $ =

" 1-^ B S 1 H . 0 5 L. 0 i i I) IF K ' l! 1 f- 0 : T' 2 - F

0

"

^ 3970 DEG

3 9 3 Oi fi = t;: 6 B 3 C 3 = E k: = E 2 - E 4- u. <:. t y F i I r F 5 F S = Fi = L. 1 l-l = i -i 7' = F' i =^ Z = 0 3990 GOTO 4030

3995 R=102

4900 LEF FNJCQ:^

A 0 1 0 G 0 T !J Q 0 F '-I- 2 1 O ? ' 2 0 4015 Fi-1

4020 GnTO 3725

4030 R-7L03

' 4040 H5^^0 4050 REN FiRtlV G ' T j G j f

' 4000 03= PES

4070 Q=INTQ3

4075 FO-^INTC o:!3 Q:.*10;. •. 4 8 3 0 F 4 -~ I !! T ( 1 8 8 * Q 3

•- 1 i 1 1 1 T 1 iJ F: 3

' 4085 F ?' = 1 0 0 0 8 3 - It! 1 i' ! T ' 1 8 Oi Q 3 .

"

'

4120 LOflt riFlTM -H Ok F7, s 4130 LOhli DO i l l hOhO'ET

4150 LOFlI; IihTh SF;., In, i i 4160 IF HUl F4 THEN -+100 4170 iJlSF •RON It";

41;::;0 N: 1^1 . 6 ]-FFiBO i FtlFlr,!. i 4 f.. J •

' 4190 R=^104

4 1 3 5 3 --- [- \ \ Q 3 + F 1

1 F: 1 -i F M 3 1 -f i ' T l 0 .i t f \ ! 7 0 4200 IF NOT F4 THEN -i-iOO 4210 R=:^105 4212 LISP 'OlFlHllGE ONv i'F:On 00; i : F

1 -YES ..^ " 5 4220 M::::FF|B4 + FNi!0

4230 IF 0 = 11 INLN 4 26!:' 424 0 U-FMF13

4250 0010 4190

176
A - LOADER (cont)

42h2

42 cJ

4270

4236

43^0

4310

4315

432S

4325

433e

4340

4350

4 365

4370

4380

4390

4400

4410

4420

4460

4470

4475

4510

4515

4520

4530

4540

4550

4560

4570

4580

4590

4610

4620

4630

4650

4660

4670

4630

4632

4700

4710

472..- 4730

4740

4750

4763

4770

I 3 0 4810

4320

4330

4840

4S59

R-1H6

GOTO ft .f - DI8P "LINK: i=8ITf; rRff ••hiiORK"^

INPUT F6

UUTO 4260

R-107

LINK #a0-5*F7) . R=108

Q=5

Hl=2

85=©.?

e7^i6^L::

C2=N0=2=l

E2=6

E3=3S-'36y0

E5=6'3500

E7=40=349

N4==:30 R5=ll

LINK #(io-5*F7;'. i: p-'ee

R=189

Q-5

LINK #a0-5*F7> 5 <12+F7*<Fb+l >; 550s5O

R=l 10

5EF Fh:

H$=''rlECLir _>- I jKLhriv'PQr; 31 B$="12345d?8'?8 " GOTO Q OF 529055530^5" 13

GOSUB 4580

RETURH 0

DISP "N DflTfl VIA 5=EKT CfiSS?i0^1NT CRSS'

INPUT Q

ilHT H-ZERl 26^1 J LORD DRTH #Qj 10,

H

RETURN

R1=H[ 1 J 1 ] H2=Hr 1,2]

h3=H[ 1 j3 J B=H[2? 11

]

B0=N[2< 10]

82=H[ 2- 2

:

B9=H[ 2- ? C=Hr3. 113

:-=•_ 3j 10 j C1=H[ 3j 1 1 C2=Hr3.2 J C3=N[3,3

J

C4:rHr3,4 J

C7=rlL 3 - 7 ] C8=K[3.3]

Cy=HC3»9]

177
A - LOADER (cont

4i r.e li --'W--, 4-ill]

4570 r9-:N[ '+ J .1, '•'. ] A y y 1 j 1' 1

^-'^ i[ ' hi]

43':m::I !

"' — 1 ! i ' 1 ) ^' J

Ii.; = iir -

1 ? I 491 y ji 4-=rj:; t - 4 J 4? .:u 1Vv^ :k - 1 J 4 9 U li o -- M ;„ \ f 2 1 4 9 40 L ':' ill • T J '7 ] 4 9 9 u t. ' 1

-1 L

' j 1 1 ] 49r"0 F^^M[ - 1 1 ] 4

9"' 0 ' ], y J 49';;n f- 1

=: 0

5 u !J i-'i G -^i h: 7 1 1 ] 5 0 1

U

G4^4;l 7 1 4 ] G j = N[ / 1 J 5 0 3 fj Gb=-f-i[ 7 , 6 ] 564 0 H = Hl 3 1 1 J 5050 H1=i1l 3: J 1 ] 5oSo rl j = N[ 3 1 5 ] 507'0 H9-NC :-, ,

-\ 5080 L--ML 1 2i 1 1 j 5090 LI - r;[ 1 V , 1 5100 L5~!iL 1 d f 'j ] 5110 L6-HL 1 2 !' 3 -i 5120 L7 -fiL 1 C. ? i' J 5130 LS=4|[

5140 L

'-1

1 i L 12i 9 i 515 0 M = H[ 1 3M 1 ] 5160 h;=4-l[ 1 4 < 1 1 5170 HI -HE 1 4- i J 5130 N2 = Nl 1 4 H 2 ] 5 1 9 0 H5-0

5200 Nb-N[ 14^3 1 5210 H7 = H[ 1 4 1 7 j 5215 U3-4i[ 1 5 J ] 5220 T=Hr.?:0j 1

1

J HE 2;3, 1 1 ] 5240 TRFlH?;fef: T 5250 RETUF:H 5290 Q=-FHI

5300 PRIi ir TF!L;31 ? " PFnjG GUHGTi ' 5 3 1 0 h -

' H B L- h b r Ij F! i J 1 \ L i i ! i u i L- : K '»>

i U V U

',

' i' 2

'

'

5320 Q1=0

5330 02 ---10 5340 FOR 1=1 TO 26

5350 FOR J-^=l TO 11 5330 IF H[ I , J ]-0 THEN ::.4/'0 5370 Q 1=01 1-1 5 3 3 0 V 2 -- L! d r 2 ::! 5390 IF 02 :: 5 5 THEH 54 lO

5 4 0 fi I J 2 = 1 Gi 5410 IF Olf:! rhEH S4 4i:i 5420 RPJMT

5430 PRIHT

5440 F'RIiir THU:::2^ Hl:[ M. Gi; hiiilij];

5450 IF IHT'; 01 --O -01 ;; nit i.; :4'G0 5460 PRINT

5470 nf:;t j 5430 U2--10 - 5490 01- 0 5500 HF7:T I 5510 0 r M ; 2 + F N [5

5520 PL 1 HPM 0

178
A - LOADER (cont)

5530 R=- 1

1

5540 niSF -WHICH P-OG T 5550 I'i--JT -:*E 1 j 2 3 5560 :•• 1-1 j='"8" THEii

5570 - ' -i':- :

T

,

5580 :^ >

" 5590 V , 5600 .j=P0S';E:^ ' E i. : : 2 : 5610 ]jI3P "r'E . .-„u£- : . _ 5620 IHPUT HL I? J]

5630 GOSUB 4650

5640 GOTO 5540

5650 R=112

5655 LISP "STORE H: 0=H0»5=E:u CnSS^ia^INT CflSS"?

566y INPUT Q

52": :^ 2 THEH 56S0

56.E

-J 5700

5690 STORE DfiTfl tQ-lu^N

5700 RETURN O 5710 GOSUB 4650

5720 RETURN O S000 N=113

8010 M=S

S020 N=K+1

8030 h=n+l

8040 LCfiD DHTh H 8050 STORE PfllH s5?H

8060 PRINT 'DISK 'ILL iihifi- 8025 ^^IHT Th&15^ 2nt;-;::22 2 . / ^ ^

' PUM.-sr-^" ' 1 j/lSOr" EL="BE4,2j

82 \ -

- :HT TRBSjSJjPx, FR£2 ":nL2 ] 10U2

b222 FR. IMT

8085 PRINT

8090 bOTU 8020

179
A - LOADER (cont)

5530 5b5Q

fl 1 39SS ;

Fll I 433U 4.1:53 .

h 2 1 4 6 6 0

iH3 1 4679 ~"

B 1 468e \

EO 1 4bS2

B 1 !

^ B2 i 4700 - . -

B3 1 4710

84 1 . .

B5 i 4340

Bb 1 3930

'

B9 1 4740

C 1 4750

00 ] 4760

02 1 4360 4:3:,i'i

C4 1 4300

C5 i 4810

07 1 43 2:0

C3 1 4 340

C9 1 4350

II 2 4360

DM 2 4370

lU 2 43. :0

180
A - LOADER (cont)

489S

t;

- 4900

I - _ 4918

2 4928

LS 4939

D9 494 y

E 4956

Eli

^ 1

— 3988

E2 3980 4370

E3 4380

E4 2 3930

F5 2 4390

E6 2 3980

E7

E3

2

2

4400

E9 3980

F 4968

F0 3 4970

Fl 3792

F2 2 3980

F:5 2 3980

F4 2 3829

F5 3930

Fc. 3795 3325

F~

- 3769 37:

F3 3930

F?

-

G

- 4350

G4

- 7010

G5 5020

_;

"_ = 030

H

HI 5050

?b0

280 4450 451

181
A - LOADER (cont)

HSH9

I

15

J

•

Jl

K

Kl

K2

K3

K4

K5

K6

k7

K8

K9

L0

LI

L4

L5

L6

l7

L9

M

M

1

h2

N3

HO

Ml

H2

H3

N4

5069

4 3 J 0 ? 'j ' J 5340 jJt.H '.-140 b5iJii 5570

5350 u'itu 5440 5440 54-40 5 4- 70 5600

3yo0 5i-'i:i0

5100

5 ], 1

0

5120

5130

5 140

5150 &010 i40

3yyy

10

5170

5130

4-:ii-:,.iJ

4410

182
A - LOADER (cont)

N5

H6

H7

US

H9

P

PI

Q

Q0

Ql

Q2

Q3

Q4

Q5

9.6

9.7

Rl

R2

R5

4230

5fc?0

4S3i

4040 5iyjj

5200

3930 521U

3930

-y •-.

-_• I _• 4240

5698

3310

5320

5330

3792

ii 1 J

4420

4000

4325

3825

5-J o *J 3325

40 '>3 ifi '0 4075 4120 4139 4156 4195 4220

4 559 4590 4520 5290 5519 5666

5370 5410 5450 5450 5498

5330 5390 5400 5446 5489

3325 3840 4065 4070 4875 4080 4080 4085

T

Tl

T2

T6

T9

U

111

522M

VI

183
A - LOADER (cont)

Zl

FNR 7

FHB 7 4130 4?.:::i;:i

FHC 7 4195

FND 7

FHE 7

FHF 7

FMC 7

FHI 7 52-5y S51U

FN J 7 4000

Fill-: 7

FNL 7

FMi1 7

FHFI 7 4180

FHF 7

[MO 7 4195 -il--

184
A - LOADER (cont)

FUR 8 FH3 3 4195 4;! ;'':i K S ]

i;

i

FHT d FNU 3 FHW S FHK 8 FHV 3 FHZ 3

FilC ] 9 16 y0b5 B&7ii

BE ] 9 3710

C[ ] 9 3710

DK ] 9 10 3065

F[ ] 9 3710

G[ ] 9 3710

NS[ 1 9 3710

HS[ ] 9 3710 4i.5i:' 4300 4310 4

f

4910 4920 -i 5040 5050 5 Or..; 5 1 5 0 5160 5 i I- 5610 5620 5o90

SSL ] 9 3710 4120

TI[ J 9 3720 4130 5243

XC ] 9

D$ 13 3066

H:f 10 3960

P* 10 5240 yi:j!"ii

3$ ]0 5553 5500 '^.5,.;^ .^bya .::i.i70

X$ 10

E$ 10

H $ 370 5 3 8 0 0 . : ij ' . -i 'j 1 J 5 i 0 5 \ 4 3 L* 3705

37ti5 4543 '

: I

!- :

'

> . iji

:

M ] 3720

ZIL J 3720

L 5030

30 4b 16 4620 T 6 5 4670 4 6 S 0

4

" '

; 1.^1 4730 4 790

^i350 4360 4 "-! 00

4970 5 0 0 0 1 6 502 0

^0i'0 50 3 :;J 5 (J 9 0 5100 5 1 i 0 20 5140

71 so 52 00 5210 5215 36 5440

185
8.4 B - SITE PREP

SITE PREP

@) RUN, DATE, SITE @) F, BW, ELEV, ANT

(22§) ANT PT ERROR

(|T9) G/T, T, Ta

(221) TEMP, DEW PT (fU) SUN/MOON

PRINT SITE, FLUX DATA

186
B - SITE PREP (cont)

3700 Hi="HBSlB. 0i 3 7 0 5 liEG 3708

3710

CFLFiC; 9 hi 3 ]-803

3715 Rl 4 ]=^462

p- :-- ri 37^:^

3 730 Q=^FHJ1+FHJ2 + FNJ3 rFNJ4'N'

Z' 1 O "l" r,MTn 3975

3740

3 7 4 J DEF FNE':N0>

3750 REN <ME;S 99 1 3 ) 3 5 o E 0 = 0

3 7 6 0 El=50*( 1 /Kl

3765 IF Ba4 THEN 37S0

3 7 7 0

3 r I 5

iL. — ""-I GOTu 3795

3' 7 3 0 Q0=4. 73*(5. 9-B0 ! 5 . 39 '

-

'

-' '' ^' Ql = ': 7. 12-E0 HE:-- 12-- 3 7 9 0 Q2=0 . 1 5+0 .

3

5-+*( fi hi -+-1:11 > 3795 P1=2*SG!R'::Q2 t2-+-13*ii2T2)

3300 E2=(a-K2::'* Rl-i-Dl' 3 y 0 5 E3 = (H/F/2E + 03)12--5O

3310 E4=0„ 4*E0*B o-Kl, |...^o[r^

3315 lit! -80* Ii5* 3 . 7S4/B

3320 E5=< 1--(SIH < Q2*130'^PI V-

"' d. 5 Ee^0, 023*T[ H0' 1 1 ] 3830 V=1+FH2H0*G T 3335 Y5=Y/<V-1

>

3840 E7=SQR( (09* V5)T...:-'-H2t2:' 3345 E8=i 00*113* ( 1/KS-i

)

3350 E9= 100*1)9* ( l/K9-i > 3 o J 5 RETURN 0 3860

3 3 6 5 DEF FNMMj;.

LISP =Hr:;'NON; J 31 ,- 5 INPUT L*

3 8 o 0 IF f HEN 3390

3885 H$ = L*

3 3 9 0 RETURN 0

3 31

9

LEF FHF': Q;' 3 8 '~J J GOTO U OF 4170

G 0 J 0 4 8 7 0 3900

R^204

DEF FHJ'Q;.

3905 GOTO Q 01- -I- 1 ^?0 ? 'j 1 9l:J ' Zl

3910 G 0 T 0 Q - '3 0 F 5740- 0335:. 3915 GOTO 3975

3 9 2 0 R-205

3925 DEF FNT'.:Q ' 3 9 3 0 FOR ;:!-] Ti:J i--;2 U^RL /A ] 3940 V:4ir J« 0 ] 3945 URITL 15:^ bG70)V HJiJ?

3 9 5 0 N[ J' 0 ]-r1[ J;. 6 ] + V* 1 00

f'1L J' 7 ] = J ! 7 ]+';; Vs ,1.00/

1

3 9 N 0 in-;;T :i

3' 9 c '

5

REIN 1

2-F 1;

-

1 ! J 3. t r- \ -I ..

i 7 + F H J 3 1- F N ...1 3 + F [ \ J 1 3 + f \-. J 1 1

-^ F i- 1 .112

2-i-0 . 4'

( 0! 0 /

1

4 15' 5t 4915? 445 I J ? 5980! G 3 -\ 0

3970 RETUF N 0

187
B - SITE PREP (cont)

3375 F: = 2j6

398i3 PRINT

3935 niSP Ti:::R;:/rRTs l- L.i< MP rV:: :^ :;:: = i. i< RNRK ? 3KP VS LIST"?

3398 Q = FHB3 + PHrli;i 3 9 9 5 G 0 T 0 Q 0 F 4 id 5 5 ? 4 :l, 4 5 ? 4 00 5 4000 GOTO 3735

4005 R=^:307 4010 Q=FMS2

4015 PRINT TFii3 30^ "KEYS"

4020 PRINT

402 5 P F; I ^1 T " 0 = N i-i I \-\ 0 f T 1 :

i \\ 2 1 = R i" i # n T fi T E. ? i... 0 C 2 = F > B Im ? |-i 1^^ T 3 Fl \\ T P' T E R P. " 4030 PRINT " 4^=^G -T? Th T,, , Piip =;; = T::np„ nrt,' pj F^SUN - MOOr-i ? = PRT FTFlP &: U

4035 PRINT y = CHLC FLUX 9=4'-'Rr i 'P VfiLUES lO^STORE S^TjN ll^^FRT ALT STFiR: 4040 PRINT '12==EL.EV GITT 13- i-iEN HdjJ)"

4045 Q-FNS2

4050 GOTO 3975

4055 R=208

4065 Q-5+FNF1 ' 4070 Hi ^^2 4075 E5^0.2

4085 C2 = N0 = Z=^1 4090 E2-F

4095 E3=30 •3600

4100 E5-6/3600

4105 E7=40.349

4110 N4=30

4115 R=209

4120 R5-11

4125 IF F7 THEN 4140

4130 DISP 'TiPiTFI TFIRE lN PLi-iCP ' ; 4135 Q=FNe5HFNNl

4 1 4 0 LIN # 1 0 - 5 * F' 7 ) „ 2 i-

'

"! F" 3 7 O : ;: ^ ?; 7 7 7i 4145 P-21U

4150 GOSUB 4170

4155 DISP iJHTfl RENORK ;nPE:/riISK IN PLhCE"?

4160 Q=^FrlB5 + FNLIl 4165 LI PI \ it :; 1 0 5 * F 7 ) I 2 + A + P

7'

? Z O > 7 0 4170 R^=211 4175 IF ::.TfiT10 >= 4 TilEI-l '-ll&i 4130 RLMIPiD

4185 RETURN O

188
B

- SITE PRE? (cont)

4iSa R=diL

4195 E=TC 14,93+28125

4280 SISP "CHflriGE RUri , ^- 4205 Q=FN&2+FHHy

4210 IF \m Q THEN 44^5

4215 DISK "RUH HUMBER'

;

4220 Mfc=FN£.3+FflHHb

4225 DISP "YEhR";

4230 pJ=-5: 9? 12]

4235 :: 4240 12 3=HS

4245 Ei=VHL4H*>

4259 BI3P MOHTH";

4255 H$=P3r4<b3

4260 Q=FHn5

4275 E2- - : : i - i : ^ 4280 IF E2 = 2 3 "-Er, --.^

4285 F$L4!i6 3=H*[3*E2-2?3-E3+2 J 4290 DISP "BHt OF HOHTH'^

4295 Hi=P$[75S3

4300 Q=FHQ5

4305 Psr7?S]=ri$

4318 E3=VHLCii*>

4315 Q=(El-1900>-^4

4320 Qi=lHTQ

4325 M2=4*<Q-Ql

4330 J=IHT^<e2-3.- 4 4335 IF E2>2 THEN 4358

4340 Jl=a

4345 GOTO 4355

4350 Ji=l

4355 E=31^(E2-l>^E3 + Jl^^<-iHT=:':S.4*r2> --E-Sj + l-JS+J*? 02*365?^ 4rcQl*3o5. ZS;

43Em 1 i • ? : = E-E 1 1 2 j 4370 C£:=^ . : yc7^Ql+3i:;j. ^r":",; - :rJi ^"E5)^^53.2iC2

4375 C6-: : 4380 Cg=3ci.r .C6-IHTCS>

4385 DISP 'DRY OF REEK =5 43=1!' H*=P*C 1j3]

G^=FN09

44Dy P$[ 1 ?3]=Hf

4405 LISP "PROJ # ; 4419 H*=P5L 13^20 J 4415 U^Fm?

442y P*[ 13-20 J=H*

4425 IJISP "LOCHTIUH-t

4430 H$=Pj[21..4yj

4435 U=FHu9

4440 FJC 21^48 l-HJ

4442 Q=-FNF0

^445 ^E'.'U 0

i

189
B - SITE PREP (cont)

4 459 R = £13

4455 i>199u+ T[ 14^911. ;-;K'5 4457 DISP "FRT SITE/':, rhf' Ij- 1 1 , r ;ij ^ 4458 Q^^FNHl

4459 IF Q=9 THEN 4795

4469 Q^FHC 3+-FHI5 tF:MSl 4465 FORMliT 5::< "SITE- iJ. i... ir|'." r- 3' M : [ J" . lO: , " I T T T , j r ; c" 4479 NRITE ^ 15< 4465"' i.Mri Ti J -!!•'.: IE. Oi i. IT^' 4475 FORMFiT 3F13. ::?2F iu. 3 4489 WRITE ( 15 - 4475:' r 4^ " J. ; ^ C5 5 "

, CO. "

I- : .-'i "

< 06 i " dc ?

" 4485 Q=FH32+FNI5

4498 PRINT THB34' "FLU;-; DnTi i 4495 FURMHT F2. 9' F3. " ' ' . F 5 . 1 . 1? ' . F4.

9

. " CHz " ? F4 . 0

' 13" . F3= 9 4599 FuRMRT F3. 2- Fy. ;, , " h

' 1 itj = 3 4595 FuRNf-iT Flu. 1 = F7. 2j ' r

'

' r 5 . 2 5 n • i r " 1 F35 .3." +-".F6.3. ./ Y

r

4510 PRINT

4515 PRINT " SThR"Thih:i:"' K li

.

"TRE40 F.flHGE';'ilHr> 31 ZE !! 1 n > "

; 4529 PRINT 3PEC lUDEX"

4525 FORMhT " Epoch" H&K .-'seciU'X^ L e- c J y

' :* l1 \ . " 3 ecu 1 0, r E;::f ii ns 1 on

4530 WRITE '::i5'4525:' 4535 PRINT

4540 FOR 1=^1 TO Nl

4545 TRFiNSFER T[ I j 1 ] iO 3$

4550 WRITE '- 15'. 44^5,' T

' •|, rr ^ . 3 ] 1 T[ 1 . 13 J lOO. T[ I 19 ]. TL 4555 WRITE 0 5. 4509 VIC I < H J r( I > r. ]/10O 3. T[ I . 7 ] : 003

4560 IF FiBSTC I " 4 ] + HE3 i L I 5 ] + Hb3 Ti. 1 1 3 hB3T[

I

. 16 ]^^RE:3T[ LIT THEN 4 4565 Q=Tl I ? 5 ] 1 009

4570 WRITE 15? 4595 ' TL 1 , 15 ] 10. Ti, J 13 1 100. T[ 1.17 ]. 100. T[ I . 4 ] /lOOO.

Q

4575 PRINT

4580 IF I.•-3- 1 NT': I. 3:' #9 ThlE hi 4 500

4535 PRINT

4590 NEXT I 4595

4600

Q=::FH31 + FNI1

PRINT TRE3n. 'FPijG CON 31 :'' 4695 FORMRT H T'.:H< 1

' 3' N. 1

': N . 1 3 ::. " 4619 WRITE ':: 15. 4605> " [nh i 3- 30 1 T 1

-1 ^

-1 > T N

.

6 ) T ':: N . 7

" 4615 FORNRT 4;-;. "Ta-J. 15 '" T 31.17 . ' T '; w . 4 ;' T (

t

1 . 5

)

4629 WRITE ': 15.4615;'

190
B - SITE PREP (cont)

4625

4639

4635

464U

4645

4650

4655

4660

4665

4679

4675

46S9

4635

4699

4695

4799

4795

4719

4715

4729

4725

4739

4735

4749

4745

4759

4755

4769

4765

4779

4775

4789

4735

4799

4795

4399

4395

4319

4315

4329

4325

4339

4335

4349

4345

4359

4355

4360

4365

4379

4375

4339

4335

4399

4395

4999

4995

E:

11

iFiVS RFTbK 197

I L 1-

H . LEC 5 9

'

'LIHEflR FOLZ" - 12K

'GHR Hr-" J 5X? "H, DEC- Hr

R^214

Q=FHS2+FHI3

PRINT TR&39! "LOCririUi

PRINT

FORHhT " SThR Er'OCli NRITE ('15- 4645 ;.

' SOL Ml FORMRT Fli.3iF13.9-;":: . i:!=^1999+^^2S125 + T[ 1-^- Ql = 1990+' 2S125 + TC 14- 16 ]) WRITE a5.4655)Q,T[ l4,9 J Q=FHS2

FuRMhT 4X< "STAR: " - eX? "RT. RSC"

^

URITE (i5j468e>-i-'Ut.2 nWh

F9RMHT 4X<"3ULRR^ GHH ? 9 GMT

WRITE ( 15? 4699; "HOR PRLX PHRSL"

Q=FH31

FOR 1=1 TO HI TRRNSFER T[ I ? 1 ] TO S$[ 1^5]

FORMRT F2.9jr9.2?" de9"Hi-S.2'" de^"

WRITE (15^4715)15" " . S* 5 S[ I ? 2 ] - S[ 1 , 3 ]

.

IF T[ l!i2i ]=0 THEN 4^56

FORMRT F10.3j " de9" > F8. 3^ " deg" » F8. 3j " ds-g" j F4. 6^ " day

WRITE ( 15? 4739)T[ I 1 1 ].- l999i TC I • 12 J/ 1909? T[ I ? 13 ] i860? T[ i ? 14 ] GOTO 4755

FORMRT F3.1?" +-"?F7.1?" •r'-FlO.i?" +-"?F5.1?" LEG"

WRITE (15.4745)Tl I? 11 J/10?Tl 1? l2]/19?T[ I? 13 1^19? T[ l> 14]/ 19

IF I/3-INT( I.-3>#0 THEN 4765

PRINT

NEXT I Q=FNS1+FNI1

PRINT TRE31 ? 'PROG COHSTS^'

FORMRT "_H T(N?1) S':Nj2;' S(N? 3) " ? 6X? "T(N? 11 :^ WRIiE ( 15? 4730) I ^ H? io l'.:N?i4i Q=FNS2+FNI3+FNS4

RETURN 9 R=215

RESTORE

READ T[ 14?9]?S[ 1?2]-S[2?2 J?S[3?2]?SC4?2]?SC 1?3]?S[2?3:

r ( N ? 1

:

, 3 ] , 3 [ 4 , 3 ] DRTH -739? 359. 573 ? 299 . 654 ? 33 , 2' E6= ( E-2S 1 25-TC 1 4 ? 9 ] )

. -365 . 25

FOR 1=1 TO Ml

IF T[ 1,21 ] THEN 4355

Q=(0. 012397229+5. 56679 1 7E-0 ;---S Ql=5. 5667927E-93*C0SS[

I

, 2]*E6

SCIj2]=S[ I?2] + Q

S[ I.3] = S[ I?3]+Q1

NEXT I T[ 14i'9]=E-23125

IjOTO 4459

R:-216

niSP "SITEiW. LONG";

C4=FNNC4

DISP "3ITE:N.LRV5

C5=FNHC5

DI3P •SITE:RLT(KM.'";

C9=FNNC0

RETURN 9

51- 58. 6812? 40. 6516? 21 4039

I?2]*TRNS[ I.

191
B - SITE PREP (cont)

IF HOT 0 THEN 5171:1

Ti: 14, 10 ] = T[ 12< 10 ] SEF;ROR Ih 4945

4945 HU=^^5 + FHS2

4950 PRINT "FOi.„l..UWlHr, IHROTS ORE iN',": EfiRTS : 1 ;vl =c:!p-^< j 4955 PRIilT "IF DEC IE SouU-i: enter de=^ end run HEGhT

4975 Q=FNNS[ NO ;i

;

m'

"1 4980 DISP "MIH"i

4 9 S 5 Q0=FNH0

4 9 9 0 S[ NO J 2 ::i = Q + i'3 0 .- 6 0 4995 DISP S$; '

:

1 iHH 0 1,:: i^HT">; 5 0 0 0 Q^FHH': S[ HO :i 2. ] + 0 :: ti 1 2 -Fit i'lO 1

1

5 0 0 5 DISP "MJN^'

l> 0 1 0 Q0==FNN0

50 1

5

Q 1 = 0-1-00/60

502 d IF Q1>S[N0 ;i2] THEr 1 5030

5025 1 J 1

-- Q 1 -I- 3 0 5030 TC HO) 1 1 ] - 1

1

dOiii s K I.! 1

-si: ho? 2 ])/

5035 DISP "N.LEiZ 0 0 Qv]]• ; 5 0 4 0 Q"FNNS[ NO;

:

3 ] 5045 GOTO 5050

5050 DISP "NIN"

Cr i-j CL- LT •J U Q0=FNN0

5060 IF SGilQ 0 THlM 5U 1 0 5065 0 f1 - H E:: '6 U k) 5070 SI HO? 3 ]--Q + Q 0 6 0 5075 DISP "N-DE C: 0 1 2. (:iHT"

;

5030 0=^FNN(SC HO J 3 "1 + 0 , 0

:

! 2^T[: NO; 12 5035 GOTO 5090

5090 DISP "MIN'

5095 Q0-FNN0

5100 IF SGNQ

00=-flBSQO

0 THEN 5 1 1 Ci 5105

5 ] i. 0 T[ NO? 12 J=l 000* (

IJ !(;)0--'6h- Sf Nk: 5115 IF HO- 5 TF! EH 5100

5120 DISP "HOP F'hphei. h;^ 5125 Q=FNN': Tr tJO , 13 ]/10.T 0

!

'

5130 IF Q<2 THEH 5150

5135 DISP "ERRii R:HuR PiiRHi l,h2 >,: 5140 0 = FNES I'F MS 1 5145 GOTO 5120

5150 DISP "MIN"

5155 00 -:4 NiiO 5160 TT HOn 13 J-i 0 0 0 <: Q T1

-!0 '60 5165 DlsP 'HOE (DOTS ' 5170 i [ H0< 14 ]M- HH 1 [ Hn, 1 •! ]

4 9 6 0 4965

4970

Q:.pK|Si+FNBS

TRANSFER T[ fiO? 1 1 TO S*

DISP S$? "

:

GHh 0 0 GNT" I

REfORH 0 NO^E

GOTO 49i55

192
B - SITE PREP (cont)

5190 R=213

5195 D I S P

" M E N F . B N / E L £ V / H W f C 0 \ I T ( 1 - \ L £" ? 5280 Q=FNN0

5205 IF HOT Q THEN 54 18

5210 F1=0

5215 LISP "CENTER FREQ-n:]HZ " ii 5220 F=FHHF

5230 110 = 0 . 9/F T-2 5235 raSP "ERR IH FREC-: ;)";

5240 F0=FHHF0

5245 niSP "BHNnWIDTHCMHZ) "

;

5250 N=FNHN

5255 niSP "ELEV(riEG) "

? 5260 L = FHiJL

5265 niSP "RHT IHhM vFTV;

j270 r! = FHNIi 5275 liISP "1=HPR EFF,2^Hi-IT l-IPBN ! 3 = CMVL HPEW;

5230 Q=FNH0

5235 GOTO Q OF 5290 ? 53 1 u ? 5350

5237 GOTO 5330

5290 DISP "hPERTURE EFFICIENCY"

5

5295 B2=FNHE2

5300 B e = 3 0 3 5 / II . F * 3: Q R .. B 3 .• - B 2

)

5305 IjOTO 53^:15 5310 niSP "FlHT HPENdiEG)

;

5315 Q = FNN(B0.' 60)

5320 B0=60*Q

5325 B=B0

5330 IF B>14 THEN 5330

5335 Q = 4 . 248-1 . 1 4£3*BO+0 . 1 0259i 30 r2 . 0030247*B0t3

5340 B=E0+Q/(2. 1463-0. 20513*30+3. 009074 i *B0t2

)

5345 GOTO 5330

5350 nisP "CNVL HRBNcflEG)";

5355 Q = FNN<E/60.:'

5360 E--60*G

5365 B0=B

5370 IF Bn4 IHEN 533m

5375 B0--4. 243 + 2. 1 46:;; -;-' -0 . 1 0259 ;tB-1 2+ 3 . 0030247*Bt3

5 3 S 0 B 2 = B J ( t; 3 ^ U !- - 3 0 3 -

1 2 5335 G = B2+a:! + F u. J 1 3 ^ l ? 5 3 9 0 B 3' ^ 2 * C 1 * ] . 3 3 ij 5 . \

- ; ,r 1.. 5 3 9 5 E; 0 - 3 0 3 5 Ii F

'- Q - C :j B 2 /' 5400 niSF •'UPBW ERR( [S^'O "

? 5405 D2^FNllIi2

5410 RETIJKI4 0

193
B - SITE PREP (cont)

5415 R=21y

5435 nior "CHRi-iGE: 1~ i ..!... ? , Tdiri: ' 5 5440 Q-FfUiy

5445 GOTO Q OF 5450) 54, "0 5447 GOTO 5515

5450 nisp "TaC'^";

5455 T=FNNT

5460 N=G-T

5465 GOTO 5515

5470 DISP "G.- TdJB

;

5475 0^1G*LGTN

54S0 Q=FNHC!

5435 M==10t(Q/ 10)

5490 T=G/M

5515 niSP "OHflMGE: l^G 'TH. 2=70";

5520 Q=FNM0

5525 GOTO Q OF 5530)5550

5527 GOTO 5560 • 5530 DISP "G/TR':.dE:/K ':' " ; 5535 Q^FNHC i0*LGT<G.- H9

5540 H9=G.- 101(0/10)

5545 GOTO 5560

5550 DISP "hDDED noise K) "

S

5555 H9=FnHH9

5560 RETURN O 5565 R^220

5535 DISP "HNT PT ERR : 1 = DEG h i^-=".MPEiUM" ? 5590 O=FNH0

5595 IF Q-0 THEN 5630

5600 IF Q=2 THEN 5615

5605 DISP "DEG";

5610 GOTO 5620

5615 DISP HPBW;

5620 D 5 = F N N ( D 5 + Q ^= 1 ) i- D 5 * 6 0 O 0 , B O . Q - 2 ) ) 5625 IF Q=l THEN 5635

5 6 3 0 D 5 = D 5 E O 6 O O O 5635 O2=60*D5*2. 7S4/B

5640 E 5 = (1 - < S

I

H '.. 0. 2 1 1 S: U F' 1 > C: 2 1 2 > * 1 0 0 _ 5645 H1 = 10*LGT(: 1+E5/10U

5650 PRINT

5655 PRINT "HNT PT ERR c o r r ti Pond; to G-T dn.tn fit. ( 3* 1 S -- SQR ( #PTS > of"jHl?"dB

5660 PRINT

5665 DISP HI ; "DB: 0 = TRV hGhIH^ '> 5670 Ul^FNNl

5675 IF 01=^0 THEN 5600

5630 RETURN O

194
B - SITE PREP (cont)

5£85 R=Zdi

Z-cz' DISP "RMBIENT TE!'IP';F)"5

5?ia Q=FNH<fl[3].-'ie>

5^15 H[33=Q*ie

Zrzd DISP "DEW PT TEnP F ;

5~I5 Q=FNH<flC4 3^-l@> 5758 HC4j=ie^Q

5735 RETURN 0 5740 R=332

5745 DISP "STORE 3? T ? ri: 0=Hy , ^j^tXT? 1 y-^lHT" 5 5:^53 Q=FHB2+FNHe

5755 IF HOT Q THEN 5?55

5766 HCl? 1 j=Ri

5765 H[l)2]=Fi2

5770 H[£< 1 1 ]-B

5772 N[2? 18 ]=P0

5775 NC2jy]=E9

5730 HC3? i j=Cl

5735 H[3^4]=r4

5790 HC3j5]=C5

5795 Hr3j6]=C6

5S00 HCS? 19]=Ce

5305 HC3j 11]=L.

5310 HE 4.' i ]=D1

5315 HC4j23=D2

5320 H[4?3]=D3

5325 HE45 10]=D0

5330 NE4? li ]-D

5335 H[4!.5]=D5

5340 NCe? 11 ]=F

5345 NC7? 11 ]=G

5350 HC7.4]^G4

5355 N[7.-5]=G5

5360 H[7?6]=Ut.

5365 HC3j 1 ]=H1

5370 H[S.'9]=H9

5375 NUe? i0]=F0

5330 H[ 12? 5 ]=L5

5335 HI 1256 ]=L6

5390 HL 12?7]=L7

5395 NC 12j3:=L5

5900 NC12?9]=L9

5905 HE 13. 11 j=M

5910 HE 14?6 J=N6

5920 H[2ej 11 :=T 5925 HE 25. 11 ]-U

5939 STCRE DHlH sQ.A.s

5?:5 TRANSFER ft- TO Tl9.1j

5948 STORE DflTfi f 5r-i5 STORE DfiTfl #Q. lu N 5950 REWIND #Q

5955 RETURN 0

195
B - SITE PREP (cont)

u4by

5965

5970

5975

59S0

C| q

c- 5990

5 9 9 5 6 0 0 0 6005

60 1

0

60 1

5

6020

602 5

6 0 3 0 6035

6040

6045

6050

6 Id J 5 6060

6065

60 70

6075

6030

6035

6088

6090

6 0 3 5 6100

6105

6110

6115

6120

6125

6130

6135

6140

6145

6150

U55

6160

6165

6170

61 75

6 1 80

6135

6 1 9 0 6195

6200

6210

6215

6 2 2 0

6 2 2 J 6 2 o 0

6 2 3 5 6240

6245

'<F .- TC T , 18 ] + 100)tS

![ 1 s 1 S J * 1 03 < 1 ) ) * ( T[ I ? 7 ]/ 1 E + 03-:-Ti:

t'lFlT M = ZEF;[ 10, 20 j FOR r^a ro Ni

0 = C-'T[ I J 15 ]/ 10

S^=T[ I « 6 J. 1E + 03+ ;

; i, , i- \ > i\ ^ ].r r n Q2-E/;p'::-l [ I

n It, ], : E Mj:i-.0 ' ^ BL I 15=81 I . 1 J M [ 1 , 3 ] : i: :i r3 ^ S; I 1 1 N = S+( ( (F/TC I . IS i^iOiV:' ; - 1 H3~f + ': (M.Mj/'-^fKi;! > • EO iOu

n^=EXP(-T[ I 16 l/lF -0 rHr.i + i:;::;*';i-i3.. l i; I ? 13 ]+l00> tH

T[ I

> 10 Q2 .'/i;'2 13 ELI? 4 ]-^n2

H[ I ? 1 J = T[ i J 10 ]/ 101-3 NEXT I SFLfiG 1 RETURN 0

R = 224

LO=L - —

N0=1

Q-FHC'; 1 ) -fEN82

F' R I H T T' H B

1

3 ? " T 't' F- i C 0 L V I 'l F 0 E S i

' o r G' T' N E R 3 U P. E N E N T u s i n -^i € h S Fl

'

Q^-^FNS2

EORNrFT " G i UPEE tFF RFiL EPF

N F-: I T E ( 1 5 H iE: 0 7 O

>

" h

H

T i\ i 'b

1

1 r i ;i \\ \; i . h f E,; N E F F h R

E

Fl

F 0 R I'l Fl T F 6 „ 2 ? F 3; „ i. . "I

. " ? f^

'

, h , \- ] q . , f' 11.4

N R I T' E ( 1 5 H 6 0 ;3 O 1 0 L G T i; "

.J "

^ T ? E 2 3; ? B 0 ' 6 lO ^ E

' 6 0 FORMFFT / J , 3 1 >! , "

! n it c f n ,0 E 1 ^; ^.^ ^= -, F 3 . 1 ? " de =3 " * NRITE (155 6033:0,.. FORMFiT 3Xh " PFiRHNETER "

? EOF! WRITE (15h 6095::' "ERR TO G/T"

Q=FNI2+FHK1+FNE1

NRITE (15h6275)"F FREQUEHC'i (GI-

] lE + i:

3" ? Fie. 4: E9. 1

S-TL 1 < 10 ]. -10 NRITE :. 15. 6235) " FORNliT IOXj 2FS. 1 WRITE ( 15n 6125)

FORNFiT lOXj 2E10.

"

; Fs FO? E0

FLNF: , F. U. = 10 t-(--26)N) " ? S[ 1 ? 4 ]?

NRITE (15h 6135)

NRITE (15 J 6275)

WRITE ( 15. 6220) " V . ds)

FORMFiT 16X5 F6. 1 = 2F6„ 2 Q-SQR(E1^'E1+ES*E3 rF 9*E';i Q=K1*K3*K9

NRITE ( 15. 6275) "E NRITE ( 15. 6235) " NRITE (15. 6235) "II.,: I t ! .i' FORNRT lOX. 2F5.

1

WRITE ( 15. 6135) "m.u ti- .::E WRITE (15. 6135) "...1 n Ei i = WRITE ( 15. 6220) "si r . '::.< NRITE ( 15. 6135) ".;:i,nl- ' r NFIl 1: ( 15. 6135;' J., 1.1 i-:...,, I

I FORNrlT lO!'. 2F7. 3 NRI l E ( i'-' 6305) "i:, NRITE '; 3 5- 6305) "F

I ( i,.i.rit. ) - ii : T -

El :i ' V-1 :'*T - G. " K"

I' Y-4 |i::T0R

) -" . 10*lGT( V) . " dB

TTH, iiHEOEPTIOm FFiETjE" ? K

:h .1 :

1, . G -^ii, I ; " do"

' I- n ! G3:':[„:::: i-G EE?

"

1 H El

=3 + ri t :

i' -'„:i ;; " i,.

"

H r 0 s |.

'; i: ri'- -"i-,r 3 ] d,0. " F"

i-,. in' • . Ill I 10. " F"

DIEFIEE. ' ; ]>':::•: " a ( 1 4(3-1 ) " ; K3!

Rl l-EFuM " ; ir'' " ' ':, 1 [,9-1 > ": K9!

F ORilH T WRITE

WRIl E NPl fP FORriM r WEI i E

FiiF'T'E r

ox. 2 F 7. -I

T .iMll:

I.I I 'M

( Ml!

, 1

- E2. E

I- " . I

•

: . j 3 . 3 2" 1 5 ) f

I

. ii iiX. "iiPBII +

6270 NhllF ( i 5. 6265 );!!.,

196
B - SITE PREP (cont)

6 3 1

0

6315

b328

6325

6338

6335

6340

6345

6350

6355

6360

6365

6370

6375

6330

6335

63'?0 6395

64 00

6405

6410

6415

6420

6425

6430

6435

6440

6445

6450

6455

6460

64 65

6470

6475

6480

6435

6 4 3 0

6 4'? 5

6 5 0 0 6505

6510

FORMHT 5XjF11.3? " +-%F6=2?

WRITE 15^ 62" 5 J r J kImLUii Ei FORNFiT 5:^::< Fl I . I » F6. 2 - PRINT " bo-ndwidth

FORNRT 10Kj2F6.3

Q2=T*<Y-i

)

FORNhT 5X' F5= 3? F10. 3? " -i--"jf

WRITE (15' 6275;' r:4 niFF ?'r FORNRT 5:s F7 = 4 - F^. - .

' , f

r '15? 63 i 5 ') " t-'i ftr 15? 6235;' J r 15? 6275;' "K':

!-fiCTO!

? " +-

:lHz"

Ti'1 KFSPijMLt FriC

TOTAL tRROR? quad supi + diffL

5;'i2^Elt2 + E>

WRITE

WRITE

WRITE

WRITE :: 15? 6275;' K WRITE a5?6295;'"i

WRITE < 15 J 6295) "V WRITE ( 15' 629^- ' WRITE (15? 623^

Q-FNI2

FORMHT 5 WRITE (1

Q=FHS12

RETURN 8 R=^225

IF FLHGl THEN 6400

Q^FHJB

niSP "LIST RLTERNRTE 37

INPUT Q IF Q=0 THEN 6990

Q=FNC1+FNS5

PRINT •• STRR"TPP14 T

PRINT TfiB43; " K2 "

5

ThBSO 5 FORMRT 6:;- ' K

'

WRITE (15? 6430)

PRINT

J=l

FOR fi=l TO Nl

TRANSFER T[fl? 1

3

Q=l

FORNRT F2.0?FS.0

Q=FNER

NC H? 2 ] = CS*Y5/180

NC R? 3 ]^E4 100

N[ R? 4 j = E2. 100

N[ fl« 5 ] = E7.-100

Q2=(Y-1 :.*T WRITE (15? 6465)

n

NEXT R 0-FNS4

TEN

'0iNT';+--;ii5; ••

, T dat.n fit::^ + -"?H1

iiT F'ULRRIZHTION Ffi

"

; K

" +-

J S "? /' "dE"

E4? E4 pe. 2? K5? E5

E6? E6

E7,E7

;H9?Ii3?Ii3

2+E4t;

2i;

ii-Et Ft. 2:

. t- 7 + •-'

, F.

. T- ri r "mhb::

THB62?

1

;

i nt ;' V(dE

K"5F8 Fll F8-

[in- ;:':Lu

197
B - SITE PREP (cent)

6515 F:=226

6520 NS = Rr '-:] 6525 H9 = R[ 4 ] 6538 fl[ 1 ] = 2 6555 HE 2 1 = 3 6549 hC3]--=4

6545 H[4] = 5 6556 HC5 1-6

6555 X2=-l

6569 X2=X2+1

6565 IF X2 = 5 THEN 65;'5 6579 IF H[X2+1]#0 THLH uSoU

6575 FORiIHT r?;:<"G T ...r C IM llfiHiuKi^lltiiT ERRORS: RLE

6539 NRITE a5<6575H

6535 Q=FNE1

6599 FOR 1=1 lu 5 6595 h[ I ^ 6 ]-M[ ! » 7 ]^9 . 6699 HEKT I 6695 RRIHT . . 6619 R[6]=25

6615 H[7j=35

6629 flC S ] = 45

6625 H[9] = 55

6639 FlC 19 ]=65

6635 FOR Xl=l TO X2

6646 I=Fl[>:i ] 6645 TRANSFER TC I ? 1 ] TO St

6659 RRINT TRR < fiE X 1 +5 ] > ? S:r

;

6655 NEXT XI 6669 RRINT

6665 PRINT

6679 FORNRT FS.2j" ;"?FS.25" r'?F3.2'" °. 'SFS.25" "."iF: 6675 PRINT "E-S FLUX 'i 6689 Q = FliTl 6635 PRINT "E-F FREuUENCi' "I 6699 Q=E9

6695 GO SUB 6795

6799 GOTO 6770

6705 FOR Xl^i TO X2

6719 WRITE a^!' hb7u':'Q;

6715 li[X^J6] = r![Xl^S] + 0 6729 MCXl5 7]=-MCJ-aj7]fi:!l2

6725 NEXT XI 6739 PRINT

6735 RETURN

198
B - SITE PREP Ccont)

6740 FOR Kl=l TO K

- 6745 I=FlC Xl ] 6750 NRITE (15.667 0)riL i 6755 NEXT Xl

6760 PRINT

6765 RETURN

6770 PRINT "E-r Y-FAl. TOR

6775 Q=FNT2

6 7 SO GOTO 6815

6 78 5 FOR Kl=l TO y V

67'?0 I = Rr XI ] 6795 NRITE (15.667 nr 1 H 7 ]; 6800 NEXT XI 6805 PRINT

6810 RETURN

6315 PRINT "E-Kl ATM T RAN? FhC'

6320 Q = E1 6325 COSUB 6705

6330 PRINT •E-K2 STAR SHAPE

6 8 3 5 0=FNT4

6840 PRINT "E-K3 BNTNIi EFFECTS

6845 Q=E3

6350 GOSUB 6705

6855 PRINT E-K4 niFF SYST TENI 6860 Q=FNT3

6365 PRINT "E-K5 RNTEiJ NA pniNF

6870 Q=E5

6375 GOSUE 6705

6830 PRINT "E-K6 ANT P OLRRZ

6385 Q=E6

6390 UOSUB b705

6895 PRINT "E-K7 SYST RESPONSE

6900 Q=FNT5

6905 PRINT "E-K8 ATM li IFF Lis 6 9 1

0

Q==E3

6915 UOSUE 6705

6920 PRINT "E-K9 ATN R EFAC

6925 U = E 9 6930 GOSUB 6705

6935 PRINT "E-To. NO IS E ADD

6940 Q=D3

6945 ijOSiJB 6705

6950 Q=FNI (2>

6955 PRINT "TOTAL LINER R SUI'1 6 9 6 0 GuSUB 6740

6965 PRINT " TOTAL QUADk ATIC S:JM 6970 GOSUB 6735

6975 A[ 3 ]=N3

6930 H[ 4 ]=N9

6935 i!=:^FNS27 6990 RETURN 0

199
B - SITE PREP (cont)

6 9 9 5 f. I'y

7' i 70

y a 05

IG 0

-iili2 TG 39 75

i' rj 101

5

F

r E r FHi: 70 20 H$ FilF 70 ~ it:' iZ. - J E $ -

'' 1 d : :45t

70 \^ UTG Q OF

70 Hi --HE 1

,

1 ] 70 40 H 2 -HE 1 J C. J 70 45 f 3 =^4-!E 1 , 3 ] 7 0 50 E HE 2. ] 1 ] 70 cr -1 -' iZ. E 0 •^HE 2, 10 ] 70 E 1 ^NE 2) 1 ] 7 0 E = HE 2 2 ] 7065 E = HE 2; 3 ] 70 7 m E = H[ 2. 7 ] 70 E =41 E 2 8 ] 70 80 L Q ^NE 2 9 ] 7 0 c HE 3,11 ] 70 90 L 0 =^H[ 3 10 ] 70 95 i; 1 = H[ 3 1 ] 7 1 y 0 il ==HE 3 2 ] 71 05 r 3: ] 7110 c 4 ^^lE 3 4 ] 7115 il =^41 E 3 5 ] 7

1

20 c 6 = H[ 3 6 ] 71 c I' -HE 3 ? ] 71 3 0 L = HE 3 3 J

"I H

I' i

~: C7

-' c 9 ] 7140 B

= HE 4'. 1 1 ] 7145 I 0 .::H[ 4 10 ] 71 50 ni = H[ 4 1 ] 71 5 5 I 2 = HE 4 2 ] 71 60 ri3 = HE 4 I' J 71 65 4 -HE 4 4 ] 71 70 ri5 =Hl 4 5 ] 71

—' c'

1 ri8 = HE 4 71 SO ri9 =^Hl 4 9 ] 7185 E HE 1 1 ] 71 90 f "0 =HE 6 10 ] 71 9 5 Fl = 0 00 f

'-I = HE 6 1 4 ] 05 HE 7, 1 1 ] 10 G4 = HE 7 . 4. ]

r' iL 15 = N[ 7 < 5 ] 20 L = HE 7 - 6 ]

..J H= HE b, 1 1 1 30 \ il =^HE 8 . 1 J OJ HZ =HE S ' J J 40 H9 = NE S 1 9

"1

200
B - SITE PREP (cont)

L-N[ 12:: 5 1 1 ] 725U Ll=Hr 12^1]

72'i5 L5 = NC 12:. 5 ] 7265 L7-NC 3 2? ] 7270 L8 = i-iL 12? 3 ] 7275 L9 = N[ 12,9 1 7230 N = N[ 13, 11]

7235 N = hl[ l-i» 1 1 ] 7230 H1=H[ H ) 1 J 7295 N5=3

7300 Nb^^Ni: 14^6 ] 7305 N7 = H[ 14? 7 3 7315 T=:M[ 20? i 1 ] 7320 N^-IIC 23? i 1 J 7325 TRRHSFER T[ 9? 1 ] ''0 r$

7330 RETURN

7340 PRIHt" THB -il ^

, :i]i.i::.T3

7345 H * - "Fi B C D E F In H i J i- I.,„ i

' i i \ 0 P Q k S 1 <J

' / 1.'] >i -i' Z

'

'

7355 01=^0 7360 Q2---10

7365 FOR 1=1 TO 26

7370 FOR .J=l TO 11 7375 IF H[ I s J ] = 0 THEN 7435

7330 Q1=Q1+1

7390 IF 02^55 THEM 7400

7395 Q2=ie

7400 IF Qi#] THEN 7420

7405 PRINT

7410 PRINT

7420 PR I \n TFiEM2 ? R f [ I 1 1 :: [ i i.

,! J J ? " ; hii 1 ? J ]

!

7425 IF INT(i;Jl 3)--01/3 THEN ?'4 35

7430 PRINT

7435 NEXT J 7440 Q2=-10

7445 Q1=y

7450 NEXT I 7455 Q=FNS2+FNI5

7460 RETURN O 7465 R-229

7470 DI3P "WHICH PRCC CONST uE^^^^^STORE/'EN IT V'

5

7475 INPUT S*C 1 ? 2 ] 74S0 IF Si[ 1 ? 1 ]="0" THEN 7525

7435 I = POS(fl:f ? S:fC 1 ? 1 ]) 7490 IF 1^0 THEN 747

U

7495 B$=" 1234567390 " 7500 J = P ij S ( B * ? 3 ;:|; [ 2 ? 2 "I 7505 DISP "NEN VRLUE: NON" ; \\i I J 1! 7510 INPUT NL I < J ] 7515 Q=FN03

7520 GOTO 7470

7525 R^^^230 7530 DISP "Si ORE N: 0:-N0 ? S^^^^EXT COS.::; ^ 1 0 j; NT CRSS"!

7535 Q^-^FNiUO

7540 IF Q = Fi THEN 7553

754 5 STORE HHTH IIu? 10- N 7550 GOTO ,-'525 7553 0^^'FNOl 7555 RETURN O 7560 GOSUB 7 035

7565 RETURN 0

201
B - SITE PREP (cont)

mSP "ELrV '/e; GM

Q=^FNo3 + rNM0

I F NOT Q THEr]

7590 Bl-H-0

7595

7 b 0 0 Q=FHC3

Il$ -: "il. f . i.M

" 7605

7 ti 1

0

FOR L-^1 TO HI TRMN8FEP T[

I

h 1 ] TO 3T

7015 PRINT riiC I ? I = 'SSI.

7 620 NEiTT 1 7625 PR IN T 7630 FORM AT 27;-:j "SO UPCE ElE V '. de -3 "

:i / . / ? F 1 :3 . 0r^F5

7 6 3 5 NRITE (15.7630 El < 1 0 < 3: El > 3' El ? 40

.

0 -1 6 0 H 7 fi 1 •P. 0,90

7640 FORNRT 9" 1 ...

.

7645 OUTPUT <fl$, 7640) "

"

H

7650 NPHE (15^7745 H Ri 5 " OR

7655 El---y. 5 7660 El-El+0.

5

7 6

5

IF El, -24 THEN 7 '7 S 0 7670 R tT 1 63 1=" ' 7 675 nil 13' 13 J-" 1

7 6 8 0 H$[ 58 J 58 1^^ -

! ' 7685 FOR N0=^6 TO 1 STEP --l 7 6 9 0 IF 8[N0h2]=:0 T HEN 7715

7695 Q=FNhH0

7700

7705

IF L:0 THEN 77

U-L -2 + 13

15

7710 HTI n, Q ] = ri$[ NO, NC^ J 7715 NE;rr ho

7720

"? ": - r:

I I i:.". J FORNRT F4.0

IF El-INTEi IElEN ;'7-i0 7730 OUTPUT (RiT 1 ^5i ]. 7730;iEl -

r' r" 5 OUTPUT ' RfC 59h 63 1 ; -"rEO ' E i J 7740 NPITE < 15. 7:-l^::7)0 J ^ 7745 FORNRT F7. 2? PS1 _ 7750 NRITE (15' 774^::i j E . H

-? cr c:r

1 r G 0 T' 0 7 fc. 6 0 HTI 1 ^ 72 ]="

OUTPUT (RT[ 13 ]) 7E40

NRITE (. 15, 7745;M;^

Q-FHS3

RETUI';:N 0 9000 G Q \ LI 9 9 9 9

202
B - SITE PREP (cont)

R 1 .J72S 4170 4190 4 4 jy

57' 40 5 '4 60 i:j040

H 1 fc450 e4S5

650J 7750

fll 1 4070 57^0

h2 1 3840 57r:S

R 3 1 7045

B 1 3765

' j 7 0 4 0

; 1

5

^;il0

'40

4 y 01

1 115 414 '5

B0 1

El

B2

B3

B4

B5

Bt

B7

00

CI

C2

C 3

04

C5

Cb

C7

03

C9

D

Il0

LH

5630

5295 j29:

5300 5 33t 0195

4075

7070

7075

4430 4':^00

4085

7105

4430

4480

4370

7125

6145

40; III 40:- 1..

::: i 0 7 1

;

0 1-5 II

10

; 4 0

^10

005 7n6!

T o c:

:00 I f y0

;5 7110

:'0 7113

'0 4 0 80 4380 4400

0n 5;-:y5 0b20

, M y 'j , M h n

203
B - SITE PREP (cont)

ri2

ri3

r.i4

ri5

ns

1)9

E

E0

El

E2

E3

E4

E5

E6

E7

ES

E9

F

F0

Fl

F2

F3

F4

F5

Fb

F7

FS

F9

G

G4

G5

3795 5465 5 5326 h355 h

7165

3315 5 fj 2 0

3350 6230

41'

405 5315 6270 7155

355 6940 7160

i620 5620 5630 5630

' i 7 5

' 1 3 0 360 4365 4320 4360

5 611

0

'60 4245 4315 6160

;60 7660 7665

6160

7 7 3 0

3 3 00 4' 3 9 0 6370 64354230

::805 4095 4310 4355 62 Si 3310 6310 6316

3 3 20 4100 4 3 6 5

3340 4105 6335

3345 6160 6163

3 3 5 ti 616 01 6 1 6^ 0

6370 6430

4370 4370

4340

o305 51;: 20

c; u Ci tr o c, c

5;::: 4 a 5210 7195

3720

6 0 0 0 6 1 1

0

5i-;75 6000

:!0

6320 7170

'0 6170 6370 6320 7655

4 33 J

\Q 5645

:-;n

4 -1 ' b C J 0

320 6320 6370

6 9 1

0

6370 6490

6225 6370

6230 6370 6925

5230 5300 5330

H ri ir

i i O - J 6110 7190

1 c:. cr :i340

4125 4 140 4140 41 1 b 5

7 2 0 0

3 3 3 0 7205

53';i0 6 0 3 5 6140

6130

204
B - SITE PREP (cont)

Gt" 3 5860

h 3 7225

Hi 3 5645 ' .35

5535 :- . ."0 6355 r'243

454^1 .- -y 4550 455" ' :^ 0 4555 4555

4555 4560 ^ - _r cr 4^ - f

-

4570 4570

4530 4580 - 23 47I6 47^," " if J 4735

4735 4735 47^0 ^50 4755 4755 4735 43.i5 -^330 4835 483" -t350 4358 4355 59"0- 5975 5930

5930 59 : 5990 5990 5995 5995 5995 5995

6005 60^5 b 3 i 'lI z Li L 6020 6025 6590 3595 6595 6feuy

6640 6645 6745 tTSO 6 . rU 6795 7335 7375 7420 :^420 7426

7450 7435 7490 7505 7510 7G05 76i0 7615 7615 i-'62f! 5990 6085

3 3935 3940 395!j 3950 3955 3955 4c30 4355 4355 6445

7370 7 3 i" 5 7423 7420 7420 7435 7500 7505 7510

Jl 3 4340 4350 4355

K 3

Kl 3 3760 3310 -6165 6170

K2 3 3300 3810 6250 3530

K3 3 6230

K4 3 6318

K5 3 6320

K6 3 6330

K7 3 6335

k3 3 3810 33 - _ .

K9 3 3818 xy5M 6i65 62xy

L0 4 6045

LI 4 7250

L4 4 6175

L5 4 5380 6133 7255

L6 4 5335 ti:

L7 4 5396 6[_

L3 4 5895 63-

L9 4 5900 - _ ^ _

M A 5460 51 V : ;05 7236

M i 4

205
B - SITE PREP (cont)

M2 4

f13 4

5 9 9 5 t IJ U 0 K,:,U0 3 30 5 . o5

m 4 374 5 '.<^- i 11 ; 3 0 'i 3 3 3 J -45 4 96 5

? c- 49'r'0 ' ; 0 0 0

^ M n 1 1 . i 1

i '.J

-"' :' U 3 1 i J 1 * 0

C- i -, Q-

•J i ul J 5160 51 ,'^'L1 t..ki50 r C- 'r' L"" r 1 3 7 7 1 0

1 1 1

n. 1 d "4 ._i ^ 1-

J

'4 i -j 'r\ '' , h i t.i '-t -J u r 9 L1 \ t' .1'

h J 11.- A

'-T

hi " 6 0 0 Tl

! ^ "-t A J 1 1 11

11

J

A

Nb 4 4220 4220 ''5 i i ;1 3 0

N? 4 7305

^^a 4 6520 69 75

H9 4 6525 6980

p 5

PI cr.J 3795 G' 0 0 0 6 2 6 0

Q

cr

.J 3 7 0 3 3 6 "i I'-; '"J 2 2- :/:'

3

.' 300 3905 3910 -' 3 Z 39^3 3 :: O

'3 9 '9 Fi 4010 4045 4065 "] i :; 5= 4 160 4205 4210 't i;! 4 2 0 4 J00

4315 4320 4 295 J 435 4453 44 4460

4565 4570 • c r. Er

•1 .1 :r .1 4 6"^:::i 4 3. 3 0 4. 6 7 0 4675 4 ,-'00 4- i " 3 d 7' y

4 '

::'

' J 3 4945 .1 9 2. 5 I: k

!

1 '.I'l ij 4:.MMj 4990 5 0 0 0 5' 0 r 0 'r 3 6 tl 5870 'j 0 £; 0 5 1 Hil ' .1. 1 1

: 'j 1 30 5160 00 5330

cr ri c; 5315 532u -1 0 5330 5440 4 5 5475 3 A 30

5 4 S 0 5435 5 ! 2 t:i 5540 5 5 0

c^v 'J:, 5 17 2 Ci 5625 5710 57] 5 3 3 ' f 1 5750 5 9 3 0 "'i 3 0

Q .1 5350

5 9 7 5 5930 '

i Q '' '-'I r- ' 1 ! ! ! 3 6010 3 0 3.

3

; I 3 1 ii' 6360 6 3 7 5 rOtlU 3415 6 4 0 6 4 7' } i 7; 3. 6690 6710 6715 3 3 2 0 6 3 5 6

- 3 3 3. 3 3 3 6900 69 1 0 b 925 r i '-l4 i4 7 000 7015 ; p 7515 "7 cr cr 7545 7 530 7 5 9 5 7 7' 3 5 7710

7710 r r i'

Q0 5 3730 3735 3 7' 30 4935 4 993 5010 5015 5355 5065 5065

5070 5 0 9 5 7i 1 i.J 3 3 1 0 3 3 i, 1 0 5' 1 5 5 5 1 6 0

Ql 5 3735 3790 4 ::::70 4 ;.;:5 4355 4373 4665 4673 4 343 4350

5015 502 0 5 3 3 3 3 i i 7 3 3 3 ; 3 '

" 7 7 0 5 6 7 5 '7 3 3 3 7 7 3 3 7 3 3: 3 7 4 O 0 7425 7425 7445

Q 2 5 7

7' 0 -'7 3 '

;

'

3 3 '

] L' 2 0 :"; 3 2 0 4 7: 2 4

' 7 3 4

3

3 5 3

3

3

5

5640 564 0 5 I

; 7. i , : ii ; ;j i : 7 j 3 1 5 3 3 33 6

4' 3 3 3 3

3

3 o 5 3 3

7

'

;

3

3

7335 7335 7333 7395 7 4 .JO 7443

Q3 5

Q4 5

Q5 5

206
B - SITE PREP (cont)

Qb 5

Q7 5

Rl 5

R5 5 4120

So

>930 5385 59-?5 i-j 15 6128 6128 63,-'a

T 5 3830 5455 5455 5468 5490 5929 6885 SI 38 6148 6388

6495 7315

Tl 5

12 5

T6 5

T9 5

U 5

Ul 5

V 5 3948 3945 3958 3955

VI 5 V2 5

V3 5

V4 6

V5 6

V6 6

V7 6

V3 6

V9 6

W 6 3385 5258 5258 5925 6298 7328

m 6

X 6

XI 6 3938 3935 3968 6635 6648 6658 6655 6785 6715 6715

6720 6728 6725 6748 6745 6755 6785 6790 6888

K2 6 3938 6555 6568 e5fc 8 6565 6578 6635 678^ 6740 6735

X5 6

6 3838 3o35 io-'' Lj;:y ;4u 6145 6]

6588

207
B - SITE PREP (cont)

FHH

FHB

FNC

FHD

FHE

FHF

FHG

FN I

4460 ba55 64:15

;745 6iM':::. 64?

960 514y

4460 443!:i i-6 30 47'P0 4790 6195 6360 69 j0

FN J

FNK

FNL

FNN

FNN

FNP

FNQ

FNR

FNS

3 ? 3 U 3 7 3 1:3 3 7 3 a 3 9 t:i a 6105

7 3 9 9 0 'i- 1

'3 5 4975 49S5 5000

5200 5220 5240

5440 5455 54oa

5750 7535 7 590

JO 3730 3i''30 3730 0 3 7 3 0

3 4010 4045

4790 4945 4yCa

;:20 4453

i i- ? !;! 5 1!

:i 5 'z> 0 5 6

;

•:0 46,

5 b4l5

"0 5710

700 4 770 4,''9U

FNT 3 9 2 5 6 b 8 0 6 7 ? 5 6 8 3 5 6 3 60 6990

FNN

FN 7;

FNV

FN2

H[ j 6525 i:.5>-J > ") <'< 6630 664 a triaa

208
B - SITE PREP (cont)

ri[

FC

GC

M[ ] 9 - 3940 39rii;j 3'V:..j .; ., ?-'55 5965 6475 o4yy 6435

6498 6595 6595 ;

' , i

'

l i'/20 C7?0 6758 6795

N[ ] 9 5768 57i::/:i 5 7(8 5^ , 5,"7 5 5788 5785 -5798 57:15 5888

5 3 8 5 5 8 i 8 B \

'

^

i "•

' " '

; ?

3

8 5

8

3 5 5 8 3 5 3A 5 5 3 5 Q 5 3 5

5

5868 5865 'j3'. i) ... . <./'.< ' 8 85 5::;:-'8 58 95 5988 5 '18 5

5'':^ 18

5928 5925 ' j ^

' - 7m '

,

' 6 4 5 7858 7852 7855 r'8b8 7665

7870 7875 '';[• ,'ir n 7895 7108 7185 7118 71 15 7128

7125 7 1 3 8 1 .: 3 i J. -1 1;

: : 1 4 3

:

' 1 5 8 1 5 5 7 1 6 8 ? 1 6 5

: ' 1 7 8 7 1?' 5 7130 7135 7198 ;'2!-:>8 7285 7218 7215 7228 7225 7238 7235

7240 7245 7258 7 2 "'9 72'-7J 7265 i'27e 7275 7280 7235 7290

7300 ?' 3 0 5 7 3 1 9 i J ! 7 : 3 3' 2 6! 7 5 8 5 7 5 1 0 7 5 4 5

3 [ ] 9 3 3 10 455 t;i '-i- 7 2 ' j 4 , : u -1 10 4310 4' 3 1 8 4 3 1 8 4 3 i 8 4 5 1 kJ 4 3 1 0 4 3 1 Ci -

I- 9 : 3 ] :

.

; : :

i A 3 8 4 9: 4 5 4 3 4 5 4 3 5 8 4^ 3 5 0 4 3 7 5 4 3 9 8 5800 582 9 :m '-'ii hi 5^ '8 5830 51 18 5938 5935 5998 5998

6815 6128 33 d 3 3tj-\^y}

111 9 3325 4 I'M; 4 4'! 4 5 4558 4558 4550 4558 4 555

4555 4555 'rj'.ii 9i ;'. m 9 6i;! -i568 'j'--'^-'' 4578 45 78 4578

4 5 8 4- ? 5 3 -3.' !• i> l /'

' :

i 4

'

1. 1: i 1 2 8 4 3 3 3 4 3

6

3

3

5 4 y 3 5 .] 9 6

5

5930 5988 5V:.9j 9v'' m 9::-' 9 '-'9 5 59 95 5995 59'-:i5 6885 6885

6810 6 0 2 8 6 i 1 5 6 4 3 3 6 3 3 ij 3 3 4 5 7 3 2 5 7 6. 1

8

X[ ] 9

Hf 3700

FHU 3365 4235 4260 4388 4395 4415 4435

H$ 3370 333 '5 •1298 '^343 47"' 3 4 255 4265 4278 4275 4235 429,5

4385 4318 ^ J 9i iiM' : i 4;i 44 28 4438 4448 "9;:,,:: 9 794 5

' 4 28

7485 7645 7658 767ij 7b i'' 5 7638 7718 7738 r735 7r-'48 7 i''60

P$ 4230 4240 425';:' 4 265 4 9 4235 4295 4305 4390 4460 4418

4420 4438 44 4t:i 593':. 79. 9:9

Sf 4545 8759 ^'3:i\ i.7'.i 70 c\?33 6455 S588 6645 6658

7475 7488 7't7;5 /'jiji i , r, !

i

: , 615

L 5260 5268 6845 i:,.8',''i 7 9'.^! 9.,: 4 5 7788 7785 ?'7'50

B* 7t'25 74 28 74 :'5 . 5bM

Il.f 7600 7615 7' 7 in

209
8.5 C - MEAS

- ^TO TRAP 6ot

210
C - MEAS (cont)

211
c - MEAS (cont)

212
C - MEAS (cont)

"Gy Hj="NesiC.GS NLiii i^i r:: . f 3718 REIiIM FC2],Y[3],i.,[\: .: . _ 5715 flHT M=ZERL4y- 16 1 '2ti Hi=4

'30 Bl=K5=K6=i3

"35 E6-fJ.*JUa

5740 ES=S5

5745 R5=ll

5750 N=N7=ei

5755 U=1+FHS3

^60 CFlhG 1 5765 CFLRG 5

'70 FORHRT "IF HHRDl-ihRE hnrlGb U^"- < ^ < 1 > STOF+STOP 2 ) KEY O' '75 WRITE <15»3770>''.3^'y ^RSRTr'

^80 Q=FH32+FHB3

57S5 GOTO 4700

5790 DEF FhF(Q>

5S00 GOTO Q OF 7730

5SS5 GOTO 7765

5810 BEF FHYcH3>

5328 IF m THEN 3998

525 IF H0=6 THEN 3845

530 K1=FH2<N0J

33G5- P=n[9]/10t4*EM'P-*:-lfi: fbs b J.- 1 0t 4..' 3340 GOTO 3355

3845 Q=FHkH0

3850 H1=2U0*K1/G

3855 Y=1+K1*G/T

3860 R1=T^H9

3865 I5=(:Y-1>*R1^50

5870 IF N2#-3 THEN 3330

5875 15=15/5

5880 FGRMfiT -ZE^'O LE' : - i'„ -L-"-- ^ian K 'fajB^

3835 WRITE <i5-:::e t th"

5390 FORHhT F7. -Tl - ; 2F3 . 3? FS . i ? F7 . 9 - 2F7 . 1 5895 WRI IE <15!3S90>R15 v^RIj/IjKj iM*LGTYi. K1*G5 S[ H8' 4 ] - r<H'=i 5980 PRINT

5905 PRINT

5910 FOR 1=0 TO 5 5915 PRINT TfiB»: 18*1+5

,

5920 IF H2=-3 OR H0=0 n-!EH 39?=: 5925 PRINT 20*15

5930 GOTO 3940

3935 PRINT 4*1-105

3940 NEXT I 3945 PRINT

53 FORMRT 10" ! -

i

' 3955 H*=""

3960 OUTPUT «Hf.3950 /

3965 FORHRT "H3"j4H

3970 WRITE <15^3965n-, ^i-;,' Pi!-ii? pxRn " 3975 IF N2;-3 THEN 5935

;9S0 Rl=i:'l- ?'? 15

5935 GO'" I

- : ; ? 3990 Q=Irj'/ . F -PI -'-"I5-,-0, ^ ;995 P=INTa0t5*P-O . " ^ 'lOr' 4000 IF mES(N3-33 F^' P 'P ,i - :;: : ^.PP,

4005 N3 = -fJ3

213
C - MEAS (cont)

4 U 1 i-j Bj- = ^'#" ' 4y 15 G i"i TO 4025"

4020

4025 02=0

4030 H.t^" "

. . 4035 HIC 1 ^ 72 ]="

4040 f.ti 32? 32 ] = " 1 " 4045 FGRMRT F3.0

4050 FuRMhT F3 , 4 , 4055 UU ri-'IJ r i-1 J L l•^ 2 ]

!

4060 OUTPUT ' Hi [ 57? 6- ; J n , 1

1

. 4065 OUTPUT ' Hf[ 6'5.. 7.: 4070 I F Q 1 ij F' Q . 6 £: T \ih.\\ 4ii3iJ 4075 Fl$[ Q < Q ] = Pl [ 1 H 1 ] 4080 WRITE a5?^045)H f J 4035 N3-HB3H3

4 0 9 0 FORNRT F9.5

4095 WRITE ':i5?40y0:'P

4100 IF N3<N4 THEN 41 20

4105 fl$="

4110 OUTPUT ':fl$j3950;.

4115 PRINT THE6;flf

4120 RETURN Q

4125 DEF FNT< I

)

4135 Q=FNR3

4140 Q = I N T (1 0 0 * Q .: ^ 6 U 0 - l 0 .[ i \ 1 4145 IF FLHG5 THFrJ 4 1

J- ' ' L- 1 1 'J (Ill 11 " i r~ 11 4150 T1=Q

4155 SFLHG 5 4 1 60 IF I#l THEN 4170

4165 tl=Q+E3+N4*E5-2+

4170 RETURN Qh-': QvTl

4175 DEF FNG':.Q>

4190 IF Q = -99 THEN 4.: 4195 IF Q;0 THEH 4205

4 2 0 0 M1=-M2 = M5^:N9-V1 = V 4205 N9=N9+1

4210 M1=M1+X2

4215 H2=M2+X

4220 H3=M3+P

4225 Vl=Vl+v2t2

4230

4235

4240 V4 = 'vM + P*X2

4245 V5:-V5 + P*X

4250 V6=\'6 + P12

4255 GOTO 4 340

4260 G[ 1 J 1 ] = V1-M1T2 - l i 9 4265 G[ 1?2]=G[2^ 1 3 = V:' -11 J -M? -N''^ 4270 G[2j2]^V2-N2t2/r! 'J 4275 MRT C=INV(G.:'

4230 VI 1 ]-V4- N1*N3 H9

4235

4290

Y[ 2 ] = 'v'5-N2*f13 ^Hy

4295

V6 = V6-N3t2.- H9

tiflT F = i:>-Y 4300 X2 = ':: M3-FE 1 ]:U11-F i 2 ]Hrl2;.-iT

4305 V4=^l .- i 4*F[ 1 ]; 4310 V5=-2*V4*FC 2

]

4315 Q = :^2-V5l2.-4.-V4

4320 R2^Vb-F[ 1 ]*Y[ 1 ] f I 21- r i: 2 1 4325 Wl=SQR<R2/(N9-2

>

0 4330 IF V4*(2-Q::i O u "iHEN 434i

4335 I-3UR( 3. 7-:'iV4*': Z- ' 4340 RETURN U

214
C - MEAS (cont)

4350 DEF FHrUQ:'

4360 bOTO Q OF 4465-4oriS

4365 IF F3=0 THEN 4410

4370 DISP "TEriP(F> "

;

4375 i:i = FHE3-^FrJH.:;H[ 3 ]/i0j

4330 fl[ 3 1=1 0-1"! - 43S5 DISP "REL HUr-nri ^^;v;

4390 q=fhi^::h[ 5 ].-^-10) 4395 HE 5 J=la*Q

44 U0 Hl 4 ]=10*':' (H[ 3 ]/10 '1 0 = ,-8 ! L.OC- rit 5 J 1000 ::. 0 . 1 1 1 • -t- i . 2 3 2 440 J GOTO 4425

4410 H[ 3 j=100O-t'::FHXl 10 i-i-rj--'2y-i-FNR2> 4415 fit 4 >10O0*<FHHlCi9 i-f- MP:,;

)

4430 fiC 5 J=1000*E--;P< e . i

• 1 - .. • riL 4 3/18: Tu. 7S-(HE 3 ]-• 10 ;^t0. 73) ) 4425 IF H2#-3 THEN 4460

4430 DISP "CLOUDS(0 TO ^r.pn i ij ,

;

4435 Q=FNE2 + FHH(IHT(H[ 6 J/] 0h:) 4440 H[ 6 3=100*0

4445 nisp "WIND (mph::'";

4450 Q=FHN0

4455 hC 6 3=H[ 6 ]+Q

4460 RETURN 0 4465 FOEHftT 5)'.-> "TEMP DEK! PT. REL mv D NflTER DENS

4470 NPITE (15j 4465) 'CLOUn COVER UIND"

4475 FORMHT F9. 1 3 " F% F10. 1 - F' ^ p-

] . 1 ! " F 1

0

. 1 1 " HiV|/|V,t3'^ ? 2F10. 0j " 4430 Q= 1 00+ C fl[ 6 ]•" 1 00-1 NT " HL 6 3.-' 1 00

44S5 L7=256*EXP(e. lli + a-![4] - 10 MO. : 3 - 5*(hE3 ] 10 - 3 2 - Oh- 2 7 I. . 16)

4490 NR I TE < 1 5 J 4475 j HE 3 ] .1 u RL 4 ] i l - hL 5 J/lSj L7j lu i hL o J.- 1 00 J ! Q

4495 PRINT

4503 RETURN 0 4505 DISP "TEMP/HUMD; 0 = HUTO^ l=MflHL

4510 F3=FNB3+FNNF3

4515 RETURN 0 4520 DEF fnu':q;'

4530 I=C£

4535 E0=E2

4540 P=FNPC3

4545 IF E2#E0 THEN 4535

4550 HE 7 ]=5000*Q1

4555

4560 E0=E2

4565 IF C2 THEN 4580

4570 02=1

4575 OOTO 4590

4580 02 = 0 4535 E2=E2+5

4590 0=FNPC3

4595

4600

02=1

E2=h0

4605 Q='v'9* < 2*','-','9 > "Q 1 *hE 7 ]. 1 00a--" J 4610 IF Q>1 THEN 4620

4615 Q=l/0!

4620 HE 3 J-10t4*LGT<Q.-- R3 < 4625 FORMHT " BRG PUR Bh:C f'kH<-\ PWR-*a.-'STIr-' TD T'j.tf 4630 WRITE (15, 4625;' "MHHL. PPON OilJ 00 PL TR" 4635 FOPNRT F7 . 4 , " vM % Fy . 4 5 " i-iN " , fz- . 0; n ] . 4? 3Fb 0 ?

' dt' ' ' r 0' . 4 !

' dt' ' ) FOi . U 4640 mI T E a 5 ^ 4 635 > HI 7 1/ 1 00^ ; J , r::0 r flO ? 0 0 J E6 t " d; £2? 0 J "1000? PI 4642 Q- 1000* J. HE 7 3 4645 IF E2>0 AND E2'-li FiMH V\ l HliU l.--Q<4 HMD Mi HESDoSOS THEN 4670

4650 D I SP HOT NURMHL 1 - flD J f

• "'

:

4655

4660

Q=PNb3+FHN0

IF Q--0 THEN 46701 4665 0 = FHr-0 + FNDl+FN.j6H Fil il;.TpN \:<^\ 4670 RETURN 0!

215
C - MEAS (cont)

4675 DEF FtlJ'.:;!;'

'

' ^685 GOTO iJi L'F 4 ;'Ot::i ? 0 > V;. < r>: ;. v., 1 1

';

' 76c';:5 ? I U - 0 ] Fi;; • 7

4 6 0 G 0 T' 0 0: ? i .

i F ' i 0 '? b ? 0; ;,'„,. ^ , ,;;

;

,. ; .;, 5,7' 4 1 G , 4 & ^ f > i ^^ -

4' 6 9 5 G U T 0 4 7

'> 0 4700 R-Ofij.

4705 niSF "SUN THFE EX I"? NEFiO iHT"?

4710 0:=FHPJ- + FHN1

4735 F4=y

4740 niSP "SET liNT DELnT' i? Er:KK FT ; FHE4 " SEC ( i ^REREFiD :> 4745 Q=-FND;::' + FriM0 ^ 4750 IF Q THEN 4740

4755 DISP "FiIiD S^J-lv-s 10 i: L0CI< FEflli 1 ^^^^YES >" 5 4760 Q = FNriO

4765 CFLFlG 5 4770 IF iO = 0 THEN 4785

4775 SFLFiG 5 4780 T1=^E4

4 7 8 5 Q = F H Ij d + F N y. 6 9 + F [\ B + ! i ! .j t t

! J 1 8 - 1 1 \ J 9 f \-\ M 2 4790 R=302

4795 n I SP "1 SET 3G/T . 3E 1 RP . 41 :> 5Ni:,Ri TRPE ? OPSTRT " ? 4800 F5^=FNBE-i-FNHi

4 8 0 5 G 0 T Oi F' b 0 F 6 E O 5 < 4 :B j, 5 ^ v;:^ 5 ij - 7 ? 1 0 ? 0 :5 0 4810 GOTO 4r00

4815 R-383

4820 Q^:=FHFH F , J15

4822 DISP "tt NcflS PTS";

4823 N4=FHNNJ

4825 R=3e4

4826 DISP "tt PTS IN F i r

;

4330 R5^=FFiB4 + FHNR5

4 8 3 5 I F R 2-1 \i T k R 5 / 2

]'

\

i t. \ \ 'l t

'5 4840 R5-R5+1

4855 IF M4-::63 THEN 4375

4860 BlSP "ERR: ttPTS>63"

;

4865 Q = FNE:i0 I-FNH20OO

4870 GOTO 4822

4875 IF N4;F'5 JIWIH 4';^0w 4880 DISP "ERR: ttNEflS-; #F EI" 5 4885 O:^M-NB10 + FiiN20U0

4890 DISP

4895 GOTO 4822

216
C - MEAS (cont)

4 MM

4?:

4v

;

4-:'

:

49-f ; 4945

4950

4955

490.1 49f 5 49 ?y

4975

49 S0

49 S 5 4999

4995

: MT( CM-l .•/•b> + ; .7-i-F4

E:

:

\ OFi-SE

r!iH2

l-l+;:f

000 '!'=' E;5h BF. SIML j-'-l10 xFNC2+FNMlThNI.S

50 30 50 5 50 40

50 45

50 50

50 5 5

5 m 60

50fa5 50 70

50

5H F M

5i-: J L

cr -j Fi Li

Cj -j 05

cr -i 10

_' i 15

F 0

cr \ 3 0

cr (

-j -1 0 45

c:

"I J0

cr -j 5 5

cr ^ F0

b 5

cr -I ?' 0

cr 80

£- -. 90

C" 1 Cj tr -J 1

C| -:00

:u5

cr

-

I <. 0 5215

FuFflFFf MEFiS HF^i^! T NRITF as? 5025' "FLU i Hij Fi FORf'lFT F 2 . 0 " St.- ••''-.-'< : . .

' WRITE a-: 5F35 . ; r ; F .. /i FORMfiT 2.;: :'

' ^

^ '

• i- , , j . NRITE ( 15. 50'i5 'F'"- iF- r!lSP_ "GO : t = FEW m2'. FL "

!

1! = F N b 1 + F W U 3 0 0 + F H B i + f W \ \ u F ' Fi 2

IF Q THEN 4975

J=FHT2

. IF

FiZIF

2? Ft

JTH ELE'

3F

um i: 1 FLRPSE

Fi';I I E 15 J 5095 ) -'Dil FOPNHT F4.05 2Fy.0-:

WRITE ( 15? 5105 J V1=M1=0

r r' I I I i FF [NT

Ii[ 7 6? 1 •-:h-lFFF:' -

rl[ TbH 2. ;fh.*io0

IT 16:. 3 ]-N4

F-21

IF E1 ^32 THEN 5l

Q==E1- 24

DC TF, 4 ' • ir;0::i

Ii[ 1 J 1- • I Fi R[ 1 ]==NF-' 100 + 116

F;[ 2 ]=10MiLi- F

IF M2)f 2 THEM 5,;: U^4-Firn:n FFDl hFNUI

?"\''\\\'X 3 hC 9 luT 4

U = HL J iu 14 R-21 0 O^FM'i 0 1-Flil'l

i 'L I N' h2 E

' - f 1

1

HR

IHS

.45 "d^

. INT(

IH:

BIFi:;

L I

217
C - MEAS (cont)

5^20 R-vjii

5225 H3==N3+1

5236 T2^Fr.P:: 5235 IF FfiP3-T2 533':: 5240 IF IN"I ! 2 - 0. 02;'- ! .: MiFf- l.,::,.^ 5245 P-FMPi:3

5250 I)[ TF'. H3 + 7 J = LOi;;': I- n ' -i.i 5255 Q = FN', H3

5260 R=312

5265 IF N3^=^-3 OR \\0^€ TiiiJi i iO 5270 Q 1 = f -i 3 - S 3 + R 5 2 + 0,5

5275 X^2*'; N3-33) --fF-t

5235 IF Ql ^: 1 OR Ol :R5 1 \\£u 5235

5290 Q==FNGH9

5295 IF N3:H4 THEN 522u

5300 R=313

5305 P = FNG(-99:'

5310 DC T6? 3 :i-N4 5315 Ii[ T6' 6 ]=:LOG' P Ll>-1 Ot 4 5320 Q0 = H-V5':N4*E5.- 2. 5325 Ii[ 16, 7 ]= 1 00* S3 r V5-'-i l4.-2 • 5330 IF N2tt0 THEN 5350

5 3 3 5 f1 [ H ;3 , 1 ] = I H T ( 1 0 * L. +- 0 . 5

.-

' 1

0

+ m i 0 0 5340 MCN3.b]-F

5345 il[H3j4J=I

5350 Q=l

5355 PRINT

5360 FORHhT "#FIT RH"r HPBN T("

53:65 H P I T E 1 5 ; 5 3 6 O > :. .. J J

' - ilv' a ; i u 0 T- F '3 E T F' E fi 1 :, # 5370 FORMFrr F 3 . 0 j F 1 0 , 3 ^ " i ' -< F J 9 . 4 ? +- " j F6 . 2^

"

5 3 7 5 i'J RITE H. 5 - 5 3 7 0 i 9 [ < f •>

i 'J : - H 1 n 5380 F 0 R r I f'i T F- 1 1 . 4 ^ " dt :>

' F 1 0 ., 3 2

5 3 3 5 W RITE C 1 5: • 5 3 3 O ) Q y , I) [

1

' 6 , / I

.

' 1 5390 Q-FNS4

5395 PRINT THB20 ^

' i rii; HP BIH3 i\' F-^ak before PEfiK#"

-EVEL:

11UH-- p-Ri) -Ki/ vV-i ;

5400 PRINT 1HB20

5405 G 0 T 0 5 4 9 Fi 5410 R-314

5415 Ml=Nl+P

5420 Vl=Vi+PT2

5425 R=315

5430 IF N3'.N4 THEN 5220

54 35 Z = N1. N3

5440 PRINT

5445 PRINT

5450 FORhliT 9:^:. "T(9K'':./ [<: "

.

' 5455 NRITE 15-5450)3$

5460 Q= 1 00- SOP ( V 1 -M 1 42 H J

' 5465 FORMFiT F16. 4, F14 . 2^ ' 5470 W RITE < 1 5 J 5 4 6 5 > 2 , u . 0

'

i

\ K 5475 PRINT

5430 IF N2iF

decrease [lECL BIRS it 1st deep

H3-1 )

'

t!3 1 ' ;t

'MERI-

. F9. 0H F 2*H9

T" ? 9;;

iff-'-. THEN 54';mj

5435 B5-2-B6.-SINL

5490 Q^FNSi:.21-4M + 65*IN i

' H-h-3r>..-65

218
C - MEAS (cont)

5495 R = 3ii5 5560 IF N2<2 TriEH

55j5 Ql=Nr=y

5510 FOR Jl^-:- TO 6 55 i 5 Ji ' 5 ] 1000

5525 P = LW E. TCiC Jl ' 6 J. 55:30 0 = FNGli'?

5^."=; 'i":-:T 11

5550 y l^^FNZCMe

5555 Q-J = K-S[ riO' 4 3 2/ 1. s:-.0""-;"i ti3 5560 ri[ rIP. 8 ] = 04 - ( 'i- 1 . -34 £ 5565 ru No? 9 ] = Q4/Kl/( Y-1 >-3^ B3

5570 n^cY-i ;a

55'^5 M[ N8. 2 ] = lu*LGTM

5530 v=^-;v7 + wi - z 55S5 Ul N3' 3 ]= 1 0+LGT ^ V7-7 V y n

5590 r'irHS-7] = V5

5595 R=317

5600 Q=FHC1+FHH1+FHI5-FHS1

5605 PPIHT TflE22?"BEST FIT FOR THE 5 CUVS

5610 PRINT

5615 Q=I*E3-N4 -£5*2

5620 M[N3-5] = 0 5625 WRITE O 5 ^ 5360 Sf i " "i

- 5630 WRITE ( 15' 537a>N9. Q^-^'T's lyP + i-JH 5635 FORMAT 1-10.3-" de-g" * F 45 "K "'Ft. 5640 WRITE ( 15. 5635) V5j Hl NSa ]^ No? I 5645 Q=FHS2

5650 FORMRT 19X? "G" - 17^ ^ 'G T'^lSyr^Nt

5655 Q=riCN8j3]4-10*LGTH9

5660 Q2 = RB5( ( 1 ) -•-X 1-- H ,) N^ lO-'LOG 1

0

5665 WRITE ( 15? 5650>O, dE "

?

Hl H8 ' 2 ]

?

'

56:^0 3 = FNS2 + FNI5

56 75 PRINT THP33 ? "1 00+ 3:11 n-F I T j ^MFi' 5680 PRINT

5685 FuRMhT 1 0: ^ " GUT "

, 5F 1 P . 0 s F?4 . 1

= 5690 RE HIM YC5]

5695 FOR 1=2 TO 6 5700 X = D[ I < 5 ]--"! 000

5705 R = U-'>EXR(D[ I ' 3 ] : 3 ; 4

^

/EHL OFFSET T.

"6=1'" de g" 5 F4 . 0

:

NEF" ? i5X? "HUF" •

]? " +- Q25 " dB'

ELE'' RUN SET"

I'll vio

2i=F5.2?2F12.3? " K^^MtS"

J," K'Mt2"?tl[N3?3]

"^7 1 i7l5 n33T I '720 W-ITE U5?56S! 2? -1 = U? i 5 ii? 'I'L I J? Y[ 3 J? 5 Y[ 3 ]: •[4]. "-f.YCS]?

5725 Q=FN32

5730 REDIM YC 2 I 5735 PRINT "TO RERLfllt N 5740 R=31S

5745 PRINT

5759 DI3P "REHRRKS: "

5

5755 Q--rNB5

5760 INPUT N$

5762 D^ = H4[ 1 ? 25 ] 5764 E4=R4[2e?33]

5765 PRINT

5770 ri[ 40? 1 ] = nC 43? 1 J hi

KEY 1 t

80 00-r''L4u? j ] + 3-^-F7+33 ^35 FOPNhT "STORE: INT >

; , r

" = F3

^'?'0 WRITE 15= 5735;' M, f'Ki, HL 40. 1 J Vi3 fM 0 00 STORE LRTH #5?Uti

•EXT FILE"'F3. Eft" :.tT7t" ? 1-3= H:

219
C - MEAS (cont;

5^5 R=-319

5810 IF H0-^^7 TiftH 5o .

SSi^e IF F6^=l THL'N SSOu

5825 U^^FMS^+FH jt4

5830 GOTO 6035

5835 P"3r^^? 5340 FC'Rnrrr ' Hht I/s" 5345 WRITE (i5.53ie,

5350 FORHBT ^F3.0

5855 Q-fHl'Z

5360 FOR I--'l TO 6

5365 PRIHf

5370 FOR J=l TO N4+7

5375 URITE ( i5> 53S0^M i » Jl* 5330 IF I NT (J/ 10) -J/ 10 -{HEH

5335 PRINT

5890 HFKT J 5395 PRINT

5900 NEKT I 5905 Q-6*<N4+7>/i0+4*MC40» U/5+FKi2

59 J 0 Q=-FHS2.

5915 RETURN 8

5920 R^-321

5925 mSP "LB3T fCftSC 0-4-10) "

J

51*30 INPUT Q

5935 IF Q THEN 6055

5940 GOTO 4815

5945 R~322

5950 Q^1+17*F7

5955 r»l=Qi2

5960 FORHRT "EXT 3TDRE; fi; % F3. 3 0X . "H! % F3. 0, /

5965 WRITE < 15» 5560)Q, Qi

5970 STORE DfllR «»5»Q,H

5975 STORE IffiTfl #5,Ql,ij

5980 RENIHri #5

5935 RETURN 0

5990 R=323

6005 STORE 4^50,2670

6010 STORE rniTH 6^S

6015 STORE mifi GjT

6020 STORE mifi 10, H 6022 STORE 12,3703

6025 RENIN))

6030 RETURN O 6035 R-324

6040 IF N7/24 OR HHCmH/T:: UilM C^j'yd

6045 IF F6"l T;iEN 47'''0 6050 GOTO 4305

6052 PKJNl 'HEH3/3UH TriPF FULL"

6055 Q~FN.J12^FNSlfFN,^^

6060 DIGP "TO LIST PRGHs 1 .EHIh <2 /I. IST '

;

6062 STORf 12,3700

6065 0:---^'\\lG^V\m

6070 GOTO 4790

6075 R==325

6076 33 ISP "RIiV STORE ',f ; 6030 INPUT Hi

6035

6090 NLNS, 1 3"'-NO/l00

6095 GOTO 5740

220
C - MEAS (cont)

tlOQ R-326

tlyl DISF "Tfi<K>";

ties Hy-^FNNHy

61 It' GOTO 4900

6115 R=327

6116 BISP "HR nNG Blnf^airr;

6120 H=FMNH

6125 BISP "DECL &IflS<DLC.-

6130 L1=FHNL1

6135 DISP "flZ BlHS<DEGr

?

6140 X5=FNNM5

6145 BISP "EL EIfl3^DEGr'5

6150 K6=^FNHK6

6155 GOTO 4900

6160 R=32S

6161 BISP G- TH(dB;'"

;

6165 B7=FHNB7

6170 H9=G.^-i0t<B7-a0>

6175 GOTO 4900

6130 R=329

6131 Br3P "T--Ta $ 90

6135 B5=FNHB5

6190 BISP "CSC COEF";

6195 B6=FNMB6

6200 GOTO 4900 • 6205 R=330

6210 Q=FNF1+FHF0

6220 N9=K=0

6225 BISP "SKY:GnT<HRS>jSTftRT5ST0P.3TEP";

6230 INPUT I5-H3jJ1

6235 R=331

6240 Q=FHD0+FHIil+FHrtUi-FNC5i FhH 1 r PH 1 3-Fri32^FHU 1 6245 Q=FNS2

6250 PRINT ThB305"SET i ;N':^-r4 6255 Q=FNS2

6260 PRINT "iiZ"<'EL"?' ' ?

' GMT " ? " T T.i

6265 PRINT

6270 FOR E1=I5 TO N3 STEP Ai

6275 PRINT FHh v H0 , L ? 6230 BISP "RERLT';

6235 INPUT fi$ 6290 E0=E2

6295 F=FNPC3

6300 IF E0-E2 THEN 6230

6305 PRINT Tfie45 5El.p

6310 K=L

6315 X2=1/SINL

6320 Q=FNGN9

6325 NEXT El

6330 Q^FNG-:-'??.'

6; :5 B6=Y[ 1 ]. G[ 1 . 1 ] 6 340 B5-' fi:-f- f *M; 6345 Fij"^ '

- . . :;:s"r-Tv \" f^:'., 4. "/sim [ 6350 I'lKr, r: 1 V - : . ; R-j? r,:':. 6355 Q=FH3<33-2*N9+o5-. INF ,: ;';^+2i:

221
C - MEAS (cont)

6360 R-332 , . 6365 ri[ nSj 1 ]^t^Cl/lyG ' '

, 6379 M[HS?2] = E:5 6375 M[NSj3]=B6

6330 M[HS5 4]=FhT3

6335 M[N3i5] = H[3 3 10

6390 M[H3 5 6] = F 6395 ri[H3^7]=L7

6400 M[ h3^ 8 ]=INT' •.N3--Ib'^ J1 + i / 6405 MC H3i 10 ]^H6 + M7/l00

6410 GOTO 5740

6415 P=333

6420 FORMhT /.S:^"BIRIi COLL P PWR dPodd % / , RUH/^ET STfiR ELEV

6435 WRITE ( 15. 6420) " G • r C^-T,i riPBN#l HPBW#2 rREQ LECL HEP HUP"

6440 PRINT

6445 FORMHT F6. 2. F5. 1

i F3 . 3 - 2F9 . 3 ^ -H- 7 . j , PS . 3 6450 1=0

6455 1=1+1

6460 IF I >39 THEN 6525 • 6465 Q=M[ I J 1 ] 6470 IF Q=0 THEM 6455

6475 QO=M[ 1,6]

64S0 Q1=M[ 1,7]

64S5 i:!2 = M[ 1,6]

£,490 J = M[ 1,9]

6495 Q3=RBSQ

6500 TRflHSFER T[ 1 00 :'ru3- i 0* un 1 0 li 5 - 1 ] TO 3$

6505 MR I TE U 5 , 6445 Ml I , i 0 ] ,

' " , Zf , 0 ? MT 1,2], M[ I -J ] , h[ I . 4 ] < M[ 1.5], 00 - Q 1 , Q2 , J 6510 IF IMTU. 3)-I -I; THEN 6520

6515 PRINT

6520 GOTO 6455

6525 RETURN O 6530 R=334

6535 N0=7

6540 N3=0

6545 E2==6 6550 H=L1=0

6555 3T^"BIRr!"

6560 MAT H=ZPR

6565 MPT D=ZER

6570 R=335

6575 IF FLRGUO THEN 6595

6 5 S 0 n I S P 'k E 3 E T t1 E H C ^ 1 - • V E l- >' 6535 Q^FNNO

6590 IF Q#l THEM 6635

6 5 '? 5 F 9 = F 2 F 5i 0 5 = E 9 ^ Z 5 =

i ^ : i 1 1 i:- 0 6600 IF FLfiCl-0 THEM C^. 6605 PRINT TRB15- 'MEMS RP3ET"

6610 Q=FNS1+FH.J1 3 + FHS2

6630 niSP "SLMiiT RhNGL, LiJ i r..'!

'

;

6635 E7=FNNE7

6640 niSP "RCR GHIN SLOPE -MMs"; 6645 Pl^FMMPl

6650 niSP "hZUjEG;'";

6655 H-^=FMMh 6660 DISP "EL.aiEG ;' "

;

6665 L^PMML

6670 3 FLAG 1 6675 E4=l

6630 iJ = FNJ13

222
C - MEAS (cont)

66S5 R=336

H3=0

6695 Q = FHF0 + Fr-IM0 6700 q=fh;;63+fhx6^

6705 L$="COIiE: 0=3KVj l=-F? 2=kCR 1? f- 3 J 4=0TH Ek

'" 6710 rasp L$;

6715 E 1 =FHHB 1 -f FNJ9 + Fri-J i 5TFr-IJ3 6720 T=(B5+B6*(1/SINL -1 ' j^H?

6725 LISP # HEflS PT3' ; 6730 H4=FNB2+FKHN4

6735 IF H4<73 THEN 6^65

6740 DISP •ERROR'. #MtHS<73-';

6745 Q=FHB7 + FNL42000

6750 PRINT

6755 IjOTO 6725

6760

6765 Q = F H C 3 + F r U'1 1 + F H 1 3-i- F KS 3 -i- F si Dti-4-FinDI + F NU

1

i-FNS2--FHKl

6770 PRINT ThB20<L*

6775 Q=FHS2

67S0 FORHhT " SLANT RRNGt RZIMU TH ELEV

6735 NRITE < 15 1 6730)' rnDE R • ir-i : SEJ

6790 FORMAT El 2. 3? "Kri" ^ F12. 2' fro _ :- < Fll

.

4.F 7.1?" MZ" 5 6795 WRITE (15; 6790>E7*lE+y6' R? L' ir . W? B i!N 6? N7

6300 ni = n 2 = N 3 = N :3 = V 1 = V 2 = V 3 = 0 6305 Q-FNS3

6310 FuRMhT " FILTER* HOIS E EW 1 £ t CONS"! 6315 WRITE ( 15- 6310) "GHl N SLO FE EQ IV EW"

6320 Q=15-^lHT(Fil-2-0. 5 6325 Q0= 1 +5* H 1

.- ^^ I HT H 1 -'2 )

)

6330 W=Nr Q, QO ]*( 1+Pl-HEQ, M J + P

1

Q 5 Q

6335 FORMhT F5. 01. F12. 3- ' MHz' 5 F10 MHz "5 Fi&,. 4' Fl

6340 WRITE •a5j6835>fll5NLQjL!0i Hl h , \-' y + 1 Jj NC Q?

6845 Q = FHS3

6350 FORNhT " Ho P/P(Fi ^1 II ' PW R#l

6355 WRITE < 15^ 6350) "PROG TIME (HRS)

6360 Q=FND1+FNS1

6365

6370 H3=N3+i

6375 E1=FHT1

6330 I=FNX100+FNX24+FHR2

6335 R5=E2

6390 P=FHFC3

6395 IF R5-E2 THEN 6335

6 9 0 0 D[ 1 ' N3 + 2 ]=LGT':.5*Q1 ;i*-ii+t14 6 9 0 5 Ii[ 2j N3 + 2 ] = LGT'::5*Q3 >*1E + K14 6910 IF P>0 THEN 6920

6915 P^l

6920 ri[ 3. H3 + 2 ] = LGTP*lE + y4

6925 Q = E1 6930 IF El<:32 THEN 6940

6935 Q=El-24

6940 D[ 4- N3 + 2 ] = Q*lE + 03

6945 DC 6j H3 + 2 ]^E2+E6

6950 FORMAT F5.05F13,5?2^13,;: ? F6

.

0 J "

C F6.0? " dB"

6955 IF QO^O THEN 6965

6960 DC 55 M3 + 2 ] = Li:T<:fit:3C'!3 'r^lP' 6965 Ql=5*Ql*10t':; (E2 + E6). 10)

6970 U3=5*Q3^:10t (

' E2-1-E6) ly

)

6975 WRITE (15? 6950)hl3. Ul -

1

E£' 5 E ? t i 6930 IF N3--3-INT(N3/3) THEN ^i

'-^ 'J 0 6935 PRINT

RCR F ENDWD

F3 , 0 » 2F5 = 0

2nd CONST

. .4?F9=3? • HHz"

MHzt2 3 Pi 5 'VnHz'

PWR#2 MfiHbRL

223
C - MEAS (cont)

6995 Ml = nl'^P 7000 f'1£--M:V + Q 1 7005 n9-n2'M: Q3-Q1 > 7010 Vl='.'t +Pl 2

' 7015 V2 = 'v'l + Qlt2

7020 ' / 3 - V 3 -i- ( Q 3 - Q 1

' T' 2 7025 R=340

7030 IF- H30I4 THEN 6365

7035 Z=Hi/M3+FNS5

7040 FORNhT " #PT9 "

, 1 iy.< >

' P/P • R

7 0 4 5 W F: I T E i 5 ? f

' 0 4' U )" i;; ( mJ

[',

' 7050 FORMhT F3 . 0 5 F 1 3 . 5

" i

" " 7055 Q 1 = 1 0 'Zi -'- S Q R

( '/ 1 - M 1 i , i

i

' 7 0 b 0 Q 2 = 1 0 0 * S Q R ( (

\

' 2 - M ; :. .: i \

'

< ' 7065 Q " 1 0 i J + S I

- I F' ( V '3 -

I I : , '

' 1 3: •

' 7070 WRITE 15i 7050 'irMli 1i3'^ 7075 F H S 2 5 - 4. * l- i 4^

.

' 3 i 6 5 + 1 \ i r

' 7030 P=341

7085 G

0

T 0 El OF 71 3 0 7

1

2 0 ? 7 1 7090 F9 = M1 -[13 7095 GOTO 7145

7100 F2 = H1--N3

7105 F5-M2 -N3 7110 Q5==n3- N3

7115 GOTO 7145

7120 E9=M2/H3

7125 GOTO 7145

7130 Z5=N1/H3

7135 F3=M2.-H3

7140 Q6=^N3.-^N5

7145 H[ 1 ]^=10O*N6+H7

7150 H[2] = F*10O0

7155 H[ r]=El

7160 H[ 9 3=^^0 7165 H[ 10 ]=^LG :E7* 1000

7170 L[

1

, 1 ]-vfl-180>*l0y

7175 D[ 2^ 1 ] = C2

7180 EL 3 5 1 ]==N4

7185 Ii[ 4? 1 ] = LGT(Ni/N3> rlE-i-04 7190 n [ 5i J 1 ] - L G T' ll 2 W 3: * i E + O o 7195 IF f13:.-0 THEN 7205

7200 [13=^4 -1

3

7205 Ii[ 6' 1 3 = LGTai3- H3j :^ 1E + U3

7210 D[ 1 1 2 ] = L-rlOO

7215 ri[2j2 3=E€. 7220 D[ 3j 2 ]-W*10

7225 Ii[ 5) 2 ]==Pl-:-lE + 04

7230 hi m, 1 :i^=Bl+0. 07

72 35 M[N3,6]-F

7240 Eo^': F5+F3 .^-2 7245 Q7= Q5 + Q6 ) 2

7250 IF F5 HUH F8 THLH 7265

7255 B8=F5+F8

7260 Q7-Q5+Q6

7265 n[Hy<4;i = E9

7270 ij ( F 2 + Z 5 )

y' 2 7275 IF F2_HNli Z5 THEN ,'235

7280 Q^F2-i-Z5

72':'y Ml H3, 3 ] ^^412/ IP::

- 7295 ML N3-1 J-H J-'H :; 7300 Mi M3 ' o ] 730S Ml l |::^ 'i^ J ^.' 73U1 M[ No J 10 1-N6 + I I,- / llM

T-NP#1 (r.M 10.^ J, " i:FUR#2-PNi

1 ., I : 1 P5. 1

Q2? M3-- N3j Q; Bl

224
C - MEAS (cont)

7315 E-1

7 3 1 a I- 1 = ( 4 E + n 7^ -T p I t L 7 r , \

732H IF B3^=e ijF; E':^-U fMi l! : 7330 E=(t3-E3' i:'?-!.".' 7335 N[ N3' 5 ]-lu-L 31 '

: 73 4 0 M[ N3i 7 ]=:=ly:'-LGT'J: u:-H3. 7345 F' = 343

7350 Q ^ F r J C: 8 + F t i M 1 -r

F'

1

1 1 5 i- r

| •;; 1 7355 FORMHT F^. 3- " Kl:' ; . 7360 URITE ( 15h 7355 j Jl ! t: 7365 Q=FH3£

7370 FORMriT "sPRCb. LOpP

h J 1

5-K9" :i F«/3^ "dP(add) " 1 Fi£. 3h '*!UT6: 3P" - r9. 3j " : 3U'

RUN bET"

OHT 3H

7330 FURMHT F7.2j" dB . 3f-' 1 u ., 4 j F 1 ft . 3 ^ " dEW ? F 1 i . 2 ? " dB

73S5 Q=0

7390 if' F9 = 3 then 7409

7395 Q=M[NS,3]. F9

7400 N R IT' E 1 5 7 3 3 8 ) 1 0 L G T F 1 < f 9 ? tl [ H 8 - 3 ] j Q - 1 0 * L G T E ? i' C N 7405 Q = Fh32 + FtiI5

7410 GuTu 5740

7415 R=343

7429 DISP TREQCNHZ)";

7425 S=FHB2+FNH(F*100U/

7430 IF Q/ 1000=4- THEN ,'515

7435 F=Q/1000

7445 Cl=2. 997925E+oSt2/':S*P1

7450 DO"© « 9/Ft 2 7455 G = B2- a'-F.- 0. 313 - T3 7460 B 9 = 2 + C I"-- 1 . 3 :3 3 5 4 1 2 } G 7465 B-4l34/ri r 7470 F0P 1=1 TO Mi

7475 Q2=a-T[ I ? 1 6 ]/ 1 E+ ^-i- i 74S0 'I5 = SC I ^ 1 ] + T[ I ? 3 ] i niio -';

c i p:. r0

Ta

N6 J N

o054t-23'^ ( F* 1 0t9 > til

)

'T 1 iS].'^

; 1 ] Ji'rlOO::^

[ I; 15].

7 4 9 0 N 3 = F + (. ( H ; 0 ) - R < i j ;- • 7495 Q-( 1-T[ I 16 ]/lE-i 0 ^ t 7590 T[ I J 1 0 ]= ^ Q~Q2 .R2 * 1 000

7505 Sl I :> 4 J=Q2

7510 NEXT I 75 15 PRTURH 0 7520 P-344

7521 DISP "NOISE HriD : 0^4M. i:tf2 1 =# 1 ? 2=#:

7525 r3=FHNC3

7530 RETURN 0 7535 P=345

7536 BISP "INSERT 5DB NHEN ['.NDIi'";

7540 C2 = FNNi32

754 5 RETURN U 7550 R-346

7555 I' ISP "STORE PRGM SUN iJ; Pi R : 1 ^- YE 7560 U=^FNN1

7565 IF Q-o IHEN 7575. 7570 R -FN-Jll 751^5 1U3P 'NEll ThPE

75oO O-FHIIO

7590 N==N7-0

>*S[ I ) 1 ]*(F/TL

1 )-(F/T[ I J IS

]

*I5^ (N3/TC Ij 13

I 5 1

3

1 0 0

*i0y)t':'

1>)*TC I

I.6].--lu0h

]>'1O09

o-rri fri l-=rgtm

76o2 IF ( 7 60 5 GOrO 4,':;-:, 76)0 MRT iv- EEl: 7615 ri=0

76,.o GOTO ':790

Ihlf-N ,^:.10

225
C - MEAS (cont)

R-347

7630 DISP "FLTR: 1 -SifiyiJ 7635 fll=FHHfll 7649 I'lSr' 'HRML HTH(dB'"5

7645 EC=FHNE6

7650 RETURN U 7655 R=34o

7656 DISP "STRRtt";

7660 H0 = FHh'Hu

7665 El-U

7670 TRFlNSFEP TLNQilJ TO 7675 FuRMfiT "HZ-" < F7. 2.

" 7 6 S 0 E1 = FNT0+ 3 3

6

h

M

7635 WRITE (1 5 ^ 7675 ) FN!i|-|i- 7630 DISP "FlZ="fl" EL = "L. 7695 UhIT 3000

7700 PRINT

7

,

' 0 5 I J u T U 7 6 S 0 7710 R=349

7715 DISP "RWRK TP IN PL.f 7730 Q=FNB3+FNN1

7735 LINK 10-5*F7) ? 13-i"^ 7730 R-350

7735 NFiT R=ZER

7740 NhT L-ZER[6'75]

7743 TRhNSFER TC NO^ 1 I fO 7745 Q^^N0

7745 DISP "SOURCE: "

;

it7750 rl0^FNB3+Fi-INf^0

7755 IF Q#N0 THEN 7743

7760 RETURN 0 7765 R^351

7770 N7=H7+1

7775 DISP S$; ": SET*r' i. 7730 N7=^FNNH7

7 7 S 5 N - 6 N 7 7790 N3=^N7 + F4

i id 7' y , '3 V & 7 0 ? 4 5i I? 7 0

'

BIRS: hR' LLC? RZ:^ Ll

if. , " " s.f ,

? 5F

;00 RETURN 0

226
C - MEAS (cont)

R ]

H

Hi

fl2

h3

B

E0

El

B2

B3

E4

E5

E6

E7

BS

E9

ce

CI

C2

C3

l;4

C5

Ct

C7

Co

C9

5945

6415

7520

7495

4i'yy 4,--"^Li 5260 530iJ

5990 6035

6530 6570

^010 5065 5180

49 yy

7fi9M

1

1

1

1

1

171; '230

5569

5000

;^07b ign

'62:5 7b5.'i

ii-j4y

4H

6160 6189

i' 1

"

5210

5929

6360

74 1 5

7^190 7490

462y 4t.49

:,y4y ^4fcj

0iO

35 jijay 59

618^ 0 bo70 b7i:0

5 6340 6350

6165 6165 6170

5005 5560 5565 7469

74?5 7495

44'

4530 456?

4540 45-^^1

7460

45?0 45 4595 4t.49 71, '5

227
C - MEAS (cont)

JJ

By

ni

l>2

ri3

ri4

ri5

Iiy

L9

E

Eo

El

E2

7455 ?4i;~5 7450 .;

.

7 J lb jxy

4535 4545

4 1 b 5 5> i-J '4 1 1 5 b 3 69 3 a 6':f..j'5 697

4535 4545 456

4165

6 46130 6390 6;

:;.145 5150 5

I-'' 6 6;

a ^, .:|, y 6 -1 7 '1 4645 I:;. Z 9 0

4- 1 6 :.040 1

4

F5

F6

F7

Fa

F9

3740 4640 69.:

5175

5 PI

c;,.;;

6-0 i l

' oJ'-'M

7490

6595 7iyy ,'378

4 365 4510 4';iiU

''595 71u5 7340

5780 "v:;-i^:;0 ?.'3':;

6965 69i-'0

7330 7330

,-7 or:, TMRn

0 0

.30

IU5 •!70

645

4 35

228
C - MEAS (cont)

1:4

G5

H

HI

H5

H9

I

Li i:: 1 ,.,;:U b .by

15

J

Jl

K

Kl

K£

K3

K4

k5

Kb

K7

KS

K9

L0

L 1

L4

L5

Lb

L7

LS

L'?

M

.05 61 70 fcV'20 ,-34y

3910

>450 fa45;i b45'-::i

> 5 0 5 1 5 0 5 1- 5 u 5 '475 74S0 74Sti

'500 505 ?' 5 1

0

4555 46 05

8 9 0 5 S S 0 5 S ?

;i0

5110 51 £.5

'40

- 0 5710

::480 o b 0 490

t,:;, .II;.!

L 1 gj 57 1:

', 4 w i

4' 7

45.::i0 4:j95

i.;;; L::; g |;^| £505 6505

4 I ' 'j / 4 1' '-1 7495 7495

4435 4490

b,;.;30 b4 r-'0 b400

55.- 0

229
C - MEAS (cont)

Ml 454 ;;5 7 1 b y4 2 0 ki 5460

7130

42 i.M

1-, ;;; -i-M 7135

-! ,3 !

N2 4 4 200 4 2 ] ' 7060 7060 7'07h 7105 7 i 3i

N3 4 4200 4220 -1 2 0 4.:30 7005 7 0 6 5 ''065 70 . 0 7 1 1 0

H 475303750

7735

431 ti

HO 453 1 0 7 7 5 0

33 '-'5 6090

7 7 5 0

-:33 n

,3 f 3 r: 5

•""= 0 Cj '^'1

f-;

Ml 4 7470

ti2 452653870

5330

3i920 3 '3 T ' '~< 5 5 0 0

4 4 2-j

H3 4 3810 3820 4000 4 0 0 0 4905 5i c- 5 0 5460 5470 5470 C 2'"'i

:

6900 6905 6920 6940 ii 9 4 5 7055 7055 7 0 ':i 7060 rOi--0 7 0 7 0 7070 7 0 9 0 7 1 Oti 7 105

7190 7200 i" 2 0 -J

H4 4 4100 4 J 65 4 c- 3:

3

5310 5320 V.' i:rl 'i J 5430 5 -i- 1

1

6735 7030 1 U i -J ? 0 7 5 7 130

N5 4

Hb 476004 9 4 0 5040 5170 5 6 -1

0

H7 4

6 0 3 5 7730

~ cr -J

1 -J tj 6250

7 7 c'

^1

4930

6 4 i'J 5 7790

„i 9 J

:

,

t.= i" J 4940

N 3 45^:20

4 9 3 5 5640 "1 6 J

'

'i

: ,;

, inv

i-:,.-,;: t.- 5340

6335

7300

6 3 9 0 7 3 0 5 639'j

7310

r.-lOh

1 ..I- - 6 1 0 i 7 3 0

Ny

4325

6355

4 0 0 4 9 f) 5

I " i "j i U 1

'

i . _ - 42i37 550':

F 3990 3 3

')

5 2 0 0 5 2 4 5 5,;;:5u ' J 3 0 3

cr cr 571

0

6295 r.

' -i ^

PI c: 6645 6 6 4 5 C 0

"3 0 6331

Q

cr 3780 3: 7 9 0 33:00 3:34': 4135 4140 '1 1 4 0 4 1

' 4 1 i 4175 4 190 4i95 4 5 4 33" 4330 4 390 4 ":95 44 ;5 4 44

V

4605

4^-70 4610

4675

4ir.l5 4635

46 i 5

4 6''i i 46.1 L 4 3 1 i- 4: ;65 5215 5290 5 3 5 0 5 3: J i

3 40

20

r-"0

i ki M :j 1^270

: -I 00

3360

' 0 6 0 110

490

945

3310

4 2 3 0 4

'1 -4"1

0 1 1

J

5415

1

' 1 3 y

4 300

7 3' 0 3

4325 43 30

7 0 30

yiiy I :jyo

feyuy

khi y bOO:

^ 5 5 y ^742

345 4350 4955 4960 5040 513''-

J

r- 4 05 i

.

4 0

y 0

. 4y95

I c'

':^ 1 0

:i 6840

:i 3 '3 9 0

1 43 40

1 4/30

1 4 450

;i 4 642

j 1 1 4 5

'j 3i,'60

j 54 60

6

1

1,

40

" 4 y L t b :' r:y 7065

7130

7495

5140

-J 1 , 0

/ O Li 5b40

7770

r 1 1 J 7403

' 0 423y

30 6220

424 0

6 31 2 0

4070

4 1 .33 434 0 4430

4 64 3

••!7>; j

3 13.. 5470

4 3; 4 5

4075

4 1 f '5 4 :

0

4-1 90

40::

0 .'i'

' d 7 0

' 1 40

3145 7310 74 00

z: -: ~:- a3 : 30

4075;

4 1 VT

1 :::':3: 4 ';.i3i 4bbi-:

4

4' 1 0 0 5460

y b::-:y

e 0 4 y

7 7 8 0

":

:

0

,1V MM L],.-;Hy

454 0 7010

4120

I 4

230
C - MEAS (cont)

5615 5620 5630 5645 5655 5665 5670 5790

5795 5315 5 '-MO 5'^ iO 5970 6055 6065 b..:'. I IJ , 0 ':;,.:45 6470 6495 6505 i-'5':' 5 :'::'<} -olO 6 6 : J 0 b 6

"1

1",' f ' t'l ' ['''' r-.'6'j 6775 6 3 y 5 3 3 0 ? 4 0 6 3 f

1 6 I 6 0 6925 6935 6940 701 7U .'h . U 7 5 727'0 ,

" 3 Kl 0

•

'

"

' 'i i 1 7395 7400 ,'4-U- 1 -1 ,_.

':,

1 7^3 0 7435 7495 ?' 5 0 0 5 1 j

?' 5 6 5

7" ^ 7" 7 5 K 0 1^-] [."i ""7J

6 8 3 0 5320

6340 6040 f, 1 ; '] u 5790 5 1-: 0 0

r; 6 0 6475 6505 6325 6330 6330

4550 4605 ; .

• . . S C: i:r ir I-' Q i.r 5 9 . ' 5 f.dO\A 6 5 y 5 6900 6 9 fa 5 f, 1-, 1 69 •5 f'" t-i 0 0 7005 7015 ?^ £ 0 7 0 5 5 7070

tr-J 4025 5660' 5665 b 4 3 0 6505 7060 7070 i"' 1"' "i;;^ 7500 7500

7505

cr 6495 6500 i:^0 3970 6970 t:T 'Ij 7" ^; ~ ;~: c; 7020

cr cr cr cr cr J -J -J -J 5 5 6 0 5 5 6 5 6595 7 1 1

0

7245 7260

CJ 6 591^ i ,L H

'7 b H-i

CJ 7245 '' 2b 0

7' 3 0 !^ 7330

cr 3360 '. "! r'- f'i 3395 3395 3 9 3 0 3930 3 9 9 31 5335

cr 4320 4325

"cr 3745 4000 4330 4330 4 335 4935 4340 4340 4375 5270

^

"'

'-' ~^ 6 8 3 5 boy 5

ET 4935 5 1 1

0

5110 7330 7 -60

cr 4900 4000 5030 5035 5085 5090 5090 5113 5270 D 2 r* 5

cr •-. i-i cr cr O O -J J 3360 3395 6720

5 4150 4165 4170 4730

cr

._! 5230 5 2 3 5 5240 . 5240

5 4950 5130 5 i 3 5 5140 5160 5165 5250 5310 5315

5325 -J „" O _i

cr

cr

.J

-. -? cr cr

.-' i -J J 5205 5250 ~i 3 i 5 5705

.J

5 40b0 4065 4605

cr 4200 4 260 ] 1

5

5420 5420 5 4 6 0 b 3 0 0 70 It 701

U

n cr —

I U

.J 4200 b300 7 0 1

5

7 0 1

'5

5

6

6

4200

4200

4200

4240 u:4 0

6800

4 3 0 5

4 3 3 0 4..-; 15

7 0 2 0 4335 57 IL

231
C - MEAS (cont)

I 1-, h 4206 425:;-i 42 -h''

554iJ 5'j4'i

4&bG 40Si::i

46b 5 4'j:jo 4'::So

6 7 ':i iS 8 3 6 t

' -1 'J

b 4215

fa 4 2 6 6316

b '1 P. '-: fi

4410 4 225

3736 4 920 , 1 [ Q

: 1 1 e

y6 4:

4 1 6 5

5766 5716

t6 42 66 43

s6 6146 76

56 6156 76

15

5 6 1^!

: r-- c:" i:;:; 7570

21

FHH

FN 13

PNC

FHH

6 4 3 3 6! 5640 5716

4990 6

4S65 433

7726 775

7 501

7 466

ti 6 2 4' (:;!

'0 5476 54S' -I c; CI;" c i

f 430

4 3 -"3 4 125 4516 4655

4915 4970 5060 5666

45

4i-16 4745 4735 4306 4336

5755 6665 6730 6745 7425

' 0 5 1 9 0 521 5 6 2 4 6 6 2 4 6 S 7 C 2i 6 7 6 5

FNF

FHF

FNG

FN I

FtLJ

FNK

FNL

FUM

' 91 6 4- 3 2 0 6 2. 1 iJ 6 2 I. ii 6 6 9 5 4175

5015

4;' 5540

I b 6 5 C 2 -t 1

6655 6655 6r. iu t.i:.:.30 6,"! 5 b715 67 15

i'

7' 4 3 5 1.1 4

7

""i 5 6 .1 5 5 6 1 -j '2

l- 6 6 6 2 4 61

232
C - MEAS (cont)

FHN

FHP

FHQ

FHR

FHS

FHT

FHU

FHN

FHX

FHY

FNZ

H[ ]

BE ]

CC ]

DC ]

FC 3

G[ ]

MC ]

437

NC ]

S[ ]

T[ ]

5976

coy

7395

4830 49 15 4V'7':-;: 6135 6195 b5'J ; cr 7540 7560 ;"5 JiJ "'-Ot 4540 4590 5195 524^

'•145kI 4510

;. ' 1.

1 f.; i-i h

4135.1 -t-^ I10 4415 4740 4980

9 i Id .1: 6ftf!

4125 4985

4520 4665

4865 4385

4410 4410

3810 5215

3330 5550

4420 4420 4420

4490 4490 4490

5170 5175 5200

1 i O-J

3710

55 1

5

h96fi

513 = 57'0f 717^

.•225 ,'740

9 3710

9 3710

3715 4940 5335

5640 5655 5665

6040 6090 6365

'485

'400

5975

601 = 749 =

7400 7610

6020 6830

5555 60:0

b ^1 U U

'' 4 4 S

'4?'

5

5 ti 6 y

6 2 4 0 bo 45 67; 6fl

5075 6380

5190 6240

5060 6745

4 4 1 -J 4

1'' o 5

4435 4440

4490

5 2 0 :j

6245

7' fi 7; 5

r-; O ._[

r550 4byj

;3h5 65611

.80 7185

?00 4305

:;4 0 5345

by

5230

5490

6255

7075

7680

bf'HM bi'LU-l

4400

5140 5160 5165

7190

55by

5770

yy

4 i" J "507i 7670

4710

6120

b y 3

b O O 1

55 4488

>g 4640

69yy

4310 43;

b>;r5 6380 63b5

y booH bo4y hl-;4i.-1

'505

'480

y lyy

6715

4760

6 1 4 0

t7 7 7 1

1

564^

66 1

8

7365

66 lU

7405

44yy

4640

>::-'i.-i

'4o'

4485

7160

;i0 5315

:i0

4808

6150

7425

7789

4415

4485

4645

7165

6920 b94y

5585 5590

5790 5905

98 6395 6400

j ET . - cr cz .-" -~ r_ !=

. 0

by4n f buy

7340

'485

X[ ]

yy

3710 4230

5720 5720

2y

233
C - MEAS (cont)

B$

L

Il$

E$

7t95 7 742 7 7^'

4 d 1 U 4 6 2 LI 4 ij r

'

4995

^^4

4 9 9

'"5

fa 7 2 0

boUU b~'H5 bjDo l ib I'y

4 6 40^5 40-:;0 4^jb5 4075 4080

64 bO'iO b2S-:.

b : i 0 63 I 5 bbb5

6705 6710 b 7 ?' 0

234
8.6 D - RE7vJ0P-K

235
D - REWORK (cont)

i f Hi ;:J, !. 6 J ii U,

50 [ t; s. 1 n . 4 N R e; h i: k i-: , j i - f i f- i .4 - f 1 ? 52 \]fij Rl 40, 10 j 60 EG ^'i' 1.9

62 F5=r9-1 . 63 M[ 3 ] ^ 3 j:-u . i 36

64 F=^7.5

6 5 ij F 1 1 J 2 66 G 0 T 0 1 3 3' 5 20u DLF FUOj. i j^a-i!" 21 275 IiFF FIIE(Q)

236 FOR I" 1 TO Q

2S5 EEEP

290 WFlIT 3ESn0u*( 1-4 V:i 295 NEXT I 308 RETURN 0 305 DEF FHH(0>

310 niSR " ( ==HC) : "

! 0° 515 INPUT

320 IF B$='" ' THEN 3::';0 325 RETURN VfiLCBJi

330 RETURN Q

535 DEF FNKQ)

340 H j "

-- - =- = - # # % \'i I ? Ul

'

'

545 HJ^^ntl 4*Q-S) 4 + Q ] 550 R + [5] = Fl$ 555 H*[9] = H$

360 FOR NAT F5.

1

3 6 5 I' l R I J E ( 1 5 H ;; 6 0 ) R $ Fi ? Fi 1 1 \ i i R $

570 RETURN 0 575 DEF FNK(Ha;'

5 :3 5 L 7 = 2 5 6 ^ E : P ( 0 . 1 1 i -r: ( fi i

i j j / [ m i

^ ti . / 5 90 Q - : 0 . 9 2 1. 1 '

1 f !j . 2 1 2 /• F T 2 r 5 . 1

0

'/

4 0 a G

-

' • - 6 . 6' 4- '4 E:

^- 0 < 1 ~ i4 . 0 2 , : 5

:

' R: P\ ) t ], 0 . if: 2 Q 2 1 2 . 7 5r * Q

405 iJ 1 - 0 . 0 2 2 1 5 + ''11. Rl 2 i; 'd ' - ij F: 410 L 4 5 . 1 4 5 Q 2 + 1 - 1 ) [ F:

.

' 7 5 : -i- :j „ 1 7 2 u f 7 . ? 7 ^, 4 1 5 0

--^ '-: 1 + 4 F' :3 . .3 . - F" 1- 2 )

/'

] - h- ; . T F r 1 F' n F 1 + 0 . 0 O 4- 6 420 G 5 1 . 4 5 1 E + u F' ( 1 - 0 . Fi 2 . : F. „ - ' \d i 5 . F: t. 1 , : P ( - 6 4 4 * Q

:

4 25 L 5 2 . 0 9 + 8 . 2 7 * 1

-- ij 2 i

- :F

)

4- F: 0 C; iF 2 . 5 2 9 E - 0 2 * 1 - 11 . 1'l ? ? ? * C. Fi f IF , F' F '? ^ F f 2 < 1- 0

'- + 435 L6-2. 17

4 4 0 1 G 4 L 4- + Q 5 -': L '5 1 G 6 * |._ 6

4 4 5 L 3 - Rl 2 - ( Fi

. F! 2 2 7 * ( 1 - 0 = t) 2 2 Fi 2 * C O )

1' 5 . 2 € 2 +• 0 . O Fi 0 2 * L 7

:

4 5 0 L 9 - 0 . 0 1 3 455 Fl-IOT ' -21 10/ 3 INF ) 460 B4^^293 02 t l-\ 1 ':'/

] . 071 (F 465 IF B<14 THEN 488

470 B0=B

4 75 GOTO 435

4 3 0 t'; 0 = -- 4 . 2 4 F: + 2 . 14 6 3 - F: - O . ] 0 F: 5 9 G F : -i 0 . 0 ij 3 0247 * B 1

3

4 F; F II 2 = ( T [ N 0 ' 9 ] 1 Li 0 1 . 2 li J. ,.

: -> t; ti : > i 2

4- Fi 0 r: 2 < 1 - E :: f c - if :f :> . 0 2 - 1 . it 1.

1

1

495 F3-1

508 Q^^' N - F^ 2E-Hj3> t2

585 R4:MF5:- F F^-F7^^1 5 2 5 . J 1 1 0 1

>

. - 0.0 0 IT i 1 -r f

" - F . • FJ N 1. .

)

5 3 8 \ : s 1 - F i - J 1

:

' + E -i p ( - o . 4

1

v- o. ? > 535 0-1-H 909E-04:'*' F3 -:-' 'F':i. JRI-JL ' l ItJE)t2

54 0 3^=1/0

545 F9^- 1 - ' 1 --3 ' +E'' R F -0 . 4F7't02 : 550 r: ^ R 1 \: f: r \ 3 * r 4 + f : 5 F 6 ^» f: 7 \: f: * i: 555 RETURN K

Fi596/FT2)/'

lb

t2F

< i

-1- 0

;'t3*0

. O046-:': L

236
D - RE\TORK (cont)

560 DEF FriZ- im>=FriK :h- : .. .. 565 DEF FrJC'.U)

57G N5=H5+l

575 Q=Fti:.:

580 PRINT ^iSi ? :

; 585 IF STRT3=ti THE t _ 599 EHTE- - -^Q^Qi

595 IF C : 1- ? THEH 620"

600 PRINT

605 DISP "CLOCK RESET"

?

619 INPUT Ql

615 GOTO 575

620 FORMfiT " c.76"»r5.8>Fc..2» " ^

' 625 WRITE < 1 5 J €-20 > Q* 1 91 3+ 1 hT 1 i eT4 > ? I HTQ 1 / i 60- 1 6©* I MT< Q 1 1 Qt4

>

630 Q-2S

635 PRIhIT

640 PRINT

645 FORHRT 35^^ F4. Q- 72?'? "RUM- ? F3. 9

650 HRITE <155 645)-N5^Hv'

655 FORMAT " <-jF9.35 "

-

665 FORHRT 20K? "PROG F5. y, 4V, F3. 8

679 WRITE ':z 675 PRINT T-; ' r, i r. J : 5Fir9,i2jr' ••;p$C4»6]r- "jPSL^jS:;

6S9 WRITE :15?855.'C

685 FORHRT 19fi!F6=3j" GHz? " . F5. 1

? " Ft DISH"

690 WRITE a5.685)F5D

695 PRINT

700 RETURN 0

705 DEF FHSfQ>

710 FOR 1=1 TO Q

715 PRINT

720 NEHT I 725 RETURN O 730 DEF FHECN0>

740 E0=0

745 El^SO^a.-^Kl-l)

750 IF B<14 THEN 765

755 Q2=0

760 GOTO 738

765 Q0=4.7-.- - : -

_ - 770 Qi = (7. ----- : ... _ . -

. : : .. ; 775 Q2=0.1~ ;, :

' • . . 786 D2=L0t - : 1 J 735 Pi=2*s: ^ . : ; - 796 E2^ai- . . : 795 E3=vW. '

: 800 E4-9.S : _ . 810 E5-':iC- : . . . iuy

815 E6=0.Cli - ,1' -1

]

820 Y=HFNZN8^G/T

825 Y5=V -' V-n

830 E7^- ' -

- " - : !

Z

835 Es=..- : ;- : :-: 840 E9-10;j*D9-*=. 1- k9- y 845 RETURN 0

237
D - REWORK (cont)

S65 DFF FNM<Q)

870 Q=FHSQ

875 FORMHT 5':-"TrMP iiCU pi, REL iiUMD ..jiiTER tEilS

880 NRITE as? S75 > "CL uiilj rrr.'EK iiiiru^' 885 FORMRT F9 . 1 » " F" . F 1 0 . 1 » " F " < K iJ . i , " X " sFlO. 1» " gci.'-.--it3 %F10. 0 y F 1 0 . 0 890 HC 5 ]-= 1 000*E:<F ^ 0 . It i :'!,[ 4 1 y ! 0 ,. 73 - < H[ 3 ]/ 1 0 / T0 . 73 > 895 Q=i00*<:Hr b ]- uiTM-i[ 6 J.' 900 WR I TE ( 1 5 , 385 ) H[ 3 ]

- 1 U n ML 4 ].- 1 u , Rf 5 j 1 R , L7 ? I NT ^: H[ 6 ]

-

1 00 > . Q

905 RETURN 0 910 DEf- FNHCQ:'

915 GOTO U OF 930

920 RR I NT THB3 1 . " F I T TO " ; NT 1 , 9

]

'

' liFlTti

925 RETURN 0 930 RRiNT "TflPE";v3".jnT.n ; ro; L$;

935 F 11 R t'l Fl T 5 ? "F: E W 0 R

" ,f6. 3 940 WRITE (15) 935)N[ 1^10]

945 PRINT TRB15jIi$;E$

950 RETURN u 955 DEF FNY(N3:'

965 IF N3 THEN 1155

975 IF F2 THEN 1085

980 X 1=FNZ(N0)

935 Y = 1+X1*G.-T

990 R1=T-H9

995 I 5=(Y-1 >*Rl/£50

1000 IF N£=^-3 THEN 1055

1005 I5=( Y-1 ;'*Rl.--50 1010 GOTO 1060

1020 R=401

1026 FORM Hi " Kl K 2 \:3 K8 K9 K HPR1030 WRITE ( 15, 1026) "R-p it S(FU) X 1 K

)

1035 FORMfiT F7. 3) 6F6. 3? F 3. 4, F7. 2; F; . E i 1 .

3

1040 WRITE a5H 1035) Kl 5 K 2jK35K6h|::3 sF/^',R,B2.B3?S[Nn. 4 EN7(N0) • 1045 PRINT

1050 RETURN 0" 1055 Q=FNF3

1060 FORMHT • ZERO LEV El.. "

? 4X5 " 100"; LlVEL"j 4X) "Y(IiB; "? 5 /, 1065 WRITE (15j1060>" K" FFiCTuK 1 i<3]; ") 3 ( • J n > T 1070 FORMHT F7. 4, "^TH" .

F

1 1 . 4 « " t-TH" ? F 1 1 . 4 5 f- 1 1 . 3; 5 F 1 1 ., 2^F9. IhFS. 1 1075 WRITE (15. 1070::'R1,Y n. Rl - 10 + LGT''M:? ;;i*G. SE H0? 4 1:, H3

1 080 PRINT

1085 PRINT

1090 FOR 1=0 TO 5 1095 PRINT THE; '10* 1+6

1100 IF N2=-3 THEN 1115

1105 PRINT 20* I

;

1110 GOTO 1120

1115 PRINT 4*1-10;

1 120 NEXT I 1125 PRINT "(;>"

1 130 Q=FHF8

1135 PRINT " N3 ";fli:; THFbO, "F-'UR PWR': FirHi)

'

238
D - REWORK (cont)

1140 IF H2>-3 THEN li5u

1145 R1=R1-25*I5

1150 GOTO 1245

1155 IF F2--0 THEN 1165

1160 F-P-(X + F[ 2 ]*X1 + Fr 1 ]*X2>

1165 Q= I KT ( ( P--R 1 )

.- 1 5+0 . +;-;; 1170 P= I HT < 1 0t5*P+8 . 5 >

/• 1 6t5

11S0 Htl 1??2]=""

1 135 mi 33. 33 ]= ! " 1190 FORNhT h3.0

1195 OUTPUT ':;fl$[ 1 < 4 ]s i 190 jN3.

1200 FuRtlHT F9.5

1205 OUTPUT (flf[ 60? 69 ]? 1200>r

1

1210 IF Q<1 OR Q>72 THEN 1220

1215 fl$[QjQ]="*"

1220 NRITE (15: 1 190)fliF

1230 IF N3<N4 THEN 1245

1232 Q=FHFS

1235 PRINT THB7;fi*

1240 PRINT

1245 RETURN Q

1250 DEF FNG(Q)

1255 REM <G/T #2 P135>

1260 IF Q=-9 THEN 1336

1265 IF Q>0 THEN 1275

1275 N9=N9+1

12S0 Hl=ril+X2

1285 f12=M2 + Xl

1290 M3==H3+F

1295 Vl=Vl+K2t2

1300 V2=V2+Kl-r2

1305 V3='.'3+K1*X2

1310 V4=V4+P*K2

1315 V5=V5+P*>a

1320 V6=V6+Pt2

1325 GOTO 136S

1330 V[ 1 ]=V4-M1*M3/H9

1335 Y[ 2 ]=V5-M2*H3/H9

1340 GC 1 ) 1 ]=V1-Hlt2/H9

1345 G[ 1.2]=G[2. 1 ]=V3-MlsM2/N9

1350 G[ 2; 2 ]=V2-M2t2/N9

1355 MfiT C=INV(G)

1360 MAT F^^C^rY 1365 R2 = V6-H3t2/N9-F[ 1 ]+Yl 1 ]-FC 2 j*YL 2 J 1366 X = (M3-F[ 1 ]*M1-F[ 2 3*M2 :-- N9

1368 RETURN O 1370 DEF FNF(Q)

1374 GOTO Q OF 4985 ? 48 1 5 ? 1 029 ? 5320 ? 5574 s 5624 < SuOS 5 5690 ? SbOu j 5633

1376 GOTO 1395

1378 DEF FNO(Q)

1380 O-FHHO

1332 RETURN O 1383 DEF FHV(Q9)

1384 GOTU 00 OF 457y ? 2 1 40 ? 4430? 4480? 45-1 8 > 5800 ? 5 1 30 j 523U ? 5542 j 5660 ? 5020 ' 3'-i25 ? 5 1335 GOTO 1395

239
D - REWORK (cont)

1337 II FF FNJfQ.

1 o 9 0 I J iJ T Ci Q. 0 F 3 1 b 5 ) 4 B 5 > 5 1) 7 5 ? 2 3 5 ? '3 ; j n < 3 3 5 ? 3 ! J

1

1395 R=^4y3

1406 F6-U

1 4 b 5 F: F D I M C [ 3 1 3 ] ? i:; [ 3 . :•: ] 'i F [

2' 1 ^ Ci i; 4 b ^ I 3 i ? 'i [ 3 ]

' 1410 D 13: F "0 F: W ? 1 L 0 H i i • M I i

i

i J j

' ; J i t:: I. . ' '+ 1

• 1 H: J F' l t . e F; '

;

1415 Q=FHB3+FNNu

1430 GO T 0 Q 0 F 5 0 1 7 j 3 i 1 S ? 4^ 3 6 "S - 3 2.

2

5 > 4 £; 4

' 1435 p:::403

1440 n=:FHFl

1443 D I :E; P " \< Fi F"' \\ D H

1'

F i 0 rl 0 1444 Fi=FF]Flu

1455 RESTORE

1460 n I 3 F' " S T h R T 0 Uh ' I ' F it

'

'

" 1465 14 C 1 ^ 1 0 ]

^= I -I Ei 3 + F Fl n 1 ! i.: • ! i ] O 1- 0 „ 1 1470 Q^^FNVb

1600 R-404

1639 IF F3=0 THEN 1645

1640 0-FrVv'l ] +FITV9

1643 NflT M-ZER

1645 \\[. 1 < 10 ] = H0

1645 R=405

1650 3 ERROR Z5' 3195

1655 F3 = H^n.. 1=4-14=^=16 = 0 1660 E5 = 6."3600

1665 F4-F4+1

1670 HS=M[ 40 5 1 ] i-l 1675 Q-F4+3+F7*33

1 6 3 0 L 0 Fl I! I) Fi T' Fl S ( 1 0 F- 7' '> s Q

1 635 PR I NT ' F I EE " ; 0 ^

!

' :f ^ RUt-i -OFT " 5 Fii: 1 1/ 1 OO

1690 P R I FF T' T' h 5 ? S J , H f ^

' F' F: E: b

'

' ? Fi C 3 T ' 1 0 0 0 1695 Q==FN33

1700 IF N 0 ; 5 OF' Ii [ 1 , 3 ,1 U 1" fi E Fl 1 6

4

5 1705 Q3---Fl[ 3 1/1000

1710 Q-F3-Q3

1715 R-406

1730 IF F3 hHD Q THEN 164 5 1735 IF F-Q3 THEN 174 0 1730 F==Q3

1735 G!=FNJ2

1740 N 7 = ( Fl [: 1 ] . 1 0 0 - I N T F l [ 1 1 / :l O O ) ) * ]. 0 O 1741 N6==INT(H[ 1 ]/100 ' 1743 E3=^34 --360/C0S3[; HU;i 3T

1743 N-6*(N7-r'

1745 IF FS=0 THEN 17'.

3

1 7 4 6 C' r 4 + F\\ F 5 ! F N F -i r IT o 3

U

1747 HI 40 H 1 :i-HF 40 h 1 ]

! i 1743 GOTO 1645

1750 R-40?

1755 N3=N9=0

1760 N-N+1

1765 SERR0R 35:: 31 95

1770 fl7 = lNT( ' 41- 1 )/5':'-i 1 1775 H3 = N+3-6:rH7

1730 T 6=4 13 r

4

1735 N4-IUT6-?;]

1790 IF T 6 1 THEN ISOO

1795 N4^Ii[3j3J

1 3^.10 V 7---I'l F6 - 7 ] 1 00

1305 F] --III FFi 4 ]/ 1000

1310 p] i 6, S ] 1000

1335 R= )i[ T r,, ] ]/100 i-l;;.i 13-'0 E^^DF F6, ] 100

IS •;5 IF F] =0 MNH N3tt ; I lit N 1 355

240
D - REWORK (cont)

1840 R=4ys

1845 Q =^ f- r U1 1 + F H C 1 + F N K M 0 r- F M I i 1 i F i I J 3 1859 PRIrlT

1855 FOFNRT " NEHS flZH'liirii HPfiH TIME'HkS'^ nr^xfT FLFV

1860 WRITE (15s 1855' ' CUI I 'l !^

i r \\" 1865 FORHiiT Fi.Qj "sec" F 1 1 . 1- 1 U = 4 5 f 11 . '3

j F9 . 3 ? " ds-=i" 5 F'^". 2' Fk. fi. :':FF..ti 1870 B=FNQL

1875 V9 = Ff;:'<He :'*G--H5 1880 l-jRITF a5< 1365:' !:rL-^:- Fi? E/'Sy^ Fl ; Ei s L? HS- H6j h7, H 1885 TRFiH3FFR T[ MQ, i j i r

i

1890 Vl=i'll = e 1895 PRINT

1900 IF W£>-2 hHIi Fl^n THEF! 3 320

1905 FORMRT "dT="rF6.3j I^'Kj "T 'Tfi =":.F?.4> " +

" ? F3 . 5 ? " *CSC L" j ISKjFS. 1 1910 WRITF. (15.. 1905:- V9j Nt 13. 2 j» ML 13? 5 Jj S$

1915 PRINT

1920 R=499

1925 P^U=Fi[ 9 ] 1944

1930 1=<A\L iS'?3 + HL IS? 6 J/3IHL;--*i-l3

1935 IF H2#0 THEN 1945

1940 Z=T -H^ 1945 IF H2 —3 THEN 2443

1950 V=LnG(0. 5>*4.--<E-39*E3.-E5.- N4 :'T2 1955 Q1=F1

1960 W1=F1=0

1965 F1=FHV2+Q1

1990 S3=K

1995 M1=F[ 1 ] 2000 FORMOT "PfiSS #FIT BFTcC;- *HPBH T/To. DT("

2005 WRITE ( 15? 203O;'3i' " ::'.-Th FEni t SLOPE T-FIT"

2010 FORMhT F3. 65 FF, F3. 3n 3X' ' ? r i3. 4f F9. 4. " +-" ? F6. 2? ""r' ? F7. 2^ FT. 2. '";"

? 2F6= 1 2015 Q=10e*SQE';:R2-'Hy - FL 3 ] 2020 R^lyy^': (S3-NL 13? 3]-r-i[ 1 Sj 6 1/SIHL > - V9

2925 NR I TE ( 1 5 ? 29 1 9 > 1 ? N3 ? BET ':. C: > > S3 < F L 2 j 5 Q ? .V7 ? F! 1*290/33 ? Fh "

" 2939 R=410

2035 N[ 18^2]=S3-H[ ISsFl/SINL

2040 T=(NC 13-2] + FC 1 3 ? 6 ]/3 1 ML *H9

2045 N9=9

2050 Q=B/120*ES/E5+1

2055 FOR H3=V7-Q TO V7+Q

2060 IF H3<1 THEN 2099

2065 P = U * E X P ( n [ T 6 ? H 3 i 7 ] .-a 9 1 4 > 2070 X1=2*(H3-V7;'-- H4

2075 X2=K1*K1

2080 P=^L0G(P-S3-Hl*Xl

:

2085 Q=FHGH9

2090 NEKT H3

2095 P=FHG(-9;'

2100 V=F[ 1 ] 2105 Wl=-r[2]- F[ 1 ] ^2 2110 E6=V7+W] ' M4 3 2115 TORMriT ¥?..C3fft...:- r9.3. F :n 3j -de -j" 5 7Xj 5 Fl 1 . 4. FG. 2j "";" • F7.2j5Kj "-" > Sr.,

"

2120 E7 = E5.--ES^fi4*30R I ubCi.;...- 2125 Q-E;;P(X-F[ l ] + m i 3":' 2139 WRITE (15.2115>2jM9« HE T'-.C) ..Fi-%L!> "

? 199^ SQR' R2--H9':'.-U. EG

2135 D[TG.7 3=190*EG

2136 GOTO 2208

241
D - REWORK (cont)

2MQ f?-:411 2145

IF Fl^U THFN ili-.n £15^5 |>:FH', U 21f.d Flip M:5-l lO M4

2165 F^^4J-t;:r' ill Tt< H3 r,' ] -[

:

2170 IF F l-^M THEN 21&i!

2175 Q=FNVN3

2180 X2 = 2:' H3-V7 ;'/H4

2185 X1-E;^'F': V*' X2 - 141 t:-'':' 219U Q^FNGtl^

2195 NEXT M3

2205 P^^FhiG'-y'

2206 PETUPN 0 2208 R-412

2209 0"Ftrv'2 2210 IF F" [ 2 J : 1 . 8 E: h 0 ri i-i [i [ [ ? 1 K . 3

F - u T l-i E r-l 2

2^ 3

0

2215 PPINT "UMliEPFLuli''

2220 DC T 6 1 6 32700

2225 GOTO 2235

£230 r!CT6!.e3=LGT';.FC2]--*lMi4

2235 IF H2w0 THEN 22611 2245 fl[8]=Z*lE*-04

2255 fir 10 3=^E7+lE + 04

£258 R-413

2260 IF FI^O THEN 2230

£265 PPINT

£270 WRITE a5. 2000)3$; ".' '1 R Pf|iK# SLOPE T-FIT"

2275 FOPMhT F2 . 0 ' F6 . y ? f 4 . : F':' . 3 ?

' 'J.;: \i " - f- i 0 . 4 j F9 . 4 ?

' +-"? F6 = 2 « 2F7 . 2 2F6 . 1 2280 0= 1 OO-' SOP ^ P2 N9 i FIX]

2285 R=ie0*(X-N[ 13j2 J-NF j3:. f. J- 3IHI. - ^'9 £290 WRITE ( ] 5' 2275)35 N'-'. i:L T iL < t7, 'X 2 ]- E6) FC 1 ]:':200/X' Hj

2295 0=2

2300 IF N2tr2 THEN 2310

£305 0-5

2310 Q^FHIuj)

2435 GOTO 2540

2440 P^^414

2445 f1l=Vl=0

£450 IF Fl-0 THEN 2460

£455 Q==FNY0

£460 FOP N3=^l TO N4

2465 P = U * E X P •: ]J [ T 6 > N 3 + 7 l/\ 0 1 4

)

2470 IF Fl^O THEN 2430

2475 0=FNVN3

2480 MI^Ml+p

2485 V1=^V1+P + P 2490 NE:;T N3

2492 M3=H3-1

2495 Z=ni •• N3

£500 FORNHT 1 1 , • T/TH ' . 1 OX , " S I GMli " . 9K » " MEflN " , SK j " iiPJS

' 9X , "T" 2505 WRITE a5<25O0)

£510 FOPMHT F 1 6 . 4 < F 1 4 . . " ..FII.Xh" ' « F9 . O - F 1 3 . 1 2515 0 = 1 OO + SOR K V 1 -M 1 1 3 N .. - ( N J

- 1

'>

.

- 2 2520 WRITE (1 5 J 2 5 1 0 Z < 0 , Q

- '3 0 P •: N 3 -D ? N 3 ? Z * H 9 2525 PPINT

2530 N[ 18'2]-Z-N[ 18-6 J 3] NL £535 Q=FHI3

2540 IF N2<2 TflEN 1750

242
D - REWORil (cont)

£550 Y5=n2

25by .J=V£ 2960 Q=FNF4+FHF5-FtiF9 + FtiL2y

2962 ri2=Y5

2964 V2=J

2975 STORE DfiTfi #< 10-5-.-F7> » F4 '

- .1 2988 \K4kU 1 ]=Mr40? 1 2995 GOTO 1645

2998 R=415

2995 Q=H8+1

3003 HE U. 2 ]=H[ Q» 3 - j=!nr 5 Qj 6 3=6

3005 0=FNI5-

3010 Q=FH35

3015 GOTO 1655

5018 R=416

3020 DISP "STORE PlRT M&Nve- . 3021 Q=FHB2+FNH1

3022 IF Q=0 THE^^ 3824

3023 Q=FHVi2+FHS10

3024 RETURH 0

3025 R=417

3026 HC6j 11 ]=F

3028 N[ 35 9 ]=H9

3030 TRRHSFER ft TO TLy^lJ

3035 FOR 1=1 TO 18

3040 NC9) I J=T[9j I ] 3045 HC 10 J I ]=T[9.' I + IO]

3050 HEKT I 3055 Q-18-5+F7

3060 Qi=4^F9-3+17*F7

3065 STORE DflTfl ^

'

: - "1 3070 STORE DfiTfi ^ : ??H

3075 FORMAT " --L : ."H FILE 'j7X.. "H F I LE "

» 8K » " TAPE " » 7H » " SUMRRRV SET"!4X

3080 WRITE a5.3C : 3085 FORMAT F9.3'-

3090 WRITE <i5j3e£i : 2. V8sF9,HE 1j 10]

3095 Q=FHS38

3100 RETURN e 3113 R=41S

3120 Q=FNJ3

3125 F5=0

3128 DISP "RENORK tt": 3130 NC l! i0]=FHNN[ l5 iO]

3135 F6=N0-=1

3136 IF F#0 THEN 3148

3138 F=7.5

3139 Q=FHj2

3146 Q=FHJ4+FHJ5+FnL?-iFMLc . " t»L2+FKL3i-FHL 4+FNL6+FHL7. 24FNLS. 2+hMLl . 2+FNL2. 'd 3142 IF F5 THEr^ 3148

3144 0=FNJ7

3146 GOTO 1395

3143 C=FNV12-^F!V18+FHV6

3158 GOTO 1600

3165 R^419

3170 DISP "RESTART § U^' ', 3175 INPUT Q

3180 F2=0

3185 H=Q-1

3190 GOTO 1750

243
D - REWORK (cont)

3195 R-420

3 2. 0 i J WhllT 1000

3 2 0 '5 Q-"Fi 13 6 32 1 0 IF ;:5 = 5b THEN 1595

3215 IF 35 #61 iHEN It. 4

5

321 5 Q-FNV'12

3217 IF re^O THEN 1395

321

3

IF F5=0 TMEN 3135

3219 SERFuF 75' 3221

3 2 2 0 GOTCi 5135

3 2 2 1 Q -- F N V 6

J ; 2 2 G 0 T 0 1 6 0 0 3225 F-421

3226 ])$-" '

3 2 2 S IF F6 TFiEM 3240

3 2 4 0 Q = FHS6 + FNiil +FHCi. FN 96

3244 RETURN 0

3 2 5 5 R = 422

3235 FORNFiT .9 RUN SET sTRR ele:v 0/T

3290 WRITE 15^ 5235) " FREQ V

-" \ 0 c mef

3 2 9 5 FORNhT F6. 2? F7, 1 j 2F3„ 3

n

6F7 . 3

3 3 0 13 I"0

3305 I - I +

1

3310 Q==Ml I ? 1 ] 5315 IF Q--THTQ = 0 THEM 3375

3325 U0 = M[ 1)6]

3330 Q1"M[ 1)7]

;!335 Q2=M[ 1)3]

3340 -J~\M 1)9]

3345 E=FlE;SQ

3350 TRANSFER TC lOO + E-iO - I NT . J. \:} *E) , 1 J !U S$

3 3 5 5 3360

WRITE ( 15:1 3295 )M[ I :. 10 l;. IF IFFr( I/3:-I/-3 TFIEN 33 7 0

"

' S* ) ( Fi[ I ) 2 3365 PRINT

3370 GOTO 3305

3375 Q=FNS30

3376 RETURN 0 3380 R==423

3332 N0~Q-1

3334 fl[ 3 ]=10*B5

3386 H[ 4 ]=^10*E6

5405 RED IN MI FT. 40? 1 1^ lO ] 3 4 1 0 SORT MjCjQ

3415 Q==FNS5 + FNFM.H9~4^r; ! t FFF>4 3420 REnif'i Ml 40? 10 ] 3425 IF M[ 40'> 1 J-:3 THEN 3535

3430 FOR J--^19 TO 26

3435 IF J^-^23 THEN 3550

34 40 I=N9^-^0

3-1 45 I I + 1 3450 IF M[ I ) 1 ] 0 THEti ,-;4h5 34 5 J ML J« 9 ]=41f J, 10 ]^-ML J

< J-i? ] 3 4 6 0 FOR 1=^1 Tij M[ 40 0 J 3465 f;i=m[ I ) 1 j 34 70 IF XI 0 THEN :;'.10 3475 X2=^1/SIN:'1

3430 p-M[ I ) J J ] 3-;:"; 5 Q^FM3M9

3 4^ 3 0 IF R: mi J' 9 ] THEM /-.Om 3495 Nl ..N 9 ]:-F 3500 IF P Ml F ; u J TH(..;i r ifi 5505 Ml J' J :-F 5510 mff;t I

NUF'

-TH HPBW#1 HPi3Wtt:

• M[ I ) 3 ]) Ml I , 4 ], M[ I ) 5 ]' 00. 01 , q;

244
D - REWORK (cont)

3515 Q=FNy4

35£o IF J>19 THEN 35-^: 3525 PRINT ThB35? "if PT; ^ t

' 3538 HE 1 ? 9 ]=Hy

3535 PR! HI 3540 Q=FNy3

3545 Q=FNS3

3550 NEXT J 3555 Q=FHS10

3560 RETURN 0

3565 DEF FHL<Q8>

3570 R-424 . 3575 Ii*=""

3585 J=INTQ0

3585 LS=i8*<Q&-J>

3590 J=J-MS

3595 IF H[J.9]#0 THEli itie

3600 PRINT "IiflTfl NOT FIT yETii"jFHB6

3605 RETURN O 3610 IF LO THEN 4198

3615 F2=FNV3

3630 IF F6 THEN 3669

3625 DISP "FITse^CSCj i=L.iir:

3630 F2=FNB2H-FHN0

3635 IF NCJ5 9]=0 THEN 3590

3640 DISP •ZER0<r1IH= 'nil Jj9]i l1hK-="?Hr J, 10 ]•>;

3645 INPUT Rl

3650 DISP TULl SChLE > nfiX="

NC J, le I?" V

;

3655 INPUT Q

3660 I5=Q-R1

3665' IF Rl <= 5 3 RNl. Ki-' I5 >= N[J?!ti] THEN 3699

3670 BEEP

3675 DISP "RRNGE TOO - 3680 NfilT 1003

3685 GOTO 3640

3690 15=15-^50

3692 L=30

3695 Q=FNS3+FNHl^FNCl+FHKH-FHni+FNI3

3700 PRINT = FIT"?

3705 B$="#50+*My"

3710 FOR 1=1 TO Nl-2

3715 TRHNSFER T[ I ? 1 1 10 Zi- 3720 PRINT Dftljli;" = "^S*?

3725 NEXT I 3730 Q=FNS3+FNH0-iFHF2

3735 FORMHT " (UNIT=" . F?. 4 .

• >

'

3740 PRINT

3745 FIXED 3

3750 FOP 1=0 TO 5 3755 PRINT TfiEt 10^ 1 + 6^ ^ Pi <-;ii^I*I5>

3760 NEXT I 3765 STRHDRRD

3770 NRITE (i553735>i5

3775 Q=FNFS

3790 PRINT ELEV " " "

3795 FORMRT 4X< "VhLUL =^ :::T

' 3800 IJRITE (1553795>

3S05 FORNHT F5.

1

3310 1=N3=0

245
D - REWORK (cont)

3815 R-425

I

^- 1 + 1

'-' iL, - J 3 330

If- I ::^M[ 4u. 1 ] ]i\u\ 4r:- fi Ll^MC I'll

3335 T2=n[ I , lU

]

3340 IF LK0 THEH ::&:'fi 3345 H3^N3+1

3350 IF H3- 3n-IHTv ' TfiFN .-Xrii.

•~i i~i cr O O .1 i.-. Q=FHF3

3355 PRINT THE:1C1-HI

3360 IF H3>1 THE;:H 33;iS

3365 L=-IHT(L1

3370 IF I NT a :i.)-L -5-0 THfN

i 7 5 L-L+1

3330 G 0 T G 3 7 O 3335 Jl=M[iiJ-17]

3390 IF Li >:= L THbN o'^'^e 3395 Q = IHT( ( Jl -Rl .>/ I': 1 M. ^r.i f 1 3900 X=10^': (10 + L 1-INT' IrHli > > 3905 B$ = ri*[ >!,r. ] 3915 W 1 = [ J , 2 - F 2 ] + N [ .. U - F 1 :c ' , F 2 - f:i •SINL1.+ (F2=1 )*L

3930 X=INT( (Wl -Rl IS H-i. ^, .-! [ 3935 WRITE c: 15, :;iyybn 1 ; 3940 R$^" ' 3945 fi$[li52]=""

3947 IF X>52 THEN 3955

3950

3955

3975 FORNRT F9.4iFy.2

3980 WRITE (15- 3975) "jHf.Ji-< T2

3985 GOTO 3820

3990 E-N[ J, 4-F2 1 3995 1 1 =H[ J , 2-F2 ] + Nr ,.i , e -F2 ]* ( ( F2--^i;3;'/siN[ +(:f2=^i ;'*L> 4000 IF J = 21 OR J=22 UK J-24 Tf-iEN •-1 0 1 0 4005 E =^ F H V 1 + (. C 2 = 1 > * 1 0 [. G T (. 1 i E 1 0 1

1

'

' -1- C 2 # 1 ) ^ E * T 1 1 0 0 4010 Q=^INT':;E/I5-i-e. 5)

4015

4020

IF Q>1 THEN 404'i

Q=l

4045 X=INT( (Tl-Rl > /I'=; + 0,

4050

4060

PRINT l; FGRNh'I ,51"--"

4065 OUTPUT (m, 4060'' "

"

,

4070 IF X-CKl THEN 4035

4075

4030

H*[ 1 , K-Q " H*[ X-Gl, X-Q ]=" ! " 4085 Hl-[ X, X ]=" . " 4090 IF X-^Q>51 THEN 41 GO

4095 H*[ >'.+Q, 52 ]="

4100 fl$[ X + Q? X-Hj ] = "

! " 4150 FORMRT FIO. 4, " h -" , P7.

4

4152 iii = mL 1 ,52 ] 4155 WRITE '.: 15,4150)" ';H*;Ti,r

4160 L-L + 5 4165 GOTO 3835

4170 Q=FNF8

4172 PRINT TfiElO'Fll- 4175 m="

4130 Q^FH336

4185 RETURN 0

246
D - REWORK (cont)

4190 R=-42fa 4195 RE HIM Y[:3]

4200 YC 1 ]=10

4205 Y[ 2 ]=50

4210 YC3]=10

4215 IF Fb THEN 4268

4220 fli:="b/T: " 4225 IF J- 19 THEN 4235

4230 fl$="G/Ta:

"

4235 rUSP fl$r^0=CSC F ITj l^LlrlEHR' ; 4240 F2=^FHB2 + FNH0

4245 REIHH YL 3 ] 4250 II I SP " ELEV ( DEG j ; 31 llRT .: 3 fi ip , STEP 5 4255 INPUT YL 1 ]5YC2].:T3 J 4260 R=427

4265 Q = F N S 1 + F H H 1 + F H C 0 -i- F" \ \ K 1 iI

-

l -i 1 1 1. -i- 1" l\ 1 3 ' F ? i S 1 + F N l-l 8 + F H F 2 + F N 3 1

' 4270 PRINT THE24>"+ = LIHEiiK CONTR I DUT I ON

"

4275 Q=FNS2

4230 FOR L^YC 1 ] TO Y[2] 3TE!-' I'f 3 J 4295 T R R N 3 F E P. T [ 1 N T ( ( J -i- 2 ) / 2 ? 1 + 2 8 * i J .- 2 1 W T C ..J / 2 ) > ] T 0 E' * 4290 B$[ 10 ]="-"

4380 FORMhT F5 W' de ? : "? 1 3K , F7 . 3 > " +- "

j F5 . 2 , " dB (" . F6 . 1 » " •; >

"

, 4K ? F6 . 3 < " GHZ

4315 N0=1+FNV1

4 3 3 5 N RITE ( 15,4 3 d 8 > l... , B t- ^ 1 1 , ] ti [. G

1" 1 -r E

•- 1 8 0 ) , E , F 4340 Q-FN31

4345 FORMAT " E-3 E-F E--'i' E Kl E-K2 E-K3 E-K4 E-K5 E--KF

" 4350 WRITE (;15,4345>"E-K7 +E KS +E-K9 E-TR"

4355 FORNRT F5 . 2 ? " 'M 2F6 . 2 s "

" 4356 Q=C2

4357 Q0=Q*E9

4358 Q1=Q*B1

4368 I'J RITE < 1 5 » 3 5 5 ) Q * 3 ? Q E; ( j > Q S' ' i ' 1 ? Q * E 1

h fi * E 2 j Q * E 3 ? Q * E 4 • Q * E b s Q * E 6 ?i]'! * E 7 ? 9. ^- E, 3 ? Q 8 5 Q

1

4365 R=423

4378 IF L0#2 THEN 4485

4 3 S 0 Q = F N 3 1 + F N 1 4 + F H F 6 + F \\ I- 1 0 -i- F N F 5 + F' H F' '9 + + f N 1

4

4485 Q-FNS3

4410 NEXT L 4415 Q=FNS10

4420 RED IN YE 2]

4425 RETURN 0 4430 R=429

4435 Q 1 = < J = 1 9 ) -I- ( J =20 > ( ^.1 2 5 ) -r < J = 2

6 ') + 1 8 * ( -.1 - 'k 4 )

4' 1 0 8 * ( ( J = 2 1 ) (, J - 2 2 >

)

4448 R1:=1NT(Q1*H[ Jj9])/Q1

4445 Q = I N T ( Q 1 * N I -J ^ 1 8 :] -i- 1 >

•

' Q

1

4450 IF < Q - R 1 ) > 1 0 R J

>

3 8 T hi E£ H 4 4- 7

5

4455 IF ( N [ . J J 9 ] - R 1 ) > ( Q - F-l [ .J j 1 8 ] ) T \ \ F i 1 4 4 7 O 4460 R1=R1-1

4465 GOTO 4475

4470 I J = Q 4

1

4475 RETURN 8 4480 R=430

4435 Q-FNG(-9)

4498 R2=V6-M3t2/N9

4495 N[ Jj 5 ] = YI 2 ]/G[ 2s 2 1 4 588 N C J ^ 1 ] = ( N 3 - N [ .1 ^ 5 I s 1 1 2 >

- N 3 4505 S =^ 3 Q R i (. F: 2 - \-\ [ J j 5 J - Y L 2 ] ..• / ( N 9 - 2 )

)

4510 N[.J!3]=3

4515 N[ J 5 7 ] = S/3URGL 2i 2 1 4520 N[ J J 6 3^Y[ 1

]

- GC 1 , i 1 4525 Nl J J 2 ]=(H :;-H[ .1,6 J.Ml IF' 4530. S3"SQR ( F3"\\i J ? b J YL 1 ..i r-iy 2 . 4535 HL J, 4 1x33

4540 NL Jj 3 ] = S3/SURG[ 1 , 1 J 4545 RETURN 8

247
D - REWORK (cont)

4548 F^-4--:l 4 550 huR F2=0 TO 1 4555 u^FlirS

45bM Iie;-;t f£

45b5 RLfUPM n 4570 R-4:;2

4575 H1=^M[ l - i^i: ('Pui 1

- j 457b IF J=19 OR J = 20 TliFII •i'..:::iJ 4578 Hl = i0rLGT':: 1 +M[ J- 4 -F.::: ] -ML J? Fl }''i 3 -SQRMi: 1 ? 9 J 4580 Q-(F2--0:^''SIFIL.+ ':i- i. ^ --l 4585 M = M[ 19j 2--F2 :Fi-N[ V?^-.:.. -F/ j^i' 4600 T 1

=- \-\ L J J 2 - 1'- 2 ] + H [ .J f !

i 4602 C 2 1 <: (. J - 2 5 > + J -• 2 6 . 1 - 1 - b 'i- b 9*1. 4 T 1 ) - 1 > 4610 H^=10-i (N -lO 4615 G = 1 f1 "i" ( (HE 2 13 1 2 F > ]

-i

1 1 i: 2 1 ;i > 6 - F 2 ] * i '! :.'

•

' 1 0 > * F ri ',' 9 4617 T = G/rl 4620 Q:=FNV12 + FME1

4635 Y1==C8*Y5

4640 S = T[ NO J 10 ] .a0

4645 Bl = Ii3 4650 E = i: 2 * b Q R (

'i 't' 2 + \' 1

1- 2 •! i: Fi T ,2 -t E 1 t d

+

E F: 1 2. -i- L 3 1 2 + E 4 1' 2 + E: 5 1 2 + E 6

"|- 2 E 7 T 2 + B 1 i" 2 > E 3 -i- E 9 4655 RETURU 0 4815 R=433

4820 H$=" " 4825 Bt-="

" 4830 FORhflT 6X - FS . 4 j " + ":iF7„4,":' F"jr9.5i. " +-"-SFS = 5 4835 TRFlHSFER Ti: I HT < { J -kE: 2 :> 1 +20 * J/ 2-- 1 HI ( J/2 ;.• > ] TF $[ i , 1 5 ] 4 8 4 0 T R Fl \-\ S F E R 1" [ 1

4

, 1 6 - F' 2 '5 1 I Fi E f [ 1 n 2

4 8 4 5 l\ R I T ( 1 5 , 4 8 3 0 ) H 4 , M [ - J 2 F 2 ] ? F! !: J ? 4 F 2 J h H [ J j 6 - F 2 ] ? IT [ ..^J ^ 3 f'" 2 ] , B ^> 4846 RETURIT O

4 y 4 r' r! ~ 4 3 4 4 8 4 8 P R I Fl T

"

f'^' i. T' : 1 G T j 2 T o. ^ 3 \i F B W tt i

< 4 F! F F \A # 2 ? 6 V - F Fl C 5 7' IT E; F , 8 FT U f

" 4 8 4 9 F' F: I TJ "F " 2. ,. 1 ^ E R R 1" Fi F L. E h f; . 2: - + / li 1 n d l... l. L I G T

4850 Q=:^FF!B2 + FFT31 + FFIfTl 4851 Q = FriLQ

4852 GOTO 1395

4863 R=4 35

4 8: 64 ni S F

" D E: L : R 0 FT 8 E T ( O = E )' I T ' "

!

4865 Q^=FNB2

4 870 IHPUT Q

4875 IF Q==0 THEIT 1395

4830 SEFlRCH Mj Cj lO? Q - Ql , 4885 ri[ Ql , 1 ]= H[ Gl J 1 I 4890 GOTO 4864

4895 R=43e.

4900 C 1 = 2,99 7 9 2 5 E -i- O 8

•'! 2

' ( 3 * F I > 1 . 3 3 0 5 4' E - 2 : : * ( F * 1 Fi 1' 9 ) T' 2 > 4905 TIO--0 . 9/FT2

4910 G = B2*(Ii*F 0. 313 ' 12 4915 B9^^^^2*C1*1 . 330541:. - j -G 4920 B - 21 0 '3 5 IJ F S Q F ( B 3 B 4925 FOR 1 = 1 TO ITl 4930 Q^=C-T[ I J 15 I

-- 10

4935. 03- n; 1 1 6 ] 1 E i 03 ' f

l I. ^ 4 ,i ^ i

' l l '< h' , 4940 F!2 = EF;F' < TL I H 6 ] 1 E mm F' 4.: I

< i .,1 I ' T[ 1 , 1 8 ]^( 1 GO ) 1 23

494 5 I5 = 3[ I ) 1 ]n [ 1 ^ 8 ] lOi ii-' St : » 1 1 4950 H^03 :- ( < F. JL I , ] 1 l uy\ '

' 1 r I F 1 O 2 J-v 1 00 : 1 >

^- (

1' [ 1 - 7 j.- 1 1:00 t i [ 1

• 5 1 1 F + 0 ? 4955 M Fi :- F" 4- ( ( fi Fi j - . f< < 1 1

< > i ' i.'i /

i 2 {. > 4960 0 t: F - T L I < i 6 I I L i 0 4 - 2 .' - i: 5 r ' ! I J I 1 < 1 2 1 r 1 2 0 ) 1 H 4965 u 1 1 1 0 ] =' IJ - 0 2 . ' 2 2 1 u tj u 4970 3; I 1 ]-+j2

4975 Ul:T1 I

- 4930 RETOKi^. 0

r

248
D - Rii,','ORK (cont)"

4985 R=457

4995 F?=ti

50t^M BISP "sSjH TiSPE ; 5y05 V3=FHHV3

5606 RETUFIH y 5693 R=43S

5010 BISP TifiTB set: i = iST.2--:iiv3' ) 5615 Fy=FnliF9

5016 RETURN 0

5017 R=4S9

5013 Q=Fr;Fl+FtiF7^FijVi s 5819 GOTO 1395

5620 R=44&

5022 Q=+ie-5^F7

5025 Ql=4*r5-S+17*F7'

5930 LORD DHIH #Q*QI«H

5935 LORD BfilH iy.Qjv2??!

5940 ¥=HTGy 111

5941 IF FtO THEH 5943

5942 F=7.3

5943 Q=FHJ2

5945 FOR 1=1 TO 19

5050 TE9. I 1=^r ; ~. : : 5055 TC9' I + lij 1 ] 5969 HEKT I 5965 TPHNSFER T[9?11 TO Ff

5070 RETURH 9

5h75 R=44i

5039 DISP "TEHFtF}";

5985 B5=FHB2-«-FNN(Bi:3 1^19 5^ 5990 Hr3]=l@*E:5

5995 DISP -HEU PT<F> ? 5199 B€=-NK<fSL4]^-i8>

5105 fir 4 3=86*10

5110 RETURH 0

5130 R=442

5135 L=Ii[4?2j. 100

5140 F2=H2=2

5155 H9=9

5160 B=FHQL

5165 FOR J 1=2 TO 6

5170 Ki=DtJls5j^l6.667/^

5175 K2=Kit2

5180 p=LnG^ietcDf:ji»6:

5185 Q=FHGH9

5190 HEKT Jl

5195 Q=FNG<-9>

5200 W1=-F[2]^FC 1 1^2

5205 V6=£^iP(K-FE 1 3*tilt2-> 5210 V=FC 1 ] 5215 E9=SaRfR2^H9j

5229 PETUF't 9

249
D - REWORK (cont)

;"3U P^--H3

• ?A'j FOP Jl=:' TO 0

'Ir'M '.i-^-Dl Jl . J lu. [,; y.l=E::yyA 'i..OG0. 5^' ' \ 2:> 'jGu p = io p' III Ji J ^ J u:m 4 ' .205 U = FNGN9

'270 WE' 'J !1

.230 V0^F[2 1 + X

i29S X1^:FNZH0

.300 H^.;:'r'-i . ::i 1310 E3 = 3QP(F:2 N3 '6 =1315 RETURN 0 3320 R=444

5321 f1 [ N 3 ? 1] = I N T ' II [ 4 . 2 ] ] 0 v 0 _ -101 M h / 1 Pi 0 1322 Z = Fl[S]flE-04

5323 Q=FNV7

5324 H[H3 5 4]-hL 10]-ie: -h4

5 :3 2 5 V\ L W £; . 5 ]

-- E 7^ 2 * S 1! F : iX\ C 0 . 5 fll 1 ;^ B^ 6 U 5326 N[H3?6]-F

5327 Q5=W1*B.--6C(

5331 NLHS- 10]=^^H6 + M7/100

5332 Q = FKS2 + FNHl+FNr:l . FrN- uiu -i f-HrlS fFir31 ^FNIS

5333 PRINT 1hB30^"EE9! FIT hijR 5 lUFv"

5334 PRINT

5335 FORNhT "REWOFK FIFE TfiPE T I TiE H ri. ;. EPF flPEfl 5 3 4 0 W R I T E ( 15:5 3 3 5 ;.. " E i.. E " .:i s P ON 7. E

"I " 5345 FORMFlT F5 . 1 - F5 . 0 ^ F5 = 0 n F 1 0 . 3 ^ F9 . m "

f. 12 " ? F7 . 1 ^ F3 . 2 1350 NRITE .::i' 1355 Q = FNS2

345;..N[ ] . 10 L. 2^-18 !- r;[ 4. 4 ].-"ioon, D9

Tn..;:K) SKY BRIGHT

' K" ^ FiO. 1 1. F7. i B4? N[ NS, 1 NF

5370 N R IT E a 5 < 2 0 0 O > S $ 5 " - T o. 5375 FORNHT F2 . 0 ^ PC , 0 , F'^^. 3 . F9

5380 NR I TE 1 5 « 5375 ) 1 , N9 . DFT

5335 Q^FNVO

5450 N[ NS? 2 OirLGTM

5452 n [ N 3 J 3 3 - 1 0 * L. G T ( ... N :3 - 2 > / 7! 1 5460 Q = K * S [ t-l 0 « 4 ] / (

'

I ' - 1 . 1 0 0 0 5463 N[H3j7] = V 5465 N [ H 3 ? :3 ] ^ Q -

- B 4 + 3 ;...- - B 9 1 . 3 S 054

5471? N [ N 3 ^ 9 ] = 0 ,. f( 1 - 3 B 9 1 . 3 7: 0 7 4 5430 W RITE (15,5 :3 7 5 > 2 1 N 9 , ]J E T ' C > E

1

5485 Q=FNS2

5490 FORNHT " -^HRBN+tl 'r-PHCTOR

5495 NR I TE 1 5 , 54 i^J: ..f, " G ( .JB 5500 O^NC HS< 7 ]f lu-LGTN':' - 550 7. F 0 R N fi T F- 6 . 7 ^ "

.:J e v < P' J 0 . 4 ^ f^' 7' . 2 , 9

.

riECL OFFSET: "

;

?F10.4,F9.4'

E7 ' Z ? V6 : 1 00*E9 ? Q'! F6. 2 Fl 1

7 ? ','6 J 1 0O#E9 ? Q5

t.:;k> dt.::" G.'T.:dB... HEP

K

F:

NOP

F7. 3, "kPU'

5510 NRITE .:: 15, 5505 :.N[ N;; 4 ] { 5515 Q=^FN7l+PNI5^FN7]

5520 PR I NT 1 hB73 < "

1 On ^ ]ii i ; . . M T - Nm: 5525 PORNhT . . lOX. "CUT ' - lu. 0? ! P24.

5530 RED IN VL 5

1

5535 FOR 1=^2 TO 6 5540 :-:2 = D[ I , 5 ]/16,667- D 5545 X1^E;:P.::4-LOG0. 5-'7:7: .i2:' 5550 Y[ I-l I^lOO

5555 fJE;;T I 55^.0 NPITE .: 15,5525

55l:.5 n-=FN72

5570 RPIilN Y[2]

5572 RETURN 0

N9 , 0 , NL NO , 2 ] ? Ml NS < 8 ]

^ " FPU " , NT NS

,

l;T " ; SI ;

' .:. .- TR)

,5F9. 2

10 r HI ] < cl ]. 10 14:

, 1-0, 1 , 2, Y[

I L 7 j*7:i +FC 1 ^^y:2+)

sYl. 7], "•7','.T3T,

"• YC 4 ]- Y[ 5 ],

250
D - REWORK (cont)

5574 R=AA5

5575 Xl=FHZHy

5530 FORHfiT 5:N"*!iPBH tfl - ^ h CSC l - .F7'.4.' 5585 NRITE ( ^ ^^SOXiC 2 I ^ j. HL >1 - l: .1, t>/6ft? BO/Fe? " >

' 5590 Q=FHS1+FNF3

5595 RETUkH h

5600 R^446

5605 FORMRT " SITE ELEV " • aUr. water otln zenith ottn"

5610 WRITE (15,5605) -Lt !- ^^1 RFFP ^2 wnt-BIRn"

5615 FuRHfiT F7.3r' ki^i" . F ^, " dB".FS.4r' dB-^dens" ? FS. 45 " dB" ' F'-. S^ F10. 4-

i

5620 HRITE (15? 56 1 5) CO . G4-L 4 * C5*^LS- L6 ? Zi ? L3 ? LS^ B? " ft"

5622 RETURN 6

5624 R=447

5626 FORMRT " G'd8> G-dsrtt T*:K> Ta<K> V-fnc- hiPBWer^"

5625 WRITE (!5:.5626V- data i^ix r.a-K2;' bright effRPEfl"

5630 FORMRT Ft. 2 ? F7. 2? F7. i [-3, 1 > F3. 4^ F7. 2? " •r-?F7.3." dB" ? F7= 2? "•i" ? F6. 2. FS. 1 5631 WRITE a5?5630>i0*LGTG.C7?T'H9, V5B2jHljPl?B4r' -'.99

5632 RETURN O

5633 R=448

5634 FORMRT --.FS.S, "=H2%F6.2? "=C:9".F5. i s =D1" » F5.5. ••=H<2i * 1 > "

» F5.0 5 2FS.4

5636 WRITE < 15 j 5634?R2f C9* Dl » hC £1 ? t I.- "i \f3r=Jil, 9>" s Jr'=Jl"

5638 FORMRT F3 . 2 <

' -33 " , F6> 2; "^Dy" « ; -CS " 5 F9 . 5 ? F5 . 6 j FS . 4 , " =02 •' »

.•• 5640 WRITE •:i5^5633:.'DS.D95C3.HC2l!3: ; 21 ? 3) ? Tt 1 5 1 1 ]"=T< 1 < 1 1 >" « C2

5641 RETURH O 5642 R=449

564 4 H9=B3--' < HC 2 1 ? 2 3+NC 2 1 » 6 3 > ?-2*26 1 1 ?y 1 et < < Ht 28 » 2 3+H[ 28 5 6 3 > i @ > 5646 RETURN H9

5643 R=450

5650 B=FHQL

5651 Q=FNK1

5653 B2=B3 B0*r*F^3035:it2

5655 C7=10*LGT-;G. 82/ ;3^!^. 8.ol3_'l2)

5657 B9=2*C 1 . 33854E-23*G

5658 RETURH 6 5660 R=451

5665 F8=l

5670 IF Hl 1» lej-iHTHC 1, 10 J i>itH ::.6O0 5675 F3===0 5680 RETURH 0

5690 R^452

5695 m=""

5700 FORHfiT ly !....'-'

5705 OUTPUT (Rf )5700;"%

5710 RETURri 0

5S00 R=453

5310 SERROR 25.5856

5815 riRT r1=ZER

5320 REDIM YE 2

3

5325 F4=0

5330 F6=F5=1

5: ^'-Nl i. isi

5; RD NC 1> 10 3'F9,i 'f^ni lO-Z r?.. G:i.HE 2l52]?H[2: «6 3? H3

5350 IF N[ 1.10 3 <= Q THEri r,.£Mf, 5352 R0=:hLl.!03

5355 RETURN VW-nQ

5336 Q=FNJ8

6nyo REM l=Rl-iRKft? ra 31? ; ^ ::;-r - 4- i AiV30 ? S^csc ? •^6^rlr'FH.593? *7=c£C « ^S^ i a 6010 DRTR 12. 2«2j7. 335^0. '1..C^-0-C J3-^0. i45H, 1166

251
D - REWORK (cont)

R 1

H

Hi

R2

B

4ri

48 is

1

1

1-4920

. fi2Ci 13 -J J

2h;-; ?2S;-:

4 347 4 -4-. 3 I:-;-'

3

35f'4 333U 3b3'1-

1335 1333 2033

465

5133

473

5173

By 1 478 433

13:

• 1

;i i-'i I J b y 4 J t> - 3;. 3 ^;ij33 531;

i333 3342 564?

:yo 4y-iti

'50 1370 1330

554 0 5535 5353

4 33

:!":i.ui

;-4-!M ;-:HM

4 3 6 0

4 -i n n '^i H

c: irj cr

Bl

B2

B3

B4

B5

B6

B7

BS

By

C

30

CI

C 2

3 3

34

35

C: 6

37

CS

C 3

Ti

no

HI

1313 1333 4353 4345 4353

1040 4910 4920 5655 5655

1040 4920 5644 5353

460 4602 5350 5465. 5631

55 3334 5335 5390

60 3336 5133 5135

4602

630

4 00

560

4 0

0

'

:63l

4 4 1 5 3 -J 'd :> 4 1;:. b

>;413 4 333 4930

4903 4915 5657

4005

54 70 5631

4602 4650 5640

330 5636

690 4313 4 923

4 9 3 5 790 5i::,2h

;.3,;'ii

252
D - REWORK (cont)

D2

-••J -'

D3 464 5

D4

D5

DS

- .-. " O O J 5640

119 840 5640

E 4335 4 6503350 i 3 .V 0 9 9 0 4005 4005 4005 4oiO -i 155

E0 V 740 4360 4650

El 745 1305 1830 4368 4650

E2 2 790 4360 4650

E3 795 4360 4650

E4 800 4360 4650

E5 310 1666 1330 1950 2050 2120 4360 4650

Eb 815 2110 2130 2135 2290 4350 4650

E7 S3S 2120 2130 2255 2290 4350 4653 _>825 5330 5480

ES c 1742 1950 2050 2120 4360 4653

E9 340 4357 4650 5215 5310 5330 5480

F 690

4910

5655

64

795

4920

390

1725

4940

390

1730

-1950

3 9 0 3026

4950

415

3690

4-55

415

3136

5040

430

3133

5041

530

4335

5042

525

4900

5 2' 2 6

525\

4905-

5553

F0 4955

Fl

2470

1444 1835 1 900 1955 1960 1965 2158 2170 226S 2450V

F2 V3990

4530

4845

975

: 9

~' 4580

4845

1155

399b

4535

5140

1655

3995

4585

3130

3':^95 4600

3615

-i240

d60O

3630

4550

4615

3915

4568

4615

3915

4575

4340

3? 15. 4573:

434:5-

.391:5

43^15::

F3 61 1710 IT'20 58'T-5

F4 1665 1665 16/5 2975 5825

F5 62 3125 31 12 1 y. :.o3e

Ft'. 1409 3135 3217 3 - ;-; 3620 4215 5330

F7 61 1675 3 630 2975 2975 3055 5050 _ 4^95 5^22. 50jJ5 •

FS 1639 1 745 5665 5675

F9 62 930 3060 ^ 303'0 5015 5015 5025 584 5-

b

J5657

820 935 1075 -.615 4617 4910 4915 56ai r LT c253
D - REWORK (cont)

G4 4 8 0 440 5620

G5 420 4 40 5^ 6 2 0

be- A *.' Li H .' U J t' J., u

H 3 1655

HI &ly 4 575 4573 5. -.31

H5 3

Hy

- 61 9 ?U 1075 1375 1940 2040 25 20 3 028: c:; -1

1

50

J u u

R ^ 1 L*H

-.1 J 1 U 5 5 1 y

ci. - J 1 J •; -! 't j o 4 1' -1 4 J

I 2 8 y 29 0 / ';j5 7 J 0 720 107'0 1 095 i 1 1115 1 1 ,20

y -I" 3 t.i 4 y 3 0 4 0 3 1'j 4 5 -"' 0 4 5 ; y 5 0 i : i.i 0 V} .J 1 y

-j 11: 3 3 3y 3340 .; ' J 5i 5

' ^1 s

c:: L7

-'• J J

~j , c- cr 60 3 :3 6 0 40

3445 3445 3450 3455 3 460 .::465 3 4 8 0 3510 10 3 7 i 5 20

37£fi 3750 -, -? V.' L,;

;-; 7 :?760 3310 3820 33 20 3825 3 3

:

30

-i .-1 ri Cj 4925 4 '430 4 ?35 4 9 3 5 4 940 494 0 40 4945 4. '•1

.

.1 cr

^ r 4945 4950 4950 4'::^50 4 ? 'j ti 4 960 4-60 4 9 6 5< 4 70 49 75 50 45

5056 5050 5055 5055 5060 5535 5540 5550 55 ~j 0 5555

15 9 9 5 1 005 1 1 45 1 1 65 i- ' 6 0 3665 J 6 9 0 36 90 3755 70

"' C' Q c;

I' -' y

1 r- i ri 4 "I

' cr

. 1 "T t' y

J 2560 3 4 3 5 3455 80

J

~ j y y ._"! - J ifi .TMi - '"-I ^ M ~

/ 'i' y

0 CTj 0 3 =! 4 fi

'j cr 3635 3640 3640 3650 3 6 b 5 3915 15 3 9 9 0 95

I-j y y •-f y 'J y 4 IJ ^'ii' 4 4- M H- -.

•-j L".j 4435 4 435 "r T 4435 4h4 0 .1445 4 450 4 455 44 cr C- 4 495 4 5 00

4 s fl n l1t 1 Li .1 i M H- LJ A"T

^,

L_ S-J 't -J' y i S ri T ...1 T 4576 4576 4 ~5 7 8 4 6yy 4 600 4602 ^' 4835 "' s

M- O -J 4- J 4 o 4 -ii 1 4

**"

'

J 1 5

5

Ci

i t' J

cr 1 " i~i J J- C' |/| rr J S 5250 5260 5 70 5 6 3 6

K 3 550 cr c"^ L- 1040 1075 5 4 6 0

Kl 455 460 5 'j 0

„.,, 300 1 040 5470

3 490 550 7 9 0 3 0 0 1 y40

K3 3 495 550 1040

K4 3 505 550

K5 . 3 5.05 550

KG 3 505 550 1 040

K7 3 505 550

K8 3 530 550 900 335 1040

K9 545 550 7: 0 0 840 i 040

L6 4

C> 3610 4370

LI 4 1655 3 3 3 0 334 0 3 3 9 0 3900 3900 1 1

5

3915 ' -\

L4 4 4 10 4 4 0 5620

L5 4 425 440 5 6 2 0

254
D - REWORK Ccont)

Lb A

iiT .J

-' ^J A 18 5620

1 7 4

-1 ,-. r-

.1,

1

r J „" lI ''C\ H . U "-f '-I- ._! C' '"'i C'i i,j

LS 4 4 45 5 6 2 0

L9 4 450 535 5620

ri 4 3410 4535 4 C 1

0

4 6 10 4 8 1 7 4880 5 3 6 0 5480

Ml 4 1270 1 280 1288 13 30 1345 1366 1890 2445

2480 2495 25 1 5 4525

M ,1

't

1 ~^ M 1 L.O-J 1

• 4

^-^ 1 ^' Ti ~; c; r' i"l il -J: -.J tJ 2 9 b L"_' 4

M3 4 1270 1 290 1290 1

'3 3 0 1 835 1 365 1 366 4 4' 9 8 4 J" 'i 0 0 5290 5452

H 4 1743 1 760 1 760 7 0

1 -J -- r- 1 8S0

HO .1 485 8 1. 880 7' "i ri 8 0 0

C; 1 1H14H 1040 1075 1 7 0 0 17 4 2 1845 1875 3135 8 8 8 2 4

4 640 V 9 5 5321 5332 54 6 0

Er ir "7 cHI 4 3710 4925

\\2 4 1 0 0 0 1 1 8 0 ] 1 4 0 7'

-. cr 1 7 R 0 1 835 l-'-'O 1 9 0 0

J

,-i

.-. 1— 2300 5140

H3 4 '^55 9h5 1 195 8 8 1755 2055 20 60 2' 6 1"' 5 2070

2160 2 1 65 2 1 0 2 4 6 0 2 4 0 2495 2515 2515 25 2 0 3310 3345 8880

4955 4 9 6 0

H4 4 1230 1655 1785 1 7 8 1 950 2070 2110 2: 1 2 0 2160 4 2 4 6 0

H5 4 =170 650

H6 4 650 1741 1888 8

1

5358

H7 4 1740 1743 1770 17 is;e^ 5331 5350

HS 4 1670 5 3 2

1

24 5326 5350 5350

5452 5463 5465 5470 80 5510 5510 55 1

0

5 8 1

0

H9 4 1 270 1 275 1 275 1 3 0 1 3 3 5 1 340 1 8 4 5 1 350 1 1755 2015 2025 2045 2 1 3 0 2 1 80 2190 2280

3440 3485 3 J 3 0 4 -! 90 4800 4585 4- 5' 2 5i 4 830 518:j 5i 5215 5240 5265 5310 58 80 54 80

P

cr

,_i 1 160 1 160 1 165 1 1 70 1 170 ] 285 1290 1310 ] 3 1 5 1 1925 2065 2030 2880 2 ij 'J 5. 2 165 2205 2465 2480 24 85 2 3480 3 4 9 0 3495 3 500 3 0 05 5180 5260

Fl 790 5631

Q

cr.J 65 J 7 ^^ 2 8 0 J 810 330 335 345 3 4 5 8 400 4 05 4 1 0 410 4 c 0 500 c:; J ;^ 56'^

Cj -7 [- 5 9 0 625 6 3 0 6 7 705 7 1 0 3 7 0 900 910 ] 0 8 8 1

1

_: i j 1 165 1 2 1 0

"1 * 1245 1250 1260 1265 1 3 7 0 1874 1330 1330 1

1 4 1 ^'i

J. -r J. -J 1 d''-^^ J. H I— I ^ "T l-J J

^1 1 1-.' 1 t tj 1 I ' i-i i i 1 f'i-' i 1735 1746 134 5 201 5 ;::o80 2055 2 8 5i 2125

2130 2155 2175 2198 2 : 0 2 2 9 5 2 2: 0 5 2 i 0 24 55 2475 2515 2520 0

J C -J c- 2995 8 0 0 0 3 0 8 0

":

255
D - REWORK (cont)

Lll

•-< y y u

'"' 0 Li i-i '111 '"I ':[) 1 Ifi 91 1^' 1 L.i !:'! i.'' i 'j

! ;;!

J r'

1;,;' t . . ^'j M i' 1 i

1 c U 1 ; 1 H Li ! -' I i ; 1 3 -:ie 3315

35-15

33; 1 5 3o 35 .9-;i' i.i

'-r?'\

' t

. ; '5 i' .'l)

-} i '.1

;'

" '^3

--i 1-1 rr cr 4 l;! 1

' 1 ' r r 5 '

' •_ ij 33-;5 •..

.|lj:-;y 4. -•d 3393

1.1 9 i.1 ' I- 10 ' 5

3'

^' 4 :

': '

Ii

41 m 4170 41;:;0 I.':. 3 43 35 4 5 ' 4 :::f4;:i 4 3 1

0

4 :I6 M 1 436.iJ 3i-; l;i i ':.6 0 1 3.:0

7

:":!:: 1 3-0 .|3'' 0

i 1

j :^

J

H I- H 4 '1 ' i:J 1 rJ . ' 4s- , Ll 4 ': 'j .4?iJ 45':3j I i , 1 1

9

46 1

5

4 1:3 3 0 'i 3;;; !J -i;7'i ''1 651 H '

' IJ

'1 ~'

' 1 3 3 ij A- 3 3' i J 4940 4:;-60 4 960 1"

1 i'i '-,9 50 5 343 5135 5 i

' ! 1 5 2' ?' 5 5 3 . J

3 -J 3.,;53 5'i 30 4/0 54 9 5 5 ':>

1 J 1

J

5 5 1

0

5 5 1

5

5

5 '3 1

.

'

1 1 5 6 'j 0

5 7 6 5 770 775 1333 1384 33r^5 99 3!^^, 3 565 3580 3535

4357 4 3 6 0

610 635 7 ? 0

7' 75 1955 l'i^7:;:i 3 0 6 0 31 0 6 5 3 0

1'

' ij 360 4435 4-4 :(y 4440 4445 4 4 -! '"i 5030 5

3 9 5 400 405 410 4 2- 0 430 ii V 1.1 30 445 460

4 c' 5 490 4 9 10 2 1; 1 5 '4 i:) c; c:: 494 0 4965 4965 4970

Q:3 S 1705 1 7 1 0 1 735 1 73ki 4940 4950

134 5

Gi5 5 5337 5380 5488

QG 5

Q7 5

Rl 5 990 995 1035 13 75 ; 375 1 145 1145 1 165 3645 3360

3665 3665 3755 3399 3990 'ju45 4440 4 '15 3 4455 44 60 4! 60

R2 5 1365 £015 3130 2280 4490 4505 4533 5215 5310

Rl C7 cr

.-.J -1

S 5 540 545 4360 4505 4510 4515 4648 H65e

S3 5 1990 2020 2025 2835 2035 2030 4538 4 535 4540

T 5 8 2 '-J 9 8 5 9 ' ? 0 1 Si 3 1 3 4 8 2: 0 -1 ti ^1 6 1 7 5 6 3 1

T 1 5 3 9 3i 5 4 8 0 5 A 0 4 5 4' j. 5 5 4 3: 3 5 4 6 0 0 4 & 8 2

T2 5 3835 3988

T 6 5 1655 1

T' 3 1 j 1

7'

:E; 5i 1

7' 3' 8 i :3 0 i4 1 8 8 5 1 Z 1 8 1 3; 3 5 1 8 3; 3i 2 3i 6 5 2135 2165 2978 2238 2^165

1925 2065 216

V 5 1950 3100 3130 ,-3l35 5210

VI 5. , 1270 13 35 i:".9.. 1 :3r8 1398 24^5 2 '1 3'

V2 5 . 1270 13I..1U 1J98 1350 3568 9964

V3 5

' . . 1270 1 'M'j l ":i-i5 1 7^15

256
D - REWORK (cont)

12/e 1310 :!3itj

HI

5486

1270 131'

127y 132: 5510

1 8Q0

5 2 u y 5 2 y .

4835

2075

5452

1 160

132 1"

I 13

2055

4.1913 r:. t- 310 5330

, y

61 '930

1 3 7 T< 1 ''i .1 0 2 li 2 1

J

580 705

1960 195i5 2025

M';'0 5y:

' 0 7 0 21 10 21 3 8

)Ufi5 53".0

:ie5 2110 2125 2135 3915 3930

1160 1366 1990 2125

3 9 2^0 39''!? 4 0 9' 0 'i- d 9 z 930 935

2030 2135

5545 555t:

100 4iy0

::45

' 1-1

35 2290 22'-^0 3 90 0 398 5

i'^'0 4075 4038 4 030 4035

1 0 7 5 1 i i-.'^ ti ] ,c 3 'rj 1 3 0 0 1 3 0 5 1 3 1

5

3 4 6 5 3 4

]

' 0 3 ^1 7 5 5170 5 1 7 5 5 2 5 5

:0 ; 5

:i30H

40 5545 5550

5463 5510 5631

4360 4635

71 cr

1?

FHH 7

FHE 7

FH0 7

FHIi 7

FHE 7

FNF 7

HG

2 ':f 0 5013 5013

7 1250.

330 ^620

. 055 1

1

1005 1075 1075 5298 5300

4650

1940 22^10 2245

8 4^10 455

1650 1765 3210

275 1415 1465

495 2511

5 1

0

5620

321'

2528 2520 2538 5285 5298

:10

3680 3630 4240 'ISSO 4365 50::

1345 3240 3415 3695 4265

1J:,'0 1440 17h6 174ir 1746 2960 2968

4 1 y 4265 4 o 3 0 4 3 yi 4 o 3: 0 4 : L ij 4555

44;; .195 5265

1045 23 li 5515

0 0 5 4265 :y0 4 330

257
D - REWORK (cent)'

FNJ l'

i~. cr ^ 65 i 3 y 7 1735 3120 8139 3140 3140 3144 3240 5043

FHK ' 7* 560 1845 3 6

5

4265 •-' •- I- 565 1 FHL

3148

3140

3565

3 140

4351

3140 3140 3140 3140 3140 3140 3140 8140

FHN 865 1845 3685 4265

FWW 305

5015

1380

5085

1 4- 1

5

51 Oil M44 1465 3021 3130 3630 4240 4850

FNP 7

FHQ 200 1870 5160 5 6 5 0

FNR c.

FHS Ill 3240

4265

5515

ir IT" J r J 4275

5515

:'35 34] 5 4340

5565

870

34:i 5 4380

5580

1 f. " :?545 4405

1 7 4 6

:::555 4415

2 b 0 3695

4850

3 0 3 3730

cr -. -t J -Z' I'

3023

4 1 30

5

-'

'''

8095

4265

5355

3205

4265

5485

FNT

FNU 3

FHW '-'

fn:< -'

FHV o 955 2155 2175 2455 2475

FNZ 560 320 9 3 0 1040 1 875 5295 S S 5

H[ ]

•51 900

3384

900 1635

5035

3 9 5 1680

5090

3 3 0 1705

5100

890

1 ,'40 5105

890

1740

cr -, -1 -i

8 9 5 1741

5324

895

1925

900

2245

900

2255

BE ] 9

C[ ] 9 1355 1360 1405 2025 2130 2290 5330 5480

D[ 3 92165

5540

1700

5550

1735

2230

1795

24 b 5

1 300

5135

1805

5170

1810

5180

1 325

5250 5260

2065

5321

2135

5350

F[ ] 2025

5200

1 160

2 1 00

5200

1 160

2105

5205

1360

21U5

5210

13^5

2125

5280

1 365

2210

tr - 1 !r

_' C -J

1366

2210

5550

1366

2230

5550

1 405

2280

1995

2290

2015

2290

Gt ] 9 1340 1345 1345 1350 1355 1405 4495 4515 4520 4540

liC ] 93000

3355

3430

5 3 2 6 5510

c:SOU'S

-i -'i cr l:_•

-. .% c; 5331

5510

1405

30LH:I

- _i o i~ 3830

5850

5

',

'. ^

164 2 3065

3405

54 50

U^70

83] 0 8405

5452

1 747

3420

4835

5463

1747

3330

3425

4385

5465

2930

3450

5030

5470

2980

3340

3455

5321

5500

3000

•~, *! cr cr

Z' J 3460

5324

5510

3000

3355

3465

_' C' d. s.' 5510

258
D - REWORK (cont)

N[ ] 1910

3455

3650

4455

45x5

4615

1 9 ) 0

4

~' 3 6 6 5 4495

4540

4615

200

1 3 '0

45,^1.1

.1-;. ; h

4 345

' :j23

4 9 5

- 5u0

t575

,1 0 " T -r -

'

2>i3H

3'i33

j5UH

-•9 1

5

4 505

4573

730

.••n£fi 3040

'j05

3990

-^510

4345

920

£'ri!';5 3045

3533

4515

4573

5'_'3'5

940

20 ^5 "5070

3995

4520

50d0

1465

234 0 30 .'0 3635

44 40

4525

4535

5050

55S5

5845

rr cr cr 5o45 5 3 4 5 5640

5345

-.''/44 :.^o45 5644

5 3 5 0 5644

cr -. ET

--' 0 ll 0 T T 5670

S[ ] 560 104 0 1075 1742 4940 4945 4945

1 L J

^! C" 4350

4- o -1' 4340

4960

4930

4960

4'^i35 49o5

5050

[T-i ^ [?[ -^940 5055

4940-

5065

4945

5636

-! 7 1 5 4950

5640

X[ J

c,

L* 50 930

L 200

2035

£00

2040

45~i

. -- :7i cr S

*~'^ 2530

S ~i 3 "5 92

1830 1870

3370

1886

C- "7

5160

3995

5650

4050 4 160 4160 4380 4335 4410 4530

B$ 3 1

5

320 ' -' 5 3905 3 9 -1 5

.-; 0 0 cr 4290 4335 4325

R* 340

— ^ 3940

4 1 52

5705

345

1 135

3945

4152

i 1 30

3950

4155

350

1 135

4172

350

1195

4220

4365

4230

1' cr- 1315

4075

4£35

365

1223

4083

4820

--1 .-- cr

Z* 0 -J 4085

4835

H$

H$

530

580

1690

P$ 676 670 675 675 iT 1635

FHH 910 1345 3340 3415 3695 3730 4265 4265 ET •-. -' -Z' iC

ri$ 945 3226 3705 3720 3905 4175

E$ 945

S$ 1065

5370

1 690

5495

1335

5520

1910 2005 2270 3350 -T= 0 ^ 3715

Y[ ] 1330

4

^ 1335

4255

5550

1360

4255

5560

1365

4 £80

5560

1365

4280

5560

1405

4 2 8 0 5560

4195

44 20

5560

4200

44 95

^" "7 ^T^

4205

4 505

5320

FHU

FNV

cr IT cr •J C' -_' -_'

1470

3515

1640

3540

164 0

3615

j r 1 ^7 IT 4M05

2209

4315 4615

3148

4620

3148

5018

Re 1643

1465

204 0 3130

3640

444 5 4525

4600

1930

4580

4840

365

3790

4095

4345

372'y

4210

4520

1643

3130

3640

4455

4550

4600

5350

4970 5460

4640

2029

3890

5135

t o 3855

4100

5695

4530

cr -, ,-, cr

259
ACKNOWLEDGMENTS

The (success of the, existence of the) Earth Terminal Measurement System

(ETMS) has been due to the close cooperation of many people, especially

William C. Dayvitt, who was largely responsible for the theory and for checking

the computed results; Lanny D. Driver, who wote the star finding routirtes and

checked these results; Gerome R. Reeve; John P. Wakefield; and Thomas H. Bremer,

who designed and constructed the ETMS hardware and made many critical coiranents

about the "human engineering" of the software. Special thanks to William Verno

at the Camp Roberts Earth Terminal for many helpful discussions and to the many

other people within the Defense Communications Agency and the U.S. Army Satellite Communications Agency for patiently answering our many questions.

260
REFERENCES

Wait, D. F., Daywitt, W. C, Kanda, M. , and Miller, C. K. S, A study of the

measurement of G/T using Cassiopeia A, Nat. Bur. Stand., NBSIR 74-382, 187

(June 1974).

Dent, W. A., Aller, H. D., Olsen, E. T. , The evolution of the radio spectrum of Cassiopeia A, The Astrophyslcal Journal, 188 , Lll-13 (Feb. 1974).

Except for the constant S^, equation (2) on p. L12 of this paper was used

to transfer Cas A flux density in time and frequency. The value used for

S^ was 3154 F.U. in order for the flux value to agree with Frieley, A. J.,

Batelian, P. D., Bathker, D. A., Absolute density calibrations of radio

sources: 2.3 GHz, Technical Memorandum 33-806, Jet Propultion Laboratory,

California (Dec. 1, 1977).

Daywitt, W. C, Error equations used in the NBS precision G/T measurement

system, Nat. Bur. Stand. NBSIR 76-842 (Sept. 1976).

Daywitt, W. C, Error equations used in the NBS Earth Terminal Measurement

System, Nat. Bur. Stand., NBSIR 78-869 (Dec. 1977).

Larsen, N. T., A new self -balancing dc-substitution rf power meter, IEEE

Transactions on Instrumentation and Measurement, IM-25 , No. 4, 343-347

(Dec. 1976).

Kanda, M. , An error analysis for absolute flux density measurement of

Cassiopeia A, IEEE Transactions on Instrumentation and Measurements,

IM-25 , No. 3, 173-182 (Sept. 1976). Kanda, K. , Study of errors in absolute

flux density of Cassiopeia A, Nat. Bur. Stand., NBSIR 75-822,30 (Oct. 1975).

Wakefield, J. P., Earth Terminal Measurement System maintenance manual,

Nat. Bur. Stand., NBSIR in preparation.

The Fahrenheit temperature scale is used instead of the Celcius scale

because it is easier to implement a temperature scale which is non-negative

over the measurement range.

261
NBS-114A (REV. 7-73)

U.S. DEPT. OF COMM.

BIBLIOGRAPHIC DATA

SHEET

1. PUBLICATION OR REPORT NO.

NBSIR 78-879

2. Gov't Accession

No.

3. Recipient's Accession No.

^. lllLc. AND oLiDlllLt.

Earth Terminal Measurement System Operations Manual

5. Publication Date April 1978

6« Performing Organization Code

723

7. AUTHOR(S)

David F. Wait

8. Performing Organ. Report No.

9. PERFORMING ORGANIZATION NAME AND ADDRESS

NATIONAL BUREAU OF STANDARDS

DEPARTMENT OF COMMERCE

WASHINGTON, D.C. 20234

10. Project/Task/Work Unit No. 7235266

11. Contract/Grant No.

12. Sponsoring Organization Name and Complete Address (Street, City, State, ZIP)

Commanding General

United States Army Communications Command

Fort Huachuca, Arizona 85613

13. Type of Report & Period

v-overed

14. Sponsoring Agency Code

15. SUPPLEMENTARY NOTES

16. ABSTRACT (A 200-word or less factual summary of most si^ificatrt information. If document includes a significant

bibliography or literature survey, mention it here.)

The Earth Terminal Measurement System (ETMS) was developed by

the National Bureau of Standards to make accurate measurements of

earth terminal and satellite parameters such as figure of merit

(G/T), antenna gain relative to a reproducible reference level,

satellite effective isotropic radiated power (EIRP) , and ratio of

carrier power to the operating noise temperature (C/kT) . Because

of difficulties of using the standard earth terminal parameters to

precisely characterize the earth terminal, the parameters noise

equivalent flux (NEF) and noise ulterior flux (NUF) are introduced.

NEF characterizes the earth terminal hardware, and it is defined so that it is largely independent of frequency and antenna elevation

angle. Thus, it is easier to evaluate the "reasonableness" of a particular set of results in light of the other results taken at

various frequencies and elevation angles. This manual includes the

theory of the measurements, measurement procedures, measurement

troubleshooting, interpretation of the results, and a discussion of

the ETMS software.

17. KEY WORDS (six to twelve entries; alphabetical order; capitalize only the first letter of the first key word unless a proper name; separated by semicolons)

Earth terminal; effective isotropic radiated power; figure of merit; measurement procedure; noise temperature; satellite communication.

18. AVAILABILITY [x] Unlimited 19. SECURITY CLASS

(THIS REPORT)

21. NO. OF PAGES

i ! For Official Distribution. Do Not Release to NTIS

UNCL ASSIFIED 266

1

! Order From Sup. of Doc, U.S. Government Printing Office Washington. D.C, 20402. SD Cat. No. C13

20. SECURITY CLASS

(THIS PAGE)

22. Price

1 1 Order From National Technical Information Service (NTIS)

Springfield, Virginia 22151 UNCLASSIFIED

$10.75

USCOMM-DC 29042-P74

U.S. GOVERNMENT PRINTING OFFICE:1978—777-067 / 1250