• Nie Znaleziono Wyników

Hybriede programmatuur voor de verwerking van laagfrequente, stochastische signalen

N/A
N/A
Protected

Academic year: 2021

Share "Hybriede programmatuur voor de verwerking van laagfrequente, stochastische signalen"

Copied!
60
0
0

Pełen tekst

(1)

CENTRALE W E R K G R O E P W I S K U N D E

Rapport N o . C W W - 1 1

- HYBRIEDE PROGRAMMATUUR VOOR DE VERWERKING VAN

LAAGFREOUENTE, STOCHASTISCHE S I G N A L E N .

_ I n g . W . B . T i n b e r g e n

Delft University oi T e c h n o l o g y Ship Hydromechanics Laboratory Mekelweg 2

Delft 2 2 0 8

(2)

I n l e i d i n g . ' De gang v a n de b e r e k e n i n g . ' I n l e i d e n d e h a n d e l i n g e n . ' De f i l t e r k a s t . 2 De f i l t e r s op de AD4. ^ Het e e r s t e d i g i t a l e programma, VT 0 2 3 . 3 S t r o o m s c h e m a v a n VT 0 2 3 . ^ Het tweede d i g i t a l e programma, WT 0 2 3 . 5

S t r o o m s c h e m a v a n WT 0 2 3 . 6 Het z e t t e n v a n p u l s e n . ^ Het u i t l e z e n v a n de i j k e n . 8 V o o r b e e l d v a n de c o n t r o l e - u i t v o e r . 10 S t r o o m s c h e m a ' s v a n de i j k - u i t l e z i n g . 11 De u i t l e z i n g v a n de m e t i n g e n . 13 Het l o g i s c h e programma. 13 S a m e n v a t t i n g . ' De u i t l e z i n g e n d i g i t a a l . '5 De o r g a n i s a t i e v a n de d a t a s e t . 15 S t r o o m s c h e m a v a n de u i t l e z i n g . 16 Het d e r d e e n h e t v i e r d e programma, XT 023 en YT 0 2 3 . 17 Stroomschema v a n XT 0 2 3 . 1^ S t r o o m s c h e m a v a n YT 0 2 3 . 18 D a n k b e t u i g i n g . A p p e n d i x . L i s t i n g v a n VT 0 2 3 . 20 L i s t i n g v a n WT 0 2 3 . 22 L i s t i n g v a n XT 0 2 3 . 29 L i s t i n g v a n YT 023. 34

(3)

Nadat a a n b o o r d v a n de " A t t i s " e e n a a n t a l a n a l o g e g o l f r e g i s t r a t i e s was v e r r i c h t , o n t s t o n d de b e h o e f t e a a n h y b r i d e programmatuur v o o r de v e r w e r k i n g e r v a n . Om h i e r i n t e v o o r z i e n z i j n op de h y b r i d e i n s t a l l a t i e v a n h e t R e k e n c e n t r u m programma's o n t w i k k e l d , d i e v e e l a l g e m e n e r b r u i k b a a r b l e k e n t e z i j n , d a t i n e e r s t e o p z e t de b e d o e l i n g w a s . Ze kunnen g e b r u i k t worden v o o r d e a n a l y s e v a n w i l l e k e u r i g e a n a l o g e r u i s s i g n a l e n v a n n i e t t e hoge f r e q u e n t i e , w a a r b i j de v o l g e n d e v e r d e l i n g e n ( k u n n e n ) worden b e r e k e n d : I e de n o r m a a l v e r d e l i n g 2e de c o r r e l a t i e f u n c t i e en h e t e n e r g i e s p e c t r u m 3e de v e r s c h i l l e n d e v e r d e l i n g e n v a n t o p p e n , d a l e n e n g o l f h o o g t e n . V o o r w a a r d e i s , d a t de t e a n a l y s e r e n s i g n a l e n op e e n s t a n d a a r d t a p e w o r d e n a a n g e -boden e n d a t op d i e t a p e m i n s t e n s e e n k a n a a l w o r d t v r i j g e l a t e n t e n b e h o e v e v a n de v e r w e r k i n g op de m a c h i n e .

DE GANG VAN DE BEREKENING.

Nadat de programma's z i j n i n g e l e z e n , de p a t c h - b o r d e n z i j n a a n g e b r a c h t e n z , , w o r d t een band u i t g e s c h r e v e n op de B r u s h - r e c o r d e r . D a a r b i j w o r d t t e g e l i j k h e t commentaar op h e t s p r a a k k a n a a l a f g e l u i s t e r d . Aan de hand h i e r v a n w o r d e n i j k i n g e n e n m e t i n g e n g e l o c a l i s e e r d . L a n g s de m e t i n g e n worden p u l s e n g e s c h r e v e n , d i e l a t e r a u t o m a t i s c h en r e p r o d u c e e r b a a r t e r u g t e v i n d e n z i j n . A l s d i t g e b e u r d i s k u n n e n de i j k e n m e e t -s i g n a l e n a f z o n d e r l i j k w o r d e n g e d i g i t a l i -s e e r d e n op -s c h i j f g e z e t . V e r v o l g e n -s w o r d e n de s c h i j f g e g e v e n s omgezet i n p o n s k a a r t u i t v o e r . D e z e u i t v o e r w o r d t t e n s l o t t e op de IBM 370/158 v e r d e r v e r w e r k t t o t l e e s b a r e u i t v o e r . INLEIDENDE HANDELINGEN. Voor e r t o t e e n b e r e k e n i n g k a n worden o v e r g e g a a n , m o e t e n e e n p a a r i n l e i d e n d e h a n d e l i n g e n worden v e r r i c h t .

I e . De band moet op de b a n d r e c o r d e r worden g e m o n t e e r d , de r e a d - w r i t e s c h a k e l a a r s b i n n e n i n de r e c o r d e r v o o r de k a n a l e n 1-12 op r e a d g e z e t en de l o c a l - r e m o t e s c h a k e l a a r op r e m o t e , de v e r s c h i l l e n d e n e t s c h a k e l a a r s moeten a a n g e z e t e n de j u i s t e b a n d s n e l h e i d g e k o z e n .

2e. De f i l t e r k a s t moet worden a a n g e s l o t e n op de k a n a l e n 112 t u s s e n de r e c o r d e r u i t g a n g e n e n de t r u n c l i j n e n n a a r de AD4. De n e t s p a n n i n g moet w o r d e n a a n g e -s l o t e n e n de n e t -s c h a k e l a a r a a n g e z e t . 3e. Op de AD4 m o e t e n de p a t c h - b o r d e n w o r d e n a a n g e b r a c h t e n de p r e c o u n t - s w i t c h e s 070 e n 170 op r e s p . 60 e n 5 g e z e t . 4 e . B r u s h - r e c o r d e r Bioet w o r d e n a a n g e z e t , de g e v o e l i g h e i d p e r k a n a a l i n g e s t e l d , de m a r k e r s op e x t e r n g e z e t e n de j u i s t e p a p i e r s n e l h e i d g e k o z e n .

5e. E v e n t u e e l m o e t e n e e r s t op de IBM 1800 de j u i s t e s c h i j v e n worden a a n g e b r a c h t e n / o f prograimrna's worden v o o r v e r t a a l d . D a a r n a k a n h e t e e r s t e programma w o r d e n g e s t a r t .

(4)

DE F I L T E R K A S T . De k a s t b e v a t e e n v o e d i n g - u n i t en 14 i d e n t i e k e f i l t e r s . Het p r i n c i p e - s c h e m a v a n éën z o ' n f i l t e r i s g e g e v e n i n f i g u u r 1. Ze worden g e b r u i k t t u s s e n de b a n d r e c o r d e r -u i t g a n g e n en de i n g a n g e n v a n de h y b r i d e m a c h i n e ( z i e f i g -u -u r 2 ) . H i e r v o o r w a r e n de v o l g e n d e a a n p a s s i n g e n n o d i g . a ) Op de i n g a n g e n z i j n w e e r s t a n d e n v a n 75 ohm a a n g e b r a c h t . b ) De u i t g a n g e n z i j n v o o r z i e n v a n b u f f e r t r a p j e s om u i t s t u r i n g o v e r de 75 ohm i n g a n g e n v a n de h y b r i d e m a c h i n e m o g e l i j k t e maken. De r e g e l w e e r s t a n d v a n 100 K i s a a n g e b r a c h t om de t o t a l e v e r s t e r k i n g op 1 a f t e kunnen r e g e l e n . Het e e r s t e I . C . i s v o o r z i e n v a n e e n n i e t g e t e k e n d e n u l m -s t e l l i n g . De c o n d e n s a t o r e n i n de s c h a k e l i n g z i j n op p r i n t e n gemonteerd , w a a r d o o r ze e e n v o u d i g t e v e r w i s s e l e n z i j n . Omdat de k a n t e l f r e q u e n t i e s omgekeerd e v e n r e d i g z i j n met de w a a r d e n v a n de c o n d e n s a t o r e n i s h i e r d o o r e e n e e n v o u d i g e m o g e l i j k h e i d o n t s t a a n d e z e f r e q u e n t i e s t e w i j z i g e n . De i n g e s c h r e v e n w a a r d e n komen o v e r e e n met e e n k a n t e l f r e q u e n t i e v a n 0,5 Hz. O — I zroUi 8 T o K -I a7oK> -O

DE. r i L T L R K P S T

P \ G Ü Ü R i

(5)

Z o a l s ook u i t h e t a n a l o g e schema, f i g u u r 2 b l i j k t , b e g i n t de s c h a k e l i n g met e e n s t e l f i l t e r s . De o v e r d r a c h t s f u n c t i e v a n z o ' n f i l t e r i s : a ( j Ol) ^ 1 f o (joj) 1 + jw T 1 . . . 1 De k a n t e l f r e q u e n t i e i s wk = 7^ l de w a a r d e v a n de coëfficiënten z i j n e v e n e e n s - . Voor de g e k o z e n f r e q u e n t i e v a n 5 Kz w o r d t d i t dus 2.11,5 = 10 I I . E e n zo g r o t e w a a r d e i s n i e t e e n v o u d i g m o g e l i j k en i n v e r b a n d met de v o l g e n d e p u n t e n ook n i e t n o d i g , a ) A l l e i n t e g r a t o r - c a p a c i t e i t e n op de AD4 z i j n b e r e k e n d op e e n i n t e g r a t i e - t i j d v a n O,1 s e c o n d e .

Daarom moeten de b i j b e h o r e n d e coëfficiënten worden i n g e s t e l d op e e n w a a r d e , 10 X k l e i n e r dan de b e r e k e n d e ,

b ) Door de t i j d s c h a a l v a n de m a c h i n e 10 x k l e i n e r t e k i e z e n , w o r d e n a l l e c a p a c i -t e i -t e n n o g m a a l s me-t e e n f a c -t o r 10 v e r k l e i n d . Resumerend k u n n e n we dus s -t e l l e n , ^ d a t v o o r e e n f i l t e r v a n 5 Hz de w a a r d e v a n de b i j b e h o r e n d e coëfficiënten g e l i j k w o r d t a a n

10.n / 100 = 0,1.n.

I n h e t d i g i t a l e programma, w a a r i n de h y b r i e d e c o m m u n i c a t i e r o u t i n e s de e e n h e i d o v e r e e n k o m t met h e t g e t a l 10000, moet dus de w a a r d e 1000 n = 3142 worden i n g e v u l d . TRUMK

T

