Computer processing of visual records from the Thorney Island large scale gas trials

Directorate-General For Research And Innovation

Description

Information technology and telecommunications

Sujets

• Informatique
• Marketing et communication

Informations

• Publié par: DIRECTORATE-GENERAL-FOR-RESEARCH-AND-INNOVATION
• Nombre de lectures: 6
• Langue: English
• Poids de l'ouvrage: 3 Mo

Extrait

Commission of the European Communities
nuclear science and technology
COMPUTER PROCESSING OF VISUAL RECORDS
FROM THE THORNEY ISLAND
LARGE SCALE GAS TRIALS
îlow-up from microfiche original Commission of the European Communities
nuclear science and technology
COMPUTER PROCESSING OF VISUAL RECORDS
FROM THE THORNEY ISLAND
LARGE SCALE GAS TRIALS
M.L. RIETHMULLER, J.M. BUCHLIN, S. RICKAERT
von Karman Institute for Fluid Dynamics
Chaussée de Waterloo, 72
Β - 1640 Rhode-Saint-Genèse - BELGIUM
Contract No. SR-033-B
FINAL REPORT
CEC INDIRECT ACTION PROGRAMME ON THE SAFETY OF THERMAL WATER REACTORS (1979-1983)
Directorate-General for Science, Research and Development
1985 EUR 9933 EN Published by the
COMMISSION OF THE EUROPEAN COMMUNITIES
Directorate-General
Information Market and Innovation
Bâtiment Jean Monnet
LUXEMBOURG
LEGAL NOTICE
Neither the Commission of the European Communities nor any person acting on behalf
of then is responsible for the use which might be made of the following
information
© ECSC—EEG— EAEC Brussels - Luxembourg, 1985 III
SUMMARY
The digital image processing of the airborne video records
of the Thorney Island trials is performed. Comparisons are made
with previous processing done by SRD and a good agreement is observed.
The processing is extended to the determination of the motion of
the cloud edges. TABLE OF CONTENTS
SUMMARY iv
1. INTRODUCTION 1
2. DESCRIPTION OF THE DIGITAL IMAGE PROCESSING SYSTEM 2
2.1 Hardware 2
2.2 Software
:
3. DESCRIPTION OF THE PROCEDURE USED 4
3.1 General objectives
3.2 Software and procedure
4. PROCESSING THE HSE TRIALS 7
4.1 Organization of the processing
4.2 Accuracy and sources of errors
4.3 Results obtained 8
5. ANALYSIS OF THE RESULTS 9
5.1 Comparison with conventional processing
5.2 Discussion of the results
General comments . . 9
6. FUTURE WORK 11
7. CONCLUSIONS2
REFERENCES3
APPENDIX - COMPUTER PROCESSING 15 X 2 - LISTING
FIGURES VI
APPENDIX 1 - COMPUTER PROCESSING APPENDIX 2 - LISTING
1. INTRODUCTION 17
2. PROGRAM AREA 20 45
2.1 Tasks available and subroutines used 2D
2.2 Subroutine THRESH1 6
2.2.1 Flowchart1
2.2.2 Comments 3
2.3 Subroutine CIRCLE (XC, XD, R, M)7 57
2.4e REDIS7
2.5 Subroutine RESULT (SURF, ZDD, CETA, VL) 288
2.6e ACQUIS8
2.7 Subroutine CARR(L) 28 5
2.8 Subroutine PRINT99
2.9e DISPLA (IA, IB, K)9
2.10 Subroutine SCALE (KN)9 60
2.11e STORE 30
2.12 Subroutine GRID (M, KA, KB)0
2.13e POSI (Kl, K2, K3, IS, JS, R, II, IDIF) 30 49
2.14 Subroutine PATH0 61
2.15e POLYGO (mini,maxi)1
2.16 Subroutine LINE (1X1, IY1, 1X2, IY2, ICOLOR, M, IND) ... 312
2.17e FILTH1 ... 6T
2.18 Subroutine FILTV2 63
2.19 Function NINT(X) 32 ?t+
3. PROGRAM SOURCE38
3.1 Subroutine CARR
3.2e GRID
69
3.3 Function NINT(X)2
74
4. PROGRAM FRONT 3l+
66
4.1 Main program 31
4.2 Subroutine LIMIT (N, GAMMA) 34
66
4.3e GRID25 67
4.4 Subroutine CARR26
4.5 Function NINT(X)6 7k
5. PROGRAM DRAWIN 37
70
5.1 Subroutine POINT
70
5.2e CROSS 70
5.3 Subroutine CIRCLE(IK) ........ 70
5.4e POLYGO(IK) .... 72
5.5 Subroutine LINE (1X1, IY1, 1X2, IY2, ICOLOR, IND) 73
5.6e STORE2 7
5.7 Function NINT(X) '
74 VII
6. PROGRAM TOPO 38 55
6.1 General description8
6.2 Subroutines
6.2.1 Subroutine LECIMP8
6.2.2e MOTPNT (I, S, IP) 38 64
6.2.3 Subroutine POSIKI9 56
6.2.4e PIXNOR95
6.2.5 Subroutine DISANG (XI, Yl, X2, Y2, XY, ALXY, KI) . . . 39
6.2.6e CIRCLE 277
6.2.7 Subroutine REDIS7 5
6.2.8e RESULT88
6.2.9 Subroutine ACQUIS .'8
6.2.10e CARR(L)8
6.2.11 Subroutine PRINT9 59
6.2.12e DISPLA (IA, IB, K) 29
6.2.13 Subroutine SCALE (KN)9 60
6.2.14e STORE 30
6.2.15 Subroutine GRID (M, KA, KB)0
6.2.16e PATH01
6.2.17 Subroutine POLYGO (mini,maxi)1 6
6.2.18e LINE (1X1, IY1, 1X2, IY2, ICOLOR, M, IND). 312
6.2.19 Subroutine FILTH13
6.2.20e FILTV2
6.2.21 Function NINT(X) 32 74
6.3 File created 40
7. PROGRAM AREB1 50
7.1 General description1
7.2 Subroutines called
7.2.1 Subroutine THRESB1
7.2.2e POSIB (Kl, K2, K3, JSP, USP, II, IDIF) . . 41 54
7.2.3 Subroutine CIRCLE (XC, XD, R, M) 277
7.2.4 Subroutine REDIS 27
7.2.5e RESULT (SURF, ZDD, CETA, VL)88
7.2.6 Subroutine ACQUIS8 5
7.2.7e CARR(L)8
7.2.8 Subroutine PRINT99
7.2.9e DISPLA (IA, IB, K)9
7.2.10 Subroutine SCALE (KN)9 60
7.2.11e STORE 30
7.2.12 Subroutine GRID (KA, KB)0
7.2.13e PATH*01
7.2.14 Subroutine POLYGO (mini, maxi)1 6
7.2.15e LINE (1X1, IY1, 1X2, IY2, ICOLOR, M, IND). 312
7.2.16 Subroutine FILTH13
7.2.17e FILTV2
7.2.18 Subroutine MOTPNT (IX, IY, IP) 38 64
7.2.19e PIXNOR 395
7.2.20 Subroutine DISANG9
7.2.21 Function NINT(X)2 ........ 7