(SN) ^SN - i ST, (STj) regelnr toets regelnr toets regelnr. toets P1 001 0 024 047 0 002 Min 4 025 GSB INV P9 048 0 003 Mode 6 026 049 Min F 004 MR 7 027 MR 7 050 005 /- 028 051 GOTO 2 006 INV RP 029 INVR-» P 052 LBL 3 007 MR 6 030 053 008 /- 031 GSB INV P8 054 MR 0 009 032 055 010 INV X <-» Y 033 MR 6 056 LBL4 011 INV x> 0 034 057 INV x>F 012 GOTOO 035 Mode 6 058 GOTO~5 013 036 059 GOTO 6 014 4 037 Min 8 060 LBL 5 015 0 038 INV X *->Y 061 016 0 039 062 MR F 017 040 MR 9 063 018 LBL0 041 064 GOTO 4 019 Min 9 042 LBL 2 065 LBL 6 020 AC 043 INV x>0 066 HLT 021 HLT 044 GOT03 067 MR 8 022 LBL 1 045 068 HLT 023 Min 4 046 4 069 GOTO 1 Fig. 6. Programma voor de Casio FX 502 P: uitzetten van cirkelbogen volgens de voerstraalmethode. Gebruiksaanwijzing van programma P1 regelnr. invoer toets uitvoer opmerkingen 01 ON 02 INV MAC 03 (STV Min 0 04 R Min 2 05 xs Min 6 06 Ys Min 7 07 P1 08 n EXE (SN) 09 EXE 'SN 10 vol gende n terug naar regel 08 Ook van dit programma volgt in figuur 7 het stroom schema, ten gerieve van gebruikers van een ander merk calculator. Voor de berekening zijn de volgende formules gebruikt: <ASt are tan - Ys n xn R sin p yn R (1 cos^) isn arc tan *n *5 y y IsN V (x„ - Xs>2 (Yn - Ys)2 NGT GEODESIA 80 START invoeren (ST,), R, Xs, ysin geheugens berekening van Yn - Ys berekening van i/'sj berekening van (SN) uitvoer van (SN) opslaan van "Ast, in geheugen invoeren boog lengte n berekening van /sn berekenen van xn 1e subr. uitvoer berekening van volgende n nee EINDE berekenen van yn 2e subr. Fig. 7. Stroomschema programma voerstraalmethode. 263

Digitale Tijdschriftenarchief Stichting De Hollandse Cirkel en Geo Informatie Nederland

(NGT) Geodesia | 1980 | | pagina 9