--- trunk/dudley/src/Util.c 2013/03/07 01:08:43 4285 +++ trunk/dudley/src/Util.c 2013/03/07 04:28:11 4286 @@ -32,7 +32,7 @@ /************************************************************************************/ -/* returns true if any of the values in the short array values is not equalt to Zero */ +/* returns true if any of the values in the short array values is not equal to zero */ bool_t Dudley_Util_anyNonZeroDouble(dim_t N, double *values) { @@ -122,7 +122,7 @@ } } -/* multiplies a two sets of matries: */ +/* multiplies two sets of matrices: */ /* A(1:A1,1:A2,i)=B(1:A1,1:B2,i)*C(1:B2,1:A2,i) i=1,len */ @@ -145,7 +145,7 @@ } } -/* multiplies a set of matries with a single matrix: */ +/* multiplies a set of matrices with a single matrix: */ /* A(1:A1,1:A2,i)=B(1:A1,1:B2,i)*C(1:B2,1:A2) i=1,len */ @@ -169,7 +169,7 @@ } /* inverts the set of dim x dim matrices A(:,:,1:len) with dim=1,2,3 */ -/* the determinante is returned. */ +/* the determinant is returned. */ void Dudley_Util_InvertSmallMat(dim_t len, dim_t dim, double *A, double *invA, double *det) { @@ -262,7 +262,7 @@ return; } -/* sets the derterminate of a set of dim x dim matrices A(:,:,1:len) with dim=1,2,3 */ +/* sets the determinant of a set of dim x dim matrices A(:,:,1:len) with dim=1,2,3 */ void Dudley_Util_DetOfSmallMat(dim_t len, dim_t dim, double *A, double *det) { @@ -602,7 +602,7 @@ return out; } -/* calculates the cummultative sum in array and returns the total sum */ +/* calculates the cummulative sum in array and returns the total sum */ index_t Dudley_Util_cumsum(dim_t N, index_t * array) { index_t out = 0, tmp;