From b8e89a384896a4f8ce3e1990a10c88e7164af55c Mon Sep 17 00:00:00 2001 From: Karim Barkati <karimbarkati@gmail.com> Date: Tue, 27 Aug 2013 19:10:10 +0200 Subject: [PATCH] Install, Readme and Changes files updated. Documentation removed. --- Changes.txt | 4 + INSTALL => INSTALL.txt | 10 +- README => README.txt | 22 +- documentation/Faustexp.html | 97 --- documentation/Interpreter.html | 121 ---- documentation/Lexer.html | 32 - documentation/Main.html | 85 --- documentation/Parser.html | 112 --- documentation/Preprocess.html | 32 - documentation/Signal.html | 175 ----- documentation/Types.html | 329 --------- documentation/Value.html | 193 ----- documentation/code_VALFaustexp.d_merge.html | 23 - documentation/code_VALFaustexp.d_par.html | 20 - documentation/code_VALFaustexp.d_rec.html | 23 - documentation/code_VALFaustexp.d_seq.html | 20 - documentation/code_VALFaustexp.d_split.html | 23 - documentation/code_VALFaustexp.delay.html | 56 -- documentation/code_VALFaustexp.dim.html | 68 -- .../code_VALFaustexp.exp_of_string.html | 20 - documentation/code_VALFaustexp.get_root.html | 22 - documentation/code_VALFaustexp.print_exp.html | 30 - documentation/code_VALFaustexp.subtree.html | 25 - .../code_VALFaustexp.subtree_left.html | 20 - .../code_VALFaustexp.subtree_right.html | 20 - .../code_VALInterpreter.arrange.html | 27 - .../code_VALInterpreter.channels.html | 28 - .../code_VALInterpreter.compute.html | 36 - .../code_VALInterpreter.computing.html | 45 -- documentation/code_VALInterpreter.eval.html | 235 ------- .../code_VALInterpreter.extract_rate.html | 28 - .../code_VALInterpreter.fun_array_to_fun.html | 23 - .../code_VALInterpreter.interpret_const.html | 23 - .../code_VALInterpreter.interpret_ident.html | 100 --- .../code_VALInterpreter.interpreter.html | 37 - ...nterpreter.interpreter_macro_to_value.html | 22 - .../code_VALInterpreter.interpreter_rec.html | 169 ----- .../code_VALInterpreter.make_beam.html | 28 - .../code_VALInterpreter.matrix_transpose.html | 25 - ...ode_VALInterpreter.realise_value_list.html | 36 - .../code_VALInterpreter.sublist.html | 27 - .../code_VALLexer.__ocaml_lex_tables.html | 43 -- .../code_VALLexer.__ocaml_lex_token_rec.html | 109 --- documentation/code_VALLexer.token.html | 109 --- .../code_VALMain.io_macro_to_string.html | 23 - documentation/code_VALMain.main.html | 54 -- .../code_VALMain.read_input_wave.html | 44 -- documentation/code_VALMain.set_GC.html | 27 - .../code_VALMain.write_output_txt.html | 55 -- .../code_VALMain.write_output_wave.html | 47 -- documentation/code_VALParser.main.html | 21 - documentation/code_VALParser.yyact.html | 107 --- documentation/code_VALParser.yycheck.html | 20 - documentation/code_VALParser.yydefred.html | 20 - documentation/code_VALParser.yydgoto.html | 20 - documentation/code_VALParser.yygindex.html | 20 - documentation/code_VALParser.yylen.html | 20 - documentation/code_VALParser.yylhs.html | 20 - .../code_VALParser.yynames_block.html | 20 - .../code_VALParser.yynames_const.html | 20 - documentation/code_VALParser.yyrindex.html | 20 - documentation/code_VALParser.yysindex.html | 20 - documentation/code_VALParser.yytable.html | 20 - documentation/code_VALParser.yytables.html | 36 - documentation/code_VALParser.yytablesize.html | 20 - .../code_VALParser.yytransl_block.html | 23 - .../code_VALParser.yytransl_const.html | 30 - .../code_VALPreprocess.preprocess.html | 20 - .../code_VALSignal.beam_add_one_memory.html | 21 - .../code_VALSignal.check_frequency.html | 23 - documentation/code_VALSignal.frequency.html | 20 - documentation/code_VALSignal.prefix.html | 22 - documentation/code_VALSignal.signal_add.html | 23 - .../code_VALSignal.signal_add_one_memory.html | 22 - .../code_VALSignal.signal_append.html | 31 - documentation/code_VALSignal.signal_atan.html | 22 - .../code_VALSignal.signal_atantwo.html | 22 - ...code_VALSignal.signal_check_frequency.html | 23 - ...ode_VALSignal.signal_check_frequency3.html | 23 - ...ode_VALSignal.signal_check_frequency4.html | 23 - documentation/code_VALSignal.signal_cos.html | 22 - .../code_VALSignal.signal_delay.html | 37 - documentation/code_VALSignal.signal_div.html | 23 - .../code_VALSignal.signal_floor.html | 22 - documentation/code_VALSignal.signal_fun.html | 20 - documentation/code_VALSignal.signal_get.html | 40 -- documentation/code_VALSignal.signal_inf.html | 23 - documentation/code_VALSignal.signal_int.html | 22 - .../code_VALSignal.signal_macro_to_int.html | 21 - documentation/code_VALSignal.signal_mem.html | 20 - documentation/code_VALSignal.signal_mod.html | 23 - documentation/code_VALSignal.signal_mul.html | 23 - documentation/code_VALSignal.signal_neg.html | 22 - documentation/code_VALSignal.signal_nth.html | 40 -- .../code_VALSignal.signal_prefix.html | 26 - .../code_VALSignal.signal_rdtable.html | 32 - .../code_VALSignal.signal_select2.html | 27 - .../code_VALSignal.signal_select3.html | 28 - .../code_VALSignal.signal_serialize.html | 38 - documentation/code_VALSignal.signal_sin.html | 22 - documentation/code_VALSignal.signal_sqrt.html | 22 - documentation/code_VALSignal.signal_sub.html | 20 - documentation/code_VALSignal.signal_sup.html | 23 - .../code_VALSignal.signal_vectorize.html | 30 - .../code_VALTypes.symbol_of_string.html | 48 -- .../code_VALValue.( _star__tilde_ ).html | 20 - .../code_VALValue.(_minus__tilde_).html | 20 - .../code_VALValue.(_plus__tilde_).html | 20 - .../code_VALValue.(_slash__tilde_).html | 20 - .../code_VALValue.convert_back_R.html | 30 - .../code_VALValue.factory_add_memory.html | 34 - documentation/code_VALValue.fail.html | 20 - documentation/code_VALValue.make_vector.html | 25 - documentation/code_VALValue.normalize.html | 37 - .../code_VALValue.print_value_list.html | 28 - documentation/code_VALValue.return_N.html | 20 - documentation/code_VALValue.return_R.html | 20 - documentation/code_VALValue.return_Vec.html | 20 - .../code_VALValue.string_of_value.html | 25 - documentation/code_VALValue.take_off_N.html | 28 - documentation/code_VALValue.take_off_R.html | 27 - documentation/code_VALValue.v_add.html | 58 -- documentation/code_VALValue.v_atan.html | 25 - documentation/code_VALValue.v_atantwo.html | 44 -- documentation/code_VALValue.v_cos.html | 25 - documentation/code_VALValue.v_div.html | 20 - documentation/code_VALValue.v_floor.html | 25 - documentation/code_VALValue.v_inf.html | 20 - documentation/code_VALValue.v_int.html | 25 - .../code_VALValue.v_larger_than_zero.html | 25 - .../code_VALValue.v_list_memory.html | 20 - documentation/code_VALValue.v_memory.html | 38 - documentation/code_VALValue.v_mod.html | 55 -- documentation/code_VALValue.v_mul.html | 69 -- documentation/code_VALValue.v_neg.html | 25 - documentation/code_VALValue.v_recip.html | 25 - documentation/code_VALValue.v_sin.html | 25 - documentation/code_VALValue.v_sqrt.html | 29 - documentation/code_VALValue.v_sub.html | 20 - documentation/code_VALValue.v_sup.html | 20 - documentation/code_VALValue.v_zero.html | 25 - .../code_VALValue.value_macro_to_int.html | 23 - .../code_VALValue.value_macro_to_value.html | 20 - documentation/index.html | 63 -- documentation/index_attributes.html | 25 - documentation/index_class_types.html | 25 - documentation/index_classes.html | 25 - documentation/index_exceptions.html | 69 -- documentation/index_methods.html | 25 - documentation/index_module_types.html | 25 - documentation/index_modules.html | 74 -- documentation/index_types.html | 66 -- documentation/index_values.html | 657 ------------------ documentation/style.css | 34 - documentation/type_Faustexp.html | 20 - documentation/type_Interpreter.html | 20 - documentation/type_Lexer.html | 20 - documentation/type_Main.html | 20 - documentation/type_Parser.html | 20 - documentation/type_Preprocess.html | 20 - documentation/type_Signal.html | 20 - documentation/type_Types.html | 20 - documentation/type_Value.html | 20 - 163 files changed, 17 insertions(+), 6714 deletions(-) create mode 100644 Changes.txt rename INSTALL => INSTALL.txt (82%) rename README => README.txt (69%) delete mode 100644 documentation/Faustexp.html delete mode 100644 documentation/Interpreter.html delete mode 100644 documentation/Lexer.html delete mode 100644 documentation/Main.html delete mode 100644 documentation/Parser.html delete mode 100644 documentation/Preprocess.html delete mode 100644 documentation/Signal.html delete mode 100644 documentation/Types.html delete mode 100644 documentation/Value.html delete mode 100644 documentation/code_VALFaustexp.d_merge.html delete mode 100644 documentation/code_VALFaustexp.d_par.html delete mode 100644 documentation/code_VALFaustexp.d_rec.html delete mode 100644 documentation/code_VALFaustexp.d_seq.html delete mode 100644 documentation/code_VALFaustexp.d_split.html delete mode 100644 documentation/code_VALFaustexp.delay.html delete mode 100644 documentation/code_VALFaustexp.dim.html delete mode 100644 documentation/code_VALFaustexp.exp_of_string.html delete mode 100644 documentation/code_VALFaustexp.get_root.html delete mode 100644 documentation/code_VALFaustexp.print_exp.html delete mode 100644 documentation/code_VALFaustexp.subtree.html delete mode 100644 documentation/code_VALFaustexp.subtree_left.html delete mode 100644 documentation/code_VALFaustexp.subtree_right.html delete mode 100644 documentation/code_VALInterpreter.arrange.html delete mode 100644 documentation/code_VALInterpreter.channels.html delete mode 100644 documentation/code_VALInterpreter.compute.html delete mode 100644 documentation/code_VALInterpreter.computing.html delete mode 100644 documentation/code_VALInterpreter.eval.html delete mode 100644 documentation/code_VALInterpreter.extract_rate.html delete mode 100644 documentation/code_VALInterpreter.fun_array_to_fun.html delete mode 100644 documentation/code_VALInterpreter.interpret_const.html delete mode 100644 documentation/code_VALInterpreter.interpret_ident.html delete mode 100644 documentation/code_VALInterpreter.interpreter.html delete mode 100644 documentation/code_VALInterpreter.interpreter_macro_to_value.html delete mode 100644 documentation/code_VALInterpreter.interpreter_rec.html delete mode 100644 documentation/code_VALInterpreter.make_beam.html delete mode 100644 documentation/code_VALInterpreter.matrix_transpose.html delete mode 100644 documentation/code_VALInterpreter.realise_value_list.html delete mode 100644 documentation/code_VALInterpreter.sublist.html delete mode 100644 documentation/code_VALLexer.__ocaml_lex_tables.html delete mode 100644 documentation/code_VALLexer.__ocaml_lex_token_rec.html delete mode 100644 documentation/code_VALLexer.token.html delete mode 100644 documentation/code_VALMain.io_macro_to_string.html delete mode 100644 documentation/code_VALMain.main.html delete mode 100644 documentation/code_VALMain.read_input_wave.html delete mode 100644 documentation/code_VALMain.set_GC.html delete mode 100644 documentation/code_VALMain.write_output_txt.html delete mode 100644 documentation/code_VALMain.write_output_wave.html delete mode 100644 documentation/code_VALParser.main.html delete mode 100644 documentation/code_VALParser.yyact.html delete mode 100644 documentation/code_VALParser.yycheck.html delete mode 100644 documentation/code_VALParser.yydefred.html delete mode 100644 documentation/code_VALParser.yydgoto.html delete mode 100644 documentation/code_VALParser.yygindex.html delete mode 100644 documentation/code_VALParser.yylen.html delete mode 100644 documentation/code_VALParser.yylhs.html delete mode 100644 documentation/code_VALParser.yynames_block.html delete mode 100644 documentation/code_VALParser.yynames_const.html delete mode 100644 documentation/code_VALParser.yyrindex.html delete mode 100644 documentation/code_VALParser.yysindex.html delete mode 100644 documentation/code_VALParser.yytable.html delete mode 100644 documentation/code_VALParser.yytables.html delete mode 100644 documentation/code_VALParser.yytablesize.html delete mode 100644 documentation/code_VALParser.yytransl_block.html delete mode 100644 documentation/code_VALParser.yytransl_const.html delete mode 100644 documentation/code_VALPreprocess.preprocess.html delete mode 100644 documentation/code_VALSignal.beam_add_one_memory.html delete mode 100644 documentation/code_VALSignal.check_frequency.html delete mode 100644 documentation/code_VALSignal.frequency.html delete mode 100644 documentation/code_VALSignal.prefix.html delete mode 100644 documentation/code_VALSignal.signal_add.html delete mode 100644 documentation/code_VALSignal.signal_add_one_memory.html delete mode 100644 documentation/code_VALSignal.signal_append.html delete mode 100644 documentation/code_VALSignal.signal_atan.html delete mode 100644 documentation/code_VALSignal.signal_atantwo.html delete mode 100644 documentation/code_VALSignal.signal_check_frequency.html delete mode 100644 documentation/code_VALSignal.signal_check_frequency3.html delete mode 100644 documentation/code_VALSignal.signal_check_frequency4.html delete mode 100644 documentation/code_VALSignal.signal_cos.html delete mode 100644 documentation/code_VALSignal.signal_delay.html delete mode 100644 documentation/code_VALSignal.signal_div.html delete mode 100644 documentation/code_VALSignal.signal_floor.html delete mode 100644 documentation/code_VALSignal.signal_fun.html delete mode 100644 documentation/code_VALSignal.signal_get.html delete mode 100644 documentation/code_VALSignal.signal_inf.html delete mode 100644 documentation/code_VALSignal.signal_int.html delete mode 100644 documentation/code_VALSignal.signal_macro_to_int.html delete mode 100644 documentation/code_VALSignal.signal_mem.html delete mode 100644 documentation/code_VALSignal.signal_mod.html delete mode 100644 documentation/code_VALSignal.signal_mul.html delete mode 100644 documentation/code_VALSignal.signal_neg.html delete mode 100644 documentation/code_VALSignal.signal_nth.html delete mode 100644 documentation/code_VALSignal.signal_prefix.html delete mode 100644 documentation/code_VALSignal.signal_rdtable.html delete mode 100644 documentation/code_VALSignal.signal_select2.html delete mode 100644 documentation/code_VALSignal.signal_select3.html delete mode 100644 documentation/code_VALSignal.signal_serialize.html delete mode 100644 documentation/code_VALSignal.signal_sin.html delete mode 100644 documentation/code_VALSignal.signal_sqrt.html delete mode 100644 documentation/code_VALSignal.signal_sub.html delete mode 100644 documentation/code_VALSignal.signal_sup.html delete mode 100644 documentation/code_VALSignal.signal_vectorize.html delete mode 100644 documentation/code_VALTypes.symbol_of_string.html delete mode 100644 documentation/code_VALValue.( _star__tilde_ ).html delete mode 100644 documentation/code_VALValue.(_minus__tilde_).html delete mode 100644 documentation/code_VALValue.(_plus__tilde_).html delete mode 100644 documentation/code_VALValue.(_slash__tilde_).html delete mode 100644 documentation/code_VALValue.convert_back_R.html delete mode 100644 documentation/code_VALValue.factory_add_memory.html delete mode 100644 documentation/code_VALValue.fail.html delete mode 100644 documentation/code_VALValue.make_vector.html delete mode 100644 documentation/code_VALValue.normalize.html delete mode 100644 documentation/code_VALValue.print_value_list.html delete mode 100644 documentation/code_VALValue.return_N.html delete mode 100644 documentation/code_VALValue.return_R.html delete mode 100644 documentation/code_VALValue.return_Vec.html delete mode 100644 documentation/code_VALValue.string_of_value.html delete mode 100644 documentation/code_VALValue.take_off_N.html delete mode 100644 documentation/code_VALValue.take_off_R.html delete mode 100644 documentation/code_VALValue.v_add.html delete mode 100644 documentation/code_VALValue.v_atan.html delete mode 100644 documentation/code_VALValue.v_atantwo.html delete mode 100644 documentation/code_VALValue.v_cos.html delete mode 100644 documentation/code_VALValue.v_div.html delete mode 100644 documentation/code_VALValue.v_floor.html delete mode 100644 documentation/code_VALValue.v_inf.html delete mode 100644 documentation/code_VALValue.v_int.html delete mode 100644 documentation/code_VALValue.v_larger_than_zero.html delete mode 100644 documentation/code_VALValue.v_list_memory.html delete mode 100644 documentation/code_VALValue.v_memory.html delete mode 100644 documentation/code_VALValue.v_mod.html delete mode 100644 documentation/code_VALValue.v_mul.html delete mode 100644 documentation/code_VALValue.v_neg.html delete mode 100644 documentation/code_VALValue.v_recip.html delete mode 100644 documentation/code_VALValue.v_sin.html delete mode 100644 documentation/code_VALValue.v_sqrt.html delete mode 100644 documentation/code_VALValue.v_sub.html delete mode 100644 documentation/code_VALValue.v_sup.html delete mode 100644 documentation/code_VALValue.v_zero.html delete mode 100644 documentation/code_VALValue.value_macro_to_int.html delete mode 100644 documentation/code_VALValue.value_macro_to_value.html delete mode 100644 documentation/index.html delete mode 100644 documentation/index_attributes.html delete mode 100644 documentation/index_class_types.html delete mode 100644 documentation/index_classes.html delete mode 100644 documentation/index_exceptions.html delete mode 100644 documentation/index_methods.html delete mode 100644 documentation/index_module_types.html delete mode 100644 documentation/index_modules.html delete mode 100644 documentation/index_types.html delete mode 100644 documentation/index_values.html delete mode 100644 documentation/style.css delete mode 100644 documentation/type_Faustexp.html delete mode 100644 documentation/type_Interpreter.html delete mode 100644 documentation/type_Lexer.html delete mode 100644 documentation/type_Main.html delete mode 100644 documentation/type_Parser.html delete mode 100644 documentation/type_Preprocess.html delete mode 100644 documentation/type_Signal.html delete mode 100644 documentation/type_Types.html delete mode 100644 documentation/type_Value.html diff --git a/Changes.txt b/Changes.txt new file mode 100644 index 0000000..abf42e7 --- /dev/null +++ b/Changes.txt @@ -0,0 +1,4 @@ +Faustine 0.01: +-------------- + +* First internal release. diff --git a/INSTALL b/INSTALL.txt similarity index 82% rename from INSTALL rename to INSTALL.txt index 15636c0..692d4fb 100644 --- a/INSTALL +++ b/INSTALL.txt @@ -5,7 +5,6 @@ Installing Faustine on a Unix machine PREREQUISITES ------------- -* Faust is needed (tested version: 0.9.44). * OCaml is needed (tested version: 4.00.1). * The external "libsndfile-ocaml" OCaml module is needed. * The GNU C compiler gcc is recommended. @@ -24,15 +23,16 @@ INSTALLATION INSTRUCTIONS This generates the configuration file "Makefile". You will be asked for include paths: -* OCaml path -* libsndfile-ocaml path +* your OCaml path +* your libsndfile-ocaml path 2- From the top directory, do: make -This builds Faustine interpreter and Faust compiler for the first time. +This builds Faustine interpreter (and an adhoc Faust multirate preprocessor) +for the first time. This phase is fairly verbose; consider redirecting the output to a file: make > makelog.txt @@ -46,4 +46,4 @@ the newly created interpreter. From the top directory, do: --- Karim Barkati and Haisheng Wang, 2013 \ No newline at end of file +-- Karim Barkati and Haisheng Wang, 2013 diff --git a/README b/README.txt similarity index 69% rename from README rename to README.txt index 42a0b56..b0ff5d1 100644 --- a/README +++ b/README.txt @@ -24,22 +24,16 @@ Yann Orlarey, 2009: CONTENTS -------- - Changes what's new with each release + Changes.txt what's new with each release INSTALL instructions for installation LICENSE license and copyright notice - Makefile main Makefile + Makefile main Makefile generated by configure + Makefile.in main Makefile body README this file - config/ autoconfiguration stuff - emacs/ OCaml editing mode and debugger interface for GNU Emacs - lex/ lexer generator - otherlibs/ several external libraries - parsing/ syntax analysis - stdlib/ standard library - tools/ various utilities - toplevel/ interactive system - typing/ typechecking - utils/ utility libraries - yacc/ parser generator + configure configuration script + examples/ vector examples (fft, image processing...) + interpretor/ Faustine's interpretor source code + libs/ external libraries INSTALLATION @@ -74,4 +68,4 @@ Emacs Info files. It is available on the World Wide Web, at --- Karim Barkati and Haisheng Wang, 2013 \ No newline at end of file +-- Karim Barkati and Haisheng Wang, 2013 diff --git a/documentation/Faustexp.html b/documentation/Faustexp.html deleted file mode 100644 index f5cada9..0000000 --- a/documentation/Faustexp.html +++ /dev/null @@ -1,97 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="previous" href="Signal.html"> -<link rel="next" href="Interpreter.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp</title> -</head> -<body> -<div class="navbar"><a href="Signal.html">Previous</a> - <a href="index.html">Up</a> - <a href="Interpreter.html">Next</a> -</div> -<center><h1>Module <a href="type_Faustexp.html">Faustexp</a></h1></center> -<br> -<pre><span class="keyword">module</span> Faustexp: <code class="code">sig</code> <a href="Faustexp.html">..</a> <code class="code">end</code></pre>Module: Faustexp - Description: dimension estimation and delay estimation of faust expressions.<br> -<b>Author(s):</b> WANG Haisheng - Created: 03/06/2013 Modified: 04/06/2013<br> -<hr width="100%"> -<pre><span id="EXCEPTIONBeam_Matching_Error"><span class="keyword">exception</span> Beam_Matching_Error</span> <span class="keyword">of</span> <code class="type">string</code></pre> -<div class="info"> -Exception raised in beam matching of faust expressions.<br> -</div> -<pre><span id="EXCEPTIONNotYetDone"><span class="keyword">exception</span> NotYetDone</span></pre> -<div class="info"> -Exception raised in case that the branch under call hasn't yet been programed.<br> -</div> -<pre><span id="VALdelay"><span class="keyword">val</span> <a href="code_VALFaustexp.delay.html">delay</a></span> : <code class="type"><a href="Types.html#TYPEfaust_exp">Types.faust_exp</a> -> int</code></pre><div class="info"> -val delay : faust_exp -> int, returns the number of delays estimated staticly. -Attention: delays of "@" is estimated as 10 constant, -delays of "vectorize" and "serialize" haven't been implemented, -delays of "rdtable" hasn't been implemented.<br> -</div> -<pre><span id="VALexp_of_string"><span class="keyword">val</span> <a href="code_VALFaustexp.exp_of_string.html">exp_of_string</a></span> : <code class="type">string -> <a href="Types.html#TYPEfaust_exp">Types.faust_exp</a></code></pre><div class="info"> -val exp_of_string : string -> faust_exp, faust expression parser.<br> -</div> -<pre><span id="VALget_root"><span class="keyword">val</span> <a href="code_VALFaustexp.get_root.html">get_root</a></span> : <code class="type"><a href="Types.html#TYPEdimension">Types.dimension</a> -> int * int</code></pre><div class="info"> -val get_root : dimension -> int * int, returns the root of dimension tree.<br> -</div> -<pre><span id="VALsubtree"><span class="keyword">val</span> <a href="code_VALFaustexp.subtree.html">subtree</a></span> : <code class="type"><a href="Types.html#TYPEdimension">Types.dimension</a> -> int -> <a href="Types.html#TYPEdimension">Types.dimension</a></code></pre><div class="info"> -val subtree : dimention -> int -> dimension, returns a subtree of dimension tree.<br> -</div> -<pre><span id="VALsubtree_left"><span class="keyword">val</span> <a href="code_VALFaustexp.subtree_left.html">subtree_left</a></span> : <code class="type"><a href="Types.html#TYPEdimension">Types.dimension</a> -> <a href="Types.html#TYPEdimension">Types.dimension</a></code></pre><div class="info"> -val subtree_left : dimension -> dimension, returns the left subtree of dimension tree.<br> -</div> -<pre><span id="VALsubtree_right"><span class="keyword">val</span> <a href="code_VALFaustexp.subtree_right.html">subtree_right</a></span> : <code class="type"><a href="Types.html#TYPEdimension">Types.dimension</a> -> <a href="Types.html#TYPEdimension">Types.dimension</a></code></pre><div class="info"> -val subtree_right : dimension -> dimension, returns the right subtree of dimension tree.<br> -</div> -<pre><span id="VALd_par"><span class="keyword">val</span> <a href="code_VALFaustexp.d_par.html">d_par</a></span> : <code class="type">int * int -> int * int -> int * int</code></pre><div class="info"> -val d_par : int * int -> int * int -> int * int, process dimension for constructor "par(,)", -which is the addition of two dimensions.<br> -</div> -<pre><span id="VALd_seq"><span class="keyword">val</span> <a href="code_VALFaustexp.d_seq.html">d_seq</a></span> : <code class="type">'a * 'b -> 'b * 'c -> 'a * 'c</code></pre><div class="info"> -val d_seq : int * int -> int * int -> int * int, process dimension for constructor "seq(:)", -which is (size of input beam of first exp, size of output beam of second exp) -along with beam matching.<br> -</div> -<pre><span id="VALd_split"><span class="keyword">val</span> <a href="code_VALFaustexp.d_split.html">d_split</a></span> : <code class="type">'a * int -> int * 'b -> 'a * 'b</code></pre><div class="info"> -val d_split : int * int -> int * int -> int * int, process dimension for constructor "split(<:)", -which is (size of input beam of first exp, size of output beam of second exp) -along with beam matching.<br> -</div> -<pre><span id="VALd_merge"><span class="keyword">val</span> <a href="code_VALFaustexp.d_merge.html">d_merge</a></span> : <code class="type">'a * int -> int * 'b -> 'a * 'b</code></pre><div class="info"> -val d_merge : int * int -> int * int -> int * int, process dimension for constructor "merge(:>)", -which is (size of input beam of first exp, size of output beam of second exp) -along with beam matching.<br> -</div> -<pre><span id="VALd_rec"><span class="keyword">val</span> <a href="code_VALFaustexp.d_rec.html">d_rec</a></span> : <code class="type">int * 'a -> 'a * int -> int * 'a</code></pre><div class="info"> -val d_rec : int * int -> int * int -> int * int, process dimension for constructor "rec(~)", -which is (size of input beam of first exp - size of output beam of second exp, -size of output beam of first exp) -along with beam matching.<br> -</div> -<pre><span id="VALdim"><span class="keyword">val</span> <a href="code_VALFaustexp.dim.html">dim</a></span> : <code class="type"><a href="Types.html#TYPEfaust_exp">Types.faust_exp</a> -> <a href="Types.html#TYPEdimension">Types.dimension</a></code></pre><div class="info"> -val dim : faust_exp -> int * int, returns dimension for faust expression, -along with beam matching.<br> -</div> -<pre><span id="VALprint_exp"><span class="keyword">val</span> <a href="code_VALFaustexp.print_exp.html">print_exp</a></span> : <code class="type"><a href="Types.html#TYPEfaust_exp">Types.faust_exp</a> -> unit</code></pre><div class="info"> -val print_exp : faust_exp -> unit, print to console the input faust expression.<br> -</div> -</body></html> \ No newline at end of file diff --git a/documentation/Interpreter.html b/documentation/Interpreter.html deleted file mode 100644 index 973e7ae..0000000 --- a/documentation/Interpreter.html +++ /dev/null @@ -1,121 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="previous" href="Faustexp.html"> -<link rel="next" href="Preprocess.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter</title> -</head> -<body> -<div class="navbar"><a href="Faustexp.html">Previous</a> - <a href="index.html">Up</a> - <a href="Preprocess.html">Next</a> -</div> -<center><h1>Module <a href="type_Interpreter.html">Interpreter</a></h1></center> -<br> -<pre><span class="keyword">module</span> Interpreter: <code class="code">sig</code> <a href="Interpreter.html">..</a> <code class="code">end</code></pre>Module: Interpreter - Description: input beam -> process -> output beam<br> -<b>Author(s):</b> WANG Haisheng - Created: 15/05/2013 Modified: 04/06/2013<br> -<hr width="100%"> -<pre><span id="EXCEPTIONEvaluation_Error"><span class="keyword">exception</span> Evaluation_Error</span> <span class="keyword">of</span> <code class="type">string</code></pre> -<div class="info"> -Exception raised during interpretation of faust process.<br> -</div> -<br><code><span id="TYPEinterpreter_macro"><span class="keyword">type</span> <code class="type"></code>interpreter_macro</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Number_samples_int</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Max_Eval_Time_int</span></code></td> - -</tr></table> - -<div class="info"> -Macro constants of this file.<br> -</div> - -<pre><span id="VALinterpreter_macro_to_value"><span class="keyword">val</span> <a href="code_VALInterpreter.interpreter_macro_to_value.html">interpreter_macro_to_value</a></span> : <code class="type"><a href="Interpreter.html#TYPEinterpreter_macro">interpreter_macro</a> -> int</code></pre><div class="info"> -val interpreter_macro_to_value : returns the value associated with the macro.<br> -</div> -<pre><span id="VALfun_array_to_fun"><span class="keyword">val</span> <a href="code_VALInterpreter.fun_array_to_fun.html">fun_array_to_fun</a></span> : <code class="type">('a -> 'b) array -> 'a -> 'b array</code></pre><div class="info"> -val func_of_func_array : (int -> value) array -> (int -> value array), -applies the same int parameter to each element of function array, -produces a value array.<br> -</div> -<pre><span id="VALcomputing"><span class="keyword">val</span> <a href="code_VALInterpreter.computing.html">computing</a></span> : <code class="type">(int -> <a href="Types.html#TYPEvalue">Types.value</a> array) -> int -> int -> float array array array</code></pre><div class="info"> -val computing : (int -> value array) -> int -> int -> float array array array, -applies time sequence "0,1,2,3,...,max" to signal beam, -returns primitive output data.<br> -</div> -<pre><span id="VALmatrix_transpose"><span class="keyword">val</span> <a href="code_VALInterpreter.matrix_transpose.html">matrix_transpose</a></span> : <code class="type">'a array array -> int -> 'a array array</code></pre><div class="info"> -val matrix_transpose : 'a array array -> 'a array array, -transposes the input matrix.<br> -</div> -<pre><span id="VALchannels"><span class="keyword">val</span> <a href="code_VALInterpreter.channels.html">channels</a></span> : <code class="type">'a array array array -> int -> int array</code></pre><div class="info"> -val channels : 'a array array array -> int -> int array, -returns an array of number of channels.<br> -</div> -<pre><span id="VALarrange"><span class="keyword">val</span> <a href="code_VALInterpreter.arrange.html">arrange</a></span> : <code class="type">'a array array array -> int -> 'a array list</code></pre><div class="info"> -val arrange : 'a array array array -> int -> 'a array list, -arranges the output data in "array list" form.<br> -</div> -<pre><span id="VALcompute"><span class="keyword">val</span> <a href="code_VALInterpreter.compute.html">compute</a></span> : <code class="type">(int -> <a href="Types.html#TYPEvalue">Types.value</a>) list -> int list * float array list</code></pre><div class="info"> -val compute : (int -> value) list -> (int list) * (float array list). -input: a list of signal functions -output: channel number list, data list.<br> -</div> -<pre><span id="VALsublist"><span class="keyword">val</span> <a href="code_VALInterpreter.sublist.html">sublist</a></span> : <code class="type">'a list -> int -> int -> 'a list</code></pre><div class="info"> -val sublist : 'a list -> int -> int -> 'a list, -<code class="code">sublist l start length</code>, returns the sublist of list 'l', -from index 'start', with length 'length'.<br> -</div> -<pre><span id="VALmake_beam"><span class="keyword">val</span> <a href="code_VALInterpreter.make_beam.html">make_beam</a></span> : <code class="type">'a list * float array list -> ('a * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)) list</code></pre><div class="info"> -val make_beam : (int list) * (float array list) -> (int * (int -> value)) list, -input: (sample rate list, data list) -output: beam = (sample rate, function) list<br> -</div> -<pre><span id="VALinterpret_const"><span class="keyword">val</span> <a href="code_VALInterpreter.interpret_const.html">interpret_const</a></span> : <code class="type">'a -> 'b list -> (int * ('c -> 'a)) list</code></pre><div class="info"> -val interpret_const : value -> beam -> beam, generates constant signal with frequency 0.<br> -</div> -<pre><span id="VALinterpret_ident"><span class="keyword">val</span> <a href="code_VALInterpreter.interpret_ident.html">interpret_ident</a></span> : <code class="type"><a href="Types.html#TYPEsymbol">Types.symbol</a> -><br> (int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)) list -> (int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)) list</code></pre><div class="info"> -val interpret_ident : string -> beam -> beam, -generates signals according to identified symbols.<br> -</div> -<pre><span id="VALeval"><span class="keyword">val</span> <a href="code_VALInterpreter.eval.html">eval</a></span> : <code class="type"><a href="Types.html#TYPEfaust_exp">Types.faust_exp</a> -><br> <a href="Types.html#TYPEdimension">Types.dimension</a> -><br> (int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)) list -> (int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)) list</code></pre><div class="info"> -val rec eval : faust_exp -> beam -> beam, -main interpretation work is done here.<br> -</div> -<pre><span id="VALextract_rate"><span class="keyword">val</span> <a href="code_VALInterpreter.extract_rate.html">extract_rate</a></span> : <code class="type">(int * 'a) list -> int list</code></pre><div class="info"> -val extract_rate : (int * (int -> value)) list -> int list, -gets the sample rate list from beam.<br> -</div> -<pre><span id="VALinterpreter"><span class="keyword">val</span> <a href="code_VALInterpreter.interpreter.html">interpreter</a></span> : <code class="type"><a href="Types.html#TYPEfaust_exp">Types.faust_exp</a> -><br> int list * float array list -> int list * int list * float array list</code></pre><div class="info"> -val interpreter : faust_exp -> (int list) * (float array list) -> -(int list) * (int list) * (float array list) -input: faust expression, sample rate list * input data list -output: channel list * sample rate list * output data list.<br> -</div> -</body></html> \ No newline at end of file diff --git a/documentation/Lexer.html b/documentation/Lexer.html deleted file mode 100644 index 0f4dafe..0000000 --- a/documentation/Lexer.html +++ /dev/null @@ -1,32 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="previous" href="Parser.html"> -<link rel="next" href="Value.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Lexer</title> -</head> -<body> -<div class="navbar"><a href="Parser.html">Previous</a> - <a href="index.html">Up</a> - <a href="Value.html">Next</a> -</div> -<center><h1>Module <a href="type_Lexer.html">Lexer</a></h1></center> -<br> -<pre><span class="keyword">module</span> Lexer: <code class="code">sig</code> <a href="Lexer.html">..</a> <code class="code">end</code></pre><hr width="100%"> -<pre><span id="VAL__ocaml_lex_tables"><span class="keyword">val</span> <a href="code_VALLexer.__ocaml_lex_tables.html">__ocaml_lex_tables</a></span> : <code class="type">Lexing.lex_tables</code></pre><pre><span id="VALtoken"><span class="keyword">val</span> <a href="code_VALLexer.token.html">token</a></span> : <code class="type">Lexing.lexbuf -> <a href="Parser.html#TYPEtoken">Parser.token</a></code></pre><pre><span id="VAL__ocaml_lex_token_rec"><span class="keyword">val</span> <a href="code_VALLexer.__ocaml_lex_token_rec.html">__ocaml_lex_token_rec</a></span> : <code class="type">Lexing.lexbuf -> int -> <a href="Parser.html#TYPEtoken">Parser.token</a></code></pre></body></html> \ No newline at end of file diff --git a/documentation/Main.html b/documentation/Main.html deleted file mode 100644 index 2dcc24f..0000000 --- a/documentation/Main.html +++ /dev/null @@ -1,85 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="previous" href="Preprocess.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Main</title> -</head> -<body> -<div class="navbar"><a href="Preprocess.html">Previous</a> - <a href="index.html">Up</a> - </div> -<center><h1>Module <a href="type_Main.html">Main</a></h1></center> -<br> -<pre><span class="keyword">module</span> Main: <code class="code">sig</code> <a href="Main.html">..</a> <code class="code">end</code></pre>Module: Interpreter - Description: Input wave -> interpretation -> output wave<br> -<b>Author(s):</b> WANG Haisheng - Created: 15/05/2013 Modified: 04/06/2013<br> -<hr width="100%"> -<pre><span id="EXCEPTIONMissing_Expression"><span class="keyword">exception</span> Missing_Expression</span></pre> -<div class="info"> -Exception raised when no string expression of faust process is typed in console.<br> -</div> -<br><code><span id="TYPEio_macro"><span class="keyword">type</span> <code class="type"></code>io_macro</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Input_Route_string</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Output_Route_string</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Dsp_Route_string</span></code></td> - -</tr></table> - -<div class="info"> -Macro constants of input/output route.<br> -</div> - -<pre><span id="VALio_macro_to_string"><span class="keyword">val</span> <a href="code_VALMain.io_macro_to_string.html">io_macro_to_string</a></span> : <code class="type"><a href="Main.html#TYPEio_macro">io_macro</a> -> string</code></pre><div class="info"> -val io_macro_to_string : io_macro -> string.<br> -</div> -<pre><span id="VALset_GC"><span class="keyword">val</span> <a href="code_VALMain.set_GC.html">set_GC</a></span> : <code class="type">unit -> unit</code></pre><div class="info"> -val set_GC : unit -> unit<br> -</div> -<pre><span id="VALread_input_wave"><span class="keyword">val</span> <a href="code_VALMain.read_input_wave.html">read_input_wave</a></span> : <code class="type">string array -> int list * float array list</code></pre><div class="info"> -val read_input_wave : string array -> int list * float array list - <code class="code">read_input_wave argv</code> gets information from command line, - returns sample rate list and data (in form of float array) list.<br> -</div> -<pre><span id="VALwrite_output_wave"><span class="keyword">val</span> <a href="code_VALMain.write_output_wave.html">write_output_wave</a></span> : <code class="type">int list -> int list -> float array list -> unit</code></pre><div class="info"> -val write_output_wave : int list -> int list -> float_array_list -> unit. - <code class="code">write_output_wave channel_numbers sample_rates data</code><br> -</div> -<pre><span id="VALwrite_output_txt"><span class="keyword">val</span> <a href="code_VALMain.write_output_txt.html">write_output_txt</a></span> : <code class="type">int list -> float array list -> unit</code></pre><br> -val main : unit -> unit -main function reads console input strings (Sys.argv) with -input: string of faust process, input waves in default directory 'input_sounds/' -output: output waves in default directory 'output_sounds/'.<br> -<pre><span id="VALmain"><span class="keyword">val</span> <a href="code_VALMain.main.html">main</a></span> : <code class="type">unit -> unit</code></pre></body></html> \ No newline at end of file diff --git a/documentation/Parser.html b/documentation/Parser.html deleted file mode 100644 index ee0d667..0000000 --- a/documentation/Parser.html +++ /dev/null @@ -1,112 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="previous" href="Types.html"> -<link rel="next" href="Lexer.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser</title> -</head> -<body> -<div class="navbar"><a href="Types.html">Previous</a> - <a href="index.html">Up</a> - <a href="Lexer.html">Next</a> -</div> -<center><h1>Module <a href="type_Parser.html">Parser</a></h1></center> -<br> -<pre><span class="keyword">module</span> Parser: <code class="code">sig</code> <a href="Parser.html">..</a> <code class="code">end</code></pre><hr width="100%"> -<br><code><span id="TYPEtoken"><span class="keyword">type</span> <code class="type"></code>token</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">CONST</span> <span class="keyword">of</span> <code class="type">string</code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">IDENT</span> <span class="keyword">of</span> <code class="type">string</code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">LPAR</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">RPAR</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">SEQ</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">SPLIT</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">MERGE</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">PAR</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">REC</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">EOF</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">POINT</span></code></td> - -</tr></table> - - -<pre><span id="VALyytransl_const"><span class="keyword">val</span> <a href="code_VALParser.yytransl_const.html">yytransl_const</a></span> : <code class="type">int array</code></pre><pre><span id="VALyytransl_block"><span class="keyword">val</span> <a href="code_VALParser.yytransl_block.html">yytransl_block</a></span> : <code class="type">int array</code></pre><pre><span id="VALyylhs"><span class="keyword">val</span> <a href="code_VALParser.yylhs.html">yylhs</a></span> : <code class="type">string</code></pre><pre><span id="VALyylen"><span class="keyword">val</span> <a href="code_VALParser.yylen.html">yylen</a></span> : <code class="type">string</code></pre><pre><span id="VALyydefred"><span class="keyword">val</span> <a href="code_VALParser.yydefred.html">yydefred</a></span> : <code class="type">string</code></pre><pre><span id="VALyydgoto"><span class="keyword">val</span> <a href="code_VALParser.yydgoto.html">yydgoto</a></span> : <code class="type">string</code></pre><pre><span id="VALyysindex"><span class="keyword">val</span> <a href="code_VALParser.yysindex.html">yysindex</a></span> : <code class="type">string</code></pre><pre><span id="VALyyrindex"><span class="keyword">val</span> <a href="code_VALParser.yyrindex.html">yyrindex</a></span> : <code class="type">string</code></pre><pre><span id="VALyygindex"><span class="keyword">val</span> <a href="code_VALParser.yygindex.html">yygindex</a></span> : <code class="type">string</code></pre><pre><span id="VALyytablesize"><span class="keyword">val</span> <a href="code_VALParser.yytablesize.html">yytablesize</a></span> : <code class="type">int</code></pre><pre><span id="VALyytable"><span class="keyword">val</span> <a href="code_VALParser.yytable.html">yytable</a></span> : <code class="type">string</code></pre><pre><span id="VALyycheck"><span class="keyword">val</span> <a href="code_VALParser.yycheck.html">yycheck</a></span> : <code class="type">string</code></pre><pre><span id="VALyynames_const"><span class="keyword">val</span> <a href="code_VALParser.yynames_const.html">yynames_const</a></span> : <code class="type">string</code></pre><pre><span id="VALyynames_block"><span class="keyword">val</span> <a href="code_VALParser.yynames_block.html">yynames_block</a></span> : <code class="type">string</code></pre><pre><span id="VALyyact"><span class="keyword">val</span> <a href="code_VALParser.yyact.html">yyact</a></span> : <code class="type">(Parsing.parser_env -> Obj.t) array</code></pre><pre><span id="VALyytables"><span class="keyword">val</span> <a href="code_VALParser.yytables.html">yytables</a></span> : <code class="type">Parsing.parse_tables</code></pre><pre><span id="VALmain"><span class="keyword">val</span> <a href="code_VALParser.main.html">main</a></span> : <code class="type">(Lexing.lexbuf -> <a href="Parser.html#TYPEtoken">token</a>) -> Lexing.lexbuf -> <a href="Types.html#TYPEfaust_exp">Types.faust_exp</a></code></pre></body></html> \ No newline at end of file diff --git a/documentation/Preprocess.html b/documentation/Preprocess.html deleted file mode 100644 index 62c0cb1..0000000 --- a/documentation/Preprocess.html +++ /dev/null @@ -1,32 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="previous" href="Interpreter.html"> -<link rel="next" href="Main.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Preprocess</title> -</head> -<body> -<div class="navbar"><a href="Interpreter.html">Previous</a> - <a href="index.html">Up</a> - <a href="Main.html">Next</a> -</div> -<center><h1>Module <a href="type_Preprocess.html">Preprocess</a></h1></center> -<br> -<pre><span class="keyword">module</span> Preprocess: <code class="code">sig</code> <a href="Preprocess.html">..</a> <code class="code">end</code></pre><hr width="100%"> -<pre><span id="VALpreprocess"><span class="keyword">val</span> <a href="code_VALPreprocess.preprocess.html">preprocess</a></span> : <code class="type">string -> string</code></pre></body></html> \ No newline at end of file diff --git a/documentation/Signal.html b/documentation/Signal.html deleted file mode 100644 index 164afa5..0000000 --- a/documentation/Signal.html +++ /dev/null @@ -1,175 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="previous" href="Value.html"> -<link rel="next" href="Faustexp.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal</title> -</head> -<body> -<div class="navbar"><a href="Value.html">Previous</a> - <a href="index.html">Up</a> - <a href="Faustexp.html">Next</a> -</div> -<center><h1>Module <a href="type_Signal.html">Signal</a></h1></center> -<br> -<pre><span class="keyword">module</span> Signal: <code class="code">sig</code> <a href="Signal.html">..</a> <code class="code">end</code></pre>Module: Signal - Description: type signal = rate * (int -> value), operations of signals.<br> -<b>Author(s):</b> WANG Haisheng - Created: 03/06/2013 Modified: 03/06/2013<br> -<hr width="100%"> -<pre><span id="EXCEPTIONSignal_operation"><span class="keyword">exception</span> Signal_operation</span> <span class="keyword">of</span> <code class="type">string</code></pre> -<div class="info"> -Exception raised in operations of signals.<br> -</div> -<br><code><span id="TYPEsignal_macro"><span class="keyword">type</span> <code class="type"></code>signal_macro</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Delay_Memory_Length_int</span></code></td> - -</tr></table> - -<div class="info"> -Macro constants of the file.<br> -</div> - -<pre><span id="VALsignal_macro_to_int"><span class="keyword">val</span> <a href="code_VALSignal.signal_macro_to_int.html">signal_macro_to_int</a></span> : <code class="type"><a href="Signal.html#TYPEsignal_macro">signal_macro</a> -> int</code></pre><div class="info"> -val signal_macro_to_int : signal_macro -> int.<br> -</div> -<pre><span id="VALfrequency"><span class="keyword">val</span> <a href="code_VALSignal.frequency.html">frequency</a></span> : <code class="type">'a * 'b -> 'a</code></pre><div class="info"> -val frequency : signal -> int, returns the frequency of a signal.<br> -</div> -<pre><span id="VALsignal_fun"><span class="keyword">val</span> <a href="code_VALSignal.signal_fun.html">signal_fun</a></span> : <code class="type">'a * 'b -> 'b</code></pre><div class="info"> -val signal_fun : signal -> (int -> value), returns the functional part of a signal.<br> -</div> -<pre><span id="VALcheck_frequency"><span class="keyword">val</span> <a href="code_VALSignal.check_frequency.html">check_frequency</a></span> : <code class="type">int -> int -> int</code></pre><div class="info"> -val check_frequency : int -> int -> int, returns the correction of frequency.<br> -</div> -<pre><span id="VALsignal_check_frequency"><span class="keyword">val</span> <a href="code_VALSignal.signal_check_frequency.html">signal_check_frequency</a></span> : <code class="type">int * 'a -> int * 'b -> int</code></pre><div class="info"> -val signal_check_frequency : signal -> signal -> int, -checks the frequencies of two input signals, and returns common frequency or raise an exception.<br> -</div> -<pre><span id="VALsignal_check_frequency3"><span class="keyword">val</span> <a href="code_VALSignal.signal_check_frequency3.html">signal_check_frequency3</a></span> : <code class="type">int * 'a -> int * 'b -> int * 'c -> int</code></pre><div class="info"> -val signal_check_frequency3 : signal -> signal -> signal -> int, -checks the frequencies of three input signal, and returns common frequency or raise an exception.<br> -</div> -<pre><span id="VALsignal_check_frequency4"><span class="keyword">val</span> <a href="code_VALSignal.signal_check_frequency4.html">signal_check_frequency4</a></span> : <code class="type">int * 'a -> int * 'b -> int * 'c -> int * 'd -> int</code></pre><div class="info"> -val signal_check_frequency4 : signal -> signal -> signal -> signal -> int, -checks the frequencies of three input signal, and returns common frequency or raise an exception.<br> -</div> -<pre><span id="VALsignal_add_one_memory"><span class="keyword">val</span> <a href="code_VALSignal.signal_add_one_memory.html">signal_add_one_memory</a></span> : <code class="type">'a * (int -> 'b) -> 'a * (int -> 'b)</code></pre><div class="info"> -val signal_add_one_memory : signal -> signal, -returns the signal with memory of one latest sample.<br> -</div> -<pre><span id="VALbeam_add_one_memory"><span class="keyword">val</span> <a href="code_VALSignal.beam_add_one_memory.html">beam_add_one_memory</a></span> : <code class="type">('a * (int -> 'b)) list -> ('a * (int -> 'b)) list</code></pre><div class="info"> -val beam_add_one_memory : signal list -> signal list, -adds memory of one latest sample for each element in signal list.<br> -</div> -<pre><span id="VALsignal_add"><span class="keyword">val</span> <a href="code_VALSignal.signal_add.html">signal_add</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_add : signal -> signal -> signal, output(t) = input1(t) + input2(t), - frequency consistent.<br> -</div> -<pre><span id="VALsignal_neg"><span class="keyword">val</span> <a href="code_VALSignal.signal_neg.html">signal_neg</a></span> : <code class="type">'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_neg : signal -> signal, output(t) = -input(t), frequency consistent.<br> -</div> -<pre><span id="VALsignal_sub"><span class="keyword">val</span> <a href="code_VALSignal.signal_sub.html">signal_sub</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_sub : signal -> signal -> signal, output(t) = input1(t) - input2(t), - frequency consistent.<br> -</div> -<pre><span id="VALsignal_mul"><span class="keyword">val</span> <a href="code_VALSignal.signal_mul.html">signal_mul</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_mul : signal -> signal -> signal, output(t) = input1(t) * input2(t), - frequency consistent.<br> -</div> -<pre><span id="VALsignal_div"><span class="keyword">val</span> <a href="code_VALSignal.signal_div.html">signal_div</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_div : signal -> signal -> signal, output(t) = input1(t) / input2(t), - frequency consistent.<br> -</div> -<pre><span id="VALsignal_delay"><span class="keyword">val</span> <a href="code_VALSignal.signal_delay.html">signal_delay</a></span> : <code class="type">'a * (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> 'b * (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_delay : signal -> signal -> signal, output(t) = input1(t - input2(t)), - Attention: delay dynamic, frequency of output signal equals to that of first input signal.<br> -</div> -<pre><span id="VALsignal_mem"><span class="keyword">val</span> <a href="code_VALSignal.signal_mem.html">signal_mem</a></span> : <code class="type">'a * (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_mem : signal -> signal, equivalent to signal_delay with constant delay 1.<br> -</div> -<pre><span id="VALsignal_vectorize"><span class="keyword">val</span> <a href="code_VALSignal.signal_vectorize.html">signal_vectorize</a></span> : <code class="type">int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> 'a * (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_vectorize : signal -> signal -> signal, output(t)(i) = input1(input2(0) * t + i), -Attention: vector size n static, frequency of output signal is (1/n * frequency of input1)<br> -</div> -<pre><span id="VALsignal_serialize"><span class="keyword">val</span> <a href="code_VALSignal.signal_serialize.html">signal_serialize</a></span> : <code class="type">int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_serialize : signal -> signal, output(t) = input(floor(t/n))(t%n), - with n = size of input(0). - Attention: input size unknown in the cas of "rec".<br> -</div> -<pre><span id="VALsignal_append"><span class="keyword">val</span> <a href="code_VALSignal.signal_append.html">signal_append</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_append : signal -> signal -> signal, symbol "#", - appends vectors of the two input signals at each time, frequency consistent.<br> -</div> -<pre><span id="VALsignal_nth"><span class="keyword">val</span> <a href="code_VALSignal.signal_nth.html">signal_nth</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_nth : signal -> signal -> signal, symbol "[]", output(t) = input1(t)(input2(t)), - frequency consistent. Attention: selection index dynamic.<br> -</div> -<pre><span id="VALsignal_floor"><span class="keyword">val</span> <a href="code_VALSignal.signal_floor.html">signal_floor</a></span> : <code class="type">'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_floor : signal -> signal, output(t) = v_floor(input(t)), frequency consistent.<br> -</div> -<pre><span id="VALsignal_int"><span class="keyword">val</span> <a href="code_VALSignal.signal_int.html">signal_int</a></span> : <code class="type">'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_int : signal -> signal, output(t) = v_int(input(t)), frequency consistent.<br> -</div> -<pre><span id="VALsignal_sin"><span class="keyword">val</span> <a href="code_VALSignal.signal_sin.html">signal_sin</a></span> : <code class="type">'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_sin : signal -> signal, output(t) = v_sin(input(t)), frequency consistent.<br> -</div> -<pre><span id="VALsignal_cos"><span class="keyword">val</span> <a href="code_VALSignal.signal_cos.html">signal_cos</a></span> : <code class="type">'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_cos : signal -> signal, output(t) = v_cos(input(t)), frequency consistent.<br> -</div> -<pre><span id="VALsignal_atan"><span class="keyword">val</span> <a href="code_VALSignal.signal_atan.html">signal_atan</a></span> : <code class="type">'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_atan : signal -> signal, output(t) = v_atan(input(t)), frequency consistent.<br> -</div> -<pre><span id="VALsignal_atantwo"><span class="keyword">val</span> <a href="code_VALSignal.signal_atantwo.html">signal_atantwo</a></span> : <code class="type">'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> 'c * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><pre><span id="VALsignal_sqrt"><span class="keyword">val</span> <a href="code_VALSignal.signal_sqrt.html">signal_sqrt</a></span> : <code class="type">'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'a * ('b -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_sqrt : signal -> signal, output(t) = v_sqrt(input(t)), frequency consistent.<br> -</div> -<pre><span id="VALsignal_rdtable"><span class="keyword">val</span> <a href="code_VALSignal.signal_rdtable.html">signal_rdtable</a></span> : <code class="type">'a * (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> 'b * (int -> 'c) -> 'd * ('e -> <a href="Types.html#TYPEvalue">Types.value</a>) -> 'd * ('e -> 'c)</code></pre><div class="info"> -val signal_rdtable : signal -> signal -> signal, - output(t) = input1(input2(t)), frequency equals to that of input2. - Attention: no memory implemented, very expensive when input1 comes from rec or delays.<br> -</div> -<pre><span id="VALsignal_mod"><span class="keyword">val</span> <a href="code_VALSignal.signal_mod.html">signal_mod</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_mod : signal -> signal -> signal, - output(t) = input1(t) % input2(t), frequency consistent.<br> -</div> -<pre><span id="VALsignal_sup"><span class="keyword">val</span> <a href="code_VALSignal.signal_sup.html">signal_sup</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_sup : signal -> signal -> signal, - output(t) = input1(t) > input2(t), frequency consistent.<br> -</div> -<pre><span id="VALsignal_inf"><span class="keyword">val</span> <a href="code_VALSignal.signal_inf.html">signal_inf</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -> int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>)</code></pre><div class="info"> -val signal_inf : signal -> signal -> signal, - output(t) = input1(t) < input2(t), frequency consistent.<br> -</div> -<pre><span id="VALsignal_select2"><span class="keyword">val</span> <a href="code_VALSignal.signal_select2.html">signal_select2</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> 'b) -> int * ('a -> 'b) -> int * ('a -> 'b)</code></pre><div class="info"> -val signal_select2 : signal -> signal -> signal -> signal, -<code class="code">signal_select2 si s0 s1</code> selects s0 or s1 by index si, frequency consistent.<br> -</div> -<pre><span id="VALsignal_select3"><span class="keyword">val</span> <a href="code_VALSignal.signal_select3.html">signal_select3</a></span> : <code class="type">int * ('a -> <a href="Types.html#TYPEvalue">Types.value</a>) -><br> int * ('a -> 'b) -> int * ('a -> 'b) -> int * ('a -> 'b) -> int * ('a -> 'b)</code></pre><div class="info"> -val signal_select3 : signal -> signal -> signal -> signal -> signal, -<code class="code">signal_select3 si s0 s1 s2</code> selects s0 or s1 or s2 by index si, frequency consistent.<br> -</div> -<pre><span id="VALsignal_prefix"><span class="keyword">val</span> <a href="code_VALSignal.signal_prefix.html">signal_prefix</a></span> : <code class="type">'a * (int -> 'b) -> 'c * (int -> 'b) -> 'c * (int -> 'b)</code></pre><div class="info"> -val signal_prefix : signal -> signal -> signal, -<code class="code">signal_prefix s0 s1</code> returns s0(0) if t = 0, s1(t-1) if t > 0, frequency same to s1.<br> -</div> -</body></html> \ No newline at end of file diff --git a/documentation/Types.html b/documentation/Types.html deleted file mode 100644 index 1b2bf4b..0000000 --- a/documentation/Types.html +++ /dev/null @@ -1,329 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="next" href="Parser.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Types</title> -</head> -<body> -<div class="navbar"> <a href="index.html">Up</a> - <a href="Parser.html">Next</a> -</div> -<center><h1>Module <a href="type_Types.html">Types</a></h1></center> -<br> -<pre><span class="keyword">module</span> Types: <code class="code">sig</code> <a href="Types.html">..</a> <code class="code">end</code></pre>type symbol, defines valid identifiers in faust expressions.<br> -<hr width="100%"> -<br><code><span id="TYPEvalue"><span class="keyword">type</span> <code class="type"></code>value</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">N</span> <span class="keyword">of</span> <code class="type">int</code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">R</span> <span class="keyword">of</span> <code class="type">float</code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Vec</span> <span class="keyword">of</span> <code class="type">int * (int -> <a href="Types.html#TYPEvalue">value</a>)</code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Zero</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">W</span></code></td> - -</tr></table> - - -<br><code><span id="TYPEsymbol"><span class="keyword">type</span> <code class="type"></code>symbol</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Add</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Sup</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Mul</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Div</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Pass</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Stop</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Mem</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Delay</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Floor</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Int</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Sin</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Cos</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Atan</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Atantwo</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Sqrt</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Rdtable</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Mod</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Vectorize</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Concat</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Nth</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Serialize</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Larger</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Smaller</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Prefix</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Selecttwo</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Selectthree</span></code></td> - -</tr></table> - -<div class="info"> -type symbol, defines valid identifiers in faust expressions.<br> -</div> - -<pre><span id="EXCEPTIONSymbol_not_defined"><span class="keyword">exception</span> Symbol_not_defined</span></pre> -<pre><span id="VALsymbol_of_string"><span class="keyword">val</span> <a href="code_VALTypes.symbol_of_string.html">symbol_of_string</a></span> : <code class="type">string -> <a href="Types.html#TYPEsymbol">symbol</a></code></pre><pre><span id="TYPEsignal"><span class="keyword">type</span> <code class="type"></code>signal</span> = <code class="type">int * (int -> <a href="Types.html#TYPEvalue">value</a>)</code> </pre> - -<br><code><span id="TYPEfaust_exp"><span class="keyword">type</span> <code class="type"></code>faust_exp</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Const</span> <span class="keyword">of</span> <code class="type"><a href="Types.html#TYPEvalue">value</a></code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Ident</span> <span class="keyword">of</span> <code class="type"><a href="Types.html#TYPEsymbol">symbol</a></code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Par</span> <span class="keyword">of</span> <code class="type"><a href="Types.html#TYPEfaust_exp">faust_exp</a> * <a href="Types.html#TYPEfaust_exp">faust_exp</a></code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Seq</span> <span class="keyword">of</span> <code class="type"><a href="Types.html#TYPEfaust_exp">faust_exp</a> * <a href="Types.html#TYPEfaust_exp">faust_exp</a></code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Rec</span> <span class="keyword">of</span> <code class="type"><a href="Types.html#TYPEfaust_exp">faust_exp</a> * <a href="Types.html#TYPEfaust_exp">faust_exp</a></code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Split</span> <span class="keyword">of</span> <code class="type"><a href="Types.html#TYPEfaust_exp">faust_exp</a> * <a href="Types.html#TYPEfaust_exp">faust_exp</a></code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Merge</span> <span class="keyword">of</span> <code class="type"><a href="Types.html#TYPEfaust_exp">faust_exp</a> * <a href="Types.html#TYPEfaust_exp">faust_exp</a></code></code></td> - -</tr></table> - - -<br><code><span id="TYPEdimension"><span class="keyword">type</span> <code class="type"></code>dimension</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">End</span> <span class="keyword">of</span> <code class="type">(int * int)</code></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Tree</span> <span class="keyword">of</span> <code class="type">(int * int) * (<a href="Types.html#TYPEdimension">dimension</a> * <a href="Types.html#TYPEdimension">dimension</a>)</code></code></td> - -</tr></table> - - -</body></html> \ No newline at end of file diff --git a/documentation/Value.html b/documentation/Value.html deleted file mode 100644 index d434f5d..0000000 --- a/documentation/Value.html +++ /dev/null @@ -1,193 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link rel="previous" href="Lexer.html"> -<link rel="next" href="Signal.html"> -<link rel="Up" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value</title> -</head> -<body> -<div class="navbar"><a href="Lexer.html">Previous</a> - <a href="index.html">Up</a> - <a href="Signal.html">Next</a> -</div> -<center><h1>Module <a href="type_Value.html">Value</a></h1></center> -<br> -<pre><span class="keyword">module</span> Value: <code class="code">sig</code> <a href="Value.html">..</a> <code class="code">end</code></pre>Module: Value - Description: basic data type in the vectorial faust interpreter.<br> -<b>Author(s):</b> WANG Haisheng - Created: 31/05/2013 Modified: 03/06/2013<br> -<hr width="100%"> -<pre><span id="EXCEPTIONConvert_Error"><span class="keyword">exception</span> Convert_Error</span> <span class="keyword">of</span> <code class="type">string</code></pre> -<div class="info"> -Exception raised in convertions between float/int and type 'Value'.<br> -</div> -<pre><span id="EXCEPTIONValue_operation"><span class="keyword">exception</span> Value_operation</span> <span class="keyword">of</span> <code class="type">string</code></pre> -<div class="info"> -Exception raised in type 'Value' operations.<br> -</div> -<br><code><span id="TYPEvalue_macro"><span class="keyword">type</span> <code class="type"></code>value_macro</span> = </code><table class="typetable"> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Faust_Max_int</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Faust_Min_int</span></code></td> - -</tr> -<tr> -<td align="left" valign="top" > -<code><span class="keyword">|</span></code></td> -<td align="left" valign="top" > -<code><span class="constructor">Faust_Bits_int</span></code></td> - -</tr></table> - -<div class="info"> -Macro constants of the file.<br> -</div> - -<pre><span id="VALvalue_macro_to_int"><span class="keyword">val</span> <a href="code_VALValue.value_macro_to_int.html">value_macro_to_int</a></span> : <code class="type"><a href="Value.html#TYPEvalue_macro">value_macro</a> -> int</code></pre><div class="info"> -val value_macro_to_value : value_macro -> int.<br> -</div> -<pre><span id="VALreturn_N"><span class="keyword">val</span> <a href="code_VALValue.return_N.html">return_N</a></span> : <code class="type">int -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val return_N : int -> value, convert from int to value N.<br> -</div> -<pre><span id="VALreturn_R"><span class="keyword">val</span> <a href="code_VALValue.return_R.html">return_R</a></span> : <code class="type">float -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val return_R : float -> value, convert from float to value R.<br> -</div> -<pre><span id="VALreturn_Vec"><span class="keyword">val</span> <a href="code_VALValue.return_Vec.html">return_Vec</a></span> : <code class="type">int * (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val return_Vec : int * (int -> value) -> value, convert (size, vec) to value Vec.<br> -</div> -<pre><span id="VALfail"><span class="keyword">val</span> <a href="code_VALValue.fail.html">fail</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val fail, return value W.<br> -</div> -<pre><span id="VALtake_off_N"><span class="keyword">val</span> <a href="code_VALValue.take_off_N.html">take_off_N</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> int</code></pre><div class="info"> -val take_off_N : value -> int, convert from value N to int. -Attention: Zero and W are converted to 0.<br> -</div> -<pre><span id="VALtake_off_R"><span class="keyword">val</span> <a href="code_VALValue.take_off_R.html">take_off_R</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> float</code></pre><div class="info"> -val take_off_R : value -> float, convert from value R to float. -Attention: Zero and W are converted to 0.0, int converted to float.<br> -</div> -<pre><span id="VALconvert_back_R"><span class="keyword">val</span> <a href="code_VALValue.convert_back_R.html">convert_back_R</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> float array</code></pre><div class="info"> -val convert_back_r : value -> float array, -return a float array of size 1 if v is N|R|Zero|W, a float array of size n if v is Vec.<br> -</div> -<pre><span id="VALstring_of_value"><span class="keyword">val</span> <a href="code_VALValue.string_of_value.html">string_of_value</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> string</code></pre><div class="info"> -val string_of_value : value -> string, converts value to following -strings "N i" | "R f" | "Vec" | "Zero" | "W".<br> -</div> -<pre><span id="VALprint_value_list"><span class="keyword">val</span> <a href="code_VALValue.print_value_list.html">print_value_list</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> list -> unit</code></pre><div class="info"> -val print_value_list: value list -> unit, prints to console the value list.<br> -</div> -<pre><span id="VALfactory_add_memory"><span class="keyword">val</span> <a href="code_VALValue.factory_add_memory.html">factory_add_memory</a></span> : <code class="type">(int -> 'a) -> int -> int -> 'a</code></pre><div class="info"> -val factory_add_memory : (int -> 'b) -> int -> (int -> 'b), -<code class="code">factory_add_memory f n</code> adds a memory of size n to fun f.<br> -</div> -<pre><span id="VALv_memory"><span class="keyword">val</span> <a href="code_VALValue.v_memory.html">v_memory</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_memory : value -> value, returns value Vec with memory.<br> -</div> -<pre><span id="VALv_list_memory"><span class="keyword">val</span> <a href="code_VALValue.v_list_memory.html">v_list_memory</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> list -> <a href="Types.html#TYPEvalue">Types.value</a> list</code></pre><div class="info"> -val v_list_memory : value list -> value list, returns value list with memory.<br> -</div> -<pre><span id="VALmake_vector"><span class="keyword">val</span> <a href="code_VALValue.make_vector.html">make_vector</a></span> : <code class="type">int -> (int -> <a href="Types.html#TYPEvalue">Types.value</a>) -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val make_vector : int -> (int -> value) -> value, -<code class="code">make_vector size vec</code>, return a value Vec of (size, vec).<br> -</div> -<pre><span id="VALnormalize"><span class="keyword">val</span> <a href="code_VALValue.normalize.html">normalize</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val normalize: value -> value, normalize value to bounded <code class="code">-2147483648,2147483647</code>.<br> -</div> -<pre><span id="VALv_add"><span class="keyword">val</span> <a href="code_VALValue.v_add.html">v_add</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_add : value -> value -> value, value addition, recursive for value.Vec.<br> -</div> -<pre><span id="VAL(+~)"><span class="keyword">val</span> <a href="code_VALValue.(_plus__tilde_).html">(+~)</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val (+~) : value -> value -> value, operator of v_add.<br> -</div> -<pre><span id="VALv_neg"><span class="keyword">val</span> <a href="code_VALValue.v_neg.html">v_neg</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_neg : value -> value, v_neg v = -v.<br> -</div> -<pre><span id="VALv_sub"><span class="keyword">val</span> <a href="code_VALValue.v_sub.html">v_sub</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_sub : value -> value -> value, returns (v1 - v2).<br> -</div> -<pre><span id="VAL(-~)"><span class="keyword">val</span> <a href="code_VALValue.(_minus__tilde_).html">(-~)</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val (-~) : value -> value -> value, operator of v_sub.<br> -</div> -<pre><span id="VALv_mul"><span class="keyword">val</span> <a href="code_VALValue.v_mul.html">v_mul</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_mul : value -> value -> value, returns (v1 * v2), recursive for value.Vec.<br> -</div> -<pre><span id="VAL( *~ )"><span class="keyword">val</span> <a href="code_VALValue.( _star__tilde_ ).html">( *~ )</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val ( *~ ) : value -> value -> value, operator of v_mul.<br> -</div> -<pre><span id="VALv_recip"><span class="keyword">val</span> <a href="code_VALValue.v_recip.html">v_recip</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_recip : value -> value, v_recip v = 1./.v.<br> -</div> -<pre><span id="VALv_div"><span class="keyword">val</span> <a href="code_VALValue.v_div.html">v_div</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_div : value -> value -> value, value division, returns (v1/.v2).<br> -</div> -<pre><span id="VAL(/~)"><span class="keyword">val</span> <a href="code_VALValue.(_slash__tilde_).html">(/~)</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val (/~) : value -> value -> value, operator of v_div.<br> -</div> -<pre><span id="VALv_zero"><span class="keyword">val</span> <a href="code_VALValue.v_zero.html">v_zero</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_zero : value -> value, Attention: N i -> N 0 | R f -> R 0. | Zero -> Zero | W -> R 0., -and recursive for value.Vec.<br> -</div> -<pre><span id="VALv_floor"><span class="keyword">val</span> <a href="code_VALValue.v_floor.html">v_floor</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_floor : value -> value, returns floor of float, converts int to float, Zero to 0., - error to error, recursive for value.Vec.<br> -</div> -<pre><span id="VALv_int"><span class="keyword">val</span> <a href="code_VALValue.v_int.html">v_int</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_int : value -> value, converts value to value.N, error to error, recursive for value.Vec.<br> -</div> -<pre><span id="VALv_sin"><span class="keyword">val</span> <a href="code_VALValue.v_sin.html">v_sin</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_sin : value -> value, returns sin(v), recursive for value.Vec.<br> -</div> -<pre><span id="VALv_cos"><span class="keyword">val</span> <a href="code_VALValue.v_cos.html">v_cos</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_cos : value -> value, returns cos(v), recursive for value.Vec.<br> -</div> -<pre><span id="VALv_atan"><span class="keyword">val</span> <a href="code_VALValue.v_atan.html">v_atan</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_atan : value -> value, returns atan(v), recursive for value.Vec.<br> -</div> -<pre><span id="VALv_atantwo"><span class="keyword">val</span> <a href="code_VALValue.v_atantwo.html">v_atantwo</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_atantwo : value -> value, returns atantwo(v), recursive for value.Vec.<br> -</div> -<pre><span id="VALv_sqrt"><span class="keyword">val</span> <a href="code_VALValue.v_sqrt.html">v_sqrt</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_sqrt : value -> value, returns sqrt(v), recursive for value.Vec.<br> -</div> -<pre><span id="VALv_mod"><span class="keyword">val</span> <a href="code_VALValue.v_mod.html">v_mod</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_mod : value -> value -> value, returns (v1 % v2), recursive for value.Vec.<br> -</div> -<pre><span id="VALv_larger_than_zero"><span class="keyword">val</span> <a href="code_VALValue.v_larger_than_zero.html">v_larger_than_zero</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_larger_than_zero : value -> value, primitive comparison between value and zero, -returns value.N 1 if true, value.N 0 if false.<br> -</div> -<pre><span id="VALv_sup"><span class="keyword">val</span> <a href="code_VALValue.v_sup.html">v_sup</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_sup : value -> value -> value, comparison of two values, returns value.N 1 if (v1 > v2), -value.N 0 else.<br> -</div> -<pre><span id="VALv_inf"><span class="keyword">val</span> <a href="code_VALValue.v_inf.html">v_inf</a></span> : <code class="type"><a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a> -> <a href="Types.html#TYPEvalue">Types.value</a></code></pre><div class="info"> -val v_inf : value -> value -> value, comparison of two values, returns value.N 1 if (v1 < v2), -value.N 0 else.<br> -</div> -</body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.d_merge.html b/documentation/code_VALFaustexp.d_merge.html deleted file mode 100644 index 0543476..0000000 --- a/documentation/code_VALFaustexp.d_merge.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.d_merge</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> d_merge a b = <br> - <span class="keyword">if</span> ((snd a) <span class="keyword">mod</span> (fst b)) = 0 <span class="keyword">then</span> <br> - (fst a, snd b) <br> - <span class="keyword">else</span> raise (<span class="constructor">Beam_Matching_Error</span> <span class="string">"merge"</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.d_par.html b/documentation/code_VALFaustexp.d_par.html deleted file mode 100644 index a1b85e4..0000000 --- a/documentation/code_VALFaustexp.d_par.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.d_par</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> d_par a b = (((fst a) + (fst b)), ((snd a) + (snd b)))</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.d_rec.html b/documentation/code_VALFaustexp.d_rec.html deleted file mode 100644 index fab4195..0000000 --- a/documentation/code_VALFaustexp.d_rec.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.d_rec</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> d_rec a b = <br> - <span class="keyword">if</span> (fst a) >= (snd b) <span class="keywordsign">&&</span> (snd a) >= (fst b) <span class="keyword">then</span> <br> - ((fst a) - (snd b), snd a) <br> - <span class="keyword">else</span> raise (<span class="constructor">Beam_Matching_Error</span> <span class="string">"rec"</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.d_seq.html b/documentation/code_VALFaustexp.d_seq.html deleted file mode 100644 index 92ca8a2..0000000 --- a/documentation/code_VALFaustexp.d_seq.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.d_seq</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> d_seq a b = <span class="keyword">if</span> (snd a) = (fst b) <span class="keyword">then</span> (fst a, snd b) <span class="keyword">else</span> raise (<span class="constructor">Beam_Matching_Error</span> <span class="string">"seq"</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.d_split.html b/documentation/code_VALFaustexp.d_split.html deleted file mode 100644 index a55b9b6..0000000 --- a/documentation/code_VALFaustexp.d_split.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.d_split</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> d_split a b = <br> - <span class="keyword">if</span> ((fst b) <span class="keyword">mod</span> (snd a)) = 0 <span class="keyword">then</span> <br> - (fst a, snd b) <br> - <span class="keyword">else</span> raise (<span class="constructor">Beam_Matching_Error</span> <span class="string">"split"</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.delay.html b/documentation/code_VALFaustexp.delay.html deleted file mode 100644 index cf55901..0000000 --- a/documentation/code_VALFaustexp.delay.html +++ /dev/null @@ -1,56 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.delay</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> delay exp_faust = <span class="keyword">match</span> exp_faust <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Const</span> v <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Ident</span> s <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> s <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Add</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Sup</span> <span class="keywordsign">-></span> 0 <br> - <span class="keywordsign">|</span><span class="constructor">Mul</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Div</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Pass</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Stop</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Mem</span> <span class="keywordsign">-></span> 1<br> - <span class="keywordsign">|</span><span class="constructor">Delay</span> <span class="keywordsign">-></span> 100000 <span class="comment">(* danger! *)</span><br> - <span class="keywordsign">|</span><span class="constructor">Floor</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Int</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Sin</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Cos</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Atan</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Atantwo</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Sqrt</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Rdtable</span> <span class="keywordsign">-></span> 100000 <span class="comment">(* danger! *)</span><br> - <span class="keywordsign">|</span><span class="constructor">Mod</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Larger</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Smaller</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Vectorize</span> <span class="keywordsign">-></span> 100 <span class="comment">(* danger! *)</span><br> - <span class="keywordsign">|</span><span class="constructor">Concat</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Nth</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Serialize</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Prefix</span> <span class="keywordsign">-></span> 1<br> - <span class="keywordsign">|</span><span class="constructor">Selecttwo</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">Selectthree</span> <span class="keywordsign">-></span> 0<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">Par</span> (e1, e2) <span class="keywordsign">-></span> max (delay e1) (delay e2)<br> - <span class="keywordsign">|</span><span class="constructor">Seq</span> (e1, e2) <span class="keywordsign">-></span> (delay e1) + (delay e2)<br> - <span class="keywordsign">|</span><span class="constructor">Split</span> (e1, e2) <span class="keywordsign">-></span> (delay e1) + (delay e2)<br> - <span class="keywordsign">|</span><span class="constructor">Merge</span> (e1, e2) <span class="keywordsign">-></span> (delay e1) + (delay e2)<br> - <span class="keywordsign">|</span><span class="constructor">Rec</span> (e1, e2) <span class="keywordsign">-></span> delay e1</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.dim.html b/documentation/code_VALFaustexp.dim.html deleted file mode 100644 index ea2db74..0000000 --- a/documentation/code_VALFaustexp.dim.html +++ /dev/null @@ -1,68 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.dim</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> dim exp_faust = <br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val dimension_constructor : ((int * int) -> (int * int) -> (int * int)) -> faust_exp --> faust_exp -> dimension, -returns the dimension tree of constructor(e1, e2).*)</span></td></tr></table><code class="code"><br> - <span class="keyword">let</span> dimension_constructor = <span class="keyword">fun</span> constructor <span class="keywordsign">-></span> <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span><br> - <span class="keyword">let</span> subtree1 = dim e1 <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = dim e2 <span class="keyword">in</span><br> - <span class="keyword">let</span> root = constructor (get_root subtree1) (get_root subtree2) <span class="keyword">in</span><br> - <span class="constructor">Tree</span> (root, (subtree1, subtree2)) <span class="keyword">in</span><br> -<br> - <span class="keyword">match</span> exp_faust <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Const</span> v <span class="keywordsign">-></span> <span class="constructor">End</span> (0, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Ident</span> s <span class="keywordsign">-></span> <br> - (<br> - <span class="keyword">match</span> s <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Add</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Sup</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1) <br> - <span class="keywordsign">|</span><span class="constructor">Mul</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Div</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Pass</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Stop</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 0)<br> - <span class="keywordsign">|</span><span class="constructor">Mem</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Delay</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Floor</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Int</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Sin</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Cos</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Atan</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Atantwo</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Sqrt</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Rdtable</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (3, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Mod</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Vectorize</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Concat</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Nth</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Serialize</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (1, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Larger</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Smaller</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Prefix</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (2, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Selecttwo</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (3, 1)<br> - <span class="keywordsign">|</span><span class="constructor">Selectthree</span> <span class="keywordsign">-></span> <span class="constructor">End</span> (4, 1)<br> - )<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Par</span> (e1, e2) <span class="keywordsign">-></span> dimension_constructor d_par e1 e2<br> - <span class="keywordsign">|</span><span class="constructor">Seq</span> (e1, e2) <span class="keywordsign">-></span> dimension_constructor d_seq e1 e2<br> - <span class="keywordsign">|</span><span class="constructor">Split</span> (e1, e2) <span class="keywordsign">-></span> dimension_constructor d_split e1 e2<br> - <span class="keywordsign">|</span><span class="constructor">Merge</span> (e1, e2) <span class="keywordsign">-></span> dimension_constructor d_merge e1 e2<br> - <span class="keywordsign">|</span><span class="constructor">Rec</span> (e1, e2) <span class="keywordsign">-></span> dimension_constructor d_rec e1 e2</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.exp_of_string.html b/documentation/code_VALFaustexp.exp_of_string.html deleted file mode 100644 index 549f173..0000000 --- a/documentation/code_VALFaustexp.exp_of_string.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.exp_of_string</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> exp_of_string s = (<span class="constructor">Parser</span>.main <span class="constructor">Lexer</span>.token (<span class="constructor">Lexing</span>.from_string s))</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.get_root.html b/documentation/code_VALFaustexp.get_root.html deleted file mode 100644 index d3f7938..0000000 --- a/documentation/code_VALFaustexp.get_root.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.get_root</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> get_root = <span class="keyword">fun</span> d_tree <span class="keywordsign">-></span> <span class="keyword">match</span> d_tree <span class="keyword">with</span><br> - <span class="keywordsign">|</span> <span class="constructor">End</span> d <span class="keywordsign">-></span> d<br> - <span class="keywordsign">|</span> <span class="constructor">Tree</span> (d, branches) <span class="keywordsign">-></span> d</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.print_exp.html b/documentation/code_VALFaustexp.print_exp.html deleted file mode 100644 index 3f2765e..0000000 --- a/documentation/code_VALFaustexp.print_exp.html +++ /dev/null @@ -1,30 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.print_exp</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> print_exp exp = <br> - <span class="keyword">let</span> <span class="keyword">rec</span> string_of_exp exp = <span class="keyword">match</span> exp <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Const</span> v <span class="keywordsign">-></span> <span class="string">"Const"</span> ^ <span class="string">" ("</span> ^ (string_of_value v) ^ <span class="string">")"</span><br> - <span class="keywordsign">|</span><span class="constructor">Ident</span> s <span class="keywordsign">-></span> <span class="string">"Ident"</span> ^ <span class="string">" \""</span> ^ <span class="string">"s"</span> ^ <span class="string">"\""</span><br> - <span class="keywordsign">|</span><span class="constructor">Par</span> (e1, e2) <span class="keywordsign">-></span> <span class="string">"Par"</span> ^ <span class="string">" ("</span> ^ (string_of_exp e1) ^ <span class="string">", "</span> ^ (string_of_exp e2) ^ <span class="string">")"</span><br> - <span class="keywordsign">|</span><span class="constructor">Seq</span> (e1, e2) <span class="keywordsign">-></span> <span class="string">"Seq"</span> ^ <span class="string">" ("</span> ^ (string_of_exp e1) ^ <span class="string">", "</span> ^ (string_of_exp e2) ^ <span class="string">")"</span><br> - <span class="keywordsign">|</span><span class="constructor">Split</span> (e1, e2) <span class="keywordsign">-></span> <span class="string">"Split"</span> ^ <span class="string">" ("</span> ^ (string_of_exp e1) ^ <span class="string">", "</span> ^ (string_of_exp e2) ^ <span class="string">")"</span><br> - <span class="keywordsign">|</span><span class="constructor">Merge</span> (e1, e2) <span class="keywordsign">-></span> <span class="string">"Merge"</span> ^ <span class="string">" ("</span> ^ (string_of_exp e1) ^ <span class="string">", "</span> ^ (string_of_exp e2) ^ <span class="string">")"</span><br> - <span class="keywordsign">|</span><span class="constructor">Rec</span> (e1, e2) <span class="keywordsign">-></span> <span class="string">"Rec"</span> ^ <span class="string">" ("</span> ^ (string_of_exp e1) ^ <span class="string">", "</span> ^ (string_of_exp e2) ^ <span class="string">")"</span><br> - <span class="keyword">in</span><br> - print_string(<span class="string">"Parer : Types.faust_exp = "</span>^ (string_of_exp exp))</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.subtree.html b/documentation/code_VALFaustexp.subtree.html deleted file mode 100644 index 8a83436..0000000 --- a/documentation/code_VALFaustexp.subtree.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.subtree</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> subtree = <span class="keyword">fun</span> d_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> i <span class="keywordsign">-></span><br> - <span class="keyword">match</span> d_tree <span class="keyword">with</span><br> - <span class="keywordsign">|</span> <span class="constructor">End</span> d <span class="keywordsign">-></span> raise (<span class="constructor">Beam_Matching_Error</span> <span class="string">"Subtree left absent."</span>)<br> - <span class="keywordsign">|</span> <span class="constructor">Tree</span> (d, branches) <span class="keywordsign">-></span> (<br> - <span class="keyword">match</span> branches <span class="keyword">with</span> <br> - (left, right) <span class="keywordsign">-></span> <span class="keyword">if</span> i = 0 <span class="keyword">then</span> left <span class="keyword">else</span> right)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.subtree_left.html b/documentation/code_VALFaustexp.subtree_left.html deleted file mode 100644 index 2184440..0000000 --- a/documentation/code_VALFaustexp.subtree_left.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.subtree_left</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> subtree_left = <span class="keyword">fun</span> d_tree <span class="keywordsign">-></span> subtree d_tree 0</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALFaustexp.subtree_right.html b/documentation/code_VALFaustexp.subtree_right.html deleted file mode 100644 index 33f3a70..0000000 --- a/documentation/code_VALFaustexp.subtree_right.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp.subtree_right</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> subtree_right = <span class="keyword">fun</span> d_tree <span class="keywordsign">-></span> subtree d_tree 1</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.arrange.html b/documentation/code_VALInterpreter.arrange.html deleted file mode 100644 index 3c105b1..0000000 --- a/documentation/code_VALInterpreter.arrange.html +++ /dev/null @@ -1,27 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.arrange</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> arrange = <span class="keyword">fun</span> float_array_array_array <span class="keywordsign">-></span> <span class="keyword">fun</span> width <span class="keywordsign">-></span><br> - <span class="keyword">let</span> concat faaa = <span class="keyword">fun</span> i <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> faa = faaa.(i) <span class="keyword">in</span><br> - <span class="constructor">Array</span>.concat (<span class="constructor">Array</span>.to_list faa)<br> - <span class="keyword">in</span><br> - <span class="keyword">let</span> float_array_array = <span class="constructor">Array</span>.init width (concat float_array_array_array) <span class="keyword">in</span><br> - <span class="keyword">let</span> float_array_list = <span class="constructor">Array</span>.to_list float_array_array <span class="keyword">in</span><br> - float_array_list</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.channels.html b/documentation/code_VALInterpreter.channels.html deleted file mode 100644 index 1668932..0000000 --- a/documentation/code_VALInterpreter.channels.html +++ /dev/null @@ -1,28 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.channels</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> channels = <span class="keyword">fun</span> f_array_array_array <span class="keywordsign">-></span> <span class="keyword">fun</span> width <span class="keywordsign">-></span><br> - <span class="keyword">let</span> channel = <span class="keyword">fun</span> faaa <span class="keywordsign">-></span> <span class="keyword">fun</span> i <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> faa = faaa.(i) <span class="keyword">in</span><br> - <span class="keyword">let</span> length = <span class="constructor">Array</span>.length faa <span class="keyword">in</span><br> - <span class="keyword">let</span> fa = faa.(length - 1) <span class="keyword">in</span><br> - <span class="constructor">Array</span>.length fa<br> - <span class="keyword">in</span><br> - <span class="keyword">let</span> channel_array = <span class="constructor">Array</span>.init width (channel f_array_array_array) <span class="keyword">in</span><br> - channel_array</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.compute.html b/documentation/code_VALInterpreter.compute.html deleted file mode 100644 index d4f5dd8..0000000 --- a/documentation/code_VALInterpreter.compute.html +++ /dev/null @@ -1,36 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.compute</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> compute fun_list = <br> - <span class="keyword">let</span> () = print_endline(<span class="string">"Computing output signals..."</span>) <span class="keyword">in</span><br> - <br> - <span class="comment">(* arrange input information *)</span><br> - <span class="keyword">let</span> length = interpreter_macro_to_value <span class="constructor">Number_samples_int</span> <span class="keyword">in</span><br> - <span class="keyword">let</span> width = <span class="constructor">List</span>.length fun_list <span class="keyword">in</span><br> - <span class="keyword">let</span> beam_fun = fun_array_to_fun (<span class="constructor">Array</span>.of_list fun_list) <span class="keyword">in</span><br> -<br> - <span class="comment">(* calculate output wave *)</span><br> - <span class="keyword">let</span> tmp_float_array_array_array = computing beam_fun width length <span class="keyword">in</span><br> -<br> - <span class="comment">(* arrange output data *)</span><br> - <span class="keyword">let</span> output_float_array_array_array = matrix_transpose tmp_float_array_array_array width <span class="keyword">in</span><br> - <span class="keyword">let</span> channel_array = channels output_float_array_array_array width <span class="keyword">in</span><br> - <span class="keyword">let</span> channel_list = <span class="constructor">Array</span>.to_list channel_array <span class="keyword">in</span><br> - <span class="keyword">let</span> output_float_array_list = arrange output_float_array_array_array width <span class="keyword">in</span><br> - (channel_list, output_float_array_list)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.computing.html b/documentation/code_VALInterpreter.computing.html deleted file mode 100644 index dc3a81f..0000000 --- a/documentation/code_VALInterpreter.computing.html +++ /dev/null @@ -1,45 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.computing</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> computing = <span class="keyword">fun</span> f <span class="keywordsign">-></span> <span class="keyword">fun</span> width <span class="keywordsign">-></span> <span class="keyword">fun</span> length <span class="keywordsign">-></span><br> - <span class="keyword">let</span> container_float_array_array_array = <br> - ref (<span class="constructor">Array</span>.make length (<span class="constructor">Array</span>.make width [||])) <span class="keyword">in</span><br> - <span class="keyword">let</span> index = ref 0 <span class="keyword">in</span><br> -<br> - <span class="keyword">try</span><br> - <span class="keyword">while</span> !index < length <span class="keyword">do</span><br> - (!container_float_array_array_array).(!index) <br> - <- (<span class="constructor">Array</span>.map convert_back_R (f (!index)));<br> - incr index;<br> - <span class="keyword">done</span>;<br> - !container_float_array_array_array<br> -<br> - <span class="keyword">with</span> x <span class="keywordsign">-></span><br> - <span class="keyword">let</span> error_message = <br> - <span class="keyword">match</span> x <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Convert_Error</span> s <span class="keywordsign">-></span> <span class="string">"Convert_Error: "</span> ^ s<br> - <span class="keywordsign">|</span><span class="constructor">Value_operation</span> s <span class="keywordsign">-></span> <span class="string">"Value_operation: "</span> ^ s<br> - <span class="keywordsign">|</span><span class="constructor">Signal_operation</span> s <span class="keywordsign">-></span> <span class="string">"Signal_operation: "</span> ^ s<br> - <span class="keywordsign">|</span><span class="constructor">Beam_Matching_Error</span> s <span class="keywordsign">-></span> <span class="string">"Beam_Matching_Error: "</span> ^ s<br> - <span class="keywordsign">|</span><span class="constructor">Evaluation_Error</span> s <span class="keywordsign">-></span> <span class="string">"Evaluation_Error: "</span> ^ s<br> - <span class="keywordsign">|</span><span class="constructor">NotYetDone</span> <span class="keywordsign">-></span> <span class="string">"NotYetDone"</span><br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> <span class="string">"Compute finished."</span><br> - <span class="keyword">in</span><br> - <span class="keyword">let</span> () = print_endline error_message <span class="keyword">in</span><br> - <span class="constructor">Array</span>.sub (!container_float_array_array_array) 0 !index</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.eval.html b/documentation/code_VALInterpreter.eval.html deleted file mode 100644 index c3795e1..0000000 --- a/documentation/code_VALInterpreter.eval.html +++ /dev/null @@ -1,235 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.eval</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> eval exp_faust dimension_tree input_beam = <br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_par : faust_exp -> faust_exp -> beam -> beam, -interprets par(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_par = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> -<br> - <span class="comment">(* dimension information *)</span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> -<br> - <span class="keyword">if</span> n = (fst d1) + (fst d2) <span class="keyword">then</span> <br> - ( <br> - <span class="comment">(* segmentation of input beam *)</span><br> - <span class="keyword">let</span> input_beam1 = sublist input_beam 0 (fst d1) <span class="keyword">in</span><br> - <span class="keyword">let</span> input_beam2 = sublist input_beam (fst d1) (fst d2) <span class="keyword">in</span><br> -<br> - <span class="comment">(* evaluate two expressions respectively *)</span><br> - <span class="keyword">let</span> output_beam1 = eval e1 subtree1 input_beam1 <span class="keyword">in</span><br> - <span class="keyword">let</span> output_beam2 = eval e2 subtree2 input_beam2 <span class="keyword">in</span><br> -<br> - <span class="comment">(* concat two output beams *)</span><br> - <span class="keyword">if</span> <span class="constructor">List</span>.length output_beam1 = snd d1 <span class="keywordsign">&&</span> <span class="constructor">List</span>.length output_beam2 = snd d2 <br> - <span class="keyword">then</span> (output_beam1 @ output_beam2) <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Par"</span>)<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Par"</span>) <span class="keyword">in</span><br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_seq : faust_exp -> faust_exp -> beam -> beam, -interprets seq(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_seq = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> -<br> - <span class="comment">(* dimension information *)</span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> -<br> -<br> - <span class="keyword">if</span> n = fst d1 <span class="keyword">then</span><br> - (<br> - <span class="comment">(* evaluate the first expression *)</span><br> - <span class="keyword">let</span> output_beam1 = eval e1 subtree1 input_beam <span class="keyword">in</span><br> -<br> - <span class="comment">(* evaluate the second expression *)</span><br> - <span class="keyword">if</span> <span class="constructor">List</span>.length output_beam1 = fst d2 <br> - <span class="keyword">then</span> eval e2 subtree2 output_beam1<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Seq"</span>)<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Seq"</span>) <span class="keyword">in</span><br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_split : faust_exp -> faust_exp -> beam -> beam, -interprets split(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_split = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> -<br> - <span class="comment">(* dimension information *)</span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> -<br> -<br> - <span class="keyword">if</span> n = fst d1 <span class="keyword">then</span><br> - (<br> - <span class="comment">(* evaluate the first expression *)</span><br> - <span class="keyword">let</span> output_beam1 = eval e1 subtree1 input_beam <span class="keyword">in</span><br> -<br> - <span class="comment">(* beam matching *)</span><br> - <span class="keyword">let</span> ref_output_beam1 = ref (beam_add_one_memory output_beam1) <span class="keyword">in</span><br> - <span class="keyword">let</span> input_beam2 = <span class="constructor">List</span>.concat <br> - (<span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.make ((fst d2)/(<span class="constructor">List</span>.length output_beam1)) !ref_output_beam1)) <br> - <span class="keyword">in</span><br> -<br> - <span class="comment">(* evaluate the second expression *)</span><br> - <span class="keyword">if</span> <span class="constructor">List</span>.length input_beam2 = fst d2<br> - <span class="keyword">then</span> eval e2 subtree2 input_beam2<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Split"</span>)<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Split"</span>) <span class="keyword">in</span><br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_merge : faust_exp -> faust_exp -> beam -> beam, -interprets merge(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_merge = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> -<br> - <span class="comment">(* dimension information *)</span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> -<br> -<br> - <span class="keyword">if</span> n = fst d1 <span class="keyword">then</span><br> - (<br> - <span class="comment">(* evaluate the first expression *)</span><br> - <span class="keyword">let</span> output_beam1 = eval e1 subtree1 input_beam <span class="keyword">in</span><br> -<br> - <span class="comment">(* beam matching *)</span><br> - <span class="keyword">let</span> input_beam2 = <br> - (<br> - <span class="keyword">let</span> fois = (snd d1)/(fst d2) <span class="keyword">in</span><br> - <span class="keyword">let</span> ref_beam = ref (sublist output_beam1 0 (fst d2)) <span class="keyword">in</span><br> - <span class="keyword">for</span> i = 1 <span class="keyword">to</span> fois - 1 <span class="keyword">do</span><br> - <span class="keyword">let</span> temp_beam = sublist output_beam1 (i*(fst d2)) (fst d2) <span class="keyword">in</span><br> - ref_beam := <span class="constructor">List</span>.map2 signal_add (!ref_beam) temp_beam;<br> - <span class="keyword">done</span>;<br> - !ref_beam<br> - )<br> - <span class="keyword">in</span><br> -<br> - <span class="comment">(* evaluate the second expression *)</span><br> - <span class="keyword">if</span> <span class="constructor">List</span>.length input_beam2 = fst d2<br> - <span class="keyword">then</span> eval e2 subtree2 input_beam2<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Merge"</span>)<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Merge"</span>) <span class="keyword">in</span><br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_rec : faust_exp -> faust_exp -> beam -> beam, -interprets rec(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_rec = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> -<br> - <span class="comment">(* dimension information *)</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> -<br> - <span class="comment">(* estimate stockage size for delay *)</span><br> - <span class="keyword">let</span> delay_int = 1 + delay e2 + delay e1 <span class="keyword">in</span><br> -<br> - <span class="comment">(* prepare stockage *)</span><br> - <span class="keyword">let</span> memory_hashtbl = <span class="constructor">Hashtbl</span>.create delay_int <span class="keyword">in</span><br> - <span class="keyword">let</span> rate_list = ref (<span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.make (snd d1) 0)) <span class="keyword">in</span><br> -<br> - </code><table><tr><td> </td><td><span class="comment">(** val apply_to : 'a -> ('a -> 'b) -> 'b *)</span></td></tr></table><code class="code"><br> - <span class="keyword">let</span> apply_to = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <span class="keyword">fun</span> f <span class="keywordsign">-></span> f t <span class="keyword">in</span><br> -<br> - </code><table><tr><td> </td><td><span class="comment">(** val get_value_fun_list : (int -> (int list) * (value list)) -> (int -> value) list *)</span></td></tr></table><code class="code"> <br> - <span class="keyword">let</span> get_value_fun_list = <span class="keyword">fun</span> beam_fun <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> tmp = <span class="keyword">fun</span> beam_fun <span class="keywordsign">-></span> <span class="keyword">fun</span> i <span class="keywordsign">-></span> <span class="keyword">fun</span> t <span class="keywordsign">-></span> <br> - <span class="constructor">List</span>.nth (snd (beam_fun t)) i <span class="keyword">in</span><br> - <span class="constructor">List</span>.map (tmp beam_fun) (<span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.init (snd d1) (<span class="keyword">fun</span> n <span class="keywordsign">-></span> n))) <span class="keyword">in</span><br> -<br> - </code><table><tr><td> </td><td><span class="comment">(** val make_signal : int -> (int -> value) -> signal, combines rate and function. *)</span></td></tr></table><code class="code"><br> - <span class="keyword">let</span> make_signal = <span class="keyword">fun</span> rate <span class="keywordsign">-></span> <span class="keyword">fun</span> f <span class="keywordsign">-></span> (rate, f) <span class="keyword">in</span><br> -<br> - </code><table><tr><td> </td><td><span class="comment">(** val output_beam_fun : int -> (int list) * (value list), with - input : time - output: rate list * value list *)</span></td></tr></table><code class="code"><br> - <span class="keyword">let</span> <span class="keyword">rec</span> output_beam_fun = <span class="keyword">fun</span> t <span class="keywordsign">-></span><br> -<br> - <span class="comment">(* initial value in constrctor "rec '~'" *)</span><br> - <span class="keyword">if</span> t < 0 <span class="keyword">then</span><br> - <span class="keyword">let</span> init_rate_list = <span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.make (snd d1) 0) <span class="keyword">in</span><br> - <span class="keyword">let</span> value_list = <span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.make (snd d1) <span class="constructor">Zero</span>) <span class="keyword">in</span><br> - (init_rate_list, value_list)<br> -<br> - <span class="comment">(* check stockage at time t *)</span><br> - <span class="keyword">else</span> <span class="keyword">if</span> <span class="constructor">Hashtbl</span>.mem memory_hashtbl t <span class="keyword">then</span> <br> - (!rate_list, <span class="constructor">Hashtbl</span>.find memory_hashtbl t)<br> -<br> - <span class="comment">(* blocks : "a ~ b", calculate rate list and value list at time t *)</span><br> - <span class="keyword">else</span> <br> - <span class="comment">(* mid_output_fun_list : (int -> value) list *)</span><br> - <span class="keyword">let</span> mid_output_fun_list = get_value_fun_list output_beam_fun <span class="keyword">in</span><br> -<br> - <span class="comment">(* b_input_fun_list : (int -> value) list *)</span><br> - <span class="keyword">let</span> b_input_fun_list = <span class="constructor">List</span>.map <br> - (<span class="keyword">fun</span> s <span class="keywordsign">-></span> <span class="keyword">fun</span> t <span class="keywordsign">-></span> s (t - 1)) <br> - (sublist mid_output_fun_list 0 (fst d2)) <span class="keyword">in</span><br> -<br> - <span class="comment">(* b_input_beam : signal list *)</span><br> - <span class="keyword">let</span> b_input_beam = <span class="constructor">List</span>.map2 make_signal <br> - (sublist !rate_list 0 (fst d2))<br> - b_input_fun_list <span class="keyword">in</span><br> -<br> - <span class="comment">(* evaluation of block "b" *)</span><br> - <span class="keyword">let</span> b_output_beam = (eval e2 subtree2 b_input_beam) <span class="keyword">in</span><br> -<br> - <span class="comment">(* evaluation of block "a" *)</span><br> - <span class="keyword">let</span> a_input_beam = b_output_beam @ input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> mid_output_beam = eval e1 subtree1 a_input_beam <span class="keyword">in</span><br> -<br> - <span class="comment">(* calculate rate list and value list at time t *)</span><br> - <span class="keyword">let</span> mid_output_rate_list = <span class="constructor">List</span>.map fst mid_output_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> mid_output_value_list = <span class="constructor">List</span>.map (apply_to t) (<span class="constructor">List</span>.map snd mid_output_beam) <span class="keyword">in</span><br> -<br> - <span class="comment">(* update stockage *)</span><br> - <span class="keyword">let</span> () = (rate_list := mid_output_rate_list) <span class="keyword">in</span><br> - <span class="keyword">let</span> () = <span class="constructor">Hashtbl</span>.add memory_hashtbl t mid_output_value_list <span class="keyword">in</span><br> - <span class="keyword">let</span> () = <span class="constructor">Hashtbl</span>.remove memory_hashtbl (t - delay_int) <span class="keyword">in</span><br> - (mid_output_rate_list, mid_output_value_list) <span class="keyword">in</span><br> -<br> - <span class="comment">(* output_beam : signal list *)</span><br> - <span class="keyword">let</span> output_beam = <span class="constructor">List</span>.map2 make_signal !rate_list (get_value_fun_list output_beam_fun) <span class="keyword">in</span><br> - output_beam <span class="keyword">in</span><br> -<br> -<br> - </code><table><tr><td> </td><td><span class="comment">(** Call for previous functions *)</span></td></tr></table><code class="code"><br> - <span class="keyword">match</span> exp_faust <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Const</span> v <span class="keywordsign">-></span> interpret_const v input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Ident</span> s <span class="keywordsign">-></span> interpret_ident s input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Par</span> (e1, e2) <span class="keywordsign">-></span> interpret_par e1 e2 dimension_tree input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Seq</span> (e1, e2) <span class="keywordsign">-></span> interpret_seq e1 e2 dimension_tree input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Split</span> (e1, e2) <span class="keywordsign">-></span> interpret_split e1 e2 dimension_tree input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Merge</span> (e1, e2) <span class="keywordsign">-></span> interpret_merge e1 e2 dimension_tree input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Rec</span> (e1, e2) <span class="keywordsign">-></span> interpret_rec e1 e2 dimension_tree input_beam</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.extract_rate.html b/documentation/code_VALInterpreter.extract_rate.html deleted file mode 100644 index 5020310..0000000 --- a/documentation/code_VALInterpreter.extract_rate.html +++ /dev/null @@ -1,28 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.extract_rate</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> extract_rate = <span class="keyword">fun</span> beam <span class="keywordsign">-></span><br> - <span class="keyword">let</span> rate_naive_list = <span class="constructor">List</span>.map fst beam <span class="keyword">in</span><br> - <span class="keyword">let</span> correct_rate r = <br> - <span class="keyword">if</span> r = 0 <span class="keyword">then</span> 44100 <br> - <span class="keyword">else</span> <span class="keyword">if</span> r > 0 <span class="keyword">then</span> r<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Rec2"</span>)<br> - <span class="keyword">in</span><br> - <span class="keyword">let</span> rate_list = <span class="constructor">List</span>.map correct_rate rate_naive_list <span class="keyword">in</span><br> - rate_list</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.fun_array_to_fun.html b/documentation/code_VALInterpreter.fun_array_to_fun.html deleted file mode 100644 index d472813..0000000 --- a/documentation/code_VALInterpreter.fun_array_to_fun.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.fun_array_to_fun</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> fun_array_to_fun = <span class="keyword">fun</span> fun_array <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> reverse = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <span class="keyword">fun</span> f <span class="keywordsign">-></span> f t <span class="keyword">in</span><br> - <span class="keyword">let</span> new_fun = <span class="keyword">fun</span> t<span class="keywordsign">-></span> <span class="constructor">Array</span>.map (reverse t) fun_array <span class="keyword">in</span><br> - new_fun</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.interpret_const.html b/documentation/code_VALInterpreter.interpret_const.html deleted file mode 100644 index 89c80cc..0000000 --- a/documentation/code_VALInterpreter.interpret_const.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.interpret_const</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> interpret_const = <span class="keyword">fun</span> v <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">if</span> n = 0 <span class="keyword">then</span> [(0,(<span class="keyword">fun</span> t <span class="keywordsign">-></span> v))] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Const"</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.interpret_ident.html b/documentation/code_VALInterpreter.interpret_ident.html deleted file mode 100644 index c911e20..0000000 --- a/documentation/code_VALInterpreter.interpret_ident.html +++ /dev/null @@ -1,100 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.interpret_ident</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> interpret_ident = <span class="keyword">fun</span> s <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">match</span> s <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Pass</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> input_beam <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident _"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Stop</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [] <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident !"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Add</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_add (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident +"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Sup</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_sub (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident -"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Mul</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_mul (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident *"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Div</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_div (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident /"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Delay</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_delay (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident @"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Mem</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [signal_mem (<span class="constructor">List</span>.nth input_beam 0)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident mem"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Vectorize</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_vectorize (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident vectorize"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Serialize</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [signal_serialize (<span class="constructor">List</span>.nth input_beam 0)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident serialize"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Concat</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_append (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident #"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Nth</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_nth (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident []"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Floor</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [signal_floor (<span class="constructor">List</span>.nth input_beam 0)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident floor"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Int</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [signal_int (<span class="constructor">List</span>.nth input_beam 0)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident int"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Sin</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [signal_sin (<span class="constructor">List</span>.nth input_beam 0)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident sin"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Cos</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [signal_cos (<span class="constructor">List</span>.nth input_beam 0)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident cos"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Atan</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [signal_atan (<span class="constructor">List</span>.nth input_beam 0)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident atan"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Atantwo</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_atantwo (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident atantwo"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Sqrt</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 1 <span class="keyword">then</span> [signal_sqrt (<span class="constructor">List</span>.nth input_beam 0)]<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident sqrt"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Rdtable</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 3 <span class="keyword">then</span> [signal_rdtable (<span class="constructor">List</span>.nth input_beam 0) <br> - (<span class="constructor">List</span>.nth input_beam 1) (<span class="constructor">List</span>.nth input_beam 2)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident rdtable"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Selecttwo</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 3 <span class="keyword">then</span> [signal_select2 (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1) <br> - (<span class="constructor">List</span>.nth input_beam 2)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident select2"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Selectthree</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 4 <span class="keyword">then</span> [signal_select3 (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1) <br> - (<span class="constructor">List</span>.nth input_beam 2) (<span class="constructor">List</span>.nth input_beam 3)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident select3"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Prefix</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_prefix (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident prefix"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Mod</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_mod (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident %"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Larger</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_sup (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident >"</span>)<br> -<br> - <span class="keywordsign">|</span><span class="constructor">Smaller</span> <span class="keywordsign">-></span> <span class="keyword">if</span> n = 2 <span class="keyword">then</span> [signal_inf (<span class="constructor">List</span>.nth input_beam 0) (<span class="constructor">List</span>.nth input_beam 1)] <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Ident <"</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.interpreter.html b/documentation/code_VALInterpreter.interpreter.html deleted file mode 100644 index d729ce1..0000000 --- a/documentation/code_VALInterpreter.interpreter.html +++ /dev/null @@ -1,37 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.interpreter</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> interpreter exp_faust input = <br> - <span class="keyword">let</span> () = print_endline(<span class="string">"Interpretation..."</span>) <span class="keyword">in</span><br> -<br> - <span class="comment">(* make input beam *)</span><br> - <span class="keyword">let</span> input_beam = make_beam input <span class="keyword">in</span><br> -<br> - <span class="comment">(* estimate process dimension *)</span><br> - <span class="keyword">let</span> dimension_tree = dim exp_faust <span class="keyword">in</span><br> -<br> - <span class="comment">(* interprete output beam *)</span><br> - <span class="keyword">let</span> output_beam = eval exp_faust dimension_tree input_beam <span class="keyword">in</span><br> -<br> - <span class="comment">(* get rate list from output beam *)</span><br> - <span class="keyword">let</span> rate_list = extract_rate output_beam <span class="keyword">in</span><br> -<br> - <span class="comment">(* get channel list and data list from output beam *)</span><br> - <span class="keyword">let</span> (channel_list, float_array_list) = compute (<span class="constructor">List</span>.map snd output_beam) <span class="keyword">in</span><br> - (channel_list, rate_list, float_array_list)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.interpreter_macro_to_value.html b/documentation/code_VALInterpreter.interpreter_macro_to_value.html deleted file mode 100644 index 3ca9a53..0000000 --- a/documentation/code_VALInterpreter.interpreter_macro_to_value.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.interpreter_macro_to_value</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> interpreter_macro_to_value m = <span class="keyword">match</span> m <span class="keyword">with</span><br> - <span class="keywordsign">|</span> <span class="constructor">Number_samples_int</span> <span class="keywordsign">-></span> 0xFFFF<br> - <span class="keywordsign">|</span> <span class="constructor">Max_Eval_Time_int</span> <span class="keywordsign">-></span> 0xFFFFFFFF</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.interpreter_rec.html b/documentation/code_VALInterpreter.interpreter_rec.html deleted file mode 100644 index 52a3c4a..0000000 --- a/documentation/code_VALInterpreter.interpreter_rec.html +++ /dev/null @@ -1,169 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.interpreter_rec</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> interpreter_rec exp_faust dimension_tree input_beam = <br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_par : faust_exp -> faust_exp -> beam -> beam, -interprets par(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_par = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> - <span class="keyword">if</span> n = (fst d1) + (fst d2) <span class="keyword">then</span> <br> - (<br> - <span class="keyword">let</span> input_beam1 = sublist input_beam 0 (fst d1) <span class="keyword">in</span><br> - <span class="keyword">let</span> input_beam2 = sublist input_beam (fst d1) (fst d2) <span class="keyword">in</span><br> - <span class="keyword">let</span> output_beam1 = interpreter_rec e1 subtree1 input_beam1 <span class="keyword">in</span><br> - <span class="keyword">let</span> output_beam2 = interpreter_rec e2 subtree2 input_beam2 <span class="keyword">in</span><br> - <span class="keyword">if</span> <span class="constructor">List</span>.length output_beam1 = snd d1 <span class="keywordsign">&&</span> <span class="constructor">List</span>.length output_beam2 = snd d2 <br> - <span class="keyword">then</span> (output_beam1 @ output_beam2) <br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Par"</span>)<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Par"</span>) <span class="keyword">in</span><br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_seq : faust_exp -> faust_exp -> beam -> beam, -interprets seq(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_seq = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> - <span class="keyword">if</span> n = fst d1 <span class="keyword">then</span><br> - (<br> - <span class="keyword">let</span> output_beam1 = interpreter_rec e1 subtree1 input_beam <span class="keyword">in</span><br> - <span class="keyword">if</span> <span class="constructor">List</span>.length output_beam1 = fst d2 <br> - <span class="keyword">then</span> interpreter_rec e2 subtree2 output_beam1<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Seq"</span>)<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Seq"</span>) <span class="keyword">in</span><br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_split : faust_exp -> faust_exp -> beam -> beam, -interprets split(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_split = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> - <span class="keyword">if</span> n = fst d1 <span class="keyword">then</span><br> - (<br> - <span class="keyword">let</span> output_beam1 = interpreter_rec e1 subtree1 input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> ref_output_beam1 = ref (beam_add_one_memory output_beam1) <span class="keyword">in</span><br> - <span class="keyword">let</span> input_beam2 = <span class="constructor">List</span>.concat <br> - (<span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.make ((fst d2)/(<span class="constructor">List</span>.length output_beam1)) !ref_output_beam1)) <br> - <span class="keyword">in</span><br> - <span class="keyword">if</span> <span class="constructor">List</span>.length input_beam2 = fst d2<br> - <span class="keyword">then</span> interpreter_rec e2 subtree2 input_beam2<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Split"</span>)<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Split"</span>) <span class="keyword">in</span><br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_merge : faust_exp -> faust_exp -> beam -> beam, -interprets merge(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_merge = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> - <span class="keyword">if</span> n = fst d1 <span class="keyword">then</span><br> - (<br> - <span class="keyword">let</span> output_beam1 = interpreter_rec e1 subtree1 input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> input_beam2 = <br> - (<br> - <span class="keyword">let</span> fois = (snd d1)/(fst d2) <span class="keyword">in</span><br> - <span class="keyword">let</span> ref_beam = ref (sublist output_beam1 0 (fst d2)) <span class="keyword">in</span><br> - <span class="keyword">for</span> i = 1 <span class="keyword">to</span> fois - 1 <span class="keyword">do</span><br> - <span class="keyword">let</span> temp_beam = sublist output_beam1 (i*(fst d2)) (fst d2) <span class="keyword">in</span><br> - ref_beam := <span class="constructor">List</span>.map2 signal_add (!ref_beam) temp_beam;<br> - <span class="keyword">done</span>;<br> - !ref_beam<br> - )<br> - <span class="keyword">in</span><br> - <span class="keyword">if</span> <span class="constructor">List</span>.length input_beam2 = fst d2<br> - <span class="keyword">then</span> interpreter_rec e2 subtree2 input_beam2<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Merge"</span>)<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Merge"</span>) <span class="keyword">in</span><br> -<br> -<br> -</code><table><tr><td></td><td><span class="comment">(** val interpret_rec : faust_exp -> faust_exp -> beam -> beam, -interprets rec(e1, e2) with input beam, produces output beam.*)</span></td></tr></table><code class="code"><br> -<span class="keyword">let</span> interpret_rec = <span class="keyword">fun</span> e1 <span class="keywordsign">-></span> <span class="keyword">fun</span> e2 <span class="keywordsign">-></span> <span class="keyword">fun</span> dimension_tree <span class="keywordsign">-></span> <span class="keyword">fun</span> input_beam <span class="keywordsign">-></span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree1 = subtree_left dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> subtree2 = subtree_right dimension_tree <span class="keyword">in</span><br> - <span class="keyword">let</span> d1 = get_root subtree1 <span class="keyword">in</span><br> - <span class="keyword">let</span> d2 = get_root subtree2 <span class="keyword">in</span><br> - <span class="keyword">if</span> n = (fst d1) - (snd d2) <span class="keyword">then</span><br> - (<br> - <span class="keyword">let</span> aux1 = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <span class="keyword">fun</span> f <span class="keywordsign">-></span> f t <span class="keyword">in</span><br> - <span class="keyword">let</span> aux2 = <span class="keyword">fun</span> beam_fun <span class="keywordsign">-></span> <span class="keyword">fun</span> i <span class="keywordsign">-></span> <span class="keyword">fun</span> t <span class="keywordsign">-></span> <span class="constructor">List</span>.nth (snd (beam_fun t)) i <span class="keyword">in</span><br> - <span class="keyword">let</span> aux3 = <span class="keyword">fun</span> beam_fun <span class="keywordsign">-></span> <span class="constructor">List</span>.map <br> - (aux2 beam_fun) <br> - (<span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.init (snd d1) (<span class="keyword">fun</span> n <span class="keywordsign">-></span> n))) <br> - <span class="keyword">in</span><br> - <span class="keyword">let</span> make_signal = <span class="keyword">fun</span> rate <span class="keywordsign">-></span> <span class="keyword">fun</span> f <span class="keywordsign">-></span> (rate, f) <span class="keyword">in</span><br> - <span class="keyword">let</span> delay_int = 1 + delay e2 + delay e1 <span class="keyword">in</span><br> - <span class="keyword">let</span> memory_hashtbl = <span class="constructor">Hashtbl</span>.create delay_int <span class="keyword">in</span><br> - <span class="keyword">let</span> rate_list = ref (<span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.make (snd d1) 0)) <span class="keyword">in</span><br> - <span class="keyword">let</span> <span class="keyword">rec</span> output_beam_fun = <span class="keyword">fun</span> t <span class="keywordsign">-></span><br> - <span class="keyword">if</span> t < 0 <span class="keyword">then</span><br> - <span class="keyword">let</span> init_rate_list = <span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.make (snd d1) 0) <span class="keyword">in</span><br> - <span class="keyword">let</span> value_list = <span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.make (snd d1) <span class="constructor">Zero</span>) <span class="keyword">in</span><br> - (init_rate_list, value_list)<br> - <span class="keyword">else</span> <span class="keyword">if</span> <span class="constructor">Hashtbl</span>.mem memory_hashtbl t <span class="keyword">then</span> <br> - (!rate_list, <span class="constructor">Hashtbl</span>.find memory_hashtbl t)<br> - <span class="keyword">else</span> <br> - <span class="keyword">let</span> mid_output_fun_list1 = aux3 output_beam_fun <span class="keyword">in</span> <span class="comment">(* danger! *)</span><br> - <span class="keyword">let</span> b_input_fun_list = <span class="constructor">List</span>.map <br> - (<span class="keyword">fun</span> s <span class="keywordsign">-></span> <span class="keyword">fun</span> t <span class="keywordsign">-></span> s (t - 1)) <br> - (sublist mid_output_fun_list1 0 (fst d2)) <br> - <span class="keyword">in</span><br> - <span class="keyword">let</span> b_input_beam = <span class="constructor">List</span>.map2 make_signal !rate_list b_input_fun_list <span class="keyword">in</span><br> - <span class="keyword">let</span> b_output_beam = (interpreter_rec e2 subtree2 b_input_beam) <span class="keyword">in</span><br> - <span class="keyword">let</span> a_input_beam = b_output_beam @ input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> mid_output_beam2 = interpreter_rec e1 subtree1 a_input_beam <span class="keyword">in</span><br> - <span class="keyword">let</span> mid_output_rate_list = <span class="constructor">List</span>.map fst mid_output_beam2 <span class="keyword">in</span><br> - <span class="keyword">let</span> mid_output_value_list = <span class="constructor">List</span>.map (aux1 t) (<span class="constructor">List</span>.map snd mid_output_beam2) <span class="keyword">in</span><br> - <span class="keyword">let</span> () = (rate_list := mid_output_rate_list) <span class="keyword">in</span><br> - <span class="keyword">let</span> mid_output_value_list_for_stock = v_list_memory mid_output_value_list <span class="keyword">in</span><br> - <span class="keyword">let</span> () = <span class="constructor">Hashtbl</span>.add memory_hashtbl t mid_output_value_list_for_stock <span class="keyword">in</span><br> - <span class="keyword">let</span> () = <span class="constructor">Hashtbl</span>.remove memory_hashtbl (t - delay_int) <span class="keyword">in</span><br> - (mid_output_rate_list, mid_output_value_list_for_stock)<br> - <span class="keyword">in</span><br> - <span class="keyword">let</span> output_beam = <span class="constructor">List</span>.map2 make_signal !rate_list (aux3 output_beam_fun) <span class="keyword">in</span><br> - output_beam<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Evaluation_Error</span> <span class="string">"Rec1"</span>) <span class="keyword">in</span><br> -<br> -<br> - </code><table><tr><td> </td><td><span class="comment">(** Call for previous functions *)</span></td></tr></table><code class="code"><br> - <span class="keyword">match</span> exp_faust <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Const</span> v <span class="keywordsign">-></span> interpret_const v input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Ident</span> s <span class="keywordsign">-></span> interpret_ident s input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Par</span> (e1, e2) <span class="keywordsign">-></span> interpret_par e1 e2 dimension_tree input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Seq</span> (e1, e2) <span class="keywordsign">-></span> interpret_seq e1 e2 dimension_tree input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Split</span> (e1, e2) <span class="keywordsign">-></span> interpret_split e1 e2 dimension_tree input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Merge</span> (e1, e2) <span class="keywordsign">-></span> interpret_merge e1 e2 dimension_tree input_beam<br> - <span class="keywordsign">|</span><span class="constructor">Rec</span> (e1, e2) <span class="keywordsign">-></span> interpret_rec e1 e2 dimension_tree input_beam</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.make_beam.html b/documentation/code_VALInterpreter.make_beam.html deleted file mode 100644 index b0ae9c6..0000000 --- a/documentation/code_VALInterpreter.make_beam.html +++ /dev/null @@ -1,28 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.make_beam</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> make_beam = <span class="keyword">fun</span> input <span class="keywordsign">-></span><br> - <span class="keyword">let</span> rate_list = fst input <span class="keyword">in</span><br> - <span class="keyword">let</span> float_array_list = snd input <span class="keyword">in</span><br> - <span class="keyword">let</span> value_array_list = <br> - <span class="constructor">List</span>.map (<span class="constructor">Array</span>.map return_R) float_array_list <span class="keyword">in</span><br> - <span class="keyword">let</span> fun_list = <span class="constructor">List</span>.map <span class="constructor">Array</span>.get value_array_list <span class="keyword">in</span><br> - <span class="keyword">let</span> make_signal = <span class="keyword">fun</span> rate <span class="keywordsign">-></span> <span class="keyword">fun</span> f <span class="keywordsign">-></span> (rate, f) <span class="keyword">in</span><br> - <span class="keyword">let</span> beam = <span class="constructor">List</span>.map2 make_signal rate_list fun_list <span class="keyword">in</span><br> - beam</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.matrix_transpose.html b/documentation/code_VALInterpreter.matrix_transpose.html deleted file mode 100644 index 2bedad1..0000000 --- a/documentation/code_VALInterpreter.matrix_transpose.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.matrix_transpose</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> matrix_transpose = <span class="keyword">fun</span> m_array_array <span class="keywordsign">-></span> <span class="keyword">fun</span> width <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> get_element = <span class="keyword">fun</span> i <span class="keywordsign">-></span> <span class="keyword">fun</span> array <span class="keywordsign">-></span> <span class="constructor">Array</span>.get array i <span class="keyword">in</span><br> - <span class="keyword">let</span> get_line = <span class="keyword">fun</span> array_array <span class="keywordsign">-></span> <span class="keyword">fun</span> i <span class="keywordsign">-></span> <br> - <span class="constructor">Array</span>.map (get_element i) array_array <span class="keyword">in</span><br> - <span class="keyword">let</span> transpose array_array = <span class="constructor">Array</span>.init width (get_line array_array) <span class="keyword">in</span><br> - transpose m_array_array</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.realise_value_list.html b/documentation/code_VALInterpreter.realise_value_list.html deleted file mode 100644 index 2616f8a..0000000 --- a/documentation/code_VALInterpreter.realise_value_list.html +++ /dev/null @@ -1,36 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.realise_value_list</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> realise_value_list vl = <br> - <span class="keyword">let</span> realise_value = <span class="keyword">fun</span> v <span class="keywordsign">-></span> <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span> <span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span><br> - <span class="keyword">let</span> memory_hashtbl = <span class="constructor">Hashtbl</span>.create size <span class="keyword">in</span><br> - <span class="keyword">let</span> new_vec = <span class="keyword">fun</span> i <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> i >= 0 <span class="keywordsign">&&</span> i < size <span class="keyword">then</span> <br> - (<br> - <span class="keyword">if</span> <span class="constructor">Hashtbl</span>.mem memory_hashtbl i <span class="keyword">then</span> <br> - <span class="constructor">Hashtbl</span>.find memory_hashtbl i<br> - <span class="keyword">else</span> <br> - <span class="keyword">let</span> result = vec i <span class="keyword">in</span><br> - <span class="keyword">let</span> () = <span class="constructor">Hashtbl</span>.add memory_hashtbl i result <span class="keyword">in</span><br> - result <br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Invalid_argument</span> <span class="string">"vector overflow."</span>)<br> - <span class="keyword">in</span><br> - return_Vec (size, new_vec)<br> - <span class="keywordsign">|</span> _ <span class="keywordsign">-></span> v<br> - <span class="keyword">in</span><br> - <span class="constructor">List</span>.map realise_value vl</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALInterpreter.sublist.html b/documentation/code_VALInterpreter.sublist.html deleted file mode 100644 index bb66b24..0000000 --- a/documentation/code_VALInterpreter.sublist.html +++ /dev/null @@ -1,27 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter.sublist</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> sublist l start length = <br> - <span class="keyword">try</span><br> - <span class="keyword">let</span> arr = <span class="constructor">Array</span>.of_list l <span class="keyword">in</span><br> - <span class="keyword">let</span> sub_array = <span class="constructor">Array</span>.sub arr start length <span class="keyword">in</span><br> - <span class="constructor">Array</span>.to_list sub_array<br> -<br> - <span class="keyword">with</span> (<span class="constructor">Invalid_argument</span> <span class="string">"Array.sub"</span>) <span class="keywordsign">-></span><br> - raise (<span class="constructor">Invalid_argument</span> <span class="string">"List.sub"</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALLexer.__ocaml_lex_tables.html b/documentation/code_VALLexer.__ocaml_lex_tables.html deleted file mode 100644 index 62654be..0000000 --- a/documentation/code_VALLexer.__ocaml_lex_tables.html +++ /dev/null @@ -1,43 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Lexer.__ocaml_lex_tables</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> __ocaml_lex_tables = {<br> - <span class="constructor">Lexing</span>.lex_base = <br> - <span class="string">"\000\000\242\255\243\255\001\000\247\255\248\255\249\255\250\255\079\000\000\000\253\255\001\000\072\000\255\255\245\255\252\255\244\255"</span>;<br> - <span class="constructor">Lexing</span>.lex_backtrk = <br> - <span class="string">"\255\255\255\255\255\255\009\000\255\255\255\255\255\255\255\255\004\000\255\255\255\255\002\000\001\000\255\255\255\255\255\255\255\255"</span>;<br> - <span class="constructor">Lexing</span>.lex_default = <br> - <span class="string">"\255\255\000\000\000\000\255\255\000\000\000\000\000\000\000\000\255\255\255\255\000\000\255\255\255\255\000\000\000\000\000\000\000\000"</span>;<br> - <span class="constructor">Lexing</span>.lex_trans = <br> - <span class="string">"\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\013\000\013\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\013\000\010\000\000\000\010\000\000\000\010\000\000\000\000\000\006\000\005\000\010\000\010\000\004\000\010\000\007\000\010\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\003\000\014\000\011\000\000\000\010\000\016\000\010\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\009\000\000\000\015\000\000\000\010\000\000\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\000\000\000\000\000\000\002\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\000\000\000\000\000\000\000\000\000\000\000\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\001\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000"</span>;<br> - <span class="constructor">Lexing</span>.lex_check = <br> - <span class="string">"\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\000\000\000\000\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\000\000\000\000\255\255\000\000\255\255\000\000\255\255\255\255\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\011\000\000\000\255\255\000\000\003\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\255\255\009\000\255\255\000\000\255\255\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\255\255\255\255\255\255\000\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\008\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\255\255\255\255\255\255\255\255\255\255\255\255\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\012\000\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\000\000\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255"</span>;<br> - <span class="constructor">Lexing</span>.lex_base_code = <br> - <span class="string">""</span>;<br> - <span class="constructor">Lexing</span>.lex_backtrk_code = <br> - <span class="string">""</span>;<br> - <span class="constructor">Lexing</span>.lex_default_code = <br> - <span class="string">""</span>;<br> - <span class="constructor">Lexing</span>.lex_trans_code = <br> - <span class="string">""</span>;<br> - <span class="constructor">Lexing</span>.lex_check_code = <br> - <span class="string">""</span>;<br> - <span class="constructor">Lexing</span>.lex_code = <br> - <span class="string">""</span>;<br> -}</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALLexer.__ocaml_lex_token_rec.html b/documentation/code_VALLexer.__ocaml_lex_token_rec.html deleted file mode 100644 index 9fc315f..0000000 --- a/documentation/code_VALLexer.__ocaml_lex_token_rec.html +++ /dev/null @@ -1,109 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Lexer.__ocaml_lex_token_rec</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> token lexbuf =<br> - __ocaml_lex_token_rec lexbuf 0<br> -<span class="keyword">and</span> __ocaml_lex_token_rec lexbuf __ocaml_lex_state =<br> - <span class="keyword">match</span> <span class="constructor">Lexing</span>.engine __ocaml_lex_tables __ocaml_lex_state lexbuf <span class="keyword">with</span><br> - <span class="keywordsign">|</span> 0 <span class="keywordsign">-></span><br> -# 4 "lexer.mll"<br> - ( token lexbuf )<br> -# 127 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 1 <span class="keywordsign">-></span><br> -<span class="keyword">let</span><br> -# 5 "lexer.mll"<br> - x<br> -# 133 "lexer.ml"<br> -= <span class="constructor">Lexing</span>.sub_lexeme lexbuf lexbuf.<span class="constructor">Lexing</span>.lex_start_pos lexbuf.<span class="constructor">Lexing</span>.lex_curr_pos <span class="keyword">in</span><br> -# 5 "lexer.mll"<br> - ( <span class="constructor">IDENT</span> x )<br> -# 137 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 2 <span class="keywordsign">-></span><br> -<span class="keyword">let</span><br> -# 7 "lexer.mll"<br> - x<br> -# 143 "lexer.ml"<br> -= <span class="constructor">Lexing</span>.sub_lexeme_char lexbuf lexbuf.<span class="constructor">Lexing</span>.lex_start_pos <span class="keyword">in</span><br> -# 7 "lexer.mll"<br> - ( <span class="constructor">IDENT</span> (<span class="constructor">String</span>.make 1 x) )<br> -# 147 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 3 <span class="keywordsign">-></span><br> -# 8 "lexer.mll"<br> - ( <span class="constructor">IDENT</span> <span class="string">"[]"</span> )<br> -# 152 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 4 <span class="keywordsign">-></span><br> -<span class="keyword">let</span><br> -# 9 "lexer.mll"<br> - a<br> -# 158 "lexer.ml"<br> -= <span class="constructor">Lexing</span>.sub_lexeme lexbuf lexbuf.<span class="constructor">Lexing</span>.lex_start_pos lexbuf.<span class="constructor">Lexing</span>.lex_curr_pos <span class="keyword">in</span><br> -# 9 "lexer.mll"<br> - ( <span class="constructor">CONST</span> a )<br> -# 162 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 5 <span class="keywordsign">-></span><br> -# 10 "lexer.mll"<br> - ( <span class="constructor">POINT</span> )<br> -# 167 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 6 <span class="keywordsign">-></span><br> -# 11 "lexer.mll"<br> - ( <span class="constructor">LPAR</span> )<br> -# 172 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 7 <span class="keywordsign">-></span><br> -# 12 "lexer.mll"<br> - ( <span class="constructor">RPAR</span> )<br> -# 177 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 8 <span class="keywordsign">-></span><br> -# 13 "lexer.mll"<br> - ( <span class="constructor">PAR</span> )<br> -# 182 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 9 <span class="keywordsign">-></span><br> -# 14 "lexer.mll"<br> - ( <span class="constructor">SEQ</span> )<br> -# 187 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 10 <span class="keywordsign">-></span><br> -# 15 "lexer.mll"<br> - ( <span class="constructor">SPLIT</span> )<br> -# 192 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 11 <span class="keywordsign">-></span><br> -# 16 "lexer.mll"<br> - ( <span class="constructor">MERGE</span> )<br> -# 197 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 12 <span class="keywordsign">-></span><br> -# 17 "lexer.mll"<br> - ( <span class="constructor">REC</span> )<br> -# 202 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 13 <span class="keywordsign">-></span><br> -# 18 "lexer.mll"<br> - ( <span class="constructor">EOF</span> )<br> -# 207 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> __ocaml_lex_state <span class="keywordsign">-></span> lexbuf.<span class="constructor">Lexing</span>.refill_buff lexbuf; __ocaml_lex_token_rec lexbuf __ocaml_lex_state</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALLexer.token.html b/documentation/code_VALLexer.token.html deleted file mode 100644 index 12b55c2..0000000 --- a/documentation/code_VALLexer.token.html +++ /dev/null @@ -1,109 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Lexer.token</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> token lexbuf =<br> - __ocaml_lex_token_rec lexbuf 0<br> -<span class="keyword">and</span> __ocaml_lex_token_rec lexbuf __ocaml_lex_state =<br> - <span class="keyword">match</span> <span class="constructor">Lexing</span>.engine __ocaml_lex_tables __ocaml_lex_state lexbuf <span class="keyword">with</span><br> - <span class="keywordsign">|</span> 0 <span class="keywordsign">-></span><br> -# 4 "lexer.mll"<br> - ( token lexbuf )<br> -# 127 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 1 <span class="keywordsign">-></span><br> -<span class="keyword">let</span><br> -# 5 "lexer.mll"<br> - x<br> -# 133 "lexer.ml"<br> -= <span class="constructor">Lexing</span>.sub_lexeme lexbuf lexbuf.<span class="constructor">Lexing</span>.lex_start_pos lexbuf.<span class="constructor">Lexing</span>.lex_curr_pos <span class="keyword">in</span><br> -# 5 "lexer.mll"<br> - ( <span class="constructor">IDENT</span> x )<br> -# 137 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 2 <span class="keywordsign">-></span><br> -<span class="keyword">let</span><br> -# 7 "lexer.mll"<br> - x<br> -# 143 "lexer.ml"<br> -= <span class="constructor">Lexing</span>.sub_lexeme_char lexbuf lexbuf.<span class="constructor">Lexing</span>.lex_start_pos <span class="keyword">in</span><br> -# 7 "lexer.mll"<br> - ( <span class="constructor">IDENT</span> (<span class="constructor">String</span>.make 1 x) )<br> -# 147 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 3 <span class="keywordsign">-></span><br> -# 8 "lexer.mll"<br> - ( <span class="constructor">IDENT</span> <span class="string">"[]"</span> )<br> -# 152 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 4 <span class="keywordsign">-></span><br> -<span class="keyword">let</span><br> -# 9 "lexer.mll"<br> - a<br> -# 158 "lexer.ml"<br> -= <span class="constructor">Lexing</span>.sub_lexeme lexbuf lexbuf.<span class="constructor">Lexing</span>.lex_start_pos lexbuf.<span class="constructor">Lexing</span>.lex_curr_pos <span class="keyword">in</span><br> -# 9 "lexer.mll"<br> - ( <span class="constructor">CONST</span> a )<br> -# 162 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 5 <span class="keywordsign">-></span><br> -# 10 "lexer.mll"<br> - ( <span class="constructor">POINT</span> )<br> -# 167 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 6 <span class="keywordsign">-></span><br> -# 11 "lexer.mll"<br> - ( <span class="constructor">LPAR</span> )<br> -# 172 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 7 <span class="keywordsign">-></span><br> -# 12 "lexer.mll"<br> - ( <span class="constructor">RPAR</span> )<br> -# 177 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 8 <span class="keywordsign">-></span><br> -# 13 "lexer.mll"<br> - ( <span class="constructor">PAR</span> )<br> -# 182 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 9 <span class="keywordsign">-></span><br> -# 14 "lexer.mll"<br> - ( <span class="constructor">SEQ</span> )<br> -# 187 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 10 <span class="keywordsign">-></span><br> -# 15 "lexer.mll"<br> - ( <span class="constructor">SPLIT</span> )<br> -# 192 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 11 <span class="keywordsign">-></span><br> -# 16 "lexer.mll"<br> - ( <span class="constructor">MERGE</span> )<br> -# 197 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 12 <span class="keywordsign">-></span><br> -# 17 "lexer.mll"<br> - ( <span class="constructor">REC</span> )<br> -# 202 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> 13 <span class="keywordsign">-></span><br> -# 18 "lexer.mll"<br> - ( <span class="constructor">EOF</span> )<br> -# 207 "lexer.ml"<br> -<br> - <span class="keywordsign">|</span> __ocaml_lex_state <span class="keywordsign">-></span> lexbuf.<span class="constructor">Lexing</span>.refill_buff lexbuf; __ocaml_lex_token_rec lexbuf __ocaml_lex_state</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALMain.io_macro_to_string.html b/documentation/code_VALMain.io_macro_to_string.html deleted file mode 100644 index 25c31b9..0000000 --- a/documentation/code_VALMain.io_macro_to_string.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Main.io_macro_to_string</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> io_macro_to_string m = <span class="keyword">match</span> m <span class="keyword">with</span><br> - <span class="keywordsign">|</span> <span class="constructor">Input_Route_string</span> <span class="keywordsign">-></span> <span class="string">"input_sounds/"</span><br> - <span class="keywordsign">|</span> <span class="constructor">Output_Route_string</span> <span class="keywordsign">-></span> <span class="string">"output_sounds/"</span><br> - <span class="keywordsign">|</span> <span class="constructor">Dsp_Route_string</span> <span class="keywordsign">-></span> <span class="string">"dsp_files/"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALMain.main.html b/documentation/code_VALMain.main.html deleted file mode 100644 index e647e0d..0000000 --- a/documentation/code_VALMain.main.html +++ /dev/null @@ -1,54 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Main.main</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> main () = <br> -<br> - <span class="comment">(* ignore system alarm clock *)</span><br> - <span class="keyword">let</span> _ = <span class="constructor">Sys</span>.signal <span class="constructor">Sys</span>.sigalrm <span class="constructor">Sys</span>.<span class="constructor">Signal_ignore</span> <span class="keyword">in</span><br> -<br> - <span class="comment">(* set garbage collector *)</span><br> - <span class="keyword">let</span> _ = set_GC () <span class="keyword">in</span><br> -<br> - <span class="comment">(* read input wave files *)</span><br> - <span class="keyword">let</span> (input_rate_list, input_float_array_list) = read_input_wave <span class="constructor">Sys</span>.argv <span class="keyword">in</span><br> - <br> - <span class="comment">(* select output type *)</span><br> - <span class="keyword">let</span> output_type = <span class="constructor">Sys</span>.argv.(1) <span class="keyword">in</span><br> -<br> - <span class="keyword">try</span><br> - <span class="comment">(* preprocess *)</span><br> - <span class="keyword">let</span> dsp_file_route_string = (io_macro_to_string <span class="constructor">Dsp_Route_string</span>) ^ <span class="constructor">Sys</span>.argv.(2) <span class="keyword">in</span><br> - <span class="keyword">let</span> exp_string = <span class="constructor">Preprocess</span>.preprocess(dsp_file_route_string) <span class="keyword">in</span><br> -<br> - <span class="comment">(* parsing *)</span><br> - <span class="keyword">let</span> exp_faust = exp_of_string exp_string <span class="keyword">in</span><br> -<br> - <span class="comment">(* interpretation *)</span><br> - <span class="keyword">let</span> (output_channel_list, output_rate_list, output_float_array_list) = <br> - interpreter exp_faust (input_rate_list, input_float_array_list) <span class="keyword">in</span><br> -<br> - <span class="comment">(* make output wave files *)</span><br> - <span class="keyword">if</span> output_type = <span class="string">"-wav"</span> <span class="keyword">then</span><br> - write_output_wave output_channel_list output_rate_list output_float_array_list<br> - <span class="keyword">else</span> <span class="keyword">if</span> output_type = <span class="string">"-txt"</span> <span class="keyword">then</span><br> - write_output_txt output_channel_list output_float_array_list<br> - <span class="keyword">else</span> raise (<span class="constructor">Invalid_argument</span> (<span class="string">"Unkown option: "</span> ^ output_type))<br> -<br> - <span class="keyword">with</span> <span class="constructor">NotYetDone</span> <span class="keywordsign">-></span><br> - print_endline(<span class="string">"Operation not yet programed.."</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALMain.read_input_wave.html b/documentation/code_VALMain.read_input_wave.html deleted file mode 100644 index ad14e39..0000000 --- a/documentation/code_VALMain.read_input_wave.html +++ /dev/null @@ -1,44 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Main.read_input_wave</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> read_input_wave = <span class="keyword">fun</span> argv <span class="keywordsign">-></span><br> - <span class="keyword">let</span> n_input = (<span class="constructor">Array</span>.length argv) - 3 <span class="keyword">in</span><br> - <span class="keyword">if</span> n_input < 0 <span class="keyword">then</span> <br> - raise <span class="constructor">Missing_Expression</span><br> - <span class="keyword">else</span> <span class="keyword">if</span> n_input = 0 <span class="keyword">then</span> <br> - ([], [])<br> - <span class="keyword">else</span><br> - <span class="comment">(* open wave file *)</span><br> - <span class="keyword">let</span> file_string_array = <span class="constructor">Array</span>.sub argv 3 n_input <span class="keyword">in</span><br> - <span class="keyword">let</span> make_chemin s = io_macro_to_string <span class="constructor">Input_Route_string</span> ^ s <span class="keyword">in</span><br> - <span class="keyword">let</span> file_chemin_string_array = <span class="constructor">Array</span>.map make_chemin file_string_array <span class="keyword">in</span><br> - <span class="keyword">let</span> file_array = <span class="constructor">Array</span>.map <span class="constructor">Sndfile</span>.openfile file_chemin_string_array <span class="keyword">in</span><br> - <span class="keyword">let</span> file_list = <span class="constructor">Array</span>.to_list file_array <span class="keyword">in</span><br> -<br> - <span class="comment">(* prepare data container *)</span><br> - <span class="keyword">let</span> frames_array = <span class="constructor">Array</span>.map <span class="constructor">Int64</span>.to_int (<span class="constructor">Array</span>.map <span class="constructor">Sndfile</span>.frames file_array) <span class="keyword">in</span><br> - <span class="keyword">let</span> create_data_array num = <span class="constructor">Array</span>.create num 1. <span class="keyword">in</span><br> - <span class="keyword">let</span> data_float_array_array = <span class="constructor">Array</span>.map create_data_array frames_array <span class="keyword">in</span><br> - <span class="keyword">let</span> data_float_array_list = <span class="constructor">Array</span>.to_list data_float_array_array <span class="keyword">in</span><br> - <br> - <span class="comment">(* read sample rates and data *)</span><br> - <span class="keyword">let</span> rate_list = <span class="constructor">List</span>.map <span class="constructor">Sndfile</span>.samplerate file_list <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">List</span>.map2 <span class="constructor">Sndfile</span>.read file_list data_float_array_list <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">List</span>.map <span class="constructor">Sndfile</span>.close file_list <span class="keyword">in</span><br> - (rate_list, data_float_array_list)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALMain.set_GC.html b/documentation/code_VALMain.set_GC.html deleted file mode 100644 index 54604b1..0000000 --- a/documentation/code_VALMain.set_GC.html +++ /dev/null @@ -1,27 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Main.set_GC</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> set_GC () = <br> - <span class="keyword">let</span> _ = <span class="constructor">Gc</span>.set { (<span class="constructor">Gc</span>.get()) <span class="keyword">with</span> <span class="constructor">Gc</span>.minor_heap_size = 0xFFFFFF } <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">Gc</span>.set { (<span class="constructor">Gc</span>.get()) <span class="keyword">with</span> <span class="constructor">Gc</span>.major_heap_increment = 0xFFFFFF } <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">Gc</span>.set { (<span class="constructor">Gc</span>.get()) <span class="keyword">with</span> <span class="constructor">Gc</span>.space_overhead = 100 } <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">Gc</span>.set { (<span class="constructor">Gc</span>.get()) <span class="keyword">with</span> <span class="constructor">Gc</span>.max_overhead = 0xFFFFF } <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">Gc</span>.set { (<span class="constructor">Gc</span>.get()) <span class="keyword">with</span> <span class="constructor">Gc</span>.stack_limit = 0xFFFFF } <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">Gc</span>.set { (<span class="constructor">Gc</span>.get()) <span class="keyword">with</span> <span class="constructor">Gc</span>.allocation_policy = 0 } <span class="keyword">in</span><br> - ()</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALMain.write_output_txt.html b/documentation/code_VALMain.write_output_txt.html deleted file mode 100644 index 472107f..0000000 --- a/documentation/code_VALMain.write_output_txt.html +++ /dev/null @@ -1,55 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Main.write_output_txt</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> write_output_txt = <span class="keyword">fun</span> channel_int_list <span class="keywordsign">-></span> <span class="keyword">fun</span> data_float_array_list <span class="keywordsign">-></span><br> - <span class="keyword">let</span> () = print_endline(<span class="string">"Making output txt files..."</span>) <span class="keyword">in</span><br> -<br> - <span class="comment">(* make output txt file names : output0, output1, ... *)</span><br> - <span class="keyword">let</span> n_output = <span class="constructor">List</span>.length data_float_array_list <span class="keyword">in</span><br> - <span class="keyword">let</span> n_array = <span class="constructor">Array</span>.init n_output (<span class="keyword">fun</span> n <span class="keywordsign">-></span> n) <span class="keyword">in</span><br> - <span class="keyword">let</span> make_file_name i = <span class="string">"output"</span> ^ (string_of_int i) ^ <span class="string">".csv"</span> <span class="keyword">in</span><br> -<br> - <span class="comment">(* make output wave file routes *)</span><br> - <span class="keyword">let</span> make_chemin s = io_macro_to_string <span class="constructor">Output_Route_string</span> ^ s <span class="keyword">in</span><br> - <span class="keyword">let</span> file_name_string_array = <span class="constructor">Array</span>.map make_file_name n_array <span class="keyword">in</span><br> - <span class="keyword">let</span> file_chemin_string_array = <span class="constructor">Array</span>.map make_chemin file_name_string_array <span class="keyword">in</span><br> - <span class="keyword">let</span> file_chemin_string_list = <span class="constructor">Array</span>.to_list file_chemin_string_array <span class="keyword">in</span><br> -<br> - <span class="comment">(* open output channels *)</span><br> - <span class="keyword">let</span> file_list = <span class="constructor">List</span>.map open_out file_chemin_string_list <span class="keyword">in</span><br> - <span class="keyword">let</span> array_to_string = <span class="keyword">fun</span> data_float_array <span class="keywordsign">-></span> <span class="keyword">fun</span> channel_int <span class="keywordsign">-></span><br> - <span class="keyword">let</span> data_length = <span class="constructor">Array</span>.length data_float_array <span class="keyword">in</span><br> - <span class="keyword">let</span> <span class="keyword">rec</span> to_string_rec = <br> - <span class="keyword">fun</span> data <span class="keywordsign">-></span> <span class="keyword">fun</span> channel <span class="keywordsign">-></span> <span class="keyword">fun</span> n <span class="keywordsign">-></span> <span class="keyword">fun</span> i <span class="keywordsign">-></span> <span class="keyword">fun</span> column <span class="keywordsign">-></span><br> - <span class="keyword">if</span> i < n <span class="keyword">then</span> <br> - (<br> - <span class="keyword">let</span> element = string_of_float (data.(i)) <span class="keyword">in</span><br> - <span class="keyword">if</span> column < (channel - 1) <span class="keyword">then</span> <br> - element ^ <span class="string">","</span> ^ (to_string_rec data channel n (i + 1) (column + 1))<br> - <span class="keyword">else</span> <span class="keyword">if</span> column = (channel - 1) <span class="keyword">then</span><br> - element ^ <span class="string">"\n"</span> ^ (to_string_rec data channel n (i + 1) 0)<br> - <span class="keyword">else</span> raise (<span class="constructor">Invalid_argument</span> <span class="string">"write_output_txt."</span>)<br> - )<br> - <span class="keyword">else</span> <span class="string">""</span> <span class="keyword">in</span><br> - to_string_rec data_float_array channel_int data_length 0 0 <span class="keyword">in</span><br> -<br> - <span class="keyword">let</span> data_string_list = <span class="constructor">List</span>.map2 array_to_string data_float_array_list channel_int_list <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">List</span>.map2 output_string file_list data_string_list <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">List</span>.map close_out file_list <span class="keyword">in</span><br> - print_endline(<span class="string">"Success"</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALMain.write_output_wave.html b/documentation/code_VALMain.write_output_wave.html deleted file mode 100644 index 0f92cb3..0000000 --- a/documentation/code_VALMain.write_output_wave.html +++ /dev/null @@ -1,47 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Main.write_output_wave</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> write_output_wave = <span class="keyword">fun</span> channel_int_list <span class="keywordsign">-></span> <span class="keyword">fun</span> rate_int_list <span class="keywordsign">-></span> <span class="keyword">fun</span> data_float_array_list <span class="keywordsign">-></span><br> - <span class="keyword">let</span> () = print_endline(<span class="string">"Making output wave files..."</span>) <span class="keyword">in</span><br> - <br> - <span class="comment">(* make output wave file names : output0, output1, ... *)</span><br> - <span class="keyword">let</span> n_output = <span class="constructor">List</span>.length data_float_array_list <span class="keyword">in</span><br> - <span class="keyword">let</span> n_array = <span class="constructor">Array</span>.init n_output (<span class="keyword">fun</span> n <span class="keywordsign">-></span> n) <span class="keyword">in</span><br> - <span class="keyword">let</span> make_file_name i = <span class="string">"output"</span> ^ (string_of_int i) ^ <span class="string">".wav"</span> <span class="keyword">in</span><br> -<br> - <span class="comment">(* make output wave file routes *)</span><br> - <span class="keyword">let</span> make_chemin s = io_macro_to_string <span class="constructor">Output_Route_string</span> ^ s <span class="keyword">in</span><br> - <span class="keyword">let</span> file_name_string_array = <span class="constructor">Array</span>.map make_file_name n_array <span class="keyword">in</span><br> - <span class="keyword">let</span> file_chemin_string_array = <span class="constructor">Array</span>.map make_chemin file_name_string_array <span class="keyword">in</span><br> - <span class="keyword">let</span> file_chemin_string_list = <span class="constructor">Array</span>.to_list file_chemin_string_array <span class="keyword">in</span><br> -<br> - <span class="comment">(* open files for writing with respects to channel numbers and sample rates *)</span><br> - <span class="keyword">let</span> file_format = <span class="constructor">Sndfile</span>.format <span class="constructor">Sndfile</span>.<span class="constructor">MAJOR_WAV</span> <span class="constructor">Sndfile</span>.<span class="constructor">MINOR_PCM_16</span> <span class="keyword">in</span><br> - <span class="keyword">let</span> openwr = <span class="keyword">fun</span> file_chemin_string <span class="keywordsign">-></span> <span class="keyword">fun</span> channel <span class="keywordsign">-></span> <span class="keyword">fun</span> rate <span class="keywordsign">-></span> <br> - <span class="constructor">Sndfile</span>.openfile ~info:(<span class="constructor">Sndfile</span>.<span class="constructor">RDWR</span>, file_format, channel, rate) file_chemin_string <span class="keyword">in</span><br> - <span class="keyword">let</span> openwr_fun_list = <span class="keyword">fun</span> fl <span class="keywordsign">-></span> <span class="keyword">fun</span> cl <span class="keywordsign">-></span> <span class="keyword">fun</span> rl <span class="keywordsign">-></span> <span class="keyword">fun</span> i <span class="keywordsign">-></span> <br> - openwr (<span class="constructor">List</span>.nth fl i) (<span class="constructor">List</span>.nth cl i) (<span class="constructor">List</span>.nth rl i) <span class="keyword">in</span><br> - <span class="keyword">let</span> output_file_list = <span class="constructor">List</span>.map <br> - (openwr_fun_list file_chemin_string_list channel_int_list rate_int_list) <br> - (<span class="constructor">Array</span>.to_list (<span class="constructor">Array</span>.init n_output (<span class="keyword">fun</span> n <span class="keywordsign">-></span> n))) <span class="keyword">in</span><br> -<br> - <span class="comment">(* write data into files *)</span><br> - <span class="keyword">let</span> _ = <span class="constructor">List</span>.map2 <span class="constructor">Sndfile</span>.write output_file_list data_float_array_list <span class="keyword">in</span><br> - <span class="keyword">let</span> _ = <span class="constructor">List</span>.map <span class="constructor">Sndfile</span>.close output_file_list <span class="keyword">in</span><br> - print_endline(<span class="string">"Success."</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.main.html b/documentation/code_VALParser.main.html deleted file mode 100644 index 2028ea7..0000000 --- a/documentation/code_VALParser.main.html +++ /dev/null @@ -1,21 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.main</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> main (lexfun : <span class="constructor">Lexing</span>.lexbuf <span class="keywordsign">-></span> token) (lexbuf : <span class="constructor">Lexing</span>.lexbuf) =<br> - (<span class="constructor">Parsing</span>.yyparse yytables 1 lexfun lexbuf : <span class="constructor">Types</span>.faust_exp)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yyact.html b/documentation/code_VALParser.yyact.html deleted file mode 100644 index e222b8a..0000000 --- a/documentation/code_VALParser.yyact.html +++ /dev/null @@ -1,107 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yyact</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yyact = [|<br> - (<span class="keyword">fun</span> _ <span class="keywordsign">-></span> failwith <span class="string">"parser"</span>)<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 1 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 16 "parser.mly"<br> - ( _1 )<br> -# 167 "parser.ml"<br> - : <span class="constructor">Types</span>.faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : string) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 17 "parser.mly"<br> - ( <span class="constructor">Const</span>(<span class="constructor">N</span> (int_of_string _1)) )<br> -# 174 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 1 : string) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 18 "parser.mly"<br> - ( <span class="constructor">Const</span>(<span class="constructor">R</span> (float_of_string _1)) )<br> -# 181 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : string) <span class="keyword">in</span><br> - <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : string) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 19 "parser.mly"<br> - ( <span class="constructor">Const</span>(<span class="constructor">R</span> (float_of_string (_1 ^ <span class="string">"."</span> ^ _3))) )<br> -# 189 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : string) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 20 "parser.mly"<br> - ( <span class="constructor">Ident</span>(symbol_of_string _1) )<br> -# 196 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _2 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 1 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 21 "parser.mly"<br> - ( _2 )<br> -# 203 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 22 "parser.mly"<br> - ( <span class="constructor">Par</span>(_1,_3) )<br> -# 211 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 23 "parser.mly"<br> - ( <span class="constructor">Split</span>(_1,_3) )<br> -# 219 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 24 "parser.mly"<br> - ( <span class="constructor">Merge</span>(_1,_3) )<br> -# 227 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 25 "parser.mly"<br> - ( <span class="constructor">Seq</span>(_1,_3) )<br> -# 235 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span><br> - <span class="keyword">let</span> _1 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 2 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="keyword">let</span> _3 = (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0 : <span class="keywordsign">'</span>faust_exp) <span class="keyword">in</span><br> - <span class="constructor">Obj</span>.repr(<br> -# 26 "parser.mly"<br> - ( <span class="constructor">Rec</span>(_1,_3) )<br> -# 243 "parser.ml"<br> - : <span class="keywordsign">'</span>faust_exp))<br> -<span class="comment">(* Entry main *)</span><br> -; (<span class="keyword">fun</span> __caml_parser_env <span class="keywordsign">-></span> raise (<span class="constructor">Parsing</span>.<span class="constructor">YYexit</span> (<span class="constructor">Parsing</span>.peek_val __caml_parser_env 0)))<br> -|]</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yycheck.html b/documentation/code_VALParser.yycheck.html deleted file mode 100644 index ff74536..0000000 --- a/documentation/code_VALParser.yycheck.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yycheck</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yycheck = <span class="string">"\001\000\000\000\005\001\006\001\007\001\008\001\009\001\000\000\005\000\001\001\002\001\003\001\000\000\010\000\011\000\012\000\013\000\014\000\000\000\008\001\009\001\005\001\000\000\000\000\008\001\009\001\000\000\004\001\005\001\006\001\007\001\008\001\009\001\001\001\010\001\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\004\001\005\001\006\001\007\001\008\001\009\001\004\001\005\001\006\001\007\001\008\001\009\001\005\001\006\001\007\001\008\001\009\001\004\001\005\001\006\001\007\001\004\001\004\001\006\001\007\001\004\001"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yydefred.html b/documentation/code_VALParser.yydefred.html deleted file mode 100644 index 0458beb..0000000 --- a/documentation/code_VALParser.yydefred.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yydefred</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yydefred = <span class="string">"\000\000\000\000\000\000\000\000\005\000\000\000\012\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\001\000\004\000\006\000\000\000\000\000\000\000\000\000\011\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yydgoto.html b/documentation/code_VALParser.yydgoto.html deleted file mode 100644 index 79565f6..0000000 --- a/documentation/code_VALParser.yydgoto.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yydgoto</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yydgoto = <span class="string">"\002\000\006\000\007\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yygindex.html b/documentation/code_VALParser.yygindex.html deleted file mode 100644 index 6a9cc07..0000000 --- a/documentation/code_VALParser.yygindex.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yygindex</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yygindex = <span class="string">"\000\000\000\000\003\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yylen.html b/documentation/code_VALParser.yylen.html deleted file mode 100644 index fbfc117..0000000 --- a/documentation/code_VALParser.yylen.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yylen</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yylen = <span class="string">"\002\000\002\000\001\000\002\000\003\000\001\000\003\000\003\000\003\000\003\000\003\000\003\000\002\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yylhs.html b/documentation/code_VALParser.yylhs.html deleted file mode 100644 index 2165ab7..0000000 --- a/documentation/code_VALParser.yylhs.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yylhs</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yylhs = <span class="string">"\255\255\001\000\002\000\002\000\002\000\002\000\002\000\002\000\002\000\002\000\002\000\002\000\000\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yynames_block.html b/documentation/code_VALParser.yynames_block.html deleted file mode 100644 index 12e0510..0000000 --- a/documentation/code_VALParser.yynames_block.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yynames_block</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yynames_block = <span class="string">"CONST\000IDENT\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yynames_const.html b/documentation/code_VALParser.yynames_const.html deleted file mode 100644 index a4aa4b7..0000000 --- a/documentation/code_VALParser.yynames_const.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yynames_const</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yynames_const = <span class="string">"LPAR\000RPAR\000SEQ\000SPLIT\000MERGE\000PAR\000REC\000EOF\000POINT\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yyrindex.html b/documentation/code_VALParser.yyrindex.html deleted file mode 100644 index 6665d73..0000000 --- a/documentation/code_VALParser.yyrindex.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yyrindex</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yyrindex = <span class="string">"\000\000\000\000\000\000\001\000\000\000\000\000\000\000\000\000\007\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\022\000\023\000\026\000\018\000\000\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yysindex.html b/documentation/code_VALParser.yysindex.html deleted file mode 100644 index ec47617..0000000 --- a/documentation/code_VALParser.yysindex.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yysindex</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yysindex = <span class="string">"\255\255\008\255\000\000\024\255\000\000\008\255\000\000\012\000\032\255\023\255\008\255\008\255\008\255\008\255\008\255\000\000\000\000\000\000\016\255\253\254\253\254\011\255\000\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yytable.html b/documentation/code_VALParser.yytable.html deleted file mode 100644 index 6bea9d1..0000000 --- a/documentation/code_VALParser.yytable.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yytable</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yytable = <span class="string">"\001\000\002\000\010\000\011\000\012\000\013\000\014\000\003\000\009\000\003\000\004\000\005\000\015\000\018\000\019\000\020\000\021\000\022\000\007\000\013\000\014\000\010\000\010\000\008\000\013\000\014\000\009\000\017\000\010\000\011\000\012\000\013\000\014\000\016\000\008\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\002\000\002\000\002\000\002\000\002\000\002\000\003\000\003\000\003\000\003\000\003\000\003\000\010\000\011\000\012\000\013\000\014\000\007\000\007\000\007\000\007\000\010\000\008\000\010\000\010\000\009\000"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yytables.html b/documentation/code_VALParser.yytables.html deleted file mode 100644 index 58b5b92..0000000 --- a/documentation/code_VALParser.yytables.html +++ /dev/null @@ -1,36 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yytables</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yytables =<br> - { <span class="constructor">Parsing</span>.actions=yyact;<br> - <span class="constructor">Parsing</span>.transl_const=yytransl_const;<br> - <span class="constructor">Parsing</span>.transl_block=yytransl_block;<br> - <span class="constructor">Parsing</span>.lhs=yylhs;<br> - <span class="constructor">Parsing</span>.len=yylen;<br> - <span class="constructor">Parsing</span>.defred=yydefred;<br> - <span class="constructor">Parsing</span>.dgoto=yydgoto;<br> - <span class="constructor">Parsing</span>.sindex=yysindex;<br> - <span class="constructor">Parsing</span>.rindex=yyrindex;<br> - <span class="constructor">Parsing</span>.gindex=yygindex;<br> - <span class="constructor">Parsing</span>.tablesize=yytablesize;<br> - <span class="constructor">Parsing</span>.table=yytable;<br> - <span class="constructor">Parsing</span>.check=yycheck;<br> - <span class="constructor">Parsing</span>.error_function=parse_error;<br> - <span class="constructor">Parsing</span>.names_const=yynames_const;<br> - <span class="constructor">Parsing</span>.names_block=yynames_block }</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yytablesize.html b/documentation/code_VALParser.yytablesize.html deleted file mode 100644 index 08a29f3..0000000 --- a/documentation/code_VALParser.yytablesize.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yytablesize</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yytablesize = 286</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yytransl_block.html b/documentation/code_VALParser.yytransl_block.html deleted file mode 100644 index e3c0b9b..0000000 --- a/documentation/code_VALParser.yytransl_block.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yytransl_block</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yytransl_block = [|<br> - 257 <span class="comment">(* CONST *)</span>;<br> - 258 <span class="comment">(* IDENT *)</span>;<br> - 0|]</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALParser.yytransl_const.html b/documentation/code_VALParser.yytransl_const.html deleted file mode 100644 index 241c3d4..0000000 --- a/documentation/code_VALParser.yytransl_const.html +++ /dev/null @@ -1,30 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser.yytransl_const</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> yytransl_const = [|<br> - 259 <span class="comment">(* LPAR *)</span>;<br> - 260 <span class="comment">(* RPAR *)</span>;<br> - 261 <span class="comment">(* SEQ *)</span>;<br> - 262 <span class="comment">(* SPLIT *)</span>;<br> - 263 <span class="comment">(* MERGE *)</span>;<br> - 264 <span class="comment">(* PAR *)</span>;<br> - 265 <span class="comment">(* REC *)</span>;<br> - 0 <span class="comment">(* EOF *)</span>;<br> - 266 <span class="comment">(* POINT *)</span>;<br> - 0|]</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALPreprocess.preprocess.html b/documentation/code_VALPreprocess.preprocess.html deleted file mode 100644 index 4533eee..0000000 --- a/documentation/code_VALPreprocess.preprocess.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Preprocess.preprocess</title> -</head> -<body> -<code class="code"><span class="keyword">external</span> preprocess: string <span class="keywordsign">-></span> string = <span class="string">"preProcess_cpp"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.beam_add_one_memory.html b/documentation/code_VALSignal.beam_add_one_memory.html deleted file mode 100644 index 095e841..0000000 --- a/documentation/code_VALSignal.beam_add_one_memory.html +++ /dev/null @@ -1,21 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.beam_add_one_memory</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> beam_add_one_memory = <span class="keyword">fun</span> beam <span class="keywordsign">-></span> <br> - <span class="constructor">List</span>.map signal_add_one_memory beam</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.check_frequency.html b/documentation/code_VALSignal.check_frequency.html deleted file mode 100644 index 88d94ba..0000000 --- a/documentation/code_VALSignal.check_frequency.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.check_frequency</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> check_frequency = <span class="keyword">fun</span> f1 <span class="keywordsign">-></span> <span class="keyword">fun</span> f2 <span class="keywordsign">-></span><br> - <span class="keyword">if</span> f1 = f2 <span class="keywordsign">||</span> f2 = 0 <span class="keyword">then</span> f1<br> - <span class="keyword">else</span> <span class="keyword">if</span> f1 = 0 <span class="keyword">then</span> f2<br> - <span class="keyword">else</span> raise (<span class="constructor">Signal_operation</span> <span class="string">"frequency not matched."</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.frequency.html b/documentation/code_VALSignal.frequency.html deleted file mode 100644 index c8b106b..0000000 --- a/documentation/code_VALSignal.frequency.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.frequency</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> frequency s = fst s</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.prefix.html b/documentation/code_VALSignal.prefix.html deleted file mode 100644 index 5093c74..0000000 --- a/documentation/code_VALSignal.prefix.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.prefix</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> prefix = <span class="keyword">fun</span> s0 <span class="keywordsign">-></span> <span class="keyword">fun</span> s1 <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span><br> - <span class="keyword">if</span> t = 0 <span class="keyword">then</span> (signal_fun s0) 0<br> - <span class="keyword">else</span> <span class="keyword">if</span> t > 0 <span class="keyword">then</span> (signal_fun s1) t<br> - <span class="keyword">else</span> raise (<span class="constructor">Signal_operation</span> <span class="string">"prefix time cannot be < 0."</span>)<br> - <span class="keyword">in</span><br> - (frequency s1, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_add.html b/documentation/code_VALSignal.signal_add.html deleted file mode 100644 index e395d09..0000000 --- a/documentation/code_VALSignal.signal_add.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_add</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_add s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> ((signal_fun s1) t) +~ ((signal_fun s2) t) <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_add_one_memory.html b/documentation/code_VALSignal.signal_add_one_memory.html deleted file mode 100644 index f4be604..0000000 --- a/documentation/code_VALSignal.signal_add_one_memory.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_add_one_memory</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_add_one_memory = <span class="keyword">fun</span> s <span class="keywordsign">-></span><br> - <span class="keyword">let</span> new_signal = factory_add_memory (signal_fun s) 1 <span class="keyword">in</span><br> - (frequency s, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_append.html b/documentation/code_VALSignal.signal_append.html deleted file mode 100644 index 619e304..0000000 --- a/documentation/code_VALSignal.signal_append.html +++ /dev/null @@ -1,31 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_append</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_append s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> temp1 = (signal_fun s1) t <span class="keyword">in</span><br> - <span class="keyword">let</span> temp2 = (signal_fun s2) t <span class="keyword">in</span><br> - <span class="keyword">match</span> (temp1, temp2) <span class="keyword">with</span><br> - <span class="keywordsign">|</span>(<span class="constructor">Vec</span> (size1, vec1), <span class="constructor">Vec</span> (size2, vec2)) <span class="keywordsign">-></span><br> - <span class="keyword">let</span> new_vec = <span class="keyword">fun</span> i <span class="keywordsign">-></span> <span class="keyword">if</span> i < size1 <span class="keyword">then</span> vec1 i <span class="keyword">else</span> vec2 (i - size1) <span class="keyword">in</span><br> - make_vector (size1 + size2) new_vec<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Append: input signals should be vectors."</span>)<br> - <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_atan.html b/documentation/code_VALSignal.signal_atan.html deleted file mode 100644 index 9ac1fa2..0000000 --- a/documentation/code_VALSignal.signal_atan.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_atan</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_atan s = <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_atan ((signal_fun s) t) <span class="keyword">in</span><br> - (frequency s, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_atantwo.html b/documentation/code_VALSignal.signal_atantwo.html deleted file mode 100644 index 2e062db..0000000 --- a/documentation/code_VALSignal.signal_atantwo.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_atantwo</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_atantwo s1 s2 = <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_atantwo ((signal_fun s1) t) ((signal_fun s2) t) <span class="keyword">in</span><br> - (frequency s1, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_check_frequency.html b/documentation/code_VALSignal.signal_check_frequency.html deleted file mode 100644 index 288008f..0000000 --- a/documentation/code_VALSignal.signal_check_frequency.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_check_frequency</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_check_frequency = <span class="keyword">fun</span> s1 <span class="keywordsign">-></span> <span class="keyword">fun</span> s2 <span class="keywordsign">-></span><br> - <span class="keyword">let</span> f1 = frequency s1 <span class="keyword">in</span><br> - <span class="keyword">let</span> f2 = frequency s2 <span class="keyword">in</span><br> - check_frequency f1 f2</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_check_frequency3.html b/documentation/code_VALSignal.signal_check_frequency3.html deleted file mode 100644 index 00441fe..0000000 --- a/documentation/code_VALSignal.signal_check_frequency3.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_check_frequency3</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_check_frequency3 = <span class="keyword">fun</span> s1 <span class="keywordsign">-></span> <span class="keyword">fun</span> s2 <span class="keywordsign">-></span> <span class="keyword">fun</span> s3 <span class="keywordsign">-></span><br> - <span class="keyword">let</span> f1 = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> f2 = signal_check_frequency s1 s3 <span class="keyword">in</span><br> - check_frequency f1 f2</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_check_frequency4.html b/documentation/code_VALSignal.signal_check_frequency4.html deleted file mode 100644 index e812d0e..0000000 --- a/documentation/code_VALSignal.signal_check_frequency4.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_check_frequency4</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_check_frequency4 = <span class="keyword">fun</span> s1 <span class="keywordsign">-></span> <span class="keyword">fun</span> s2 <span class="keywordsign">-></span> <span class="keyword">fun</span> s3 <span class="keywordsign">-></span> <span class="keyword">fun</span> s4 <span class="keywordsign">-></span><br> - <span class="keyword">let</span> f1 = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> f2 = signal_check_frequency s3 s4 <span class="keyword">in</span><br> - check_frequency f1 f2</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_cos.html b/documentation/code_VALSignal.signal_cos.html deleted file mode 100644 index d60bd06..0000000 --- a/documentation/code_VALSignal.signal_cos.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_cos</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_cos s = <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_cos ((signal_fun s) t) <span class="keyword">in</span><br> - (frequency s, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_delay.html b/documentation/code_VALSignal.signal_delay.html deleted file mode 100644 index ef46fee..0000000 --- a/documentation/code_VALSignal.signal_delay.html +++ /dev/null @@ -1,37 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_delay</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_delay s1 s2 = <br> - <span class="keyword">let</span> s1_mem = factory_add_memory (signal_fun s1) <br> - (signal_macro_to_int <span class="constructor">Delay_Memory_Length_int</span>) <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> delay = (signal_fun s2) t <span class="keyword">in</span><br> - <span class="keyword">match</span> delay <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> <span class="keyword">if</span> i < 0 <span class="keyword">then</span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Delay time < 0."</span>) <br> - <span class="keyword">else</span> <span class="keyword">if</span> (t - i) >= 0 <span class="keyword">then</span> s1_mem (t - i) <br> - <span class="keyword">else</span> v_zero (s1_mem 0)<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <span class="keyword">let</span> i = int_of_float f <span class="keyword">in</span><br> - <span class="keyword">if</span> i < 0 <span class="keyword">then</span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Delay time < 0."</span>) <br> - <span class="keyword">else</span> <span class="keyword">if</span> (t - i) >= 0 <span class="keyword">then</span> s1_mem (t - i) <br> - <span class="keyword">else</span> v_zero (s1_mem 0)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Delay time can not be a vector."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> s1_mem t<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Delay time error."</span>)<br> - <span class="keyword">in</span><br> - (frequency s1, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_div.html b/documentation/code_VALSignal.signal_div.html deleted file mode 100644 index 18d2807..0000000 --- a/documentation/code_VALSignal.signal_div.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_div</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_div s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> ((signal_fun s1) t) /~ ((signal_fun s2) t) <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_floor.html b/documentation/code_VALSignal.signal_floor.html deleted file mode 100644 index 56dfed7..0000000 --- a/documentation/code_VALSignal.signal_floor.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_floor</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_floor s = <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_floor ((signal_fun s) t) <span class="keyword">in</span><br> - (frequency s, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_fun.html b/documentation/code_VALSignal.signal_fun.html deleted file mode 100644 index 88d3627..0000000 --- a/documentation/code_VALSignal.signal_fun.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_fun</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_fun s = snd s</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_get.html b/documentation/code_VALSignal.signal_get.html deleted file mode 100644 index 9e8ae92..0000000 --- a/documentation/code_VALSignal.signal_get.html +++ /dev/null @@ -1,40 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_get</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_get s1 s2 = <br> - <span class="keyword">let</span> f1 = frequency s1 <span class="keyword">in</span><br> - <span class="keyword">let</span> f2 = frequency s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> temp1 = (signal_fun s1) t <span class="keyword">in</span><br> - <span class="keyword">let</span> temp2 = (signal_fun s2) t <span class="keyword">in</span><br> - <span class="keyword">match</span> temp1 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size1, vec1) <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> temp2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> vec1 i<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Signal_operation</span> <span class="string">"Get: second input signal should be int."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Signal_operation</span> <span class="string">"Get: second input signal should be int."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> vec1 0<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Signal_operation</span> <span class="string">"Get: second input signal should be int."</span>)<br> - )<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Get: first input signal should be vector."</span>)<br> - <span class="keyword">in</span><br> - <span class="keyword">if</span> f1 = f2 <span class="keywordsign">||</span> f2 = 0 <span class="keyword">then</span> (f1, new_signal)<br> - <span class="keyword">else</span> <span class="keyword">if</span> f1 = 0 <span class="keyword">then</span> (f2, new_signal)<br> - <span class="keyword">else</span> raise (<span class="constructor">Signal_operation</span> <span class="string">"frequency not matched in signal_get."</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_inf.html b/documentation/code_VALSignal.signal_inf.html deleted file mode 100644 index 1241a3c..0000000 --- a/documentation/code_VALSignal.signal_inf.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_inf</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_inf s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_inf ((signal_fun s1) t) ((signal_fun s2) t) <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_int.html b/documentation/code_VALSignal.signal_int.html deleted file mode 100644 index d73d4b7..0000000 --- a/documentation/code_VALSignal.signal_int.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_int</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_int s = <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_int ((signal_fun s) t) <span class="keyword">in</span><br> - (frequency s, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_macro_to_int.html b/documentation/code_VALSignal.signal_macro_to_int.html deleted file mode 100644 index 59ffc52..0000000 --- a/documentation/code_VALSignal.signal_macro_to_int.html +++ /dev/null @@ -1,21 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_macro_to_int</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_macro_to_int m = <span class="keyword">match</span> m <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Delay_Memory_Length_int</span> <span class="keywordsign">-></span> 10000</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_mem.html b/documentation/code_VALSignal.signal_mem.html deleted file mode 100644 index 1bfed37..0000000 --- a/documentation/code_VALSignal.signal_mem.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_mem</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_mem s = signal_delay s (1, (<span class="keyword">fun</span> t <span class="keywordsign">-></span> <span class="constructor">N</span> 1))</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_mod.html b/documentation/code_VALSignal.signal_mod.html deleted file mode 100644 index 7ebc2e2..0000000 --- a/documentation/code_VALSignal.signal_mod.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_mod</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_mod s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_mod ((signal_fun s1) t) ((signal_fun s2) t) <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_mul.html b/documentation/code_VALSignal.signal_mul.html deleted file mode 100644 index 209ab74..0000000 --- a/documentation/code_VALSignal.signal_mul.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_mul</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_mul s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> ((signal_fun s1) t) *~ ((signal_fun s2) t) <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_neg.html b/documentation/code_VALSignal.signal_neg.html deleted file mode 100644 index 300c4c6..0000000 --- a/documentation/code_VALSignal.signal_neg.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_neg</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_neg s = <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_neg ((signal_fun s) t) <span class="keyword">in</span><br> - (frequency s, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_nth.html b/documentation/code_VALSignal.signal_nth.html deleted file mode 100644 index c83fa15..0000000 --- a/documentation/code_VALSignal.signal_nth.html +++ /dev/null @@ -1,40 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_nth</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_nth s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> temp1 = (signal_fun s1) t <span class="keyword">in</span><br> - <span class="keyword">let</span> temp2 = (signal_fun s2) t <span class="keyword">in</span><br> - <span class="keyword">match</span> temp1 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size1, vec1) <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> temp2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> vec1 i<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Signal_operation</span> <span class="string">"Get: second input signal should be int."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Signal_operation</span> <span class="string">"Get: second input signal should be int."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> vec1 0<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Signal_operation</span> <span class="string">"Get: second input signal should be int."</span>)<br> - )<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Get: first input signal should be vector."</span>)<br> - <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_prefix.html b/documentation/code_VALSignal.signal_prefix.html deleted file mode 100644 index 6f198b3..0000000 --- a/documentation/code_VALSignal.signal_prefix.html +++ /dev/null @@ -1,26 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_prefix</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_prefix = <span class="keyword">fun</span> s0 <span class="keywordsign">-></span> <span class="keyword">fun</span> s1 <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span><br> - <span class="keyword">if</span> t = 0 <span class="keyword">then</span> (signal_fun s0) 0<br> - <span class="keyword">else</span> <span class="keyword">if</span> t > 0 <span class="keyword">then</span> (signal_fun s1) t<br> - <span class="keyword">else</span> raise (<span class="constructor">Signal_operation</span> <span class="string">"prefix time cannot be < 0."</span>)<br> - <span class="keyword">in</span><br> - (frequency s1, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_rdtable.html b/documentation/code_VALSignal.signal_rdtable.html deleted file mode 100644 index 2b15c5b..0000000 --- a/documentation/code_VALSignal.signal_rdtable.html +++ /dev/null @@ -1,32 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_rdtable</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_rdtable s0 s1 s2 = <br> - <span class="keyword">let</span> memory_length_int = take_off_N ((signal_fun s0) 0) <span class="keyword">in</span><br> - <span class="keyword">let</span> s1_mem = factory_add_memory (signal_fun s1) memory_length_int <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span><br> - <span class="keyword">let</span> index = (signal_fun s2) t <span class="keyword">in</span><br> - <span class="keyword">match</span> index <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> s1_mem i<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Rdtable index cannot be float."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Rdtable index cannot be vector."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> s1_mem 0<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Rdtable index cannot be Error."</span>)<br> - <span class="keyword">in</span><br> - (frequency s2, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_select2.html b/documentation/code_VALSignal.signal_select2.html deleted file mode 100644 index 21f3e97..0000000 --- a/documentation/code_VALSignal.signal_select2.html +++ /dev/null @@ -1,27 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_select2</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_select2 si s0 s1 = <br> - <span class="keyword">let</span> f = signal_check_frequency3 si s0 s1 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> (signal_fun si) t = <span class="constructor">N</span> 0 <span class="keyword">then</span> (signal_fun s0) t<br> - <span class="keyword">else</span> <span class="keyword">if</span> (signal_fun si) t = <span class="constructor">N</span> 1 <span class="keyword">then</span> (signal_fun s1) t<br> - <span class="keyword">else</span> raise (<span class="constructor">Signal_operation</span> <span class="string">"select2 index should be 0 or 1."</span>)<br> - <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_select3.html b/documentation/code_VALSignal.signal_select3.html deleted file mode 100644 index 2a7cd69..0000000 --- a/documentation/code_VALSignal.signal_select3.html +++ /dev/null @@ -1,28 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_select3</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_select3 si s0 s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency4 si s0 s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> (signal_fun si) t = <span class="constructor">N</span> 0 <span class="keyword">then</span> (signal_fun s0) t<br> - <span class="keyword">else</span> <span class="keyword">if</span> (signal_fun si) t = <span class="constructor">N</span> 1 <span class="keyword">then</span> (signal_fun s1) t<br> - <span class="keyword">else</span> <span class="keyword">if</span> (signal_fun si) t = <span class="constructor">N</span> 2 <span class="keyword">then</span> (signal_fun s2) t<br> - <span class="keyword">else</span> raise (<span class="constructor">Signal_operation</span> <span class="string">"select3 index should be 0 or 1 or 2."</span>)<br> - <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_serialize.html b/documentation/code_VALSignal.signal_serialize.html deleted file mode 100644 index 6b0378b..0000000 --- a/documentation/code_VALSignal.signal_serialize.html +++ /dev/null @@ -1,38 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_serialize</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_serialize s = <br> - <span class="keyword">let</span> temp0 = (signal_fun s) 0 <span class="keyword">in</span><br> - <span class="keyword">match</span> temp0 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size0, vec0) <span class="keywordsign">-></span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">let</span> temp = (signal_fun s) (t/size0) <span class="keyword">in</span><br> - <span class="keyword">match</span> temp <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span><br> - <span class="keyword">if</span> size = size0 <span class="keyword">then</span> <br> - vec (t <span class="keyword">mod</span> size)<br> - <span class="keyword">else</span> <br> - raise (<span class="constructor">Signal_operation</span> <span class="string">"Serialize: vector length not consistent."</span>)<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Serialize: signal type not consistent."</span>)<br> - )<br> - <span class="keyword">in</span><br> - <span class="keyword">let</span> new_frequency = (frequency s) * size0 <span class="keyword">in</span><br> - (new_frequency, new_signal)<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Serialize: input signal should be vector."</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_sin.html b/documentation/code_VALSignal.signal_sin.html deleted file mode 100644 index 4e34543..0000000 --- a/documentation/code_VALSignal.signal_sin.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_sin</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_sin s = <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_sin ((signal_fun s) t) <span class="keyword">in</span><br> - (frequency s, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_sqrt.html b/documentation/code_VALSignal.signal_sqrt.html deleted file mode 100644 index 551a005..0000000 --- a/documentation/code_VALSignal.signal_sqrt.html +++ /dev/null @@ -1,22 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_sqrt</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_sqrt s = <br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_sqrt ((signal_fun s) t) <span class="keyword">in</span><br> - (frequency s, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_sub.html b/documentation/code_VALSignal.signal_sub.html deleted file mode 100644 index d86a608..0000000 --- a/documentation/code_VALSignal.signal_sub.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_sub</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_sub s1 s2 = signal_add s1 (signal_neg s2)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_sup.html b/documentation/code_VALSignal.signal_sup.html deleted file mode 100644 index caad1d0..0000000 --- a/documentation/code_VALSignal.signal_sup.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_sup</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_sup s1 s2 = <br> - <span class="keyword">let</span> f = signal_check_frequency s1 s2 <span class="keyword">in</span><br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> v_sup ((signal_fun s1) t) ((signal_fun s2) t) <span class="keyword">in</span><br> - (f, new_signal)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALSignal.signal_vectorize.html b/documentation/code_VALSignal.signal_vectorize.html deleted file mode 100644 index f3013ce..0000000 --- a/documentation/code_VALSignal.signal_vectorize.html +++ /dev/null @@ -1,30 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal.signal_vectorize</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> signal_vectorize s1 s2 = <br> - <span class="keyword">let</span> size = (signal_fun s2) 0 <span class="keyword">in</span><br> - <span class="keyword">match</span> size <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> size_int <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">let</span> new_signal = <span class="keyword">fun</span> t <span class="keywordsign">-></span> <br> - make_vector size_int (<span class="keyword">fun</span> i <span class="keywordsign">-></span> (signal_fun s1) (size_int * t + i)) <span class="keyword">in</span><br> - <span class="keyword">let</span> new_frequency = (frequency s1) / size_int <span class="keyword">in</span><br> - (new_frequency, new_signal)<br> - )<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Signal_operation</span> <span class="string">"Vectorize: vector size should be int."</span>)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALTypes.symbol_of_string.html b/documentation/code_VALTypes.symbol_of_string.html deleted file mode 100644 index a9caff2..0000000 --- a/documentation/code_VALTypes.symbol_of_string.html +++ /dev/null @@ -1,48 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Types.symbol_of_string</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> symbol_of_string = <span class="keyword">fun</span> s <span class="keywordsign">-></span><br> - <span class="keyword">match</span> s <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="string">"+"</span> <span class="keywordsign">-></span> <span class="constructor">Add</span><br> - <span class="keywordsign">|</span><span class="string">"-"</span> <span class="keywordsign">-></span> <span class="constructor">Sup</span> <br> - <span class="keywordsign">|</span><span class="string">"*"</span> <span class="keywordsign">-></span> <span class="constructor">Mul</span><br> - <span class="keywordsign">|</span><span class="string">"/"</span> <span class="keywordsign">-></span> <span class="constructor">Div</span><br> - <span class="keywordsign">|</span><span class="string">"_"</span> <span class="keywordsign">-></span> <span class="constructor">Pass</span><br> - <span class="keywordsign">|</span><span class="string">"!"</span> <span class="keywordsign">-></span> <span class="constructor">Stop</span><br> - <span class="keywordsign">|</span><span class="string">"mem"</span> <span class="keywordsign">-></span> <span class="constructor">Mem</span><br> - <span class="keywordsign">|</span><span class="string">"@"</span> <span class="keywordsign">-></span> <span class="constructor">Delay</span><br> - <span class="keywordsign">|</span><span class="string">"floor"</span> <span class="keywordsign">-></span> <span class="constructor">Floor</span><br> - <span class="keywordsign">|</span><span class="string">"int"</span> <span class="keywordsign">-></span> <span class="constructor">Int</span><br> - <span class="keywordsign">|</span><span class="string">"sin"</span> <span class="keywordsign">-></span> <span class="constructor">Sin</span><br> - <span class="keywordsign">|</span><span class="string">"cos"</span> <span class="keywordsign">-></span> <span class="constructor">Cos</span><br> - <span class="keywordsign">|</span><span class="string">"atan"</span> <span class="keywordsign">-></span> <span class="constructor">Atan</span><br> - <span class="keywordsign">|</span><span class="string">"atantwo"</span> <span class="keywordsign">-></span> <span class="constructor">Atantwo</span><br> - <span class="keywordsign">|</span><span class="string">"sqrt"</span> <span class="keywordsign">-></span> <span class="constructor">Sqrt</span><br> - <span class="keywordsign">|</span><span class="string">"rdtable"</span> <span class="keywordsign">-></span> <span class="constructor">Rdtable</span><br> - <span class="keywordsign">|</span><span class="string">"%"</span> <span class="keywordsign">-></span> <span class="constructor">Mod</span><br> - <span class="keywordsign">|</span><span class="string">"vectorize"</span> <span class="keywordsign">-></span> <span class="constructor">Vectorize</span><br> - <span class="keywordsign">|</span><span class="string">"#"</span> <span class="keywordsign">-></span> <span class="constructor">Concat</span><br> - <span class="keywordsign">|</span><span class="string">"[]"</span> <span class="keywordsign">-></span> <span class="constructor">Nth</span><br> - <span class="keywordsign">|</span><span class="string">"serialize"</span> <span class="keywordsign">-></span> <span class="constructor">Serialize</span><br> - <span class="keywordsign">|</span><span class="string">">"</span> <span class="keywordsign">-></span> <span class="constructor">Larger</span><br> - <span class="keywordsign">|</span><span class="string">"<"</span> <span class="keywordsign">-></span> <span class="constructor">Smaller</span><br> - <span class="keywordsign">|</span><span class="string">"prefix"</span> <span class="keywordsign">-></span> <span class="constructor">Prefix</span><br> - <span class="keywordsign">|</span><span class="string">"selecttwo"</span> <span class="keywordsign">-></span> <span class="constructor">Selecttwo</span><br> - <span class="keywordsign">|</span><span class="string">"selectthree"</span> <span class="keywordsign">-></span> <span class="constructor">Selectthree</span><br> - <span class="keywordsign">|</span> _ <span class="keywordsign">-></span> raise <span class="constructor">Symbol_not_defined</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.( _star__tilde_ ).html b/documentation/code_VALValue.( _star__tilde_ ).html deleted file mode 100644 index 1924c3d..0000000 --- a/documentation/code_VALValue.( _star__tilde_ ).html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.( *~ )</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> ( *~ ) v1 v2 = v_mul v1 v2</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.(_minus__tilde_).html b/documentation/code_VALValue.(_minus__tilde_).html deleted file mode 100644 index e0504b1..0000000 --- a/documentation/code_VALValue.(_minus__tilde_).html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.(-~)</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> (-~) v1 v2 = v_sub v1 v2</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.(_plus__tilde_).html b/documentation/code_VALValue.(_plus__tilde_).html deleted file mode 100644 index 49da458..0000000 --- a/documentation/code_VALValue.(_plus__tilde_).html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.(+~)</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> (+~) v1 v2 = v_add v1 v2</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.(_slash__tilde_).html b/documentation/code_VALValue.(_slash__tilde_).html deleted file mode 100644 index 6463600..0000000 --- a/documentation/code_VALValue.(_slash__tilde_).html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.(/~)</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> (/~) v1 v2 = v_div v1 v2</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.convert_back_R.html b/documentation/code_VALValue.convert_back_R.html deleted file mode 100644 index 7cb9923..0000000 --- a/documentation/code_VALValue.convert_back_R.html +++ /dev/null @@ -1,30 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.convert_back_R</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> convert_back_R v = <br> - <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> [| float_of_int i |]<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> [| f |]<br> - </code><table><tr><td> </td><td><span class="comment">(** realise the function int -> value into float list.*)</span></td></tr></table><code class="code"><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span><br> - <span class="keyword">let</span> result_value_array = <span class="constructor">Array</span>.init size vec <span class="keyword">in</span><br> - <span class="keyword">let</span> result_float_array = <span class="constructor">Array</span>.map take_off_R result_value_array <span class="keyword">in</span><br> - result_float_array <br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> [| 0. |]<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> [| 0. |]</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.factory_add_memory.html b/documentation/code_VALValue.factory_add_memory.html deleted file mode 100644 index aa40f46..0000000 --- a/documentation/code_VALValue.factory_add_memory.html +++ /dev/null @@ -1,34 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.factory_add_memory</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> factory_add_memory = <span class="keyword">fun</span> f <span class="keywordsign">-></span> <span class="keyword">fun</span> n <span class="keywordsign">-></span><br> - <span class="keyword">if</span> n > 0 <span class="keyword">then</span><br> - (<br> - <span class="keyword">let</span> memory = <span class="constructor">Hashtbl</span>.create n <span class="keyword">in</span><br> - <span class="keyword">let</span> new_fun = <span class="keyword">fun</span> i <span class="keywordsign">-></span><br> - <span class="keyword">try</span> <span class="constructor">Hashtbl</span>.find memory i<br> - <span class="keyword">with</span> <span class="constructor">Not_found</span> <span class="keywordsign">-></span><br> - <span class="keyword">let</span> result = f i <span class="keyword">in</span><br> - <span class="keyword">let</span> () = <span class="constructor">Hashtbl</span>.replace memory i result <span class="keyword">in</span><br> - <span class="keyword">let</span> () = <span class="constructor">Hashtbl</span>.remove memory (i - n) <span class="keyword">in</span><br> - result<br> - <span class="keyword">in</span><br> - new_fun<br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Value_operation</span> <span class="string">"memory length cannot be < 0."</span> )</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.fail.html b/documentation/code_VALValue.fail.html deleted file mode 100644 index 602543c..0000000 --- a/documentation/code_VALValue.fail.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.fail</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> fail = <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.make_vector.html b/documentation/code_VALValue.make_vector.html deleted file mode 100644 index 96bb0ff..0000000 --- a/documentation/code_VALValue.make_vector.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.make_vector</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> make_vector = <span class="keyword">fun</span> size <span class="keywordsign">-></span> <span class="keyword">fun</span> vec <span class="keywordsign">-></span><br> - <span class="keyword">let</span> new_vec = <span class="keyword">fun</span> i <span class="keywordsign">-></span><br> - <span class="keyword">if</span> i >= 0 <span class="keywordsign">&&</span> i < size <span class="keyword">then</span> vec i<br> - <span class="keyword">else</span> raise (<span class="constructor">Value_operation</span> <span class="string">"vector overflow"</span>)<br> - <span class="keyword">in</span><br> - v_memory (return_Vec (size, new_vec))</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.normalize.html b/documentation/code_VALValue.normalize.html deleted file mode 100644 index 5cb5aae..0000000 --- a/documentation/code_VALValue.normalize.html +++ /dev/null @@ -1,37 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.normalize</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> normalize v = <br> - <span class="keyword">let</span> n = 2. ** float_of_int (value_macro_to_int <span class="constructor">Faust_Bits_int</span>) <span class="keyword">in</span><br> - <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> i > value_macro_to_int <span class="constructor">Faust_Max_int</span> <span class="keyword">then</span> <br> - return_N (i - int_of_float (n *. floor (((float_of_int i) +. n/.2.)/.n)))<br> - <span class="keyword">else</span> <span class="keyword">if</span> i < value_macro_to_int <span class="constructor">Faust_Min_int</span> <span class="keyword">then</span> <br> - return_N (i + int_of_float (n *. floor ((n/.2. -. (float_of_int i) -. 1.)/.n)))<br> - <span class="keyword">else</span> return_N i<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> f > float_of_int (value_macro_to_int <span class="constructor">Faust_Max_int</span>) <span class="keyword">then</span> <br> - return_R (f -. (n *. floor ((f +. n/.2.)/.n)))<br> - <span class="keyword">else</span> <span class="keyword">if</span> f < float_of_int (value_macro_to_int <span class="constructor">Faust_Min_int</span>) <span class="keyword">then</span> <br> - return_R (f +. (n *. floor ((n/.2. -. f -. 1.)/.n)))<br> - <span class="keyword">else</span> return_R f<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> normalize (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> <span class="constructor">Zero</span><br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.print_value_list.html b/documentation/code_VALValue.print_value_list.html deleted file mode 100644 index d0127d2..0000000 --- a/documentation/code_VALValue.print_value_list.html +++ /dev/null @@ -1,28 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.print_value_list</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> print_value_list value_list = <br> - <span class="keyword">let</span> s = ref <span class="string">"["</span> <span class="keyword">in</span><br> - <span class="keyword">let</span> n = <span class="constructor">List</span>.length value_list <span class="keyword">in</span><br> - <span class="keyword">for</span> i = 0 <span class="keyword">to</span> n - 1 <span class="keyword">do</span><br> - <span class="keyword">let</span> current = <span class="constructor">List</span>.nth value_list i <span class="keyword">in</span><br> - s := <span class="keyword">if</span> i + 1 < n <span class="keyword">then</span> !s ^ string_of_value current ^ <span class="string">"; "</span> <br> - <span class="keyword">else</span> !s ^ string_of_value current ^ <span class="string">"]"</span><br> - <span class="keyword">done</span>;<br> - print_endline !s</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.return_N.html b/documentation/code_VALValue.return_N.html deleted file mode 100644 index 0220827..0000000 --- a/documentation/code_VALValue.return_N.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.return_N</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> return_N i = <span class="constructor">N</span> i</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.return_R.html b/documentation/code_VALValue.return_R.html deleted file mode 100644 index f347df5..0000000 --- a/documentation/code_VALValue.return_R.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.return_R</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> return_R f = <span class="constructor">R</span> f</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.return_Vec.html b/documentation/code_VALValue.return_Vec.html deleted file mode 100644 index 6bbd44b..0000000 --- a/documentation/code_VALValue.return_Vec.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.return_Vec</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> return_Vec (size, vec) = <span class="constructor">Vec</span> (size, vec)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.string_of_value.html b/documentation/code_VALValue.string_of_value.html deleted file mode 100644 index f276a6c..0000000 --- a/documentation/code_VALValue.string_of_value.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.string_of_value</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> string_of_value v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i1 <span class="keywordsign">-></span> <span class="string">"N "</span> ^ (string_of_int i1)<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f1 <span class="keywordsign">-></span> <span class="string">"R "</span> ^ (string_of_float f1)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> <span class="string">"Vec"</span><br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> <span class="string">"Zero"</span> <br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="string">"W"</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.take_off_N.html b/documentation/code_VALValue.take_off_N.html deleted file mode 100644 index b92ab1c..0000000 --- a/documentation/code_VALValue.take_off_N.html +++ /dev/null @@ -1,28 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.take_off_N</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> take_off_N v = <br> - <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> i<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Convert_Error</span> <span class="string">"float take_off_N int"</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Convert_Error</span> <span class="string">"take_off_N can not convert vector."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> 0<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> 0</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.take_off_R.html b/documentation/code_VALValue.take_off_R.html deleted file mode 100644 index e9a729b..0000000 --- a/documentation/code_VALValue.take_off_R.html +++ /dev/null @@ -1,27 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.take_off_R</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> take_off_R v = <br> - <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> float_of_int i<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> f<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Convert_Error</span> <span class="string">"take_off_R can not convert vector."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> 0.<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> 0.</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_add.html b/documentation/code_VALValue.v_add.html deleted file mode 100644 index b6c85b0..0000000 --- a/documentation/code_VALValue.v_add.html +++ /dev/null @@ -1,58 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_add</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_add v1 v2 = <span class="keyword">match</span> v1 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size1, vec1) <span class="keywordsign">-></span> <br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> size1 = size2 <span class="keyword">then</span> <br> - make_vector size1 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_add (vec1 i) (vec2 i))<br> - <span class="keyword">else</span> raise (<span class="constructor">Value_operation</span> <span class="string">"vector size not matched."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> v1<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalar vec1 +~ sca2"</span>)<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">N</span> i1 <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i2 <span class="keywordsign">-></span> normalize (return_N (i1 + i2))<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f2 <span class="keywordsign">-></span> normalize (return_R ((float_of_int i1) +. f2))<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalar i1 +~ vec2"</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> v1<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> fail<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f1 <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i2 <span class="keywordsign">-></span> normalize (return_R (f1 +. (float_of_int i2)))<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f2 <span class="keywordsign">-></span> normalize (return_R (f1 +. f2))<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalar f1 +~ vec2"</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> v1<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> fail<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> v2<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i2 <span class="keywordsign">-></span> fail<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f2 <span class="keywordsign">-></span> fail<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalar W +~ vec2"</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> v1<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> fail<br> - )</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_atan.html b/documentation/code_VALValue.v_atan.html deleted file mode 100644 index dccf0fc..0000000 --- a/documentation/code_VALValue.v_atan.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_atan</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_atan v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> return_R (atan (float_of_int i))<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> return_R (atan f)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_atan (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_R (atan 0.)<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_atantwo.html b/documentation/code_VALValue.v_atantwo.html deleted file mode 100644 index 85e302c..0000000 --- a/documentation/code_VALValue.v_atantwo.html +++ /dev/null @@ -1,44 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_atantwo</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_atantwo v1 v2 = <span class="keyword">match</span> (v1, v2) <span class="keyword">with</span><br> - <span class="keywordsign">|</span> (<span class="constructor">N</span> i1, <span class="constructor">N</span> i2) <span class="keywordsign">-></span> v_atantwo (<span class="constructor">R</span> (float_of_int i1)) (<span class="constructor">R</span> (float_of_int i2))<br> - <span class="keywordsign">|</span> (<span class="constructor">N</span> i1, <span class="constructor">R</span> f2) <span class="keywordsign">-></span> v_atantwo (<span class="constructor">R</span> (float_of_int i1)) v2<br> - <span class="keywordsign">|</span> (<span class="constructor">N</span> i1, <span class="constructor">Zero</span>) <span class="keywordsign">-></span> v_atantwo (<span class="constructor">R</span> (float_of_int i1)) (<span class="constructor">R</span> 0.)<br> - <span class="keywordsign">|</span> (<span class="constructor">N</span> i1, <span class="constructor">Vec</span> (size2, vec2)) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"atan2 sca vec."</span>)<br> - <span class="keywordsign">|</span> (<span class="constructor">N</span> i1, <span class="constructor">W</span>) <span class="keywordsign">-></span> <span class="constructor">W</span><br> -<br> - <span class="keywordsign">|</span> (<span class="constructor">R</span> f1, <span class="constructor">N</span> i2) <span class="keywordsign">-></span> v_atantwo v1 (<span class="constructor">R</span> (float_of_int i2))<br> - <span class="keywordsign">|</span> (<span class="constructor">R</span> f1, <span class="constructor">R</span> f2) <span class="keywordsign">-></span> <span class="constructor">R</span> (atan2 f1 f2)<br> - <span class="keywordsign">|</span> (<span class="constructor">R</span> f1, <span class="constructor">Zero</span>) <span class="keywordsign">-></span> v_atantwo v1 (<span class="constructor">R</span> 0.)<br> - <span class="keywordsign">|</span> (<span class="constructor">R</span> f1, <span class="constructor">Vec</span> (size2, vec2)) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"atan2 sca vec."</span>)<br> - <span class="keywordsign">|</span> (<span class="constructor">R</span> f1, <span class="constructor">W</span>) <span class="keywordsign">-></span> <span class="constructor">W</span><br> -<br> - <span class="keywordsign">|</span> (<span class="constructor">Vec</span> (size1, vec1), <span class="constructor">Vec</span> (size2, vec2)) <span class="keywordsign">-></span> make_vector size1 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_atantwo (vec1 i) (vec2 i))<br> - <span class="keywordsign">|</span> (<span class="constructor">Vec</span> (size1, vec1), <span class="constructor">Zero</span>) <span class="keywordsign">-></span> make_vector size1 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_atantwo (vec1 i) <span class="constructor">Zero</span>)<br> - <span class="keywordsign">|</span> (<span class="constructor">Vec</span> (size1, vec1), _) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"atan2 vec sca."</span>)<br> - <br> - <span class="keywordsign">|</span> (<span class="constructor">Zero</span>, <span class="constructor">N</span> i2) <span class="keywordsign">-></span> v_atantwo (<span class="constructor">R</span> 0.) (<span class="constructor">R</span> (float_of_int i2))<br> - <span class="keywordsign">|</span> (<span class="constructor">Zero</span>, <span class="constructor">R</span> f2) <span class="keywordsign">-></span> v_atantwo (<span class="constructor">R</span> 0.) v2<br> - <span class="keywordsign">|</span> (<span class="constructor">Zero</span>, <span class="constructor">Vec</span> (size2, vec2)) <span class="keywordsign">-></span> make_vector size2 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_atantwo <span class="constructor">Zero</span> (vec2 i))<br> - <span class="keywordsign">|</span> (<span class="constructor">Zero</span>, <span class="constructor">Zero</span>) <span class="keywordsign">-></span> v_atantwo (<span class="constructor">R</span> 0.) (<span class="constructor">R</span> 0.)<br> - <span class="keywordsign">|</span> (<span class="constructor">Zero</span>, <span class="constructor">W</span>) <span class="keywordsign">-></span> <span class="constructor">W</span><br> -<br> - <span class="keywordsign">|</span> (<span class="constructor">W</span>, <span class="constructor">Vec</span> (size2, vec2)) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"atan2 sca vec."</span>)<br> - <span class="keywordsign">|</span> (<span class="constructor">W</span>, _) <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_cos.html b/documentation/code_VALValue.v_cos.html deleted file mode 100644 index 1412f77..0000000 --- a/documentation/code_VALValue.v_cos.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_cos</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_cos v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> return_R (cos (float_of_int i))<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> return_R (cos f)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_cos (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_R (cos 0.)<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_div.html b/documentation/code_VALValue.v_div.html deleted file mode 100644 index 7300046..0000000 --- a/documentation/code_VALValue.v_div.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_div</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> v_div v1 v2 = v_mul v1 (v_recip v2)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_floor.html b/documentation/code_VALValue.v_floor.html deleted file mode 100644 index f90d0bc..0000000 --- a/documentation/code_VALValue.v_floor.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_floor</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_floor v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> return_R (float_of_int i)<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> return_R (floor f)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_floor (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_R 0.<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_inf.html b/documentation/code_VALValue.v_inf.html deleted file mode 100644 index 87bf8f9..0000000 --- a/documentation/code_VALValue.v_inf.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_inf</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> v_inf v1 v2 = v_larger_than_zero (v2 -~ v1)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_int.html b/documentation/code_VALValue.v_int.html deleted file mode 100644 index 84dc4cd..0000000 --- a/documentation/code_VALValue.v_int.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_int</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_int v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> v<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> return_N (int_of_float f)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_int (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_N 0<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_larger_than_zero.html b/documentation/code_VALValue.v_larger_than_zero.html deleted file mode 100644 index 3564744..0000000 --- a/documentation/code_VALValue.v_larger_than_zero.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_larger_than_zero</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_larger_than_zero v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> <span class="keyword">if</span> i > 0 <span class="keyword">then</span> return_N 1 <span class="keyword">else</span> return_N 0<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <span class="keyword">if</span> f > 0. <span class="keyword">then</span> return_N 1 <span class="keyword">else</span> return_N 0<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_larger_than_zero (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_N 0<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_list_memory.html b/documentation/code_VALValue.v_list_memory.html deleted file mode 100644 index db0091e..0000000 --- a/documentation/code_VALValue.v_list_memory.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_list_memory</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> v_list_memory vl = <span class="constructor">List</span>.map v_memory vl</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_memory.html b/documentation/code_VALValue.v_memory.html deleted file mode 100644 index feff183..0000000 --- a/documentation/code_VALValue.v_memory.html +++ /dev/null @@ -1,38 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_memory</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> v_memory v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span> <span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span><br> - <span class="keyword">let</span> memory_array = <span class="constructor">Array</span>.create size <span class="constructor">W</span> <span class="keyword">in</span><br> - <span class="keyword">let</span> index_array = <span class="constructor">Array</span>.create size <span class="keyword">false</span> <span class="keyword">in</span><br> - <span class="keyword">let</span> new_vec = <span class="keyword">fun</span> i <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> i >= 0 <span class="keywordsign">&&</span> i < size <span class="keyword">then</span> <br> - (<br> - <span class="keyword">if</span> index_array.(i) <span class="keyword">then</span> <br> - memory_array.(i)<br> - <span class="keyword">else</span> <br> - <span class="keyword">let</span> result = vec i <span class="keyword">in</span><br> - <span class="keyword">let</span> () = memory_array.(i) <- result <span class="keyword">in</span><br> - <span class="keyword">let</span> () = index_array.(i) <- <span class="keyword">true</span> <span class="keyword">in</span><br> - result <br> - )<br> - <span class="keyword">else</span> raise (<span class="constructor">Invalid_argument</span> <span class="string">"vector overflow."</span>)<br> - <span class="keyword">in</span><br> - return_Vec (size, new_vec)<br> - <span class="keywordsign">|</span> _ <span class="keywordsign">-></span> v</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_mod.html b/documentation/code_VALValue.v_mod.html deleted file mode 100644 index df7beb0..0000000 --- a/documentation/code_VALValue.v_mod.html +++ /dev/null @@ -1,55 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_mod</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_mod v1 v2 = <span class="keyword">match</span> v1 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i1 <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i2 <span class="keywordsign">-></span> return_N (i1 <span class="keyword">mod</span> i2)<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f2 <span class="keywordsign">-></span> return_N (i1 <span class="keyword">mod</span> (int_of_float f2))<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"Scalaire_Vector: int mod vec."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"v1 mod v2: v2 cannot be zero."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span><br> - )<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f1 <span class="keywordsign">-></span> <span class="keyword">let</span> i = return_N (int_of_float f1) <span class="keyword">in</span> v_mod i v2<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size1, vec1) <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> size1 = size2 <span class="keyword">then</span> <br> - make_vector size1 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_mod (vec1 i) (vec2 i))<br> - <span class="keyword">else</span> raise (<span class="constructor">Value_operation</span> <span class="string">"vector size not matched."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"v1 mod v2: v2 cannot be zero."</span>)<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalaire: vec mod int."</span>)<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> <br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - <span class="keyword">let</span> v = make_vector size2 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> <span class="constructor">Zero</span>) <span class="keyword">in</span><br> - v_mod v v2<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> v_mod (<span class="constructor">N</span> 0) v2<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"Scalaire_Vector: int mod vec."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"v1 mod v2: v2 cannot be zero."</span>)<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> <span class="constructor">W</span><br> - )</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_mul.html b/documentation/code_VALValue.v_mul.html deleted file mode 100644 index 05ad0b5..0000000 --- a/documentation/code_VALValue.v_mul.html +++ /dev/null @@ -1,69 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_mul</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_mul v1 v2 = <span class="keyword">match</span> v1 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size1, vec1) <span class="keywordsign">-></span> <br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> size1 = size2 <span class="keyword">then</span> <br> - make_vector size1 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_mul (vec1 i) (vec2 i))<br> - <span class="keyword">else</span> raise (<span class="constructor">Value_operation</span> <span class="string">"vector size not matched."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> make_vector size1 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_mul (vec1 i) <span class="constructor">Zero</span>)<br> - <span class="keywordsign">|</span>_ <span class="keywordsign">-></span> raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalar vec1 *~ sca2"</span>)<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">N</span> i1 <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i2 <span class="keywordsign">-></span> normalize (return_N (i1 * i2))<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f2 <span class="keywordsign">-></span> normalize (return_R ((float_of_int i1) *. f2))<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalar i1 *~ vec2"</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_N 0<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="keyword">if</span> i1 = 0 <span class="keyword">then</span> <span class="constructor">N</span> 0 <span class="keyword">else</span> fail<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f1 <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i2 <span class="keywordsign">-></span> normalize (return_R (f1 *. (float_of_int i2)))<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f2 <span class="keywordsign">-></span> normalize (return_R (f1 *. f2))<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalar f1 *~ vec2"</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_R 0.<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="keyword">if</span> f1 = 0. <span class="keyword">then</span> <span class="constructor">R</span> 0. <span class="keyword">else</span> fail<br> - )<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> <br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i2 <span class="keywordsign">-></span> return_N 0<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f2 <span class="keywordsign">-></span> return_R 0.<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> make_vector size2 (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_mul <span class="constructor">Zero</span> (vec2 i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> <span class="constructor">Zero</span><br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">Zero</span> <span class="comment">(* Danger! *)</span><br> - )<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span><br> - (<br> - <span class="keyword">match</span> v2 <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i2 <span class="keywordsign">-></span> <span class="keyword">if</span> i2 = 0 <span class="keyword">then</span> <span class="constructor">N</span> 0 <span class="keyword">else</span> fail<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f2 <span class="keywordsign">-></span> <span class="keyword">if</span> f2 = 0. <span class="keyword">then</span> <span class="constructor">R</span> 0. <span class="keyword">else</span> fail<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size2, vec2) <span class="keywordsign">-></span> <br> - raise (<span class="constructor">Value_operation</span> <span class="string">"Vector_Scalar W +~ vec2"</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> <span class="constructor">Zero</span><br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> fail<br> - )</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_neg.html b/documentation/code_VALValue.v_neg.html deleted file mode 100644 index 2768f40..0000000 --- a/documentation/code_VALValue.v_neg.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_neg</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_neg v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> return_N (-i)<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> return_R (-.f)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_neg (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> <span class="constructor">Zero</span><br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> fail</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_recip.html b/documentation/code_VALValue.v_recip.html deleted file mode 100644 index 983b2ea..0000000 --- a/documentation/code_VALValue.v_recip.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_recip</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_recip v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> v_recip (<span class="constructor">R</span> (float_of_int i))<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <span class="keyword">if</span> f = 0. <span class="keyword">then</span> fail <span class="keyword">else</span> return_R (1./.f)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_recip (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> fail<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> return_R 0.</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_sin.html b/documentation/code_VALValue.v_sin.html deleted file mode 100644 index 330da64..0000000 --- a/documentation/code_VALValue.v_sin.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_sin</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_sin v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> return_R (sin (float_of_int i))<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> return_R (sin f)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_sin (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_R (sin 0.)<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_sqrt.html b/documentation/code_VALValue.v_sqrt.html deleted file mode 100644 index c9e86ed..0000000 --- a/documentation/code_VALValue.v_sqrt.html +++ /dev/null @@ -1,29 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_sqrt</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_sqrt v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> i >= 0 <span class="keyword">then</span> return_R (sqrt (float_of_int i))<br> - <span class="keyword">else</span> raise (<span class="constructor">Value_operation</span> <span class="string">"sqrt parameter < 0."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <br> - <span class="keyword">if</span> f >= 0. <span class="keyword">then</span> return_R (sqrt f)<br> - <span class="keyword">else</span> raise (<span class="constructor">Value_operation</span> <span class="string">"sqrt parameter < 0."</span>)<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_sqrt (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> return_R (sqrt 0.)<br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">W</span></code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_sub.html b/documentation/code_VALValue.v_sub.html deleted file mode 100644 index 2bfe2d8..0000000 --- a/documentation/code_VALValue.v_sub.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_sub</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> v_sub v1 v2 = v_add v1 (v_neg v2)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_sup.html b/documentation/code_VALValue.v_sup.html deleted file mode 100644 index 2303a7b..0000000 --- a/documentation/code_VALValue.v_sup.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_sup</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> v_sup v1 v2 = v_larger_than_zero (v1 -~ v2)</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.v_zero.html b/documentation/code_VALValue.v_zero.html deleted file mode 100644 index 2c09660..0000000 --- a/documentation/code_VALValue.v_zero.html +++ /dev/null @@ -1,25 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.v_zero</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> <span class="keyword">rec</span> v_zero v = <span class="keyword">match</span> v <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">N</span> i <span class="keywordsign">-></span> <span class="constructor">N</span> 0<br> - <span class="keywordsign">|</span><span class="constructor">R</span> f <span class="keywordsign">-></span> <span class="constructor">R</span> 0.<br> - <span class="keywordsign">|</span><span class="constructor">Vec</span> (size, vec) <span class="keywordsign">-></span> make_vector size (<span class="keyword">fun</span> i <span class="keywordsign">-></span> v_zero (vec i))<br> - <span class="keywordsign">|</span><span class="constructor">Zero</span> <span class="keywordsign">-></span> <span class="constructor">Zero</span> <span class="comment">(* Danger! *)</span><br> - <span class="keywordsign">|</span><span class="constructor">W</span> <span class="keywordsign">-></span> <span class="constructor">R</span> 0.</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.value_macro_to_int.html b/documentation/code_VALValue.value_macro_to_int.html deleted file mode 100644 index 2742634..0000000 --- a/documentation/code_VALValue.value_macro_to_int.html +++ /dev/null @@ -1,23 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.value_macro_to_int</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> value_macro_to_int m = <span class="keyword">match</span> m <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Faust_Max_int</span> <span class="keywordsign">-></span> 2147483647<br> - <span class="keywordsign">|</span><span class="constructor">Faust_Min_int</span> <span class="keywordsign">-></span> -2147483648<br> - <span class="keywordsign">|</span><span class="constructor">Faust_Bits_int</span> <span class="keywordsign">-></span> 32</code></body></html> \ No newline at end of file diff --git a/documentation/code_VALValue.value_macro_to_value.html b/documentation/code_VALValue.value_macro_to_value.html deleted file mode 100644 index 0b88bbc..0000000 --- a/documentation/code_VALValue.value_macro_to_value.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value.value_macro_to_value</title> -</head> -<body> -<code class="code"><span class="keyword">let</span> value_macro_to_value m = <span class="keyword">match</span> m <span class="keyword">with</span><br> - <span class="keywordsign">|</span><span class="constructor">Faust_Max_int</span> <span class="keywordsign">-></span> 2147483647<br> - <span class="keywordsign">|</span><span class="constructor">Faust_Min_int</span> <span class="keywordsign">-></span> -2147483648<br> - <span class="keywordsign">|</span><span class="constructor">Faust_Bits_int</span> <span class="keywordsign">-></span> 32</code></body></html> \ No newline at end of file diff --git a/documentation/index.html b/documentation/index.html deleted file mode 100644 index 37f5da0..0000000 --- a/documentation/index.html +++ /dev/null @@ -1,63 +0,0 @@ -<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title></title> -</head> -<body> -<center><h1></h1></center> -<a href="index_types.html">Index of types</a><br> -<a href="index_exceptions.html">Index of exceptions</a><br> -<a href="index_values.html">Index of values</a><br> -<a href="index_modules.html">Index of modules</a><br> -<br/><br> -<table class="indextable"> -<tr><td><a href="Types.html">Types</a></td><td><div class="info"> -type symbol, defines valid identifiers in faust expressions. -</div> -</td></tr> -<tr><td><a href="Parser.html">Parser</a></td><td></td></tr> -<tr><td><a href="Lexer.html">Lexer</a></td><td></td></tr> -<tr><td><a href="Value.html">Value</a></td><td><div class="info"> -Module: Value - Description: basic data type in the vectorial faust interpreter. -</div> -</td></tr> -<tr><td><a href="Signal.html">Signal</a></td><td><div class="info"> -Module: Signal - Description: type signal = rate * (int -> value), operations of signals. -</div> -</td></tr> -<tr><td><a href="Faustexp.html">Faustexp</a></td><td><div class="info"> -Module: Faustexp - Description: dimension estimation and delay estimation of faust expressions. -</div> -</td></tr> -<tr><td><a href="Interpreter.html">Interpreter</a></td><td><div class="info"> -Module: Interpreter - Description: input beam -> process -> output beam -</div> -</td></tr> -<tr><td><a href="Preprocess.html">Preprocess</a></td><td></td></tr> -<tr><td><a href="Main.html">Main</a></td><td><div class="info"> -Module: Interpreter - Description: Input wave -> interpretation -> output wave -</div> -</td></tr> -</table> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_attributes.html b/documentation/index_attributes.html deleted file mode 100644 index d8e44c6..0000000 --- a/documentation/index_attributes.html +++ /dev/null @@ -1,25 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of class attributes</title> -</head> -<body> -<center><h1>Index of class attributes</h1></center> -<table> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_class_types.html b/documentation/index_class_types.html deleted file mode 100644 index 944d28f..0000000 --- a/documentation/index_class_types.html +++ /dev/null @@ -1,25 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of class types</title> -</head> -<body> -<center><h1>Index of class types</h1></center> -<table> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_classes.html b/documentation/index_classes.html deleted file mode 100644 index 5c2eb6a..0000000 --- a/documentation/index_classes.html +++ /dev/null @@ -1,25 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of classes</title> -</head> -<body> -<center><h1>Index of classes</h1></center> -<table> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_exceptions.html b/documentation/index_exceptions.html deleted file mode 100644 index 2eb54e2..0000000 --- a/documentation/index_exceptions.html +++ /dev/null @@ -1,69 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of exceptions</title> -</head> -<body> -<center><h1>Index of exceptions</h1></center> -<table> -<tr><td align="left"><br>B</td></tr> -<tr><td><a href="Faustexp.html#EXCEPTIONBeam_Matching_Error">Beam_Matching_Error</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -Exception raised in beam matching of faust expressions. -</div> -</td></tr> -<tr><td align="left"><br>C</td></tr> -<tr><td><a href="Value.html#EXCEPTIONConvert_Error">Convert_Error</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -Exception raised in convertions between float/int and type 'Value'. -</div> -</td></tr> -<tr><td align="left"><br>E</td></tr> -<tr><td><a href="Interpreter.html#EXCEPTIONEvaluation_Error">Evaluation_Error</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -Exception raised during interpretation of faust process. -</div> -</td></tr> -<tr><td align="left"><br>M</td></tr> -<tr><td><a href="Main.html#EXCEPTIONMissing_Expression">Missing_Expression</a> [<a href="Main.html">Main</a>]</td> -<td><div class="info"> -Exception raised when no string expression of faust process is typed in console. -</div> -</td></tr> -<tr><td align="left"><br>N</td></tr> -<tr><td><a href="Faustexp.html#EXCEPTIONNotYetDone">NotYetDone</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -Exception raised in case that the branch under call hasn't yet been programed. -</div> -</td></tr> -<tr><td align="left"><br>S</td></tr> -<tr><td><a href="Signal.html#EXCEPTIONSignal_operation">Signal_operation</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -Exception raised in operations of signals. -</div> -</td></tr> -<tr><td><a href="Types.html#EXCEPTIONSymbol_not_defined">Symbol_not_defined</a> [<a href="Types.html">Types</a>]</td> -<td></td></tr> -<tr><td align="left"><br>V</td></tr> -<tr><td><a href="Value.html#EXCEPTIONValue_operation">Value_operation</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -Exception raised in type 'Value' operations. -</div> -</td></tr> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_methods.html b/documentation/index_methods.html deleted file mode 100644 index eea92e0..0000000 --- a/documentation/index_methods.html +++ /dev/null @@ -1,25 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of class methods</title> -</head> -<body> -<center><h1>Index of class methods</h1></center> -<table> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_module_types.html b/documentation/index_module_types.html deleted file mode 100644 index fab5bed..0000000 --- a/documentation/index_module_types.html +++ /dev/null @@ -1,25 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of module types</title> -</head> -<body> -<center><h1>Index of module types</h1></center> -<table> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_modules.html b/documentation/index_modules.html deleted file mode 100644 index 1c39c3c..0000000 --- a/documentation/index_modules.html +++ /dev/null @@ -1,74 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of modules</title> -</head> -<body> -<center><h1>Index of modules</h1></center> -<table> -<tr><td align="left"><br>F</td></tr> -<tr><td><a href="Faustexp.html">Faustexp</a> </td> -<td><div class="info"> -Module: Faustexp - Description: dimension estimation and delay estimation of faust expressions. -</div> -</td></tr> -<tr><td align="left"><br>I</td></tr> -<tr><td><a href="Interpreter.html">Interpreter</a> </td> -<td><div class="info"> -Module: Interpreter - Description: input beam -> process -> output beam -</div> -</td></tr> -<tr><td align="left"><br>L</td></tr> -<tr><td><a href="Lexer.html">Lexer</a> </td> -<td></td></tr> -<tr><td align="left"><br>M</td></tr> -<tr><td><a href="Main.html">Main</a> </td> -<td><div class="info"> -Module: Interpreter - Description: Input wave -> interpretation -> output wave -</div> -</td></tr> -<tr><td align="left"><br>P</td></tr> -<tr><td><a href="Parser.html">Parser</a> </td> -<td></td></tr> -<tr><td><a href="Preprocess.html">Preprocess</a> </td> -<td></td></tr> -<tr><td align="left"><br>S</td></tr> -<tr><td><a href="Signal.html">Signal</a> </td> -<td><div class="info"> -Module: Signal - Description: type signal = rate * (int -> value), operations of signals. -</div> -</td></tr> -<tr><td align="left"><br>T</td></tr> -<tr><td><a href="Types.html">Types</a> </td> -<td><div class="info"> -type symbol, defines valid identifiers in faust expressions. -</div> -</td></tr> -<tr><td align="left"><br>V</td></tr> -<tr><td><a href="Value.html">Value</a> </td> -<td><div class="info"> -Module: Value - Description: basic data type in the vectorial faust interpreter. -</div> -</td></tr> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_types.html b/documentation/index_types.html deleted file mode 100644 index 784705b..0000000 --- a/documentation/index_types.html +++ /dev/null @@ -1,66 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of types</title> -</head> -<body> -<center><h1>Index of types</h1></center> -<table> -<tr><td align="left"><br>D</td></tr> -<tr><td><a href="Types.html#TYPEdimension">dimension</a> [<a href="Types.html">Types</a>]</td> -<td></td></tr> -<tr><td align="left"><br>F</td></tr> -<tr><td><a href="Types.html#TYPEfaust_exp">faust_exp</a> [<a href="Types.html">Types</a>]</td> -<td></td></tr> -<tr><td align="left"><br>I</td></tr> -<tr><td><a href="Interpreter.html#TYPEinterpreter_macro">interpreter_macro</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -Macro constants of this file. -</div> -</td></tr> -<tr><td><a href="Main.html#TYPEio_macro">io_macro</a> [<a href="Main.html">Main</a>]</td> -<td><div class="info"> -Macro constants of input/output route. -</div> -</td></tr> -<tr><td align="left"><br>S</td></tr> -<tr><td><a href="Types.html#TYPEsignal">signal</a> [<a href="Types.html">Types</a>]</td> -<td></td></tr> -<tr><td><a href="Signal.html#TYPEsignal_macro">signal_macro</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -Macro constants of the file. -</div> -</td></tr> -<tr><td><a href="Types.html#TYPEsymbol">symbol</a> [<a href="Types.html">Types</a>]</td> -<td><div class="info"> -type symbol, defines valid identifiers in faust expressions. -</div> -</td></tr> -<tr><td align="left"><br>T</td></tr> -<tr><td><a href="Parser.html#TYPEtoken">token</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td align="left"><br>V</td></tr> -<tr><td><a href="Types.html#TYPEvalue">value</a> [<a href="Types.html">Types</a>]</td> -<td></td></tr> -<tr><td><a href="Value.html#TYPEvalue_macro">value_macro</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -Macro constants of the file. -</div> -</td></tr> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/index_values.html b/documentation/index_values.html deleted file mode 100644 index d765212..0000000 --- a/documentation/index_values.html +++ /dev/null @@ -1,657 +0,0 @@ -<html> -<head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Index of values</title> -</head> -<body> -<center><h1>Index of values</h1></center> -<table> -<tr><td align="left"><br></td></tr> -<tr><td><a href="Value.html#VAL( *~ )">( *~ )</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val ( *~ ) : value -> value -> value, operator of v_mul. -</div> -</td></tr> -<tr><td><a href="Value.html#VAL(+~)">(+~)</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val (+~) : value -> value -> value, operator of v_add. -</div> -</td></tr> -<tr><td><a href="Value.html#VAL(-~)">(-~)</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val (-~) : value -> value -> value, operator of v_sub. -</div> -</td></tr> -<tr><td><a href="Value.html#VAL(/~)">(/~)</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val (/~) : value -> value -> value, operator of v_div. -</div> -</td></tr> -<tr><td><a href="Lexer.html#VAL__ocaml_lex_tables">__ocaml_lex_tables</a> [<a href="Lexer.html">Lexer</a>]</td> -<td></td></tr> -<tr><td><a href="Lexer.html#VAL__ocaml_lex_token_rec">__ocaml_lex_token_rec</a> [<a href="Lexer.html">Lexer</a>]</td> -<td></td></tr> -<tr><td align="left"><br>A</td></tr> -<tr><td><a href="Interpreter.html#VALarrange">arrange</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val arrange : 'a array array array -> int -> 'a array list, -arranges the output data in "array list" form. -</div> -</td></tr> -<tr><td align="left"><br>B</td></tr> -<tr><td><a href="Signal.html#VALbeam_add_one_memory">beam_add_one_memory</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val beam_add_one_memory : signal list -> signal list, -adds memory of one latest sample for each element in signal list. -</div> -</td></tr> -<tr><td align="left"><br>C</td></tr> -<tr><td><a href="Interpreter.html#VALchannels">channels</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val channels : 'a array array array -> int -> int array, -returns an array of number of channels. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALcheck_frequency">check_frequency</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val check_frequency : int -> int -> int, returns the correction of frequency. -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALcompute">compute</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val compute : (int -> value) list -> (int list) * (float array list). -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALcomputing">computing</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val computing : (int -> value array) -> int -> int -> float array array array, -applies time sequence "0,1,2,3,...,max" to signal beam, -returns primitive output data. -</div> -</td></tr> -<tr><td><a href="Value.html#VALconvert_back_R">convert_back_R</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val convert_back_r : value -> float array, -return a float array of size 1 if v is N|R|Zero|W, a float array of size n if v is Vec. -</div> -</td></tr> -<tr><td align="left"><br>D</td></tr> -<tr><td><a href="Faustexp.html#VALd_merge">d_merge</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val d_merge : int * int -> int * int -> int * int, process dimension for constructor "merge(:>)", -which is (size of input beam of first exp, size of output beam of second exp) -along with beam matching. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALd_par">d_par</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val d_par : int * int -> int * int -> int * int, process dimension for constructor "par(,)", -which is the addition of two dimensions. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALd_rec">d_rec</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val d_rec : int * int -> int * int -> int * int, process dimension for constructor "rec(~)", -which is (size of input beam of first exp - size of output beam of second exp, -size of output beam of first exp) -along with beam matching. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALd_seq">d_seq</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val d_seq : int * int -> int * int -> int * int, process dimension for constructor "seq(:)", -which is (size of input beam of first exp, size of output beam of second exp) -along with beam matching. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALd_split">d_split</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val d_split : int * int -> int * int -> int * int, process dimension for constructor "split(<:)", -which is (size of input beam of first exp, size of output beam of second exp) -along with beam matching. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALdelay">delay</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val delay : faust_exp -> int, returns the number of delays estimated staticly. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALdim">dim</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val dim : faust_exp -> int * int, returns dimension for faust expression, -along with beam matching. -</div> -</td></tr> -<tr><td align="left"><br>E</td></tr> -<tr><td><a href="Interpreter.html#VALeval">eval</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val rec eval : faust_exp -> beam -> beam, -main interpretation work is done here. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALexp_of_string">exp_of_string</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val exp_of_string : string -> faust_exp, faust expression parser. -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALextract_rate">extract_rate</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val extract_rate : (int * (int -> value)) list -> int list, -gets the sample rate list from beam. -</div> -</td></tr> -<tr><td align="left"><br>F</td></tr> -<tr><td><a href="Value.html#VALfactory_add_memory">factory_add_memory</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val factory_add_memory : (int -> 'b) -> int -> (int -> 'b), -<code class="code">factory_add_memory f n</code> adds a memory of size n to fun f. -</div> -</td></tr> -<tr><td><a href="Value.html#VALfail">fail</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val fail, return value W. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALfrequency">frequency</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val frequency : signal -> int, returns the frequency of a signal. -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALfun_array_to_fun">fun_array_to_fun</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val func_of_func_array : (int -> value) array -> (int -> value array), -applies the same int parameter to each element of function array, -produces a value array. -</div> -</td></tr> -<tr><td align="left"><br>G</td></tr> -<tr><td><a href="Faustexp.html#VALget_root">get_root</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val get_root : dimension -> int * int, returns the root of dimension tree. -</div> -</td></tr> -<tr><td align="left"><br>I</td></tr> -<tr><td><a href="Interpreter.html#VALinterpret_const">interpret_const</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val interpret_const : value -> beam -> beam, generates constant signal with frequency 0. -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALinterpret_ident">interpret_ident</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val interpret_ident : string -> beam -> beam, -generates signals according to identified symbols. -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALinterpreter">interpreter</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val interpreter : faust_exp -> (int list) * (float array list) -> -(int list) * (int list) * (float array list) -input: faust expression, sample rate list * input data list -output: channel list * sample rate list * output data list. -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALinterpreter_macro_to_value">interpreter_macro_to_value</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val interpreter_macro_to_value : returns the value associated with the macro. -</div> -</td></tr> -<tr><td><a href="Main.html#VALio_macro_to_string">io_macro_to_string</a> [<a href="Main.html">Main</a>]</td> -<td><div class="info"> -val io_macro_to_string : io_macro -> string. -</div> -</td></tr> -<tr><td align="left"><br>M</td></tr> -<tr><td><a href="Main.html#VALmain">main</a> [<a href="Main.html">Main</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALmain">main</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Interpreter.html#VALmake_beam">make_beam</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val make_beam : (int list) * (float array list) -> (int * (int -> value)) list, -input: (sample rate list, data list) -output: beam = (sample rate, function) list -</div> -</td></tr> -<tr><td><a href="Value.html#VALmake_vector">make_vector</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val make_vector : int -> (int -> value) -> value, -<code class="code">make_vector size vec</code>, return a value Vec of (size, vec). -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALmatrix_transpose">matrix_transpose</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val matrix_transpose : 'a array array -> 'a array array, -transposes the input matrix. -</div> -</td></tr> -<tr><td align="left"><br>N</td></tr> -<tr><td><a href="Value.html#VALnormalize">normalize</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val normalize: value -> value, normalize value to bounded <code class="code">-2147483648,2147483647</code>. -</div> -</td></tr> -<tr><td align="left"><br>P</td></tr> -<tr><td><a href="Preprocess.html#VALpreprocess">preprocess</a> [<a href="Preprocess.html">Preprocess</a>]</td> -<td></td></tr> -<tr><td><a href="Faustexp.html#VALprint_exp">print_exp</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val print_exp : faust_exp -> unit, print to console the input faust expression. -</div> -</td></tr> -<tr><td><a href="Value.html#VALprint_value_list">print_value_list</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val print_value_list: value list -> unit, prints to console the value list. -</div> -</td></tr> -<tr><td align="left"><br>R</td></tr> -<tr><td><a href="Main.html#VALread_input_wave">read_input_wave</a> [<a href="Main.html">Main</a>]</td> -<td><div class="info"> -val read_input_wave : string array -> int list * float array list - <code class="code">read_input_wave argv</code> gets information from command line, - returns sample rate list and data (in form of float array) list. -</div> -</td></tr> -<tr><td><a href="Value.html#VALreturn_N">return_N</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val return_N : int -> value, convert from int to value N. -</div> -</td></tr> -<tr><td><a href="Value.html#VALreturn_R">return_R</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val return_R : float -> value, convert from float to value R. -</div> -</td></tr> -<tr><td><a href="Value.html#VALreturn_Vec">return_Vec</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val return_Vec : int * (int -> value) -> value, convert (size, vec) to value Vec. -</div> -</td></tr> -<tr><td align="left"><br>S</td></tr> -<tr><td><a href="Main.html#VALset_GC">set_GC</a> [<a href="Main.html">Main</a>]</td> -<td><div class="info"> -val set_GC : unit -> unit -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_add">signal_add</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_add : signal -> signal -> signal, output(t) = input1(t) + input2(t), - frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_add_one_memory">signal_add_one_memory</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_add_one_memory : signal -> signal, -returns the signal with memory of one latest sample. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_append">signal_append</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_append : signal -> signal -> signal, symbol "#", - appends vectors of the two input signals at each time, frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_atan">signal_atan</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_atan : signal -> signal, output(t) = v_atan(input(t)), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_atantwo">signal_atantwo</a> [<a href="Signal.html">Signal</a>]</td> -<td></td></tr> -<tr><td><a href="Signal.html#VALsignal_check_frequency">signal_check_frequency</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_check_frequency : signal -> signal -> int, -checks the frequencies of two input signals, and returns common frequency or raise an exception. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_check_frequency3">signal_check_frequency3</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_check_frequency3 : signal -> signal -> signal -> int, -checks the frequencies of three input signal, and returns common frequency or raise an exception. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_check_frequency4">signal_check_frequency4</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_check_frequency4 : signal -> signal -> signal -> signal -> int, -checks the frequencies of three input signal, and returns common frequency or raise an exception. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_cos">signal_cos</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_cos : signal -> signal, output(t) = v_cos(input(t)), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_delay">signal_delay</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_delay : signal -> signal -> signal, output(t) = input1(t - input2(t)), - Attention: delay dynamic, frequency of output signal equals to that of first input signal. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_div">signal_div</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_div : signal -> signal -> signal, output(t) = input1(t) / input2(t), - frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_floor">signal_floor</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_floor : signal -> signal, output(t) = v_floor(input(t)), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_fun">signal_fun</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_fun : signal -> (int -> value), returns the functional part of a signal. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_inf">signal_inf</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_inf : signal -> signal -> signal, - output(t) = input1(t) < input2(t), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_int">signal_int</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_int : signal -> signal, output(t) = v_int(input(t)), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_macro_to_int">signal_macro_to_int</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_macro_to_int : signal_macro -> int. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_mem">signal_mem</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_mem : signal -> signal, equivalent to signal_delay with constant delay 1. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_mod">signal_mod</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_mod : signal -> signal -> signal, - output(t) = input1(t) % input2(t), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_mul">signal_mul</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_mul : signal -> signal -> signal, output(t) = input1(t) * input2(t), - frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_neg">signal_neg</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_neg : signal -> signal, output(t) = -input(t), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_nth">signal_nth</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_nth : signal -> signal -> signal, symbol "[]", output(t) = input1(t)(input2(t)), - frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_prefix">signal_prefix</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_prefix : signal -> signal -> signal, -<code class="code">signal_prefix s0 s1</code> returns s0(0) if t = 0, s1(t-1) if t > 0, frequency same to s1. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_rdtable">signal_rdtable</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_rdtable : signal -> signal -> signal, - output(t) = input1(input2(t)), frequency equals to that of input2. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_select2">signal_select2</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_select2 : signal -> signal -> signal -> signal, -<code class="code">signal_select2 si s0 s1</code> selects s0 or s1 by index si, frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_select3">signal_select3</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_select3 : signal -> signal -> signal -> signal -> signal, -<code class="code">signal_select3 si s0 s1 s2</code> selects s0 or s1 or s2 by index si, frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_serialize">signal_serialize</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_serialize : signal -> signal, output(t) = input(floor(t/n))(t%n), - with n = size of input(0). -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_sin">signal_sin</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_sin : signal -> signal, output(t) = v_sin(input(t)), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_sqrt">signal_sqrt</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_sqrt : signal -> signal, output(t) = v_sqrt(input(t)), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_sub">signal_sub</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_sub : signal -> signal -> signal, output(t) = input1(t) - input2(t), - frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_sup">signal_sup</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_sup : signal -> signal -> signal, - output(t) = input1(t) > input2(t), frequency consistent. -</div> -</td></tr> -<tr><td><a href="Signal.html#VALsignal_vectorize">signal_vectorize</a> [<a href="Signal.html">Signal</a>]</td> -<td><div class="info"> -val signal_vectorize : signal -> signal -> signal, output(t)(i) = input1(input2(0) * t + i), -Attention: vector size n static, frequency of output signal is (1/n * frequency of input1) -</div> -</td></tr> -<tr><td><a href="Value.html#VALstring_of_value">string_of_value</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val string_of_value : value -> string, converts value to following -strings "N i" | "R f" | "Vec" | "Zero" | "W". -</div> -</td></tr> -<tr><td><a href="Interpreter.html#VALsublist">sublist</a> [<a href="Interpreter.html">Interpreter</a>]</td> -<td><div class="info"> -val sublist : 'a list -> int -> int -> 'a list, -<code class="code">sublist l start length</code>, returns the sublist of list 'l', -from index 'start', with length 'length'. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALsubtree">subtree</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val subtree : dimention -> int -> dimension, returns a subtree of dimension tree. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALsubtree_left">subtree_left</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val subtree_left : dimension -> dimension, returns the left subtree of dimension tree. -</div> -</td></tr> -<tr><td><a href="Faustexp.html#VALsubtree_right">subtree_right</a> [<a href="Faustexp.html">Faustexp</a>]</td> -<td><div class="info"> -val subtree_right : dimension -> dimension, returns the right subtree of dimension tree. -</div> -</td></tr> -<tr><td><a href="Types.html#VALsymbol_of_string">symbol_of_string</a> [<a href="Types.html">Types</a>]</td> -<td></td></tr> -<tr><td align="left"><br>T</td></tr> -<tr><td><a href="Value.html#VALtake_off_N">take_off_N</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val take_off_N : value -> int, convert from value N to int. -</div> -</td></tr> -<tr><td><a href="Value.html#VALtake_off_R">take_off_R</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val take_off_R : value -> float, convert from value R to float. -</div> -</td></tr> -<tr><td><a href="Lexer.html#VALtoken">token</a> [<a href="Lexer.html">Lexer</a>]</td> -<td></td></tr> -<tr><td align="left"><br>V</td></tr> -<tr><td><a href="Value.html#VALv_add">v_add</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_add : value -> value -> value, value addition, recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_atan">v_atan</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_atan : value -> value, returns atan(v), recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_atantwo">v_atantwo</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_atantwo : value -> value, returns atantwo(v), recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_cos">v_cos</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_cos : value -> value, returns cos(v), recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_div">v_div</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_div : value -> value -> value, value division, returns (v1/.v2). -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_floor">v_floor</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_floor : value -> value, returns floor of float, converts int to float, Zero to 0., - error to error, recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_inf">v_inf</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_inf : value -> value -> value, comparison of two values, returns value.N 1 if (v1 < v2), -value.N 0 else. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_int">v_int</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_int : value -> value, converts value to value.N, error to error, recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_larger_than_zero">v_larger_than_zero</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_larger_than_zero : value -> value, primitive comparison between value and zero, -returns value.N 1 if true, value.N 0 if false. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_list_memory">v_list_memory</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_list_memory : value list -> value list, returns value list with memory. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_memory">v_memory</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_memory : value -> value, returns value Vec with memory. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_mod">v_mod</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_mod : value -> value -> value, returns (v1 % v2), recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_mul">v_mul</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_mul : value -> value -> value, returns (v1 * v2), recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_neg">v_neg</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_neg : value -> value, v_neg v = -v. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_recip">v_recip</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_recip : value -> value, v_recip v = 1./.v. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_sin">v_sin</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_sin : value -> value, returns sin(v), recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_sqrt">v_sqrt</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_sqrt : value -> value, returns sqrt(v), recursive for value.Vec. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_sub">v_sub</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_sub : value -> value -> value, returns (v1 - v2). -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_sup">v_sup</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_sup : value -> value -> value, comparison of two values, returns value.N 1 if (v1 > v2), -value.N 0 else. -</div> -</td></tr> -<tr><td><a href="Value.html#VALv_zero">v_zero</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val v_zero : value -> value, Attention: N i -> N 0 | R f -> R 0. -</div> -</td></tr> -<tr><td><a href="Value.html#VALvalue_macro_to_int">value_macro_to_int</a> [<a href="Value.html">Value</a>]</td> -<td><div class="info"> -val value_macro_to_value : value_macro -> int. -</div> -</td></tr> -<tr><td align="left"><br>W</td></tr> -<tr><td><a href="Main.html#VALwrite_output_txt">write_output_txt</a> [<a href="Main.html">Main</a>]</td> -<td></td></tr> -<tr><td><a href="Main.html#VALwrite_output_wave">write_output_wave</a> [<a href="Main.html">Main</a>]</td> -<td><div class="info"> -val write_output_wave : int list -> int list -> float_array_list -> unit. -</div> -</td></tr> -<tr><td align="left"><br>Y</td></tr> -<tr><td><a href="Parser.html#VALyyact">yyact</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyycheck">yycheck</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyydefred">yydefred</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyydgoto">yydgoto</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyygindex">yygindex</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyylen">yylen</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyylhs">yylhs</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyynames_block">yynames_block</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyynames_const">yynames_const</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyyrindex">yyrindex</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyysindex">yysindex</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyytable">yytable</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyytables">yytables</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyytablesize">yytablesize</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyytransl_block">yytransl_block</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -<tr><td><a href="Parser.html#VALyytransl_const">yytransl_const</a> [<a href="Parser.html">Parser</a>]</td> -<td></td></tr> -</table><br> -</body> -</html> \ No newline at end of file diff --git a/documentation/style.css b/documentation/style.css deleted file mode 100644 index 9c84d31..0000000 --- a/documentation/style.css +++ /dev/null @@ -1,34 +0,0 @@ -a:visited {color : #416DFF; text-decoration : none; } -a:link {color : #416DFF; text-decoration : none;} -a:hover {color : Red; text-decoration : none; background-color: #5FFF88} -a:active {color : Red; text-decoration : underline; } -.keyword { font-weight : bold ; color : Red } -.keywordsign { color : #C04600 } -.superscript { font-size : 4 } -.subscript { font-size : 4 } -.comment { color : Green } -.constructor { color : Blue } -.type { color : #5C6585 } -.string { color : Maroon } -.warning { color : Red ; font-weight : bold } -.info { margin-left : 3em; margin-right : 3em } -.param_info { margin-top: 4px; margin-left : 3em; margin-right : 3em } -.code { color : #465F91 ; } -h1 { font-size : 20pt ; text-align: center; } -h2 { font-size : 20pt ; border: 1px solid #000000; margin-top: 5px; margin-bottom: 2px;text-align: center; background-color: #90BDFF ;padding: 2px; } -h3 { font-size : 20pt ; border: 1px solid #000000; margin-top: 5px; margin-bottom: 2px;text-align: center; background-color: #90DDFF ;padding: 2px; } -h4 { font-size : 20pt ; border: 1px solid #000000; margin-top: 5px; margin-bottom: 2px;text-align: center; background-color: #90EDFF ;padding: 2px; } -h5 { font-size : 20pt ; border: 1px solid #000000; margin-top: 5px; margin-bottom: 2px;text-align: center; background-color: #90FDFF ;padding: 2px; } -h6 { font-size : 20pt ; border: 1px solid #000000; margin-top: 5px; margin-bottom: 2px;text-align: center; background-color: #C0FFFF ; padding: 2px; } -div.h7 { font-size : 20pt ; border: 1px solid #000000; margin-top: 5px; margin-bottom: 2px;text-align: center; background-color: #E0FFFF ; padding: 2px; } -div.h8 { font-size : 20pt ; border: 1px solid #000000; margin-top: 5px; margin-bottom: 2px;text-align: center; background-color: #F0FFFF ; padding: 2px; } -div.h9 { font-size : 20pt ; border: 1px solid #000000; margin-top: 5px; margin-bottom: 2px;text-align: center; background-color: #FFFFFF ; padding: 2px; } -.typetable { border-style : hidden } -.indextable { border-style : hidden } -.paramstable { border-style : hidden ; padding: 5pt 5pt} -body { background-color : White } -tr { background-color : White } -td.typefieldcomment { background-color : #FFFFFF ; font-size: smaller ;} -pre { margin-bottom: 4px } -div.sig_block {margin-left: 2em} -*:target { background: yellow; } \ No newline at end of file diff --git a/documentation/type_Faustexp.html b/documentation/type_Faustexp.html deleted file mode 100644 index ea88f7c..0000000 --- a/documentation/type_Faustexp.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Faustexp</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file diff --git a/documentation/type_Interpreter.html b/documentation/type_Interpreter.html deleted file mode 100644 index 00a929f..0000000 --- a/documentation/type_Interpreter.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Interpreter</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file diff --git a/documentation/type_Lexer.html b/documentation/type_Lexer.html deleted file mode 100644 index 32877ba..0000000 --- a/documentation/type_Lexer.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Lexer</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file diff --git a/documentation/type_Main.html b/documentation/type_Main.html deleted file mode 100644 index 9d8e36f..0000000 --- a/documentation/type_Main.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Main</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file diff --git a/documentation/type_Parser.html b/documentation/type_Parser.html deleted file mode 100644 index 0057a7d..0000000 --- a/documentation/type_Parser.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Parser</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file diff --git a/documentation/type_Preprocess.html b/documentation/type_Preprocess.html deleted file mode 100644 index f62d292..0000000 --- a/documentation/type_Preprocess.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Preprocess</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file diff --git a/documentation/type_Signal.html b/documentation/type_Signal.html deleted file mode 100644 index bcb8afc..0000000 --- a/documentation/type_Signal.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Signal</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file diff --git a/documentation/type_Types.html b/documentation/type_Types.html deleted file mode 100644 index eae4fa0..0000000 --- a/documentation/type_Types.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Types</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file diff --git a/documentation/type_Value.html b/documentation/type_Value.html deleted file mode 100644 index 777f173..0000000 --- a/documentation/type_Value.html +++ /dev/null @@ -1,20 +0,0 @@ -<html><head> -<link rel="stylesheet" href="style.css" type="text/css"> -<meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> -<link rel="Start" href="index.html"> -<link title="Index of types" rel=Appendix href="index_types.html"> -<link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> -<link title="Index of values" rel=Appendix href="index_values.html"> -<link title="Index of modules" rel=Appendix href="index_modules.html"> -<link title="Types" rel="Chapter" href="Types.html"> -<link title="Parser" rel="Chapter" href="Parser.html"> -<link title="Lexer" rel="Chapter" href="Lexer.html"> -<link title="Value" rel="Chapter" href="Value.html"> -<link title="Signal" rel="Chapter" href="Signal.html"> -<link title="Faustexp" rel="Chapter" href="Faustexp.html"> -<link title="Interpreter" rel="Chapter" href="Interpreter.html"> -<link title="Preprocess" rel="Chapter" href="Preprocess.html"> -<link title="Main" rel="Chapter" href="Main.html"><title>Value</title> -</head> -<body> -<code class="code"><span class="keyword">sig</span> <span class="keyword">end</span></code></body></html> \ No newline at end of file -- 2.20.1