f o R i V 1 7RUMK 1 IMT \m SWfi S W B BMPL 1 7RUMK 1 IMT \m SWfi S W B BMPL T H P E 1 \ 0 0 0 Z 0 0 A 0 0 0 0 0 3 0 0 6 0 0 \ 0 & 0 0 0 e 0 0 Z £ .4 0 1 1 1 1 1 006 0 0 Y e 1 0 e 1 Z 0 1 3 © 1 1 0 z 1 0 £ 0 0 zz Z 4 1 a & 1 1 £ 0 1 0 \ 5 0 2. 0 0 \ 6 0 1 7 0 z 1 0 & £ o4 0 0 6 £ £^ £ 1 1 S> 0 zz o^^ 0 3 0 0 Z 4 0 2 6 0 ^ 1 0 £ 2 ) «s 6 0 0 6 Z £ 4 S> 4 1 1 4 0 34 e 2) « 0 4 0 0 2) 6 OtV o4 1 060 \ 0 0 \ 0 £ ï > - i 0 •s

1 1 « e>4S. o4t 0 6 0 o44 o4i O ' S 1 0 6 1 1 £ 0 1 £ 2 » 4 1 6

1 1 6 0A6 o4 7 060 o5& 0 6 S 0 6 \ 0 é 2 0 0 0 0 e £ £ 0 1 7 i 1 7 © 5 6 of 0 0^6 0 -5 7 0 7 1 o6^ 0 £ 0 0 £ £ Z4 \ £ 8 1 5 0 1 o4 1 0 6 1 e e 1 e 6 1 ö 7 1 e 1 1 £ 0 0 ^ 0 0 5 2 Z4Z

9

1 3 1 1 1 4 1 1 6 1 1 e 1 1 6 1 1 7 1 1 1 1 £ 1 0 ó 0 £

Z4t

-<

1 0 1 d £ 1 z4 1 £ € 1 2 0 1 Z

6

1 Z

7

1 Z 1 1 £ £ 1 0 0 1 0 2 i 4 o 1 1 1 ^ ^ 1 ^'4 1 » 6 1 »e> 1 ^6 1 ^7 1 ^ 1 l £ 9 1 £ 0 ) 1 e

24 \ 6

) £

H E T R l i R L O ^ L P R Q 6 R R W W R

F\güüFZ a HET E E R S T E D I G I T A L E PROGRAMI-IA, VT 0 2 3 ,

I e d e r e b e r e k e n i n g w o r d t met d i t programma begonnen. H e t i n i t i e e r t de h y b r i e d e c o m m m u n i c a t i e - r o u t i n e s , z e t a l l e coëfficiënten e n de t i j d s c h a a l v a n de AD4 (op X 1 0 ) , I n de t e s t f a s e , w a a r b i j n u m e r i e k j u i s t e a n t w o o r d e n n i e t n o d i g z i j n , i s h e t v a a k w e n s e l i j k de i j k p r o c e d u r e o v e r t e s l a a n . V o o r d a t g e v a l i s e e n d u m m y - i j k p r o c e d u r e ingebouwd, w a a r b i j de i n g e v o e r d e i j k w a a r d e n qua g r o o t t e - o r d e o v e r e e n k o m e n met de w e r k e l i j k e i j k w a a r d e n .

(6)

De p r o c e d u r e w o r d t g e a k t i v e e r d door d a t a s w i t c h 9 omhoog t e p l a a t s e n .

Soms i s e e n n o r m a l e i j k v e r w e r k i n g n i e t m o g e l i j k , b.v. door h e t o n t b r e k e n v a n

i j k s i g n a l e n . Om i n d e r g e l i j k e g e v a l l e n t o c h t o t e e n goed r e s u l t a a t t e komen i n e e n a n d e r e methode n o d i g .

A l s h e t l u k t de i j k f a c t o r e n op e e n a n d e r e m a n i e r t e b e p a l e n , dan k u n n e n z e i n g e t y p t worden. P l a a t s d a a r t o e d a t a s w i t c h 10 omhoog. Het programma v r a a g t dan v o o r i e d e r k a n a a l e e n a f z o n d e r l i j k e i j k f a c t o r . F o r m u l e s worden g e g e v e n o n d e r h e t h o o f d : "Het u i t l e z e n v a n de i j k e n " .

Ook v r a a g t h e t p r o g r a i m a de filter-cöefficiënten i n t e t y p e n . Wij g e b r u i k t e n s t e e d s de w a a r d e 0,111/; dus 3142.

Het programma e i n d i g t met een v a s t e l i n k n a a r h e t v o l g e n d e programma, WT 0 2 3 .

VT 023 I n i t i e e r de h y b r i e d e c o m m u n i c a t i e - r o u t i n e s Z e t de t i j d s c h a a l v a n de AD4 op x 10, D r u k a f : o m s c h r i j v i n g v a n de f u n c t i e s v a n de d a t a s w i t c h e s . z e t de g e w e n s t e d a t a s w i t c h e s en s t a r t d o o r nee I s d a t a s w i t c h 9 omhoog? l a b e l 05 S c h r i j f d u m m y - i j k n a a r s c h i j f l a b e l 15 nee I s d a t a s w i t c h 10 omhoog? L a b e l 16 T i k met de hand de i 12 k a n a l e n . Z e t de i j k w a a r d e n op j k w a a r d e n i n v o o r a l l e s c h i j f . l a b e l Z e t a l l e coëfficiënten op n u l T i k de w a a r d e n v a n de filtercoëfficiënten i n en z e t z e . L i n k n a a r WT 023

(7)

D i t i s h e t c e n t r a l e programma, d a t v e l e f u n c t i e s v e r v u l t , z o a l s b l i j k t u i t o n d e r s t a a n d e t a b e l . De m e e s t e f u n c t i e s z u l l e n h i e r o n d e r k o r t b e s c h r e v e n worden, de o v e r i g e i n a p a r t e h o o f d s t u k k e n d a a r n a . Z o d r a h e t programma g e s t a r t i s , v e r s c h i j n t de v o l g e n d e t e k s t op de t y p e m a c h i n e : P R n O R ' 1 1 0 2 3 c n n n n i r i G P A T A S V / 0 C A L L C X I T • 1 ! . | M | ( r i A A P V T 0 2 3 2 l . l f I K [ ' A A P X T 0 2 3 3 \.\VK P A A P Y T 0 2 3

h

S T O P l l Y P r . P P P J P P M 5 ^ T O P P i r i T . P P K P P P ^ ' 6 p i n . p p r i Z P T T P P 7 I J K n i T i . R Z P r i T A P P l ' I T l . P Z n N n i. r p n P T A P P P . T . P . v . i . P - . r . f ! r o p p i n r . r p i ^ n c v n n p n A r i n p V A ! ' P I I . T ' ^ P ' ' . A P T :(•) P A T A ( I C P T ) I P P P Z P M v n n p i i P T ' , ' i . i z i n p f i V A P I P ' T P A T A P V I + 7 + I O n f i i o o r C O P T P O P P P P T A P P P P n o p P P P p p Z P T P A T A S P ' Na i e d e r e b e r e k e n i n g z a l h e t programma s t e e d s t e r u g s p r i n g e n n a a r l a b e l 02 ön de v o l g e n d e t e k s t a f d r u k k e n : " C o n t r o l e e r t a p e r e c o r d e r e n z e t d a t a s w i t c h " .

D a a r n a komt h e t programma i n e e n p a u z e . Dan k u n n e n de g e w e n s t e d a t a s w i t c h e s w o r d e n g e z e t e n de m a c h i n e d o o r g e s t a r t . V a n a f d i t p u n t k u n n e n de b e r e k e n i n g e n w o r d e n beëindigd d o o r d a t a s w , O omhoog t e p l a a t s e n . A l l e d i g i t a l e programma's z i j n d.m.v. z g n . l i n k s met e l k a a r g e k o p p e l d . V i a de d a t a s w i t c h e s 1,2 e n 3 k a n h i e r v a n g e b r u i k w o r d e n gemaakt. D.m.v. de s w i t c h e s 4 e n 5 k a n h e t programma gedwongen w o r d e n e e n b e r e k e n i n g t e beëindigen. D i t l u k t n a t u u r l i j k a l l e e n op de p l a a t s e n , w a a r op de s t a n d v a n de b e t r e f f e n d e s w i t c h e s w o r d t g e t e s t . S w i t c h 4 h e e f t a l l e e n e f f e c t t i j d e n s h y b r i e d r e k e n e n , s w i t c h 5 a l l e e n d i g i t a a l . De s w i t c h e s 6, 7, 8 e n 9 z u l l e n v e r d e r o p b e s c h r e v e n worden. S w i t c h 10 w o r d t g e b r u i k t b i j h e t i n l e z e n v a n de 2 v e r e i s t e d a t a k a a r t e n . Op de e e r s t e s t a a n de volgnummers v a n de 12 k a n a l e n , dus b . v , de g e t a l l e n 1-12. Op de tweede k a a r t s t a a n a a n v u l l e n d e g e g e v e n s v o l g e n s o n d e r s t a a n d e t a b e l . V o o r b e i d e k a a r t e n g e l d t h e t F o r t r a n - f o r m a t 1 2 i 3 . V a r i a b e l e ^ H i Ë S l i E i i Y i B Ë i b a n d volgnummer v a n de m a g n e e t b a n d , 1 v o o r band A, 2 v o o r band B e n z , i r u n runnummers

i d a g , imnd, i j r r e s p . d a g , maand e n j a a r , samen de datum. V o o r b e e l d : 14,02,70, v o o r de datum 1 4 - 2 - 1 9 7 0 . i u u r , i m i n t i j d v a n de dag i n u r e n e n m i n u t e n .

(8)

01. 1 7/8 i p s 02, 3 3/4 i p s 03, 7 1/2 i p s i b p l o n d e r s t a a n d e c o d e r i n g v a n de b a n d s n e l h e i d i v o p n A l s op k a n a a l 12 e e n r e k s t r o o k j e i s a a n g e s l o t e n , d a n de w a a r d e 00, v o o r e e n v e r s n e l l i n g s o p n e m e r de w a a r d e 0 1 .

