NATIONAL BUREAU OF STANDARDS REPORT

10 435

A SEARCH AND RESCUE SIMULATION MODEL FOR THE UNITED STATES COAST GUARD

Appendix A

FLOW CHARTS FOR PROGRAMMER LEVEL DOCUMENTATION

U.S. DEPARTMENT OF COMMERCE

NATIONAL BUREAU OF STANDARDS
NATIONAL BUREAU OF STANDARDS

The National Bureau of Standards 1 was established by an act of Congress March 3, 1901. Today,

in addition to serving as the Nation’s central measurement laboratory, the Bureau is a principal

focal point in the Federal Government for assuring maximum application of the physical and

engineering sciences to the advancement of technology in industry and commerce. To this end

the Bureau conducts research and provides central national services in four broad program

areas. These are: (1) basic measurements and standards, (2) materials measurements and

standards, (3) technological measurements and standards, and (4) transfer of technology.

The Bureau comprises the Institute for Basic Standards, the Institute for Materials Research, the

Institute for Applied Technology, the Center for Radiation Research, the Center for Computer

Sciences and Technology, and the Office for Information Programs.

THE INSTITUTE FOR BASIC STANDARDS provides the central basis within the United

States of a complete and consistent system of physical measurement; coordinates that system with measurement systems of other nations; and furnishes essential services leading to accurate and

uniform physical measurements throughout the Nation’s scientific community, industry, and commerce. The Institute consists of an Office of Measurement Services and the following technical

divisions:Applied Mathematics—Electricity—Metrology—Mechanics—Heat—Atomic and Molecular Physics—Radio Physics -—Radio Engineering -—Time and Frequency - —Astrophysics -—Cryogenics.2 THE INSTITUTE FOR MATERIALS RESEARCH conducts materials research leading to im- proved methods of measurement standards, and data on the properties of well-characterized materials needed by industry, commerce, educational institutions, and Government; develops,

produces, and distributes standard reference materials; relates the physical and chemical properties of materials to their behavior and their interaction with their environments; and provides

advisory and research services to other Government agencies. The Institute consists of an Office of Standard Reference Materials and the following divisions: Analytical Chemistry—Polymers—Metallurgy—Inorganic Materials—Physical Chemistry.

THE INSTITUTE FOR APPLIED TECHNOLOGY provides technical services to promote

the use of available technology and to facilitate technological innovation in industry and Government; cooperates with public and private organizations in the development of technological standards, and test methodologies; and provides advisory and research services for Federal, state, and local government agencies. The Institute consists of the following technical divisions and

offices: Engineering Standards—Weights and Measures — Invention and Innovation — Vehicle Systems Research—Product Evaluation —Building Research—Instrument Shops—Measurement Engineering—Electronic Technology—Technical Analysis.

THE CENTER FOR RADIATION RESEARCH engages in research, measurement, and application of radiation to the solution of Bureau mission problems and the problems of other agencies and institutions. The Center consists of the following divisions: Reactor Radiation—Linac Radiation—Nuclear Radiation—Applied Radiation. THE CENTER FOR COMPUTER SCIENCES AND TECHNOLOGY conducts research and

provides technical services designed to aid Government agencies in the selection, acquisition, and effective use of automatic data processing equipment; and serves as the principal focus

for the development of Federal standards for automatic data processing equipment, techniques, and computer languages. The Center consists of the following offices and divisions: Information Processing Standards—Computer Information — Computer Services — Sys- tems Development—Information Processing Technology.

THE OFFICE FOR INFORMATION PROGRAMS promotes optimum dissemination and

accessibility of scientific information generated within NBS and other agencies of the Federal government; promotes the development of the National Standard Reference Data System and a system of information analysis centers dealing with the broader aspects of the National Measure- ment System, and provides appropriate services to ensure that the NBS staff has optimum accessibility to the scientific information of the world. The Office consists of the following

organizational units:

