600 ! NOLLS\K.800 finner nollst{llen till kontinuerliga funktioner. MERGE med V[RD. P} rad 280 {ndras 580 till 630. 610 ! Ber{kna R11=f(R10) p} rad 670 fram}t utan att f|r{ndra Z%,R8,R9,R10. Avsluta med RETURN. Om f har ett enda 620 ! nollst{lle i (a,b) f}s detta p} sk{rmen och i R10. 625 NO EXTEND : INTEGER 630 ; "a"; : INPUT B$ : I=8 : GOSUB 330 : ; "b"; : INPUT B$ : I=9 : GOSUB 330 : S=FNK(22,10,8) : GOSUB 670 640 Z=FNI(3,11) 650 I=10 : S=FNS(10,9,8)+FNR(42) : IF FNK(7,10,8)*FNK(7,10,9)=0 GOSUB 450 : ; CHR$(7) B$ : GOTO 665 660 GOSUB 670 : IF Z=FNI(3,11) S=FNK(22,8,10) : GOTO 650 ELSE S=FNK(22,9,10) : GOTO 650 665 END