S w i t c h 10 k a n ook v o o r e e n g e h e e l a n d e r d o e l g e b r u i k t worden, samen met de s w i t c h e s 4 en 7. Met d e z e c o m b i n a t i e v a n s c h a k e l a a r s t a n d e n w o r d t b e r e i k t d a t e e n n i e u w e waarde v o o r de v a r i a b e l e i w t k a n worden i n g e l e z e n op de t y p e - m a c h i n e . V e r d e r e i n f o r m a t i e w o r d t g e g e v e n b i j de u i t l e z i n g v a n i j k e n e n m e t i n g . WT 023 Druk e e n o v e r z i c h t a f v a n de f u n c t i e s v a n de d a t a s w i t c h e s l a b e l ( l a b e l ( 1 D r u k a f : " C o n t r o l e e r t a p e r e c o r d e r e n z e t d a t a s w . " 1 1 • 1 1 P a u s e 9999 nee , s d a t a s w i t c h 9 omhoog L e e s de s t a p s p a n n i n g t . b . v . i j k e n I s d a t a s w i t c h O omhoog? j a E X I T nee I s d a t a s w i t c h 1, 2 o f 3 omhoog? L i n k n a a r VT 0 2 3 , XT 023 o f YT 023 nee I s d a t a s w i t c h 6 omhoog? nee j a Z e t p u l s e n nee I s d a t a s w i t c h 7 omhoog? nee j a I s d a t a s w i t c h 10 omhoog? j a L e e s i w t I s d a t a s w i t c h 4 omhoog? j a n e e V e r w e r k de i j k s i g n a l e n I s d a t a s w i t c h 10 omhoog nee 3 > ^ L e e s p o n s k a a r t e n I s d a t a s w i t c h 8 omhoog? nee L e e s de t a p e u i t

(9)
(10)

HET ZETTEN VAN PULSEN.

D e z e f u n c t i e v a n h e t programma w o r d t g e k o z e n d o o r d a t a s w i t c h 6 omhoog t e z e t t e n . D a a r v o o r w o r d t , m.b.v. h e t l o g i s c h e programma ( f i g u u r 3 ) , d o o r C L R I 6 de b a n d r e c o r d e r g e s t a r t e n door CLR15 p u l s v o r m e r I samen met de t e l s c h a k e l i n g g e b l o k k e e r d en

p u l s v o n n e r I I g e s t a r t . T e l l e r 270 t e l t 23 p u l s e n v a n 10 msec op de e n a b l i n g - b u s , b i j de 2 4 - s t e p u l s komt f l i p - f l o p 260 op, b i j de 2 5 - s t e worden de t e l l e r e n de f l i p - f l o p door e l k a a r g e - c l e a r d , w a a r d o o r de c y c l u s weer opnieuw b e g i n t . Zo o n t s t a a n d u s p u l s e n met e e n d u u r v a n 10 m s e c , e n e e n h e r h a l i n g s t i j d v a n 25 x 10 m s e c . = 0,25 s e c .

Door b i j de opname de band op 4x de o o r s p r o n k e l i j k e s n e l h e i d t e l a t e n l o p e n , komt d i t o v e r e e n met e e n r e f e r e n t i e - s i g n a a l met 1 p u l s p e r s e c o n d e . B i j de opname k a n d i t s i g n a a l g e s c h a k e l d worden met h a n d s w i t c h 200. SWA 220 i s e e n door l o g i c a b e d i e n d e e l e c t r o n i s c h e , a n a l o g e s c h a k e l a a r .

HET U I T L E Z E N VAN DE I J K E N .

Deze f u n c t i e v a n h e t programma w o r d t g e k o z e n door d a t a s w i t c h 7 omhoog t e z e t t e n . T i j d e n s h e t u i t l e z e n z a l h e t v e r l o o p v a n h e t p r o c e s dóór h e t l a m p - r e g i s t e r v a n de IBM 1800 worden a a n g e g e v e n . H e t v i s u e e l v o l g e n v a n d e z e i n d i c a t o r l a m p j e s b l e e k e e n o n m i s b a a r h u l p m i d d e l om de p r o c e d u r e v a n h e t i j k - u i t l e z e n t e c o n t r o l e r e n . De gang v a n z a k e n i s a l s v o l g t : L a m p j e 1 b r a n d t b i j h e t u i t l e z e n v a n k a n a a l 1, l a m p j e 2 b i j k a n a a l 2 e n z . B o v e n d i e n z a l s t e e d s l a m p j e 13 o p l i c h t e n t i j d e n s h e t u i t l e z e n v a n de e i g e n l i j k e i j k w a a r d e . Op de B r u s h - r e c o r d e r w o r d t d e z e l a a t s t e i n f o r m a t i e ook d o o r m a r k e r A g e g e v e n . De m a r k e r v a l t a f a l s l a m p j e 13 o p l i c h t e n komt weer op a l s h e t l a m p j e d o o f t . De b e s t u r i n g v a n de AD4 e n de b a n d r e c o r d e r g e b e u r t op de z e l f d e m a n i e r , a l s b e -s c h r e v e n b i j h e t z e t t e n v a n p u l -s e n , m.b.v. CLR15 e n 16. CLR13 -s t u u r t de m a r k e r . Het d i g i t a l e programma o n t v a n g t z i j n i n f o r m a t i e a l l e e n d.m.v. de u i t g e l e z e n w a a r d e n . A l s de b a n d - en B r u s h - r e c o r d e r j u i s t z i j n i n g e s t e l d , d a n v e r l o o p t de v e r d e r e b e s t u r i n g a u t o m a t i s c h . Het b l o k v o r m i g e i j k s i g n a a l w o r d t door h e t f i l t e r v e r v o r m d . Op de B r u s h - r e c o r d e r v e r s c h i j n t h e t o n g e v e e r i n de vorm, w a a r i n h e t g e t e k e n d i s i n f i g u u r 4. Door de o p t r e d e n d e u i t s l i n g e r i n g s v e r s c h i j n s e l e n was h e t n o d i g e e n s p e c i a a l u i t l e z i n g s p r o c e s t e o n t w i k k e l e n . H i e r b i j w o r d t h e t t i j d s v e r l o o p v a n de i j k e n v e r d e e l d i n e e n a a n t a l d e l e n : 1. T i j d e n s de v o o r l o o p t i j d komt de band op s n e l h e i d . 2. Op h e t beginmoment w o r d t de a a n v a n g s w a a r d e gemeten. 3. T i j d e n s de n u l p e r i o d e w o r d t e e n r e e k s v a n n u l w a a r d e n gemeten. 4. I n de w a c h t t i j d w o r d t n i e t s gemeten. 5. T i j d e n s de i j k p e r i o d e w o r d t e e n r e e k s v a n i j k w a a r d e n gemeten. V o o r a l d e z e t i j d s d e l e n g e l d e n c r i t e r i a , z o a l s z e h i e r o n d e r worden b e s c h r e v e n .

(11)

B i j h e t s t a r t e n v a n h e t programma w o r d t de AD 4 i n de j u i s t e mode g e z e t e n de band g e s t a r t . D a a r n a w a c h t h e t programma 9 s e c o n d e n . V e r v o l g e n s w o r d t de b a n d e l k e 0,02 s e c . u i t g e l e z e n . Met de e e r s t e u i t l e z i n g , de aanvangsv/aarde ( 2 ) , e i n d i g t de v e r l o o p t i j d ( 1 ) e n b e g i n t de n u l p e r i o d e ( 3 ) . De a a n v a n g s w a a r d e w o r d t a p a r t o n t h o u d e n , de d a a r o p v o l g e n d e w a a r d e n w o r d e n i n e e n a r r a y v a n 50 p l a a t s e n b e w a a r d . A l s e r meer d a n 50 u i t l e z i n g e n z i j n , d a n w o r d t i e d e r e n i e u w e u i t l e z i n g op de p l a a t s v a n de o u d s t e w a a r d e g e z e t , w a a r b i j d i e o u d s t e w a a r d e v e r l o r e n g a a t e n t e n s l o t t e a l l e e n de l a a t s t e 50 w a a r n e m i n g e n ( e n n a t u u r l i j k de a a n v a n g s -w a a r d e ) be-waard b l i j v e n . H e t l e z e n v a n n u l -w a a r d e n -w o r d t beëindigd b i j h e t i n g a a n v a n de w a c h t t i j d ( 4 ) , w a a r b i j de l a a t s t e u i t g e l e z e n w a a r d e w o r d t " v e r g e t e n " . H e t c r i t e r i u m v o o r d i t moment l i g t i n h e t v e r s c h i l t u s s e n de a a n v a n g s w a a r d e e n d e l a a t s t e n u l v / a a r d e . De w a c h t t i j d b e g i n t z o d r a d i t v e r s c h i l g r o t e r i s d a n de z g n . s t a p s p a n n i n g . Voor de s t a p s p a n n i n g i s 2,5 v o l t ( 2 5 0 ) g e k o z e n . D e z e w a a r d e b l e e k t e v o l d o e n , maar k a n d e s g e w e n s t g e w i j z i g d w o r d e n ( d a t a s w i t c h 9 ) . De duur v a n de w a c h t t i j d i s i w t x 0,75 s e c o n d e n . I n v e r b a n d met de i n f i g u u r 4 z i c h t b a r e u i t s l i n g e r i n g s v e r s c h i j n s e l e n i s h e t g e w e n s t v o o r i w t e e n g r o t e w a a r d e t e k i e z e n . Door de - soms t e - k o r t e i j k d u u r was d a t n i e t m o g e l i j k . De w a a r d e 2 v o l d o e t r e d e l i j k , maar h e t i s m o g e l i j k gemaakt i w t t e w i j z i g e n ( d a t a s w i t c h 4, 7 & 1 0 ) . A l s de w a c h t t i j d v e r l o p e n i s b e g i n t p e r i o d e 5, w a a r i n t e g e l i j k e r t i j d a ) 25 i j k w a a r d e n w o r d e n u i t g e l e z e n met e e n t i j d s i n t e r v a l v a n 0,02 s e c o n d e b) v a n h e t e v e n t u e e l v o l g e n d e k a n a a l h e t u i t l e e s p r o c e s w o r d t g e s t a r t . D i t l a a t s t e p r o c e s i s o v e r b o d i g g e b l e k e n , maar h e t s t o o r t e v e n m i n . E v e n t u e e l k a n , rondom s t a t e m e n t 6 3 , e e n c o r r e c t i e a a n g e b r a c h t w o r d e n . I n h e t v o l g e n d e p r o g r a m m a d e e l w o r d e n e e r s t a l l e g e m e t e n n u l e n i j k w a a r d e n a f g e -d r u k t . D a a r n a w o r -d t -d a t a s w i t c h 9 u i t g e l e z e n , I s -d e z e omhoog g e z e t , -d a n w o r -d e n a l l e u i t l e z i n g e n g e c o r r i g e e r d met e e n p e r k a n a a l c o n s t a n t e f a c t o r . O p z e t i s h e t v o l g e n d e : A l s de i j k s i g n a l e n zo k o r t z i j n , d a t z e n i e t t e g e b r u i k e n z i j n t e n g e v o l g e v a n de v e r v o r m i n g door de f i l t e r k a s t , d a n i s h e t a l t i j d nog m o g e l i j k , z e o n g e f i l t e r d t e l e z e n . Om de f o u t op t e h e f f e n , d i e o n t s t a a t d o o r h e t n i e t f i l t e r e n z i j n genoemde c o r r e c t i e f a c t o r e n i n g e v o e r d , I n de p r a k t i j k b l e k e n de o n t s t a n e f o u t e n e c h t e r zo g e r i n g , d a t z e v e r w a a r l o o s d k o n d e n w o r d e n . D i t i s de r e d e n , waarom e r g e e n m o g e l i j k h e i d i s ingebouwd om h e t b e t r e f f e n d e a r r a y ABC i n t e l e z e n . V e r v o l g e n s w o r d e n e e r s t de g e m i d d e l d e n e n d a a r n a de s t a n d a a r d a f w i j k i n g e n b e r e k e n d v a n n u l - en i j k v / a a r d e n . U i t de g e m i d d e l d e n w o r d e n i j k f a c t o r e n b e p a a l d m,b.v, o n d e r s t a a n d e f o r m u l e : . ^ 1000 k k a s t i j k f a c t o r = • • i „ „ „ „ - , i „ „ „ ^ j „ x i j k w a a r d e - n u l w a a r d e k s t r o o k j e ' w a a r i n K k a s t = k - f a c t o r v o o r de v e r s t e r k e r s ( h i e r 2,0) K s t r o o k j e = k - f a c t o r v a n de r e k s t r o o k j e s ( h i e r 2 . 0 7 ) A l l e g e w e n s t e g r o o t h e d e n w o r d e n i n t a b e l v o r m a f g e d r u k t op de r e g e l d r u k k e r , ( z i e a l s v o o r b e e l d t a b e l 1 ) . De g e m i d d e l d e n e n s t a n d a a r d a f w i j k i n g e n k u n n e n g e b r u i k t worden a l s c r i t e r i a v o o r de b e t r o u w b a a r h e i d v a n de u i t g e l e z e n w a a r d e n . Door l a t e r de b a n d u i t l e z i n g e n t e v e r m e n i g v u l d i g e n met de b i j b e h o r e n d e i j k f a c t o r w o r d t i n e e n k e e r g e c o r r i g e e r d v o o r ; A) g e v o e l i g h e i d v a n de a p p a r a t u u r B) k - f a c t o r v a n de r e k s t r o o k j e s .