Office of Standard Reference Data—Clearinghouse for Federal Scientific and Technical Information ‘ —Office of Technical Information and Publications—Library—Office of Public Information—Office of International Relations.

1 Headquarters and Laboratories at Gaithersburg:, Maryland, unless otherwise noted;

- Located at Boulder, Colorado 80302.

;i Locate-d at 5285 Port Royal Road, Springfield, Virginia 22151.

tiling address Washington, D.C. 20234.
NATIONAL BUREAU OF STANDARDS REPORT

10 435

A SEARCH AND RESCUE SIMULATION MODEL FOR THE UNITED STATES COAST GUARD

Appendix A

FLOW CHARTS FOR PROGRAMMER LEVEL DOCUMENTATION

U.S. DEPARTMENT OF COMMERCE

NATIONAL BUREAU OF STANDARDS

PREFACE

This volume is one of a series which documents a Search and

Rescue Simulation Model for the United States Coast Guard. The

material reported in this documentation was developed by an interdisciplinary team at the National Bureau of Standards with representation from the U.S. Coast Guard under MIPR Z-70099-0-01935.

The complete documentation is comprised of the following:

Volume I Executive Level Documentation

Volume II Analyst Level Documentation

Volume III Programmer Level Documentation for "PREPROCESSOR"

Volume IV Programmer Level Documentation for "OPSIM"

Volume V Programmer Level Documentation for "POSTPROCESSOR"

Appendix A Flow Charts for Programmer Level Documentation

Appendix B Program Listings for Programmer Level Documentation

The study was initially conducted under the supervision of Martin

J. Aronoff; subsequently efforts were supervised by Richard T. Penn, Jr.

Technical Project Leadership was supplied throughout the project by

Stephen S. Karp. Other participants from the National Bureau of Standards

Technical Analysis Division included the following:

Susan S. Chamberlin Elizabeth E. Leyendecker

Linda K. Cummings Marcia D. Maltese

Mary Jane Duberg Patsy L.B. Saunders*

William Elliott, III Wayne A. Steele

Walter G. Leight Michael R. Vogt

Joel Levy Arnold L. Weber

1
Valuable advice was received from Alan J. Goldman* and Prof. Gustave J. Rath

of Northwestern University.

U.S. Coast Guard participants included:

Paul D’Zmura Gerald L. Underwood

Thomas T. Matteson Robert R. Wells

Support services were furnished by the following members of the

MBS Technical Analysis Divison:

Mary M. Abbott Frances E. Jones

Theresa I. Conrad Lucinda I. Farrell

* Staff members of the NBS Applied Mathematics Divison
TABLE OF CONTENTS

Page

I. PREPROCESSOR

PCP 1 NEEDS

NUCASE 11

READ 15

FIELD 17

DEMGEN . . 19

HIST ... 24

SELECT 27

II. OPSIM

START 28

NUCRU

OPSIM

SRAS 33

CRES 34

VEC 37

OSET 39

RESAP 40

ROCA 46

MRAS 47

NOTIF 48

TOW 49

DTD 50

SRCH 51

iii
page

NOTE . 53

SASS 54

SSS 56

READY 60

ARSCH 61

COMPL .......... ..... 62

SSET 63

FUEL 64

HOMED 65

SNDBK 66

SRISE 68

XSET 69

SERVE. 70

DELAY 72

ARVSN 73

STATS. ............. 76

SRCHF 77

ONSCN 78

COVER 80

CHEKN. 81

RETN 82

TERM 83

HOME 85

SAQ 86

QUEUE .88

EXQ 90

IV
page

STOBY .......... 94

SVQUE 98

WRECK .............. 99

ENDSIM. 100

DRIVE ......... 104

JUMPER. 105

v

- 1

-
- 2

-
convert A3

to integer
- 2

-
X=((L0NG-C7B)j

*ZEETA)/60 i Y=C7A-LAT 5

- 3

-
- 4

-
- 5

-

- 7

-

'C

