basp basp1

To remove a submodule you need to:

Integer Hash Function

Thomas Wang, Jan 1997

last update Mar 2007

	local enummt = {
	__index = function(table, key)
	if rawget(table.enums, key) then
	return key
	end
	end
	}

	local function Enum(t)
	local e = { enums = t }

	function varargout = crspline_curve(varargin)
	%CRSPLINE_CURVE Конструирует двумерную кривую кубическим Catmull-Rom интерполяционным сплайном
	%
	% Описание:
	% Функция конструирует двумерную кривую по узловым точкам, используя
	% Catmull-Rom интерполяционные кубические сплайны.
	% Данные сплайны могут локально контролироваться и проходят по
	% узловым точкам, а не в выпуклой их оболочке.
	%
	% Литература:

	! quicksort.f --f90--
	! Author: t-nissie
	! License: GPLv3
	! Gist: https://gist.github.com/t-nissie/479f0f16966925fa29ea
	!!
	recursive subroutine quicksort(a, first, last)
	implicit none
	real8 a(), x, t
	integer first, last
	integer i, j