(12)

K A N A A L N U L W A A t ^ O E I J K W A A R D E I J K F A C T O R N U L S P R E I D I N G I J K S P R EI D I N G 1 4 ^ f 2 . 3 2 0 1 4 / 7 6 . 2 0 2 0 . 0 6 9 7 6 4 2 6 . 5 7 3 3 9 . 9 9 6 2 1 8 1 . 6 0 0 1 4 4 9 6 . 2 0 2 0 . 0 6 9 8 5 8 1 3 . 7 1 1 4 0 . 1 3 4 3 3 4 9 . 4 8 0 1 4 2 8 7 . 3 2 0 0 . 0 7 1 7 4 7 3 1 . 5 2 5 3 1 . 1 8 8 3 5 7 . 9 6 0 1 4 6 9 2 . 8 8 1 0 . 0 6 9 7 5 9 4 0 . 4 3 8 3 6 . 1 0 6 5 2 9 5 . 6 8 0 1 4 9 3 1 . 0 8 0 0 . 0 6 8 3 2 7 2 9 . 0 2 8 3 4 . 7 3 5 6 3 7 1 . 8 0 0 1 4 9 2 5 . 4 0 1 0 . 0 6 8 7 1 1 2 9 . 5 3 8 3 7 . 4 4 i 7 2 1 1 . 8 3 9 1 4 6 5 5 . 6 4 1 0 . 0 6 9 2 3 3 2 0 . 0 9 9 2 0 . 6 1 6 e 5 3 6 . 4 8 0 1 4 4 8 1 . 8 0 1 0 . 0 7 1 7 0 6 ZO . 9 5 0 2 1 . 2 0 3 9 4 1 5 . 1 2 0 1 3 9 9 0 . 0 0 1 0 . 0 7 3 6 6 5 2 1 . 6 0 3 3 1 . 4 1 6 1 0 4 1 9 . 4 0 0 1 4 7 0 9 . 3 6 2 0 . 0 6 9 9 7 9 1 6 , 3 1 4 2 6 . 9 7 8 1 1 2 9 2 . 1 6 0 1 4 6 3 1 . 1 6 1 0 , 0 6 9 7 3 9 2 5 . 6 0 2 2 4 . C 6 1 1 2 3 . 4 0 0 1 3 9 4 Ö « 2 0 2 0 . 0 7 1 7 1 1 3 9 . 7 5 3 4 3 . 3 9 0 W A C H T T I J D 2 E E N H E D E N T a b e l 1: C o n t r o l e - u i t v o e r v a n Band -B- r u n 1

(13)

l a b e l 251 S t a r t de t a p e - r e c o r d e r d.m.v. e e n p u l s op CLR16 B l o k k e e r e e n g e d e e l t e v a n de l o g i c a d.m.v. C L R l 5 Z e t de A D4 i n Run e n o p e r a t e ~ m o d e Wacht 9 s e c o n d e n , z e t de k a n a a l t e l l e r op O e n de u i t l e e s t e l l e r op 1 l a b e l 510 V e r h o o g de k a n a a l t e l l e r met 1, b e r e k e n e n z e t ' t l a m p r e g i s t e r , k i e s de k a n a a l a d r e s s e n . L a a t op de B r u s h - r e c o r d e r m a r k e r A opkomen d.m.v. C L R l 3 L e e s de a a n v a n g s w a a r d e ( i p p ) . l a b e l 52 Wacht 0,02 s e c . w a a r d e o n d e r de L e e s naam h e t k a n a a l u i t , o n t h o u d de n a a r l a b e 1 67 U ^ s d a t a s w i t c h 4 omhoog? S t a a t de u i t l e e s t e l l e r ( K ) nog op 1? n a a r l a b e l 58 n e e n e e I s i p - i p p v o l d o e n d e k l e i n ? l a b e l f 56 ) B e r g de v o r i g e w a a r d e i v r op volgnunnner k-1 i n ' t a r r a y o n d e r l a b e l ^ ^ 5 4 ^ l a b e l ^ ^ 5 4 ^ Maak de v o r i g e w a a r d e , i v r , g e l i j k a a n i p . V e r h o o g d e u i t l e e s - t e l l e r met 1 I s de u i t l e e s t e l l e r 5 2 ? nee Maak de u i t l e e s t e l l e r g e l i j k a a n 2

(14)

l a b e l fTT^ S o r t e e r de 25 o u d s t e u i t l e z i n g e n u i t e n c o n t r o l e e r o f e r v o l d o e n d e u i t l e z i n g e n g e w e e s t z i j n . C o r r i g e e r h e t l a m p r e g i s t e r z o d a n i g , d a t l a m p j e 13 g a a t b r a n d e n , z o n d e r d a t e r a n d e r e l a m p j e s worden g e d o o f d . Wacht 0.75 x i w t s e c o n d e n . 1 V o e r de v o l g e n d e s a m e n g e s t e l d e o p d r a c h t 25 x u i t L e e s 0,02 v o l g de i j k w a a r d e v a n h e t b e t r e f f e n d e k a n a a l , s e c o n d e n . L e e s , v o o r z o v e r a a n w e z i g h e t ende k a n a a l u i t . w a c h t 1 L a a t 0,2 m a r k e r A op de B r u s h - r e c o r d e r a f v a l l e n , s e c o n d e . Wacht n a a r l a b e l ^ 5 1 0 ^— < ^ s k a n a a l 12 g e h e e l u i t g e l e z e n ? ^ S t o p de t a p e - r e c o r d e r d.m.v. e e n p u l s op C L R l 4 D r u k n u l - en i j k w a a r d e n a f . I s d a t a s w i t c h 9 o m g e h o o g g e z e t ? ^ nee l a b e l 771 V e r m e n i g v u l d i g a l l e n u l - en i j k w a a r d e n met e e n p e r k a n a a l c o n s t a n t e c o r r e c t i e - f a c t o r B e r e k e n v o o r a l l e k a n a l e n g e m i d d e l d e en s t a n d a a r d -a f w i j k i n g v -a n n u l - en i j k w -a -a r d e . B e r e k e n i j k f a c t o r e n en d r u k a l l e u i t k o m s t e n a f . n a a r l a b e l 02 nee < V o l d o en de r e s u l t a t e n ? Z e t de i j k f a c t o r e n op s c h i j f n a a r l a b e l (^^02^

(15)

DE U I T L E Z I N G VAN DE I'IETINGEN. O^zet^. I e d e r e k e e r , a l s h e t r e f e r e n t i e - k a n a a l e e n p u l s a f g e e f t m o e t e n de 12 m e e t k a n a l e n u i t g e l e z e n w o r d e n . D a a r b i j moet a ) h e t progranuna o n g e v o e l i g z i j n v o o r s t o o r s i g n a l e n en b) de u i t l e z i n g a f g e b r o k e n w o r d e n a l s e r g e e n p u l s e n meer komen.

Het programma moet o n d e r s c h e i d maken t u s s e n de l a a t s t e p u l s en d a a r n a komende s c h a k e l p u l s e n .

P r i n c i g e _ ^

Om a a n de bovengenoemde e i s e n zo goed m o g e l i j k t e v o l d o e n i s e e n l o g i s c h s c h a k e l i n g o p g e z e t d i e i n g e s t e l d k a n w o r d e n op h e t t i j d s v e r l o o p t u s s e n de p u l s e n . De

s c h a k e l i n g maakt z i c h z e l f " b l i n d " g e d u r e n d e 96% v a n d i e t i j d en " k i j k t " d a a r n a nog m a x i m a a l 8%. I s e r dan n i e t w e e r e e n p u l s " g e z i e n " , dan w o r d t de b e r e k e n i n g beëindigd. Was e r w e l e e n p u l s dan b e g i n t e r met een u i t l e z i n g een v o l g e n d e p e r i o d e .

De b a n d s n e l h e i d beïnvloedt de t i j d s d u u r t u s s e n de p u l s e n . B i j w a r e s n e l h e i d i s de d u u r 1 s e c o n d e , b i j 2 x v e r s n e l d a f s p e l e n 0,5 s e c o n d e , e n z . Om 96 en 8% v a n d e z e t i j d t e m e t e n k u n n e n i n s t e l b a r e t e l l e r s g e b r u i k t w o r d e n en p u l s e n v a n v e r s c h i l l e n d e d u u r . A l s een t e l l e r een v a n t e v o r e n i n g e s t e l d a a n t a l p u l s e n (de p r e c o u n t , PRC) h e e f t o n t v a n g e n , d a n g e e f t h i j een l o g i s c h s i g n a a l a f , waarmee een v e r d e r e s c h a k e l i n g g e s t u u r d k a n w o r d e n . V o l g e n s o n d e r s t a a n d e t a b e l i s d i t g e r e a l i s e e r d : s n e l h e i d 9 6 % - t e l l e r duur 8 % - t e l l e r d u u r p u l s d u i

PRC msec PRC msec msec

X 1 96 960 8 80 10

X 2 60 480 5 40 8

X 4 60 240 5 20 4

X 8 60 120 5 10 2

HET LOGISCHE PROGPxAIlMA, ( Z i e f i g u u r 3 ) , De p u l s e n w e r d e n gemaakt i n p u l s v o r m e r I m,b,v, d e l e r s r o n d f l i p - f l o p s ( F F ) , Ze z i j n opgebouwd v o l g e n s een s t a n d a a r d - s c h e m a . Z i e v o o r v e r d e r e u i t l e g de b e s c h r i j v i n g v a n de l o g i c a v a n de AD4. Met e e n " 1 " op C L R l 5 k a n de p u l s v o r m e r g e b l o k k e e r d w o r d e n . De e i g e n l i j k e t e l l e r s c h a k e l i n g i s opgebouwd r o n d c o m p a r a t o r 010, t e l l e r 070 ( 9 6 % ) en t e l l e r 170 ( 8 % ) . Het r e f e r e n t i e - k a n a a l i s a a n g e s l o t e n op de c o m p a r a t o r . De gang v a n z a k e n i s a l s v o l g t :

Het d i g i t a l e programma z e t een " 1 " op C L R l 6 , waarmee de b a n d r e c o r d e r s t a r t , en op C L R l 5 , waarmee v i a p o o r t 013 e v e n t u e l e p u l s e n u i t de i n v e r s e u i t g a n g v a n de c o m p a r a t o r w o r d e n t e g e n g e h o u d e n en FF020 n i e t k a n opkomen. F F 000 k r i j g t e e n "O" a a n g e b o d e n op de E - b u s en i s dus ook i n a c t i e f .

S i g n a l e n u i t de c o m p a r a t o r k u n n e n d a a r d o o r g e e n i n v l o e d u i t o e f e n e n op de v e r d e r e s c h a k e l i n g .

(16)

Wa e e n w a c h t t i j d v a n i w t s e c o n d e n z e t h e t d i g i t a l e programma e e n "O" op C L R l 5 . De e e r s t e p u l s d i e nu komt z a l F F 020 z e t t e n . Z o a l s u i t de v e r d e r e b e s c h r i j v i n g b l i j k t z a l i e d e r e v o l g e n d e p u l s e e n u i t l e z i n g v e r o o r z a k e n : E e n p u l s u i t de c o m p a r a t o r z e t F F 000. l i e t s i g n a a l u i t de F F z a l m.b.v. F F 001 en p o o r t 012 e e n p u l s g e n e r e r e n . Met d e z e p u l s worden 2 v e r d e r e F F ' s g e z e t . A) T e n e e r s t e v;ordt F F 141 g e z e t . Door de " 1 " op S L R l (DCS 1 7 ) k r i j g t h e t d i g i t a l e prograimna h e t coirauando: u i t l e z e n . A l s de u i t l e z i n g k l a a r i s , w o r d t met e e n p u l s op CLRl (DGC17) F F 141 weer g e c l e a r e d . M a r k e r B (MKB-Rl) op de u i t g a n g v a n F F 141 v o l g t h e t d i g i t a l e programma, u i t l e z e n , w a c h t e n , u i t l e z e n e n z , e n maakt v i s u e l e c o n t r o l e m o g e l i j k . B i j de e e r s t e o n t v a n g e n p u l s w o r d t met de " 1 " u i t F F 141 de F F 143 g e z e t , d i e üa de a a n s l u i t b u s RUNRI de B r u s h - r e c o r d e r s t a r t , B) T e n tweede w o r d t ook F F 140 g e z e t . D a a r d o o r komt e r e e n " 1 " op de c a r r y - i n

( C l ) v a n t e l l e r 170, De t e l l e r z a l de P - p u l s e n , d i e op de e n a b l i n g - b u s ( E ) s t a a n , w i l l e n g a a n t e l l e n , maar w o r d t s t e e d s g e c l e a r e d door de " 1 " u i t de o u t v a n F F 000, z o d a t d i t t e l l e n v e r h i n d e r d w o r d t . I n t u s s s e n s t a a t h e t z e l f d e s i g n a a l ook op de C l v a n t e l l e r 0 7 0 , d i e op d e z e l f d e m a n i e r P - p u l s e n t e l t , e c h t e r z o n d e r d a a r b i j s t e e d s g e c l e a r e d t e worden. A l s de p r e c o u n t b e r e i k t i s , w o r d t de P R C - u i t g a n g " 1 " . H e t r e s u l t a a t i s h e t v o l g e n d e : a ) F F 000 w o r d t g e c l e a r e d b ) T e l l e r 070 w o r d t g e c l e a r e d c ) F F 001 w o r d t g e c l e a r e d , maar p o o r t 012 g e e f t g e e n s i g n a a l a f . d) F F 140 b l i j f t "op" s t a a n e ) T e l l e r 170 o n t v a n g t geen c l e a r - s i g n a a l meer en g a a t P - p u l s e n op de e n a b l i n g t e l l e n . Nu z i j n e r twee m o g e l i j k h e d e n : a ) C o m p a r a t o r 010 g e e f t e e n p u l s a f , v o o r d a t t e l l e r 170 v o l i s , I n d i t g e v a l komt F F 000 op en w o r d t t e l l e r 170 g e c l e a r e d . De p u l s v e r o o r z a a k t e e n u i t l e z i n g ( f f 141, SLR 1) en s t a r t e e n n i e u w e c y c l u s . b ) C o m p a r a t o r 010 g e e f t g e e n p u l s a f . T e l l e r 170 l o o p t v o l en de PRC komt op. V i a de bus MICB R2 w o r d t de t a p e - r e c o r d e r g e s t o p t , F F 160 w o r d t g e z e t en F F 143 g e c l e a r e d , w a a r d o o r o v e r de a a n s l u i t b u s RUN R l de B r u s h - r e c o r d e r w o r d t g e s t o p t , F F 160 z e t e e n " 1 " op SLR 2(DGS 1 6 ) , w a t door h e t d i g i t a l e programma w o r d t v e r w e r k t a l s : " E i n d e v a n de r u n " . Kortom: de b a n d u i t l e z i n g w o r d t beëindigd. SA14ENVATTING. A l s de b a n d r e c o r d e r i s g e s t a r t en de b l o k k e r i n g e n v a n de l o g i c a z i j n o p g e h e v e n , dan h e b b e n s y n c h r o n i f s a t i e - p u l s e n u i t l e z i n g e n t o t g e v o l g . D a a r v o o r w o r d t i e d e r e p u l s v i a e e n l o g i s c h e s c h a k e l i n g d o o r g e g e v e n a a n h e t d i g i t a l e programma. I n de s c h a k e l i n g z i t t e n t e l l e r s , d i e e r v o o r z o r g e n , d a t : a ) E e n p u l s , d i e t e v r o e g komt g e e n e f f e c t h e e f t ( T e l l e r 070 i s nog n i e t v o l , F F 020 s t a a t nog op en k a n door e e n n i e u w e p u l s n i e t nog e e n s g e z e t w o r d e n ) ,