Ci>o

ijj ^ £

oSx £u ^ 1 * 2 a? Q cs. £ 1 ^ Q >• > '4J V- |o 4c ^ <v ^ ? * u* V Co ^ C. ( 'J £ 2 <o oi?.^

Vr

T C* c. £Q

.r

yJ ^ £

Uj Uj 0^0.

Uj 4tUi -<t

W tV 5

if <o

v£> <V

G $ *

(5

U * l4 s;* O C-O

h ; u

wO Uj is'O Uj :«- *v* ; ^5 >0 ^ ; <5 £ (o

-9-
I?'

&EN£fZAL

ASS

1ST- A

wee

rendered

gy

•10

£fc

QoiR.es

air. e

Scc

st
- 11 -

-II-
- 12 -
(F)

.T

- 13 -

- 13

-
©
- 15 -

-SI-
- 16 -
- 17 -

-LX-
- 18 -

- 18

-
initialize

conmtbA

- 19 -
V

/ n

7

t-%

| ^ '

20 -
© - 21 -
- 22 -
- 23 -

- 25 -

- 25

-
- 26 -
PROGRAM

SELECT

- 27 -
EXOGENOUS

EVENT

START

V) -H ^ <L> +-> U U ctf 0) W N P *H U O r-H tf) Clj cn <l> *p-l 00 P P O -H

>h

m pj

UO *H i - 28 -

*MAINXX

is

the

timing

routine
ENDOGENOUS

EVENT

NUCRU

- 29 -

^AINXX
NUCRU

Cont.

- 30 -

+DVEC
- 31 -

and

all

of

its

adjacent

s
Read

NEED

(NOTIP)

I

I

^XDoes

- 32 -

^iainxx J

Vmainxx
Subroutine

SRAS

- 33 -
SUBROUTINE

CRES < , I

IRAY1(1)=23
-35

’Value

of

PAP
- 36 -

IPAY2

now

contains

all

^

stations

capable

of

serving

LOOP

[

the

CASE
Subroutine

VEC
VEC

Cont.

CD £ ^ -P T3

CD CD C k rQ c3

-38

cabling

program
- 39 -
Subroutine

RESAP

Does

station

of

,XSTN(CASE)\

resource

=

any

of

Tfie~'N=CUT(STATN(

^

cutters

of

the

primary

^\

v

CASE)ji/'
RESAP

Cont

.

- 41 -

- 41

-
RESAP

Cont.

<L>

- 42 -
COa
RESAP

Cont.

CD -tr- "TD“ U

3 i oj O U T-J

(/) <D T3

<L> +-> ctJ Vh CH <D (/) 03 X £

<D +-> O

*-< X) O

C ^

+-> £ OT3 IA

- 44 -
- 45 -
Subroutine

ROCA

Cause

STNBY

at

TIME +2

hours
- 47 -

- 47

-
ENDOGENOUS

EVENT

NOT

IF

- 48 -
SUBROUTINE

TOW

(CASE)

- 49 -

,Retum\ o

callii

routine
SUBROUTINE

DTD(CASE

,XD,YD,D)

- 50 -

D=SORT

((XC-XD)

**2+(YC-YD)

**2)
DO

FOR

I=(l)

fSlSfCASEl

Subroutine

SRCH

-SICal]

SSS
SRCH

Cont

.

- 52 -

ITOLfCASEI

=4

Increase

1

^

J

FAIL2(STATN(CASE))
ENDOGENOUS

EVENT

NOTE

- 53 -
Subroutine

SASS

- 54 -
- 55 -
Subroutine

SSS

O'

CD X

w O II

II u-J 5! PQ & U l-H 2.

-M O

<D CO II

- 56 -

SSS

Continued

-58
Subroutine

SSS

- 59 -
Subroutine

- 60 -
Endogenous

Event

ARSCH

- 61 -
Endogenous

Event

COMPL

- 62 -

^9

MAINXX
Endogenous

