version 1.6, 1997/07/31 16:17:11
|
version 1.7, 1998/04/14 16:43:08
|
Line 21 format Q 6 2 0
|
Line 21 format Q 6 2 0
|
format R 6 2 0 |
format R 6 2 0 |
format S 6 2 0 |
format S 6 2 0 |
format T 6 2 0 |
format T 6 2 0 |
format W 10 0 0 |
format U 7 2 0 |
format X 10 0 0 |
format X 10 0 0 |
format AA 10 0 0 |
format Y 10 0 0 |
format AB 10 0 0 |
format AB 10 0 0 |
|
format AC 10 0 0 |
label B0 = "gforth" |
label B0 = "gforth" |
label C0 = "f2c -O3 .." |
label C0 = "f2c -O3 .." |
label D0 = "timbre" |
label D0 = "timbre" |
Line 44 label Q0 = "eforth opt"
|
Line 45 label Q0 = "eforth opt"
|
label R0 = "pfe" |
label R0 = "pfe" |
label S0 = "thisForth" |
label S0 = "thisForth" |
rightstring T0 = "TILE" |
rightstring T0 = "TILE" |
|
rightstring U0 = "pforth" |
leftstring A1 = "sieve 1000" |
leftstring A1 = "sieve 1000" |
let A1 = 0 |
let A1 = 0 |
let B1 = 31.9 |
let B1 = 31.9 |
Line 64 let Q1 = 25.3
|
Line 66 let Q1 = 25.3
|
let R1 = 47.18 |
let R1 = 47.18 |
let S1 = 95.07 |
let S1 = 95.07 |
let T1 = 256.48 |
let T1 = 256.48 |
|
let U1 = 215.27 |
leftstring A2 = "bubble 6000" |
leftstring A2 = "bubble 6000" |
let B2 = 35.6 |
let B2 = 35.6 |
let C2 = 4.79 |
let C2 = 4.79 |
Line 82 let P2 = 52.4
|
Line 85 let P2 = 52.4
|
let Q2 = 31.1 |
let Q2 = 31.1 |
let R2 = 53.24 |
let R2 = 53.24 |
let T2 = 137.34 |
let T2 = 137.34 |
|
let U2 = 489.24 |
leftstring A3 = "matmul 200" |
leftstring A3 = "matmul 200" |
let B3 = 28.3 |
let B3 = 28.3 |
let C3 = 4.02 |
let C3 = 4.02 |
Line 120 let Q4 = 29.9
|
Line 124 let Q4 = 29.9
|
let R4 = 60.14 |
let R4 = 60.14 |
let S4 = 103.44 |
let S4 = 103.44 |
let T4 = 148.71 |
let T4 = 148.71 |
|
let U4 = 158.64 |
rightstring B5 = "time" |
rightstring B5 = "time" |
rightstring C5 = "Forth$\rightarrow$C" |
rightstring C5 = "Forth$\rightarrow$C" |
rightstring E5 = "Forth$\rightarrow$C" |
rightstring E5 = "Forth$\rightarrow$C" |
Line 127 rightstring F5 = "hand-"
|
Line 132 rightstring F5 = "hand-"
|
rightstring G5 = "big-" |
rightstring G5 = "big-" |
rightstring J5 = "NT-Forth" |
rightstring J5 = "NT-Forth" |
rightstring S5 = "This-" |
rightstring S5 = "This-" |
rightstring W5 = "interp." |
rightstring X5 = "interp." |
rightstring X5 = ".o" |
rightstring Y5 = ".o" |
rightstring Y5 = "size" |
rightstring Z5 = "size" |
rightstring Z5 = "compile" |
rightstring AA5 = "compile" |
rightstring AA5 = "source" |
rightstring AB5 = "source" |
rightstring AB5 = "C" |
rightstring AC5 = "C" |
rightstring B6 = "Gforth" |
rightstring B6 = "Gforth" |
rightstring C6 = "opt." |
rightstring C6 = "opt." |
rightstring D6 = "Timbre" |
rightstring D6 = "Timbre" |
Line 152 rightstring Q6 = "PFE"
|
Line 157 rightstring Q6 = "PFE"
|
rightstring R6 = "PFE" |
rightstring R6 = "PFE" |
rightstring S6 = "Forth" |
rightstring S6 = "Forth" |
rightstring T6 = "TILE" |
rightstring T6 = "TILE" |
rightstring W6 = "size" |
rightstring U6 = "TILE" |
rightstring X6 = "size" |
rightstring X6 = "size" |
rightstring Y6 = "ratio" |
rightstring Y6 = "size" |
rightstring Z6 = "time" |
rightstring Z6 = "ratio" |
rightstring AA6 = "lines" |
rightstring AA6 = "time" |
rightstring AB6 = "lines" |
rightstring AB6 = "lines" |
|
rightstring AC6 = "lines" |
leftstring A7 = "sieve" |
leftstring A7 = "sieve" |
let B7 = 31.9 |
let B7 = 31.9 |
let C7 = $B1/C1 |
let C7 = $B1/C1 |
Line 178 let Q7 = $B1/Q1
|
Line 184 let Q7 = $B1/Q1
|
let R7 = $B1/R1 |
let R7 = $B1/R1 |
let S7 = $B1/S1 |
let S7 = $B1/S1 |
let T7 = $B1/T1 |
let T7 = $B1/T1 |
leftstring V7 = "sieve" |
let U7 = $B1/U1 |
let W7 = 418 |
leftstring W7 = "sieve" |
let X7 = 272 |
let X7 = 418 |
let Y7 = W7/X7 |
let Y7 = 272 |
let Z7 = 1.1 |
let Z7 = X7/Y7 |
let AA7 = 25 |
let AA7 = 1.1 |
let AB7 = 482 |
let AB7 = 25 |
|
let AC7 = 482 |
leftstring A8 = "bubble" |
leftstring A8 = "bubble" |
let B8 = 35.6 |
let B8 = 35.6 |
let C8 = $B2/C2 |
let C8 = $B2/C2 |
Line 205 let Q8 = $B2/Q2
|
Line 212 let Q8 = $B2/Q2
|
let R8 = $B2/R2 |
let R8 = $B2/R2 |
let S8 = $B2/S2 |
let S8 = $B2/S2 |
let T8 = $B2/T2 |
let T8 = $B2/T2 |
leftstring V8 = "bubble" |
let U8 = $B2/U2 |
let W8 = 1020 |
leftstring W8 = "bubble" |
let X8 = 748 |
let X8 = 1020 |
let Y8 = W8/X8 |
let Y8 = 748 |
let Z8 = 1.6 |
let Z8 = X8/Y8 |
let AA8 = 72 |
let AA8 = 1.6 |
let AB8 = 1100 |
let AB8 = 72 |
|
let AC8 = 1100 |
leftstring A9 = "matmul" |
leftstring A9 = "matmul" |
let B9 = 28.3 |
let B9 = 28.3 |
let C9 = $B3/C3 |
let C9 = $B3/C3 |
Line 232 let Q9 = $B3/Q3
|
Line 240 let Q9 = $B3/Q3
|
let R9 = $B3/R3 |
let R9 = $B3/R3 |
let S9 = $B3/S3 |
let S9 = $B3/S3 |
let T9 = $B3/T3 |
let T9 = $B3/T3 |
leftstring V9 = "matmul" |
let U9 = $B3/U3 |
let W9 = 784 |
leftstring W9 = "matmul" |
let X9 = 412 |
let X9 = 784 |
let Y9 = W9/X9 |
let Y9 = 412 |
let Z9 = 1.4 |
let Z9 = X9/Y9 |
let AA9 = 55 |
let AA9 = 1.4 |
let AB9 = 793 |
let AB9 = 55 |
|
let AC9 = 793 |
leftstring A10 = "fib" |
leftstring A10 = "fib" |
let B10 = 36.7 |
let B10 = 36.7 |
let C10 = $B4/C4 |
let C10 = $B4/C4 |
Line 259 let Q10 = $B4/Q4
|
Line 268 let Q10 = $B4/Q4
|
let R10 = $B4/R4 |
let R10 = $B4/R4 |
let S10 = $B4/S4 |
let S10 = $B4/S4 |
let T10 = $B4/T4 |
let T10 = $B4/T4 |
leftstring V10 = "fib" |
let U10 = $B4/U4 |
let W10 = 140 |
leftstring W10 = "fib" |
let X10 = 140 |
let X10 = 140 |
let Y10 = W10/X10 |
let Y10 = 140 |
let Z10 = 0.9 |
let Z10 = X10/Y10 |
let AA10 = 10 |
let AA10 = 0.9 |
let AB10 = 169 |
let AB10 = 10 |
|
let AC10 = 169 |
let G12 = G1/C1 |
let G12 = G1/C1 |
let H12 = H1/D1 |
let H12 = H1/D1 |
let I12 = I1/E1 |
let I12 = I1/E1 |
Line 275 let Q12 = Q1/D1
|
Line 285 let Q12 = Q1/D1
|
let R12 = R1/D1 |
let R12 = R1/D1 |
let S12 = S1/C1 |
let S12 = S1/C1 |
let T12 = T1/D1 |
let T12 = T1/D1 |
|
let U12 = U1/E1 |
let G13 = G2/C2 |
let G13 = G2/C2 |
let H13 = H2/D2 |
let H13 = H2/D2 |
let I13 = I2/E2 |
let I13 = I2/E2 |
Line 284 let Q13 = Q2/D2
|
Line 295 let Q13 = Q2/D2
|
let R13 = R2/D2 |
let R13 = R2/D2 |
let S13 = S2/C2 |
let S13 = S2/C2 |
let T13 = T2/D2 |
let T13 = T2/D2 |
|
let U13 = U2/E2 |
let G14 = G3/C3 |
let G14 = G3/C3 |
let H14 = H3/D3 |
let H14 = H3/D3 |
let I14 = I3/E3 |
let I14 = I3/E3 |
Line 293 let Q14 = Q3/D3
|
Line 305 let Q14 = Q3/D3
|
let R14 = R3/D3 |
let R14 = R3/D3 |
let S14 = S3/C3 |
let S14 = S3/C3 |
let T14 = T3/D3 |
let T14 = T3/D3 |
|
let U14 = U3/E3 |
let G15 = G4/C4 |
let G15 = G4/C4 |
let H15 = H4/D4 |
let H15 = H4/D4 |
let I15 = I4/E4 |
let I15 = I4/E4 |
Line 302 let Q15 = Q4/D4
|
Line 315 let Q15 = Q4/D4
|
let R15 = R4/D4 |
let R15 = R4/D4 |
let S15 = S4/C4 |
let S15 = S4/C4 |
let T15 = T4/D4 |
let T15 = T4/D4 |
|
let U15 = U4/E4 |
rightstring B16 = "relative" |
rightstring B16 = "relative" |
rightstring C16 = "f2c" |
rightstring C16 = "f2c" |
rightstring E16 = "f2c" |
rightstring E16 = "f2c" |
Line 315 label M16 = "P133"
|
Line 329 label M16 = "P133"
|
rightstring N16 = "Win32-" |
rightstring N16 = "Win32-" |
rightstring O16 = "NT" |
rightstring O16 = "NT" |
rightstring S16 = "This-" |
rightstring S16 = "This-" |
rightstring U16 = "abs.\ time" |
rightstring V16 = "abs.\ time" |
rightstring B17 = "time" |
rightstring B17 = "time" |
rightstring C17 = "opt." |
rightstring C17 = "opt." |
rightstring D17 = "Timbre" |
rightstring D17 = "Timbre" |
Line 335 rightstring Q17 = "PFE"
|
Line 349 rightstring Q17 = "PFE"
|
rightstring R17 = "PFE" |
rightstring R17 = "PFE" |
rightstring S17 = "Forth" |
rightstring S17 = "Forth" |
rightstring T17 = "TILE" |
rightstring T17 = "TILE" |
rightstring U17 = "f2c opt." |
rightstring U17 = "TILE" |
|
rightstring V17 = "f2c opt." |
leftstring B18 = "sieve" |
leftstring B18 = "sieve" |
let C18 = C1/$C1 |
let C18 = C1/$C1 |
let D18 = D1/$C1 |
let D18 = D1/$C1 |
Line 355 let Q18 = Q1/$C1
|
Line 370 let Q18 = Q1/$C1
|
let R18 = R1/$C1 |
let R18 = R1/$C1 |
let S18 = S1/$C1 |
let S18 = S1/$C1 |
let T18 = T1/$C1 |
let T18 = T1/$C1 |
let U18 = C1 |
let U18 = U1/$C1 |
fmt U18 "##0.00s" |
let V18 = C1 |
|
fmt V18 "##0.00s" |
leftstring B19 = "bubble" |
leftstring B19 = "bubble" |
let C19 = C2/$C2 |
let C19 = C2/$C2 |
let D19 = D2/$C2 |
let D19 = D2/$C2 |
Line 376 let Q19 = Q2/$C2
|
Line 392 let Q19 = Q2/$C2
|
let R19 = R2/$C2 |
let R19 = R2/$C2 |
let S19 = S2/$C2 |
let S19 = S2/$C2 |
let T19 = T2/$C2 |
let T19 = T2/$C2 |
let U19 = C2 |
let U19 = U2/$C2 |
fmt U19 "##0.00s" |
let V19 = C2 |
|
fmt V19 "##0.00s" |
leftstring B20 = "matmul" |
leftstring B20 = "matmul" |
let C20 = C3/$C3 |
let C20 = C3/$C3 |
let D20 = D3/$C3 |
let D20 = D3/$C3 |
Line 397 let Q20 = Q3/$C3
|
Line 414 let Q20 = Q3/$C3
|
let R20 = R3/$C3 |
let R20 = R3/$C3 |
let S20 = S3/$C3 |
let S20 = S3/$C3 |
let T20 = T3/$C3 |
let T20 = T3/$C3 |
let U20 = C3 |
let U20 = U3/$C3 |
fmt U20 "##0.00s" |
let V20 = C3 |
|
fmt V20 "##0.00s" |
leftstring B21 = "fib" |
leftstring B21 = "fib" |
let C21 = C4/$C4 |
let C21 = C4/$C4 |
let D21 = D4/$C4 |
let D21 = D4/$C4 |
Line 418 let Q21 = Q4/$C4
|
Line 436 let Q21 = Q4/$C4
|
let R21 = R4/$C4 |
let R21 = R4/$C4 |
let S21 = S4/$C4 |
let S21 = S4/$C4 |
let T21 = T4/$C4 |
let T21 = T4/$C4 |
let U21 = C4 |
let U21 = U4/$C4 |
fmt U21 "##0.00s" |
let V21 = C4 |
|
fmt V21 "##0.00s" |
leftstring B23 = "relative" |
leftstring B23 = "relative" |
rightstring C23 = "f2c" |
rightstring C23 = "f2c" |
rightstring E23 = "f2c" |
rightstring E23 = "f2c" |
Line 434 rightstring N23 = "Win32-"
|
Line 453 rightstring N23 = "Win32-"
|
rightstring O23 = "NT" |
rightstring O23 = "NT" |
rightstring Q23 = "eforth" |
rightstring Q23 = "eforth" |
rightstring S23 = "This-" |
rightstring S23 = "This-" |
rightstring U23 = "abs.\ time" |
rightstring V23 = "abs.\ time" |
leftstring B24 = "time" |
leftstring B24 = "time" |
rightstring C24 = "opt." |
rightstring C24 = "opt." |
rightstring D24 = "Timbre" |
rightstring D24 = "Timbre" |
Line 454 rightstring Q24 = "+opt"
|
Line 473 rightstring Q24 = "+opt"
|
rightstring R24 = "PFE" |
rightstring R24 = "PFE" |
rightstring S24 = "Forth" |
rightstring S24 = "Forth" |
rightstring T24 = "TILE" |
rightstring T24 = "TILE" |
rightstring U24 = "f2c opt." |
rightstring U24 = "TILE" |
|
rightstring V24 = "f2c opt." |
leftstring B25 = "sieve" |
leftstring B25 = "sieve" |
let C25 = C1/$K1 |
let C25 = C1/$K1 |
let D25 = D1/$K1 |
let D25 = D1/$K1 |
Line 474 let Q25 = Q1/$K1
|
Line 494 let Q25 = Q1/$K1
|
let R25 = R1/$K1 |
let R25 = R1/$K1 |
let S25 = S1/$K1 |
let S25 = S1/$K1 |
let T25 = T1/$K1 |
let T25 = T1/$K1 |
let U25 = C1 |
let U25 = U1/$K1 |
fmt U25 "##0.00s" |
let V25 = C1 |
|
fmt V25 "##0.00s" |
leftstring B26 = "bubble" |
leftstring B26 = "bubble" |
let C26 = C2/$K2 |
let C26 = C2/$K2 |
let D26 = D2/$K2 |
let D26 = D2/$K2 |
Line 495 let Q26 = Q2/$K2
|
Line 516 let Q26 = Q2/$K2
|
let R26 = R2/$K2 |
let R26 = R2/$K2 |
let S26 = S2/$K2 |
let S26 = S2/$K2 |
let T26 = T2/$K2 |
let T26 = T2/$K2 |
let U26 = C2 |
let U26 = U2/$K2 |
fmt U26 "##0.00s" |
let V26 = C2 |
|
fmt V26 "##0.00s" |
leftstring B27 = "matmul" |
leftstring B27 = "matmul" |
let C27 = C3/$K3 |
let C27 = C3/$K3 |
let D27 = D3/$K3 |
let D27 = D3/$K3 |
Line 516 let Q27 = Q3/$K3
|
Line 538 let Q27 = Q3/$K3
|
let R27 = R3/$K3 |
let R27 = R3/$K3 |
let S27 = S3/$K3 |
let S27 = S3/$K3 |
let T27 = T3/$K3 |
let T27 = T3/$K3 |
let U27 = C3 |
let U27 = U3/$K3 |
fmt U27 "##0.00s" |
let V27 = C3 |
|
fmt V27 "##0.00s" |
leftstring B28 = "fib" |
leftstring B28 = "fib" |
let C28 = C4/$K4 |
let C28 = C4/$K4 |
let D28 = D4/$K4 |
let D28 = D4/$K4 |
Line 537 let Q28 = Q4/$K4
|
Line 560 let Q28 = Q4/$K4
|
let R28 = R4/$K4 |
let R28 = R4/$K4 |
let S28 = S4/$K4 |
let S28 = S4/$K4 |
let T28 = T4/$K4 |
let T28 = T4/$K4 |
let U28 = C4 |
let U28 = U4/$K4 |
fmt U28 "##0.00s" |
let V28 = C4 |
goto N16 |
fmt V28 "##0.00s" |
|
goto K23 |