@



 +/n3.7@?  GN K((@&&U-WU4&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&U&&UK!
	CALL TRANSAN2 AIN2)
	BLNO=JBMAX
	CALL TRANS
	P2V 0  2	
	P1VC=(SVC-(P1VC-VMIN)*SF)/SVC*100.
	P2VC=(SVC-(P2VC-VMIN)*SF)/SVC*100.
	WRITE(4,400P
@@@PP 	l`@	|p@z.c^Q0"( 1F9.2,F13.2///)
	GO TO 1
601	FORMAT(' POSITIVE OVERFLOW.'///)
701	FORMAT(' NEGATIVE OVERFLOW.'///)
	STOP
	END
/#/SBJ2A0
HAHAHAHAHAHA@@@@@@@@%@	 
5@
@PIA@@@ya@s'M`    (S   
i@y	AHvKI}@5
i\@`y !`@	#!'(N`	), di@@ 
y>
3@

3	:!X @@!	),@`y N!`@Y!'(A8C:dI@@ y&`@,@`y {!@'*AC:TF.)@P*q4K@@ y*&@y&`@8"'(`5	
U A0
I@ ^d@@+@+@@+@@+@
@

6@Yz@@@! @@  ,@!9Q2r9!Q<@"9Q2} @@#9QS"
@$9Q29!Q<@%&D["

$DN"@&*QBO*QBO
:"`y ?#`@'
@(

6@)Yz@*@@+!@,9Q	2j@ -@@.
@@/9
Q<@0&DK"

$D>"@1*)#`y .#`@2@@3@4`y "#``@5:#1/&o2;'K A 6    NBo22Kqn/@Z@6
6@7Yz@8 @9Q@@9
6Y@:Yz)@; 9
Q<@<&)@=&)@>`y #``@?&#2,'T0A  h  
 NBo'%TL PCTzlin,1An/Lo@:@@U!@A;#'(ST2V`!VR
W'o;i@0BL':G
TV`VRW';oi;@CX @DX (

@`B@PC
D?R.!AD@R.!"z@pD!@PE(
3U@F%@GDA"B@ 
%A B@INASG"0MN@MN@@I03I13MX@MX@@A06A16	@DM"LGLGp@XX3ICO@
SICOD
SICOH
SQDSNCSTNMDO1FXFX"IN%AP@E@5S
ED0XPCE@EI 
G0N@@X@@NLADN"PDGGp@NS

0@@RPLE@N@
G@
L@
GLM`AR
PW
PESRPLGSNCSER EC ECL@IA@O
@CDCBCCQ
CLC
CCED X	2E	EEEIERHR@@HRGT
PTNI4NB4PUE@R
PYCLC@ C	0	ESD@TCTC@L0CL@@DS@


20TN@HEF0APC0L@PDpRITE(4,600)
	SVC=SF*(VMAX-VMIN)
	WRITE(4,400)SVC
400	FORMAT(' SLOW VITAL CAPACITY:',E13.4)
500	FORMAT(' POSITIVE OVERFLOW.'///)
600	FORMAT(' NEGATIVE OVERFLOW.'///)
	GO TO 1
	STOP
	END
.OR.VMIN.LE.-511.)WRITE(4,701)
	IF(PMAX.GE.511.)WRITE(4,601)
	PMIN=PMIN*PSF
	PMAX=PMAX*PSF
	WRITE(4,800)PMAX,PMIN
800	FORMAT(1X///,20X,'   PMAX         PMIN'/,20X,2E13.4/)
	BLNO=JBMIN
	CALL TRANS
	P1VC=A(JMIN-2)
	BLNO=JBMAX
	CALL TRANS
	P2VC=A(JMAX-2)
	P1VC=(SVC-(P1VC-VMIN)*SF)/SVC*100.
	P2VC=(SVC-(P2VC-VMIN)*SF)/SVC*100.
	WRITE(4,400)P2VC,P1VC
400	FORMAT(20X,'AT PMAH"@PI
(2B9@J
(Bc@ K

3U@L
E
?U)(%XZG'%
3@PM

E
U?
W3
]*@PN@PO

E
U?
W*
]3@PP@PQ(
0U@R@S`@#&`DP`@TDHB)@ U
DF2*@VDBB@W
D:^(@XD="B AP@Y 
"@`Z @P[@P\@P]`@^`@#C(`DP`
V`
V 
W[`9
 EW20@_K

,6Q14;63@@ `!
"V@a@b @c%@d@e@2fD
f
f

f
f
 `
A]Z09` ,Z[)`@f"
"@`g@Ph @Pi@Pj 
A]]@0k 
A]`@0l'&2
]9M~P ,`[7) E]2/@m 
A]c@0n 
A]f@0o'&2
M9=_` ,f[c) Ec2[@p 
A]i@0q 
A]l@0r'&2
9M@p ,l[) Ei2@s
GI":)`
#H)

t<)
9);C
I
tC)
tO	LN)
tYVX)
tc1`b)
tm)jl)
`	2
 A@W*%A B@EA2I"" MN@MN@@I03I13MX@MX@ @* 1	@DM"LG
` P	l"(Q2/ 
/ A*I*
j@@@@U@ U$SNCSTNMD@n#.*b`@/b'$b(&b)+b))t@(c))t))t('D,"0
%
T0
@

l+EI 
NP@AB4I"E"FX @@NLADN"PDG 
* S

0@@
@P@P P	l
4PQ0"(a*
aZA4I"E @@@@`{*++i*@
3
6@`{*i*`9"XDF+`@Y*@	+@
+CLC
CCED X	2E	EEEIERHR@@HRGT
PTNI4NB4PUE@R
PYCLC@ C	0	ESD@TCTC@L0CL@@DS@


20TN@HEF0APC0L@PDp

Note: Lines longer than 256 characters were wrapped