mercurylang/mercury
1
0
Fork 0
mirror of https://github.com/Mercury-Language/mercury.git synced 2025-12-14 05:12:33 +00:00
Code Issues Projects Releases Wiki Activity

Place various bits of sample code in the public domain.

Browse Source 
Estimated hours taken: 0.1

Place various bits of sample code in the public domain.

extras/complex_numbers/samples/fft.m:
extras/graphics/samples/calc/calc.m:
extras/graphics/samples/maze/maze.m:
samples/ultra_sub.m:
	place the source in the public domain.
This commit is contained in:
Thomas Conway
1997-09-11 22:08:56 +00:00
parent 41a6b21783
commit 8d79000cf8
4 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
extras/complex_numbers/samples/fft.m
View File

@@ -4,6 +4,8 @@
% main author: conway. % main author: conway.
% data: August 1996 % data: August 1996
% %
% This source file is hereby placed in the public domain. -conway (the author).
%
% This module provides a predicate for performing the Fast Fourier Transfrom % This module provides a predicate for performing the Fast Fourier Transfrom
% (fft) on a list of complex numbers. The list must be a power of 2 in length % (fft) on a list of complex numbers. The list must be a power of 2 in length
% (ie 4, 8, 16, ... elements). % (ie 4, 8, 16, ... elements).

7
extras/graphics/samples/calc/calc.m
View File

@@ -1,13 +1,10 @@
%-----------------------------------------------------------------------------% %-----------------------------------------------------------------------------%
% Copyright (C) 1997 The University of Melbourne.
% This file may only be copied under the terms of the GNU Library General
% Public License - see the file COPYING.LIB in the Mercury distribution.
%-----------------------------------------------------------------------------%
%-----------------------------------------------------------------------------%
% %
% file: calc.m % file: calc.m
% main author: conway. % main author: conway.
% %
% This source file is hereby placed in the public domain. -conway (the author).
%
% A simple Tcl/Tk based calculator. % A simple Tcl/Tk based calculator.
% %
%-----------------------------------------------------------------------------% %-----------------------------------------------------------------------------%

2
extras/graphics/samples/maze/maze.m
View File

@@ -2,6 +2,8 @@
% file: maze.m % file: maze.m
% author: conway, June 1997 % author: conway, June 1997
% %
% This source file is hereby placed in the public domain. -conway (the author).
%
% maze is a 2D maze generator. It uses a 'perfect' algorithm that was posted % maze is a 2D maze generator. It uses a 'perfect' algorithm that was posted
% to rec.games.programmer by Kent Quirk. The algorithm is 'perfect' in the % to rec.games.programmer by Kent Quirk. The algorithm is 'perfect' in the
% sense that there is a single path between any two cells in the maze; every % sense that there is a single path between any two cells in the maze; every

2
samples/ultra_sub.m
View File

@@ -3,6 +3,8 @@
% file: ultra_sub.m % file: ultra_sub.m
% author: conway. % author: conway.
% %
% This source file is hereby placed in the public domain. -conway (the author).
%
% 'ultra_sub' is an extended version of zs' 'sub' command. The idea is that % 'ultra_sub' is an extended version of zs' 'sub' command. The idea is that
% it takes a pattern, a template and some strings, and matches the strings % it takes a pattern, a template and some strings, and matches the strings
% against the patter, binding some variables in the process. Then it % against the patter, binding some variables in the process. Then it