b ) E e n p u l s , d i e op h e t j u i s t e moment komt, z a l c o r r e c t w o r d e n b e h a n d e l d ,

c ) E e n p u l s , d i e u i t b l i j f t , z a l t o t g e v o l g hebben, d a t de b e i d e t e l l e r s v o l l o p e n en de u i t l e z i n g v a n de band beëindigd w o r d t .

(17)

DE U I T L E Z I N G E N D I G I T A A L .

Na h e t s t a r t e n v a n de band komt h e t programma i n een l u s , w a a r i n S L R l en 2 en d a t a s w i t c h 4 b e u r t om b e u r t worden u i t g e l e z e n , ( z i e ook h e t s t r o o m s c h e m a ) . A l s S L R l opkomt,

dan b e t e k e n t d i t , d a t de A D C - l i j n e n u i t g e l e z e n m o e t e n worden. De b e i d e a n d e r e doen a l l e e n d i e n s t b i j h e t beëindigen v a n de u i t l e z i n g e n :

a ) A l s SLR2 opkomt, dan i s de band a l door de l o g i c a g e s t o p t .

b) Door d a t a s w i t c h 4 omhoog t e z e t t e n w o r d t b e r e i k t , d a t h e t d i g i t a l e programma de band en de u i t l e z i n g e n s t o p t . Omdat i n de v e r d e r e programma's m e e r d e r e m a l e n g e m i d d e l d e w a a r d e n n o d i g z i j n , i s d i t h i e r v o o r b e r e i d door h e t sommeren v a n de s a m p l e s . T e n s l o t t e z a l h e t programma de g e h e l e d a t a s e t t e r c o n t r o l e a f d r u k k e n . A f b r e k e n h i e r v a n i s m o g e l i j k door d a t a s w i t c h 5 omhoog t e z e t t e n .

DE ORGANISATIE VAN DE DATASET.

De d a t a s e t i s opgebouwd u i t r e c o r d s . I n i e d e r e r e c o r d i s s e q u e n t i e e l p l a a t s v o o r 12 i n t e g e r of 6 r e a l g e t a l l e n . I n t e g e r s ( i ) en r e a l s ( r ) k u n n e n d o o r e l k a a r g e p l a a t s t worden. De o r g a n i s a t i e v a n de r e c o r d s i s a l s v o l g t : R e c o r d 1 naam s o o r t o m s c h r i j v i n g i b a n d i C o d e r i n g v a n de band-naam, 1 = band A e n z . i r u n i Runnummers n • 1 Het a a n t a l u i t l e z i n g e n = h e t a a n t a l v e r w e r k t e s y n c , p u l s e n akk i G e b r u i k t e c o r r e c t i e f a k t o r , h i e r s t e e d s 2/2.07 = 0,96618 . i d a g i Datum, b e s t a a n d e u i t dag imnd i maand i j r i e n j a a r t a l , v e r m i n d e r d met 1900, dus a l l e e n de l a a t s t e 2 c i j f e r s i u u r i T i j d v a n de dag, b e s t a a n d e u i t u r e n i m i n i en m i n u t e n . i b p i i Code v o o r de b a n d s n e l h e i d i 1 =1 7/8 b p i , 2 = 3 3/4 b p i , 3 = 7 1/2 b p i i v o p n i Code v o o r ' t op k a n a a l 12 a a n g e s l o t e n opneemelement 0 = r e k s t r o o k j e , 1= v e r s n e l l i n g s o p n e m e r r e c o r d 2 i de 12 namen v a n de k a n a l e n , h i e r s t e e d s 1-12 r e c o r d 3 r de r e a l i j k f a k t o r e n v o o r k a n a a l 1-6 r e c o r d 4 r de r e a l i j k f a k t o r e n v o o r k a n a a l 7-12 r e c o r d 5 r de r e a l sommen v a n de s a m p l e s v a n k a n a a l 1-6 r e c o r d 6 r de r e a l sommen v a n de s a m p l e s v a n k a n a a l 7-12 r e c o r d 7 e.v. i op i e d e r r e c o r d 1 s c a n v a n 12 s a m p l e s .

(18)

