drygdryg/calc
1
0
Fork 0
mirror of https://github.com/lcn2/calc.git synced 2025-08-16 01:03:29 +03:00
Code Issues Packages Projects Releases Wiki Activity

Correct typos

Browse Source
This commit is contained in:
Landon Curt Noll
2021-12-05 18:23:27 -08:00
parent 769ac51f8c
commit f5c5cea8b0
80 changed files with 289 additions and 283 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
cal/Makefile
View File

@@ -220,10 +220,10 @@ T=
# H=@: do not report hsrc file formation progress
# H=@ do echo hsrc file formation progress
#
# S= >/dev/null 2>&1 slience ${CC} output during hsrc file formation
# S= >/dev/null 2>&1 silence ${CC} output during hsrc file formation
# S= full ${CC} output during hsrc file formation
#
# E= 2>/dev/null slience command stderr during hsrc file formation
# E= 2>/dev/null silence command stderr during hsrc file formation
# E= full command stderr during hsrc file formation
#
# V=@: do not echo debug statements (quiet mode)

2
cal/README
View File

@@ -892,7 +892,7 @@ palindrome.cal
nextprimepal(val)
prevprimepal(val)
Functions to form and manipulate palendromes in base 10.
Functions to form and manipulate palindromes in base 10.
Important functions are:

7
cal/regress.cal
View File

@@ -7101,9 +7101,10 @@ define test_sha1()
vrfy(sha1("x", "y", "z") == sha1("xyz"),
'7208: sha1("x", "y", "z") == sha1("xyz")');
vrfy(sha1(sha1("this is",7^19-8,"a composit",3i+4.5,"hash")) ==
0xc3e1b562bf45b3bcfc055ac65b5b39cdeb6a6c55,
'7209: sha1(sha1("this is",7^19-8,"a composit",3i+4.5,"hash")) == ...');
vrfy(sha1(sha1("this is",7^19-8,"a composite",3i+4.5,"hash")) ==
0x68aa4fe0a9b6d1662f8d2dbdeee8879239185d09,
'7209: sha1(sha1("this is",7^19-8,"a composite",3i+4.5,"hash")) ' +
'== ...');
z = sha1(list(1,2,3), "curds and whey", 2^21701-1, pi(1e-100));

6
cal/set8700.line
View File

@@ -1,7 +1,7 @@
##
## set8700 - dotest line tests for the 8700 set of regress.cal
##
## Copyright (C) 2006 Ernest Bowen and Landon Curt Noll
## Copyright (C) 2006,2021 Ernest Bowen and Landon Curt Noll
##
## Calc is open software; you can redistribute it and/or modify it under
## the terms of the version 2.1 of the GNU Lesser General Public License
@@ -159,7 +159,7 @@ set8700_A = 42, protect(set8700_A,1024), set8700_B = set8700_A, protect(set8700_
set8700_A = 6 * 7, protect(set8700_A) == 1024
set8700_A == set8700_B
## Testing matrix protectioon
## Testing matrix protection
set8700_A = mat [3] = {1, 2, list(3,4)}; 1
protect(set8700_A, 65, 1), protect(set8700_A) == 1089
protect(set8700_A[0]) == 65
@@ -261,7 +261,7 @@ protect(set8700_L[0]) == 0
protect(set8700_L[1]) == 512 ## protect(set8700_A) copied
protect(set8700_L[1][1]) == 1024 ## protect(set8700_A[1]) copied
## Testing list with "intialization"
## Testing list with "initialization"
set8700_L = list(1,2,3), protect(set8700_L) == 0
protect(set8700_L[0]) | protect(set8700_L[1]) | protect(set8700_L[2]) == 0 ## All zero
set8700_L = {1,set8700_A}, set8700_L[1] == set8700_A

6
cal/sumtimes.cal
View File

@@ -1,7 +1,7 @@
/*
* sumtimes - runtimes evaluating sums & squares of large lists and mats
* sumtimes - runtime evaluating sums & squares of large lists and mats
*
* Copyright (C) 2006 Ernest Bowen
* Copyright (C) 2006,2021 Ernest Bowen
*
* Calc is open software; you can redistribute it and/or modify it under
* the terms of the version 2.1 of the GNU Lesser General Public License
@@ -160,7 +160,7 @@ define timehmean(N, M = 10) {
v2 = hmean(sumtimes_A);
sumtimes_t2 = usertime();
print v1, v2;
print "List harmonic meanruntimes";
print "List harmonic mean runtimes";
printf('\tStandard "for" loop:\t\t%.4f\n', sumtimes_t1 - sumtimes_t0);
printf('\tUsing builtin "hmean":\t\t%.4f\n', sumtimes_t2 - sumtimes_t1);
}

4
cal/test8900.cal
View File

@@ -2867,7 +2867,7 @@ define t035()
epsilon(eps);
return 6;
}
/* Percentiles. Numbers shamlessly stolen from a question at stackoverflow*/
/* Percentiles. Numbers shamelessly stolen from a question at stackoverflow */
if (abs
(invbetainc(0.025, 10008, 151744) -
0.060703546312525377697082321820950758320207425674954679415395) >
@@ -3081,7 +3081,7 @@ define test8900(verbose = 0, tnum, testnum = 8903)
return tnum;
}
/* We will cause erors intentionally. A lot of them. */
/* We will cause errors intentionally. A lot of them. */
old_errmax = errmax(-1);
/*