chore: add evalpoly.js

Author: Pranavchiku

lib/node_modules/@stdlib/math/base/special/log10/scripts/evalpoly.js

@@ -0,0 +1,115 @@
+/**
+* @license Apache-2.0
+*
+* Copyright (c) 2018 The Stdlib Authors.
+*
+* Licensed under the Apache License, Version 2.0 (the "License");
+* you may not use this file except in compliance with the License.
+* You may obtain a copy of the License at
+*
+*    http://www.apache.org/licenses/LICENSE-2.0
+*
+* Unless required by applicable law or agreed to in writing, software
+* distributed under the License is distributed on an "AS IS" BASIS,
+* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+* See the License for the specific language governing permissions and
+* limitations under the License.
+*/
+
+/*
+* This script compiles modules for evaluating polynomial functions. If any polynomial coefficients change, this script should be rerun to update the compiled files.
+*/
+'use strict';
+
+// MODULES //
+
+var resolve = require( 'path' ).resolve;
+var readFileSync = require( '@stdlib/fs/read-file' ).sync;
+var writeFileSync = require( '@stdlib/fs/write-file' ).sync;
+var substringBefore = require( '@stdlib/string/substring-before' );
+var substringAfter = require( '@stdlib/string/substring-after' );
+var format = require( '@stdlib/string/format' );
+var compileC = require( '@stdlib/math/base/tools/evalpoly-compile-c' );
+
+
+// VARIABLES //
+
+// Polynomial coefficients ordered in ascending degree...
+var P = [
+	3.999999999940941908e-01, // 3FD99999 9997FA04
+	2.222219843214978396e-01, // 3FCC71C5 1D8E78AF
+	1.531383769920937332e-01  // 3FC39A09 D078C69F
+];
+var Q = [
+	6.666666666666735130e-01, // 3FE55555 55555593
+	2.857142874366239149e-01, // 3FD24924 94229359
+	1.818357216161805012e-01, // 3FC74664 96CB03DE
+	1.479819860511658591e-01  // 3FC2F112 DF3E5244
+];
+
+
+// FUNCTIONS //
+
+/**
+* Inserts a compiled function into file content.
+*
+* @private
+* @param {string} text - source content
+* @param {string} id - function identifier
+* @param {string} str - function string
+* @returns {string} updated content
+*/
+function insert( text, id, str ) {
+	var before;
+	var after;
+	var begin;
+	var end;
+
+	begin = '// BEGIN: '+id;
+	end = '// END: '+id;
+
+	before = substringBefore( text, begin );
+	after = substringAfter( text, end );
+
+	return format( '%s// BEGIN: %s\n\n%s\n%s%s', before, id, str, end, after );
+}
+
+
+// MAIN //
+
+/**
+* Main execution sequence.
+*
+* @private
+*/
+function main() {
+	var fpath;
+	var copts;
+	var opts;
+	var file;
+	var str;
+
+	opts = {
+		'encoding': 'utf8'
+	};
+
+	copts = {
+		'dtype': 'double',
+		'name': ''
+	};
+
+	fpath = resolve( __dirname, '..', 'src', 'main.c' );
+	file = readFileSync( fpath, opts );
+
+	copts.name = 'polyval_p';
+	str = compileC( P, copts );
+	file = insert( file, copts.name, str );
+
+	copts.name = 'polyval_q';
+	str = compileC( Q, copts );
+	file = insert( file, copts.name, str );
+
+	writeFileSync( fpath, file, opts );
+}
+
+main();