Event

SSET

- 63 -
Endogenous

Event

FUEL

<D

CDO

4—

>

T3

- 64 -
Endogenous

Event

HOMEF

- 65 -
- 66 -
couX

g

- 67 -
Endogenous

Event

SPISE

- 68 -
Endogenous

Event

XSET

- 69 -
Subroutine

SERVE

o rH U H +

+ + CO • U CO Q PJ

t- tu W co 2 u O 2 2: . uu ii z II II CO II U(OQW h W W" co 2 w

o z z U CJ

- 70 -
4-> O)

- 71 -

routine/
- 72 -
Endogenous

Event

ARVSN

if)

if) <D p

N O O

H h h • —i co co o o

pH W W II II

Cu II II WP

— P CO O h

< hh O co Ph o >-<

II PJ II II Q W K Ph CD Cd

CO• II H < H -3 co

73 -
ENDOGENOUS

EVENT

ARVSN

r—

1

II § « H Q

eg ii 3

P* SC W H

Q +

. . Jz>

- 74 -

JFLAG=2
1

- 75 -

CAUSE

ONSCN

AT

TRLS
SUBROUTINE

STATS

.1

ling/rout

in
SUBROUTINE

SRCHF(CASE,

INOTF,

IRS)

- 77 -

.3SVDJ

LSO+3WIJL
Endogenous

Event

ONSCN
- 79 -

LOOP
SUBROUTINE

COVER

(CASE,

IRES)

- 80 -

XRLS=RLS(IFLT)

IWAIT(CASE)=IW

IW=lR

IB(IW)

=2
Endogenous

Event

CHEKN

- 81 -
SUBROUTINE

RETN

(CASE,

IRS)
SUBROUTINE

TERM

-83
SUBROUTINE

TERM

(CASE)

Cont.

- 84 -
ENDOGENOUS

EVENT

HOME

- 85 -
SUBROUTINE

SAQ

£
X31

•rH

4-> C

ou

<r

CO

- 87 -
SUBROUTINE

QUEUE

(NCODE.M)

- 88 -

RQUE

EMP'

SUBROUTINE

EXQ

- 90 -
G>

CO

DO,

FOR

EACH

IR

IN

RQUE /\ o U

'v / '

LOOP 1

-91-
EXQ

Continued l £O

_T3

<L> MH £

T3 0 0 cn >O 0 E0 O - 92 -

*e

source
<b xJ

<D (D c £

rC

V

O to

t-* cd <D 0 rO

CO - 93 -

Set

IB,

PRIOR;

Increase

NCASE
Endogenous

Event

STNBY

- 94 -

MAINXX
STNBY

Continued

- 95 -
STNBY

Continued

-S:

i/i C O (D

<U ‘H Jh

t-i <D <4-4 U

r£> <D

(D T3 (/)

i—I If) cu bJj>H > (D C O X* h W E

c/> m o o <6 h+J

-96-
STNBY

Continued

'S T3 CD "d >

(L) H

(D <D C </> rd <D U JD

>-03

- 97 -
SUBROUTINE

SVQUE

- 98 -

LOOP
Subroutine

WRECK

(NOT

IF)

- 99 -
EXOGENOUS

EVENT

ENDSIM

- 100 -
ENDSIM

Continued

\

\

\\

- 101 -

STDEV(I)
ENDSIM

Continued

^ >-3 1-> P H N K) 2 r^Cy wp_uhj2^

§ < < < ^> CO f 3

: w<«ur

aaar OT PQ « 1

+

j§ r^. —

X

p. la 3

<3

- 102 -

Calculate

MEANV

and
ENDSIM

Continued

- 103 -
SUBROUTINE

DRIVE

- 104 -

XXNIVW'
SUBROUTINE

JUMPER

-10S-
SUBROUTINE

JUMPER

- 106 -
SUBROUTINE

.JUMPER

- 107 -
SUBROUTINE

JUMPER

- 108 -



t