naar l a b e l ( 02

l a b e K 07

nee

I s d a t a s w i t c h 8 omhoog? S t a r t de t a p e - r e c o r d e r , w a c h t i w t s e c o n d e n . C l e a r h e t SLF. l a b e l ^ 08 4--<:^s SLR 02 o p g e k o m e n ? ^ nee ^ cyis SLR 01 opgekomen? L e e s de 12 A D C - l i j n e n , s c h r i j f de u i t l e z i n g e n weg n a a r s c h i j f . Sommeer de u i t l e z i n g e n p e r k a n a a l . Geef e e n p u l s op C L R l (DCC 17) e n c l e a r h e t SLR l a b e l 10 I s d a t a s w i t c h 4 omhoog? nee

j a

l a b e l ( 2 3 ^ Stop de b a n d r e c o r d e r e n b l o k k e e r de l o g i c a L e e s de d a t a s e t u i t , d r u k a f op de r e g e l d r u k k e r T e s t s t e e d s d a t a s w i t c h 5 n a a r l a b e l 02

(19)

HET DERDE EN HET V I E R D E PROGRAMMA, XT 023 EN YT 0 2 3 .

De b e r e k e n i n g e n worden op de h y b r i e d e i n s t a l l a t i e a f g e s l o t e n raet de d i g i t a l e programma's XT 023 e n YT 0 2 3 .

D e z e programma's v e r z o r g e n de p o n s k a a r t u i t v o e r , waarmee op de IBM 3 7 0 / 1 5 8 v e r d e r g e r e k e n d k a n w o r d e n . XT 023 w o r d t g e b r u i k t v o o r de n o r m a a l v e r d e l i n g e n de c o r r e l a t i e - f u n c t i e , YT 023 b e r e k e n t t o p p e n e n d a l e n . De b e s t u r i n g m.b.v. d a t a - s w i t c h e s b l i j k t u i t de s t r o o m s c h e m a ' s . S t a a t d a t a s w i t c h 2 omhoog? nee S t a a t d a t a s w i t c h O omhoog? nee nee l a b e l l 04 S t a a t d a t a s w i t c h 8 omhoog? B e r e k e n u i t e r s t e w a a r d e n e n c o r r e l a t i e - f u n c t i e 5ereken u i t e r s t e w a a r d e n l a b e l ^^^T^ B e r e k e n k l a s s e - i n d e l i n g e n h i s t o g r a m -L^^—«C^Staat d a t a s w i t c h 5 omhoog? nee ^ ^ j < ^ t a a t d a t a s w i t c h 9 o m h o o g j ^ j a S t a a t d a t a s w i t c h 1 o f 3 omhoog? J> nee G e e f u i t v o e r op p o n s k a a r t E x i t L i n k n a a r WT023 o f YT 023 G e e f u i t v o e r op de r e g e l d r u k k e r

(20)

YT 023 l a b e l 10 < ; ^ t a a t d a t a s w i t c h 6 o m h o o g ? ^ n e e S t a a t d a t a s w i t c h 3 omhoo nee S t a a t d a t a s w i t c h 0 omhoog? j a E x i t n e e < ^ t a a t d a t a s w i t c h 1 óf 2 omhoog?^^>—^ l a b e l 32 n e e L i n k n a a r WT023 o f XT023 j a S t a a t d a t a s w i t c h 10 omhoog? nee t kanaalnummer 12 j a nee < ^ t a a t d a t a s w i t c h 4 o m h o o g j ^

^ — < s ;

n ë ê j a s k i p d i t k a n a a l t a a t d a t a s w i t c h 6 omh n e e L e e s kanaalnummer i n o o g ? > B e r e k e n u i t e r s t e w a a r d e n < ^ t a a t d a t a s w i t c h 5 omhoog?^ — nee L a b e l ^ 4 < ü t a a t d a t a s w i t c h 9 omh ö o g ? ^ nee G e e f p o n s k a a r t u i t v o e r G e e f u i t v o e r op de r e g e l d r u k k e r

(21)

DANKBETUIGING.

Op d e z e p l a a t s w i l i k b l i j k g e v e n v a n m i j n d a n k b a a r h e i d j e g e n s de h e e r G. v a n Leeuwen, d i e h e t v o o r l i g g e n d e r a p p o r t h e e f t g e c o r r i g e e r d , v e e l h e e f t b i j g e d r a g e n t o t de o n t w i k k e l i n g v a n de programma's, de v e r w e r k i n g v a n de " A t t i s " - b a n d e n en met e n i g e r a a d g e v i n g b e h u l p z a a m i s g e w e e s t .

Ook w i l i k op d e z e p l a a t s m i j n dank b r e n g e n a a n de l e d e n v a n de H y b r i e d e Reken-a f d e l i n g v Reken-a n h e t R e k e n c e n t r u m , i n h e t b i j z o n d e r i r . F . J . P Reken-a s v e e r en de h e r e n H. G. H a z e w i n k e l en E . J . D a r r i c a r r e r e v o o r hun a s s i s t e n t i e .

V e r d e r w i l i k h i e r mevr, Y,B, Wubben-de J o n g en de h e e r F , V e r l a a n h a r t e l i j k danken v o o r hun t y p e - en i n b i n d w e r k z a a m h e d e n , w a a r d o o r d i t r a p p o r t i n d e z e v e r z o r g d e vorm kon v e r s c h i j n e n .

(22)

APPENDIX

/ / F O R V T 0 2 3 ^ n O C S l C A R O ) * I O C S ( T Y P E W R I T E R ) * I O C S ( K E Y B O A R D ) * I Q C S ( 1 4 4 3 P R I N T E R ) * I 0 C S ( D I S 1 < ) i\' 0 N P R 0 C rl S S P K 0 R A M • O N E WORD I N T E G E R S * L I S T A L U D I M E N S I O N Y K I I Z ) COMMON I B A N D , I R U N , I D A G r I M N O , I J R , I U U R , I M I N , I 3 P I , I V Ü P N , M P L ( 1 2 ) , I C A D E F I N E F I L E 1 0 ( 3 C 0 O , 1 2 , U , I K . K E ) C A L L M Y T S K C O J C A L L I N l T A l I E , ; j ) C A L L T S C A H ( 1 ) W R I T E ( 1 , 1 ) 0 1 F G R M A T C P R Q G k V T C 2 3 f / / « C O D E R I N G D A T A S W . » / / » 9 D U M M Y - Y K N A A R S I C H I J F V 1 0 Y K I N L E Z E N ' / / ' Z E T D A T A S W , ' / / ) P A U S E G A L L D A T S W ( 9 , I Y K ) C A L L D A T S W ( I C I L E E S ) I F ( l Y K - I ) i 3 , i 5 , 1 5 0 5 DO 1 0 K = l v l 2 1 0 Y K ( K ) = 0 , 0 7 5 W R I T E ( 1 0 ' 3 ) ( Y K ( K ) , K = l , ó ) W R I T E ( 1 0 » 4 ) { Y ^ ^ ( f C ) , K ^ 7 ? 1 2 ) 1 5 I F ( I L E E S - 1 ) 1 6 , 1 6 , 2 1 1 6 D O 1 9 K = l , 1 2 W R I T E ( 1 , 1 7 ) K 1 7 F O R M A T ( » X , X X X X X X K A N S 1 3 ) R c A 0 ( 6 , l & ) Y ' K K 1 8 F O R M A T ( F 8 o ö ) 1 9 Y 1 < ( K ) = Y K K W R I T E ( 1 0 ' 3 ) (Y'M'i) , K = I , 6 ) W R I T E ( 1 0 » ^ i ) ( Y K ( i s ) , K = : 7 , 1 2 ) 2 1 I E = 1 DO 2 0 K = 1 G 2 4 , , 1 2 7 9 C A L L S E T I A ( K ) C A L L W A I T ( l ) I F ( I S T A T d E , 1 ) ) 2 0 , 2 2 , 2 0 2 2 C A L L S T I N H ( K , 1 ) 2 0 C O N T I N U E W R I T E d , 3 0 ) 3 0 F O R M A K ' L E E S W A A R D c V A N D E C O Ë F F I C I Ë N T E N I N ( I 5 ) » ) C A L L W I O B Y R E A D ( 6 , 4 0 ) I C U 4 0 F O R M A T ( 1 5 ) I F ( I C O ) 6 0 , 6 0 , 5 0 5 0 ICA----^ICO 6 0 C A L L S T I N O ( I E , 2 0 0 2 , I C A ) C A L L S T I N D ( I E , 2 0 0 3 , I C A )

(23)

C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N O C A L L S T I N D C A L L S T I N O C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N O C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N O C A L L S T I N O C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D C A L L S T I N D I E , 2 0 0 4 , I C A . ) I b , 2 0 C 5 , I C A ) I E , 2 0 G 6 , I C A ) I E , 2 0 0 7 , I C A ) I E , 2 0 1 2 , I C A ) I t , 2 0 1 3 , I C A ) I E , 2 0 1 4 , I C A ) I E , 2 0 1 5 , I C A ) I E , 2 0 1 6 , I C A ) I E , 2 0 1 7 , I C A ) I £ , 2 0 2 2 , I C A ) I E , 2 0 2 3 , I C A ) I E , 2 0 2 4 , I C A ) I E , 2 0 2 5 , I C A ) I E , 2 0 3 4 , I C A ) I E , 2 0 3 5 , I C A ) I E , 2 0 3 5 , I C A ) I E , 2 0 3 7 , I C A ) I £ , 2 0 4 2 , I C A ) I E , 2 0 4 3 , I C A ) I E , 2 0 4 4 , I C A ) I E , 2 0 4 5 , I C A ) I E , 2 0 4 6 , I C A ) I E , 2 0 4 7 , I C A ) I t , 2 0 5 2 , I C A ) I E , 2 0 5 3 , I C A ) I E , 2 0 5 4 , I C A ) I E , 2 0 5 5 , I C A ) I E , 2 0 5 6 , I C A ) I E , 2 0 5 7 , I C A ) I E , 2 1 0 4 , I C A ) I E , 2 1 0 5 , I C A > I E , 2 1 0 6 , I C A ) I E , 2 1 0 7 , I C A ) I E , 2 1 1 4 , I C A ) I £ , 2 1 1 5 , I C A ) I E , 2 1 1 6 , I C A ) I E , 2 1 1 7 , I C A ) I E , 2 1 2 4 , I C A ) I E , 2 1 2 5 , I C A ) I E , 2 1 2 6 , I C A ) I E , 2 1 2 7 , I C A ) I E , 2 1 3 4 , I C A ) I E , 2 1 3 5 , I C A ) I E , 2 1 3 6 , I C A ) I £ , 2 1 3 7 , I C A ) C A L L L I N I < ( v / T 0 2 3 ) E N D = D E L E T V T 0 2 3 ' S T O R E C I 1 V T 0 2 3 V T 0 2 3 ' C C E N O ' / P A U S

(24)

