292 

 293 



840 

 850 



294 



860 



295 



870 



296 



880 



297 



890 



298 

 299 



900 

 910 



300 

 301 



920 

 930 



PROGRAM — RAPLOT II 



FORMAT (5X»21HSuUARE DIST BETWEEN =»E16.8.5X»18HDISTANCE BETWEEN = 473 



1.F10.0) 474 



FORMAT (5X.6HSINE = »E16.8.5X.8HC0SINE =>E16.8> 475 



FORMAT (5X.16HINJECTI0N TIME =.2F3.0. 10X. 12HCL0CK SET AT.2F3.0.5X. 476 



121H0IGITIZING INTERVAL =.F3.0.7HSECONDS/5X.30HDAYS ELAPSEO SINCE I 477 



2NJECTI0N =rF3.0) 478 



FORMAT (SX.22HHALF-LIFE OF ISOTOPE =.F7.2.4HDAYS»5X.14HDECAY FACTO 479 



1R =.E16.8r5X.19HTIME-DELAY FACTOR =.F7.2.5HH0URS) 480 



FORMAT (10X.14HCABLE LENGTH =»F4.0. 10X. 18HMEAN WATER DEPTH =»F4.0» 481 



U0X»13HbOAT LENGTH =.F4.0> 482 



FORMAT U0X.38HDISTANCE FROM RADAR MAST TO DETECTOR =»F6.1 t5HFEET. 480 



1) 484 



FORMAT (//40X.15HPLOTS GENERATED/10X.9HTRACKLINE. 15. 10X.20HBACKGRO 485 



1UMD RADIATION. I5.10X.19HCORRECTED RADIATION. 15) 486 



FORMAT <5Xr51HBEAC0N RANGES FOR DUMP SITE COMPUTE IMAGINARY ROOT.) 487 



FORMAT (10X.37HLAMBERT COORDINATES OF INJECTION SITE.F10.0.1HN.F10 488 



1.0. 1HE) *89 



FORMAT (1H0.19X.7A6) 490 



FORMAT (37H THERE WAS AN OVERFLOW WHEN ALPHA WAS.F6.3.5X.25HCHVR W 491 



IAS SET EQUAL TO 5.0) 492 



302 940 FORMAT (//20X.53HSUMMARY STATISTICS OF BACKGROUND RADIATION COUNT 493 



1RATE/30X.13HRAD CHANNEL 1.5X.13HRAD CHANNEL 2/10X.21HEST. BKG. COU 494 



2NTS/SEC.»F10.0.8X.F10.0/10X»21HMEAN BKG. COUNTS/SEC. .F10.0.8X.F10. 495 



30/10X.21HSTD. DEV. COUNTS/SEC. .F10.0.8X.F10.0) 496 



303 950 FORMAT (//20X.33HSUM OF CORRECTED RADIATION C0UUTS/25X. 19HRADIATIO 497 



IN CHANNEL 1.E16.8/25X. 19HRADIATI0N CHANNEL 2.E16.8) 498 



304 960 FORMAT (//20X.41HSUMMARY STATISTICS OF RADIATION LOCATION. /24X. 11H 499 



1NORTH COORO.10X.10HEAST COORD/16X.4HMEAN.5X.F10.0.10X.F10.0/UX.9H 500 



2ST0. OEV..5X.F10.0.10X.F10.0) 501 



305 970 FORMAT ( 10X. 10HCONFIOENCE/7X. 13HLIMIT OF MEAN.5X.F10.0.10X.F10.0) 502 



306 980 FORMAT 1//7X. 13HMAXIMUM COORD.5X.F10.0. 1HN.9X.F10.0.1HE) 503 



307 990 FORMAT <//7X. 13HMINIMUM COORD.5X.F10.0.1HN.9X.F10.0.1HE//) 504 



308 1000 FORMAT (1H1.9X.13A6//2X.10HLINE TIME.5X. 18HDISTANCE TO BEACON. 5X. 505 



115HRADIATI0N COUNT. 4X.16HB0AT COORDINATES. 4X.16HBALL COORDINATES. 3 506 



2X.19HC0RRECTED RADIATI0N/9X.3HSEC.11X.1H1. 10X.1H2.6X.4HRAD1.6X.4HR 507 



3A02.9X.1HN.9X.1HE.9X.1HN.9X.1HE.7X.4HRAD1.3X.9H RAD2) 508 



309 1010 FORMAT (IX. I5.F6.0.F11.1. A1.F10.1. Al.4F10.0r A1.2F10.0.F11.0.F11 .0 ) 509 



310 1020 FOKMAT (1H1) 510 



311 END 511- 



10 



20 



30 



4C 



50 



60 



70 



80 



90 



100 



110 



120 



130 



140 



150 



160 



170 



180 



190 



200 



210 



220 



230 



240 



2b0 



260 



270 



280 



290 



300 



310 



320 



330 



340 



350 



360 



365 



7 



9* 



13 



14« 



12 



13 



35 



36* 



40 



41* 



40 



44* 



35 



43 



50 



53* 



54* 



55 



54 



56* 



64 



65* 



61 



64 



72 



74* 



69 



75* 



67 



77* 



80 



81* 



92 



93* 





91 



92 



95* 



94 



96* 





99* 



101 





06 



89 



101 



7b 



103* 





110 



111* 





110 



114* 





105 



113 



117* 



120* 



159 





122 



123* 





122 



i25* 





127 



129* 





121 



124 



133* 



lib 



119 



135 



143* 







36 