(

// f3R W T 0 2 3 * I O C S { C A R D ) ^ < i a C S ( T Y P E ' W R I T E R ) - + 1 0 C S ( K E Y B O A R D ) * 1 0 C S { 1 4 - 4 3 P R I N T E R ) ' i ' l O C S C O I S l O • ^ ' O N P R O C E S S P R O G R A M • O N E WORD I N T E G E R S * L I S T A L L D I M E N S I O N J A { 1 2 ) , T A A ( 5 0 ) D I M E N S I O N I A ( 1 2 , E ^ ' 5 ) , I ö ( 1 2 , 2 5 ) , A M U ( 1 2 ) , B M U ( 1 2 ) , 1 A D ( 1 3 ) D I M E N S I O N S I G m ( 1 2 ) , S I G M B ( 1 2 ) D I M E N S I O N Y ; < ( 1 2 ) , S O M ( 1 2 ) , A B C ( 1 2 ) C O M M O N I B A N D , I R U N , I D A G , I M N D , I J R , I U U R , I M I N , I BP I , I V O P N , M P L ( 1 2 ) , I C A D E F I N E F I L E 1 0 { 3 O O ö ,1 2, U , I K K E ) DO 1 0 1 1 = 1 , 1 2 1 0 1 A b C d ) - - - ! , 0 J S T A P = 2 5 0 J A D ^ ' - I D E O C ( 6 0 2 0 ) I A D { 1 ) = I D E O C ( 6 0 2 0 ) I A D ( 2 ) = I 0 E 0 C ( 6 0 2 1 ) I a O ( 3 ) = I O E Q C ( 6 G 2 2 ) I A D ( 4 ) = I D E 0 C ( 6 0 2 3 ) I A D ( 5 ) ^ I D E O C ( 6 0 6 0 ) I A 0 ( 6 ) = I D E 0 G ( 6 0 6 1 ) I A D ( 7 ) = I D E 0 C ( 6 0 6 2 ) I A D ( 3 ) = 1 D E 0 C ( 6 0 6 3 ) I A D { 9 ) = I D E 0 C ( 6 1 2 0 ) I A D ( 1 0 ) = ^ I D E O C ( 6 1 2 1 ) I A O ( 1 1 ) - - I D E O C ( 6 1 2 2 ) I A D ( 1 2 ) ^ ^ 1 D E O C ( 6 1 2 3 ) I A D ( 1 3 ) = I D E 0 C ( 6 1 6 0 ) I E = : 0 C A L L S T I N D ( I E , 2 2 0 4 , 5 0 0 0 ) C A L L S T i N D d E , 2 2 3 2 , 2 0 0 0 ) I W T = 2 A i < K = 2 . 0 / 2 . 0 7 C I F u R M A T ( » ' / / • P R O G R W T 0 2 3 » / / » C O D E R I N G D A T A S W » / / » O C A L L E X I T ' / 1 » 1 L I N K N A A R V T 0 2 3 » / » 2 L I N K N A A R X T 0 2 3 » / » 3 L I N K N A A R f 2 T 0 2 3 » / » 4 S T O P H Y B R . R E K E N E N » / » 5 S T O P D I G I T , R E K E N E N » / » 6 3 P U L S E N Z E T T E N * / » 7 I J K U I T L E Z E N » / • 8 T A P E U I T L E Z E N » ) w a i T E d , l ) W R I T E ( 1 , 1 0 1 ) 1 0 1 F O R M A T ( » 9 L E E S S T A P S P . T . f l o V » I J K E N » / » C O R R I G E E R I J K V Q O R 1 F A C T O R V A N F I L T E R K A S T V » 1 0 D A r A ( K R T ) I N L E Z E N » / / ' VOOR H E T W I J Z 2 I G E N V A N I,-)T D A T A S W 4 -i- 7 -:• 1 0 O M H O O G » / / / ) C S T O P R E C O R D E R S D M V D G C 1 4 0 2 DG 3 1 1 = 1 , 1 2 A M U d ) = 0 B M U ( I > = 0 Y K { ï > = 0 S I G M A ( l ) = 0 S I G M B d ) - 0

(25)

D ü 3 1 J = l r 2 5 l A ( I , J ) -- O 3 1 1 3 ( 1 , J ) ^ 0 C A L L R U N H C A L L S E T W D ( 0 , 8 ) C A L L S E T W Ü ( 0 , 4 ) C A L L O P H W R I T C - ( 1 , 3 ) 0 3 F O R M A K » C G f J T R O L E F R T A P E C A L L L A M P S ( O ) C A L L O P H C A L L H O F F ( 0 , 0 ) P A U S E 9 9 9 9 C A L L D A T S W ( 9 , I S T A P ) I F ( I S T A P ~ 1 ) 6 0 0 , 6 0 0 , 6 0 3 6 0 0 W R I T E d , 6 0 1 ) C A L L W I O S Y R E A D ( 6 , 6 02 ) J S T A P 6 0 1 F O R M A T ( « L E E S S T A P S P A N N I N G 6 0 2 F O R M A T ( 1 5 ) 6 0 3 C A L L L O A D H C A L L I C H C A L L H O F F ( 0 , 0 ) C A L L D A T S K M O , l E X I T ) I F ( I E X I T - 1 ) 1 6 , 1 6 , 2 1 2 1 C A L L D A T S W ( 1 , I V T 2 3 ) C A L L D A r S W ( 2 , I X T 2 3 ) C A L L D A T S W ( 3 , 1 Y T 2 3 ) I F d V T 2 3 ~ l ) 1 1 2 , 1 1 2 , 1 1 4 1 1 2 C A L L L I N K { V T 0 2 3 ) 1 1 4 I F d X T 2 3 ~ l ) 1 1 6 , 1 1 6 , 1 1 3 1 1 6 C A L L L I N K( XT O 2 3 ) 1 1 8 I F d Y T 2 3 - l ) 1 2 0 , 1 2 0 , 1 2 1 1 2 0 C A L L L I N K { Y T 0 2 3 ) 1 2 1 C A L L O P H C A L L O A T S W ( 6 , I P U L S ) I F d P U L S - 1 ) 2 0 , 2 0 , 5 0 2 0 C A L L L A M P S ( 1 ) C A L L S E T W D ( 0 , 4 ) C A L L R U N H W R I T E ( 1 , 2 2 ) 2 2 F O R M A T ( » Z E T P U L S E N » ) P A U S E 4 C A L L S E T W O ( 0 , 0 ) G O T O 2 R E C O R D E R E H Z E T D A T A S W » ) T . B . V . I J K E N ( 1 5 ) • ) N A A R E X I T L I N K S N A A R A N D E R E P R O G R A M M A » P U L S E N Z E T T E N , L A M P S " 1

(26)

5 0 C A L L D A T S V H 7 , U K ) I F ( I J K 1 ) 5 1 , 5 1 , 4 -V b R W E R K i N G I J K S I G N A L E N G C c S T A R T T A P E R E C iM3V DGC 1 6 3 L G K K E E R L O G I C A V A N H O O F D P R O G R A M M A S T A R T L O G I C A T B V C H O P P E N S R U S H R E C 5 1 1 5 1 4 5 1 3 5 1 2 5 1 4 2 5 1 0 4 8 5 5 5 6 5 4 5 8 1 5 7 C A L L L A M P S ( 2 ) C A L L D A T S W ( 1 0 , I L E E S ) I F I I L E E S - 1 ) 1 5 1 , 1 5 1 , 2 5 1 W R I T E { 1 , 4 5 1 ) C A L L W I O B Y R E A D ( 6 , 3 5 1 ) I W T F O R M A K ' L E E S I N : I W T ( 1 3 ) n F Q R M A K 1 3 ) C A L L D A T S W ( 4 , I H G ) I F ( I - I H O ) 2 5 1 , 0 2 , 2 5 1 C A L L S E T W D { 0 , 6 ) C A L L R U N H C A L L O P H W R I T E ( 3 , 4 2 ) F O R M A T C l • ) C A L L W A I T ( 3 0 0 0 0 ) C A L L W A I T ( 3 0 0 0 0 ) C A L L W A I T ( 3 0 0 0 0 ) C A L L S E T W D ( 0 , 4 ) K A N = 0 I H = 0 K A N = K A N - J - 1 I K A N = 2 + * ( K A N - 1 ) C A L L L A M P S ( I K A N ) K--^l K A N A = : I A D ( K A N ) K A N B = I A D ( K A N + I ) C A L L S E T W D ( 0 , 2 0 ) C A L L R E A D H ( K A N A , I P P ) C A L L W A I T ( 2 0 0 ) C A L L R E A D H ( K A N A , I P ) C A L L 0 A T S W ( 4 , 1 H 0 ) I F ( I H O - l ) 6 7 , 6 7 , 4 8 I F ( K - 1 ) 5 5 , 5 4 , 5 5 I F ( I A 3 S ( I P - I P P ) - J S T A P ) 5 6 , 5 6 , 5 3 I A A ( K ~ 1 ) ^ I V R I V R ^ I P K^=K + 1 I F ( K ~ 5 2 ) 5 2 , 5 7 , 5 7 I H = 1 K-^2 GO T O 5 2 0 0 1 5 2 K K = 1 , 2 5 K - - ^ K H I F ( K - 5 2 ) 1 5 2 , 1 5 7 , 1 5 7 K-=2

(27)

1 5 2 I A ( K A M , i < K ) = I A A ( l < - l ) C A L L S E T W D ( 0 , 4 ) I F " ( I H ) 6 1 , 5 9 , 6 1 5 9 W R I T E d , 6 0 ) K A M W R I T E ( 3 , 6 0 ) K A N 6 0 F O R M A T d T E W E I N I G N U L W A A R D E N V O O R K A N A A L « , 1 3 ) I J K U I T L E Z E N 6 1 K = l I K A N = I K A N + 4 0 9 6 C A L L L A H P S ( I K A N ) DO 1 6 1 1 = 1 , I W T 1 6 1 C A L L W A I T ( 7 5 0 0 ) C A L L S E T W D { 0 , 2 0 ) 6 2 C A L L WA I T ( 2 0 0 ) C A L L R E A D H ( K A N A , I P ) C A L L D A T S H ( 4 , 1 H 0 ) l F d H O - 1 ) 6 7 , 6 7 , 4 7 4 7 I B ( K A N , K ) = I P I F { K A N - 1 2 ) 6 3 , 6 4 , 6 4 6 3 G A L L R E A D H ( K A N B , I P ) I A ( K A N + 1 , K I W I S ' 6 4 I F ( K - 2 5 ) 6 5 , 6 6 , 6 6 6 5 K ^ K + l GO 7 0 6 2 6 6 C A L L S E T W 0 ( 0 , 4 ) C A L L W A I T ( 2 0 0 0 ) I F ( K A N ~ 1 2 ) 5 1 0 , 6 7 , 5 1 0 6 7 C A L L S E T W D ( 0 , 1 2 ) G A L L S E T W O ( 0 , 4 ) G A L L L A M P S ( 9 9 9 9 ) S T O P T A P E R E C O R D E R DMV D G C 1 4 B E R E K E N I N G E N S O M M E N E N U . W , I F ( I H O - l ) 2 , 2 , 1 0 4 1 0 4 W R I T E ( 3 , 5 0 0 0 ) l A W R I T E ( 3 , 5 C 0 0 ) 1 8 .000 F O R M A T ( » « , 1 2 1 1 0 ) D O 7 6 K A N = 1 , 1 2 C A L L D A T S W ( 5 , J H 0 ) I F ( J H O - 1 ) 2 , 2 , 7 7 7 7 S A I = 0 S A 2 = 0 S B l - - = 0 S B 2 ^ 0 G A L L D A T S W ( 9 , J I N L ) I F - ( J I N L - I ) 7 7 1 , 7 7 1 , 7 7 3 7 7 1 DO 7 7 2 J ~ l , 2 5 I A ( K A N , J ) = 1 A ( K A N , J ) • A 3 C { K A N ) 7 7 2 I 6 ( K A N , J ) = 1 B ( 'KAN , J ) * A B G ( K A N ) 7 7 3 DO 7 5 1 ^ 1 , 2 5

(28)

D = I A ( K A N , I ) S A 1 = S A 1 + D D ^ I S ( K A N , I ) 7 5 S ! n = S B l + D Y K ( K A N ) = 1 Q 0 0 .0 / (S a i - S A 1 ) * 2 5 . 0 S A 1 = S A L * . C 4 A M U { K A N ) = S A 1 S 3 1 ^ 5 3 1 * . 0 4 B M U ( K A N ) = S 3 l DO 4 5 1 = 1 , 2 5 D = I A ( K A N , 1 ) - - S A 1 4 5 S A 2 = S A 2 + 0 * D D = S A 2 / 2 4 I F ( D ) 0 5 , 0 6 , 3 7 8 5 W R I T £ ( 3 , 8 8 ) KA.M 8 3 F O R M A T ( » V A R I A N T I E N U L W A A R O F N E G A T I E F V Q O R K A N A A L ' , 1 3 , ' S I G M A N U L 1 G E M A A K T ' ) GO TO 8 9 8 6 W R I T E ( 3 , 9 0 ) K A N 9 0 F O R M A K ' V A R I A N T I E N U L W A A R D E N U L V O O R K A N A A L ' , 1 3 , • S I G M A N U L G E M A A I K T ' ) 8 9 S I G M A ( K A N ) = 0 GO TO 9 2 G 7 S I G M A ( K A N ) = S Q R T { D ) 9 2 DO 4 4 1 = 1 , 2 5 0 = I B ( K A N , I ) - S B 1 4 4 S B 2 = S B 2 + D * 0 D = S B 2 / 2 4 I F ( D ) 9 3 , 9 4 , 76 9 3 W R I T E ( 3 , 9 ö ) K A N 9 6 F O R M A K » V A R I A N T I E I J K W A A R D E N E G A T I E F V G O R K A N A A L ' , 1 3 , * S I G M A N U L I G E M A A K T » ) GO TO 9 7 9 4 W R I T E ( 3 , 9 8 ) K A N 9 5 F O R M A K ' V A R I A N T I E I J K W A A R D E N U L V O O R K A N A A L ' , 1 3 , » S I G M A N U L G E M A A 1 K Ï » ) 9 7 S I G M 8 ( K A N ) = 0 GO

TO

7 6 7 6 S I G M 8 ( K A N ) = S Q R K D ) W R I T e ( 3 , 8 3 ) 8 3 F O R M A K » 1 K A N A A L N U L W A A R D E I J K W A A R D E I J K F A C T O R N U L S P R Ë I D I N G I J K 5 P R E I I O I N G ' ) DO 5 0 0 K A N = 1 , 1 2 G A L L D A T S W ( 5 , J H O ) I F ( J M O - l ) 2, 2, 4 9 4 9 Y K ( K A N ) = A K K * Y K ( K A M ) 5 0 0 W R I T E ( 3 , 8 4 ) K A N , A H U ( K A N ) , 3 M U ( K A N ) , Y K ( K A N ) , S I G M A ( K A N ) , S I G M 3 ( K A N ) 8 4 F O R M A K • ' , I 6 , 2 F 1 0 . 3 , F 1 0 . 6 , 2 F 1 3 . 3 ) W R I T E ( 3 , 1 8 4 ) I W T 1 Ö 4 F O R M A K « 0 W A G H T T I J D ' , 1 2 , ' E E N H E D E N ' ) W R I T E ( 1 , 1 5 5 ) 1 8 5 F O R M A K ' W E G S C H R I J V E N V A N U K N A A R S C H I J F , J A = 1 , N E E - O ' ) C A L L W I O B Y

(29)

R E A D ( 6 , 1 8 6 ) J A N E Ë 1 8 6 F O R M A T C l l ) I F ( J A N E E ) 2 , 2 , 1 8 7 1 8 7 W R I T E { 1 0 » 3 ) ( Y K ( K ) , K = 1 , 6 ) W R I T E ( 1 0 • -'f) { VK ( K ) , K = 7 , 1 2 ) G O T O 2 C G E T A L V A A R T E N L E Z E N , L A M P S = 4 0 4 G A L L L A M P S ( 2 ) C A L L D A T S W I 1 0 , I L E E S ) I F ( I L E E S - 1 ) 5 , 5 , 7 0 5 C A L L L A M P S ( 4 ) R E A D ! 2 , 6 ) M P L R E A 0 ( 2 , 6 ) I B AN D , I R U N , I D A G , I M N D , I J R , I U U R , I M I N , 1 8 P I , I V 0 P N W R I T E d , 6 ) W R I T E ( 1 , 6 ) M P L W R I T E : 1 , 6 ) 1 3 A N D , I R U N , I D A G , I M N D , I J R , I U U R , I M I N , I B P I , I V u P N W R I T E ( 1 , 6 ) 0 6 F O R M A T ( 1 2 1 3 ) W R I T E d C » 2 ) M P L C A L L W I O B Y G O T O 2 C T A P E U I T L E Z E N , L A M P S = 2 ( O F 4 G E T A L K R T ) 0 7 G A L L D A T S W ( 8 , I S C A N ) I F d S C A N - 1 ) 1 0 0 7 , 1 0 0 7 , 0 2 1 0 0 7 D O 1 0 0 1 = 1 , 1 2 1 0 0 S O M d ) = 0 . 0 I K K E = 7 C S T A R T T A P E R E C M 3 V D G C 1 6 C A L L S E T W D ( 0 , 6 ) C A L L R U N H , C A L L O P H D O 1 0 5 1 = 1 , I W T 1 0 5 C A L L W A I T d O O C O ) C A L L S E T W D ( 0 , 0 ) C A L L S £ N S W ( 0 , M ) 0 0 1 2 1 = 3 , 3 0 0 0 C R E S P D G S 0 2 E N D C S 0 1 0 3 I F d T E S H ( 0 , 2 ) ) 9 , 9 , 1 3 0 9 I F d T £ S H ( 0 , l ) ) 1 0 , 1 0 , 1 1 1 0 C A L L D A T S W { 4 , I H Q ) I F ( I H O - l ) 2 3 , 2 3 , 8 1 1 C A L L S C A N H i J A D , J A , 1 2 ) W R I T E d O » I K K E ) J A O U 1 1 0 J = l , 1 2 1 1 0 S O M { J ) = S O M ( J ) + J A ( J )

(30)

C

S T A R T L O G I C A D M V DGC 1 7 1 2 C A L L S E T W D I O , ! ) C A L L S E T W D ( 0 , 0 ) C A L L S E N S W { 0 , M ) C O M T I N Ü E C S T O P R E C O R D E R S D M V D G C 1 4 2 3 CALL S E T W D ( 0 , e )

CALL W A I T ( I O O O )

CALL S E T W D { 0 , 4 ) C D A T A S E T U I T L E Z E N , L A M P S = 8 1 3 C A L L L A M P S ( 8 ) C A L L H O F F ( 0 , 0 ) N = I K K E - 7 ( W R I T E d O ' 1 ) I B A N D , I R U N , M , A K K , I D A G , I M N D , I J R , l U U R , I M I N , I B P I , I V O P N W R I T E d O ' 3 ) ( S Q M ( I ) , I = 1 , 6 ) W R I T E { 1 0 • 6 ) ( 5 0 M ( I ) , I = 7 , 1 2 ) W R I T E ( 3 , 3 1 0 ) X B A N D , I R U i N , N , A K K , I D A G , I M N D , I J R , I U U R , I M I N , I B P I , I V O P N 3 1 0 F O R M A K » » , 3 I 5 , E 1 0 , 3 , 7 I 5 ) W R r r E ( 3 , 1 4 ) M P L R E A O d O ' B X Y K d ) , 1 = 1 , 6 ) R c A D ( 1 0 9 4 ) ( Y K d ) , 1 = 7 , 1 2 ) W R I T E ( 3 , 3 2 0 ) ( Y K ( I ) , 1 = 1 , 6 ) W R I T E ( 3 , 3 2 0 ) ( YK ( i ) , 1 = 7 , 1 2 ) W R I T E ( 3 , 3 2 0 ) ( S O M { I ) , 1 ^ 1 , 6 ) W R I T E ( 3 , 3 2 0 ) ( S Q M ( I ) , I = 7 , 1 2 ) 3 2 0 F O R M A K » « , 6 E I 2 , 3 ) i K K E = 7 DO 1 5 1 = 1 , N C A L L O A T S W ( 5 , J H O ) I F ( J H Q - 1 ) 2 , 2 , 1 7 1 7 R E A D d O ' I K K E ) J A W R I T E ( 3 , 1 4 ) J A 1 4 F O R M A K » • , 1 2 1 7 } 1 5 C O N T I N U E C I K R T = 1 GO TO 2 1 6 G A L L L A M P S ( O ) C A L L E X I T E N D • D E L E T WTO 2 3 • S T O R E C I 1 W T O 2 3 W T O 2 3 • G C E N O / / P A U S

(31)

/ / P ü R X T 0 2 3 ^ l O G S ( C A K D ) - l ü C S d Y P E W R T ^ ' ^ P ) - l U C S ( K r Y B ü A ' ? n ) ^ ^ l Ü C ^ I 1 4 4 3 PR I H T c - R ) * ! ü C S { D I 5 K ) * W Ü N P R O C r S S " P O G P A M * J ( j E W u k D I N T P G F P ? > ^ L I S T A L L D i M L N j s i n i j ^ ^ G ( i 2 » , j / ( i 2 ) , ( : c r L ( 4 i , 1 2 ) , 1 D A T A { 3 1 , 1 2 ) , T K L ( 1 ? ) , I G P ( 1 2 ) , K L A 5 I 1 0 , 1 2 ) , ^ ? 1 U ( 1 2 ) [• I M ^ N S I O N V K ( 1 ? ) , <^üH( 1 2 ) , G F r N S ( l l , 1 2 ) , ^ K L { 1 2 ) , ^ G » ( 1 2 ) C O M P . J N ! B * N n , ! R U N , I t . 7 G , I H N t ' , I J P , T U U F . , I M I N , I B P I , I V O P N , MP L ( 7 2 ) , I C A F E F I N E F I L ^ 1 0 ( 3 G C C , 1 2 , t ^ , I K K E } W R I T F ( i , 3 ) C c F O R M A T { " ^ F O G P X T n 2 3 V / ' C O C F P I M G P A T / ? . c w V / « C C A L L E X I T ' / ' l 1 L I N K N A A F W " 0 2 3 ' / * 2 V F F H I N D F R A L L E L I N K S ' / ' 3 L I N K N A A R YT 2 0 2 3 ' / ' 5 ^ ^ O P n i G , F E K F N E M ' / ' 8 G F ^ N C O R R . F U N C T T F ' / ' 9 ü 3 I T V U E R 0 ° t ^ O N ' ^ K A ' ^ P T ' / / ) I K K F = 1 F F i D ( l - ^ ' T K K F ) i p A K i c , I R l j ( , , ^ , A K K , I D A G , I M N O , T J R , I U U R , I M I N , I B P I , I V O P N R E A D ( ] ' : ' • ! K K P ) M P L R E A O ( 1 0 ' I K K = ) ( Y K ( I ) , 1 = 1 , 6 ) R E A D ( 1 ' ^ ' T K K F ) (YK( J ) , 1 = 7 , 1 2 } F £ A D ( 1 0 ' I K K - ) ( S O M ( I ) , 1 = 1 , 6 ) F E / 0 ( 1 0 ' I K K T ) ( F C M d ) , ï = 7 , 1 2 ) C P R U G F A M M A B P S T I J R I N G M . P . V . D A T A S W I T C H E S C 6 C A L L L A M P F ( O ) 0 5 F O R M A T { » 7 F T D A T A S W ' ) W R J T F d , 5 ) P A U S E 0 0 1 0 T = I , ! 2 F M U ( I ) = S n M { I ) / N I K L ( I ) = R M U ( I ) L O I G F ( 1 ) = R M U ( I ) D O 1 5 T = i , i 2 C O 1 5 J = l , A i 1 5 C ü F . L ( J , I ) = n « o K = 0 I K K F - 7 C A L L D A T S W ? 0 , T F X I T ) C A L L D A " r ^ W ( 1 , T W " ^ 2 3 ) C A L L D A T S W ( 2 , T X T ? 3 ) C A L L D A ' ^ F W C 3 , W Z ^ ) C A L L D A ^ S W ( 8 , T r n p p ) C A L L D A ^ F ^ ^ ' ( 9 , T R O N S ) I F { I - I X ! 2 3 ) 0 1 , 0 4 , 0 1

Cytaty

Powiązane dokumenty

Autorowi projektu rewaloryzacji (bo, mimo nieporozumień, jakie towarzyszą temu terminowi — tu chyba jest on właściwy) hotelu „Bristol” udało się ochronić

Tym podstawowym założeniem pracy jest teza, że spółdzielczy stosunek pra­ cy jest stosunkiem odrębnym od sto­ sunku członkostwa przy jednoczesnym zarazem

Opracowała ona in­ deksy rzeczowe do wszystkich pozostałych tomów „Systemu”.. Za zaistniałą lukę informacyjną w przedmowie i na

8/ Jeżeli B0 jest wytworzona przez prąd indukcja magnetyczna w próżni, to indukcja magnetyczna w ośrodku jednorodnym wyraża się wzorem B=B0μ.. pojedynczego zwoju o oporze R

[r]

Figures 17 , 18 and 19 reveal the normalized streamwise, cross-stream and vertical velocity components respectively for different representative sections in the vertical plane (y/D

OCCUPANT TECHNICAL / ECONOMIC GOALS Integrate interior &amp; exterior systems, vegetation, HVAC, products to support healthy air quality. ADDED VALUE TO STAKEHOLDER

Het diagram blijkt niet geschikt te zijn om scherpe grenzen te trekken tussen duinen, overgangsfase, vlakke bodem en antiduinen