Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Annotation of /branches/vis15/src/compiler/basis/basis-names.sml
ViewVC logotype

Annotation of /branches/vis15/src/compiler/basis/basis-names.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3511 - (view) (download)

1 : jhr 3391 (* basis-names.sml
2 :     *
3 :     * This code is part of the Diderot Project (http://diderot-language.cs.uchicago.edu)
4 :     *
5 :     * COPYRIGHT (c) 2015 The University of Chicago
6 :     * All rights reserved.
7 :     *
8 :     * Builtin names used for Basis functions.
9 :     *)
10 :    
11 :     structure BasisNames =
12 :     struct
13 :    
14 :     (* import the operator names from parse-tree/operators.sml *)
15 :     open Operators
16 :    
17 :     (* reduction operators *)
18 :     val fn_all = Atom.atom "all"
19 :     val fn_exists = Atom.atom "exists"
20 :     val fn_max = Atom.atom "max" (* also used as a regular function *)
21 : jhr 3482 val fn_mean = Atom.atom "mean"
22 : jhr 3391 val fn_min = Atom.atom "min" (* also used as a regular function *)
23 : jhr 3482 val fn_product = Atom.atom "product"
24 :     val fn_sum = Atom.atom "sum"
25 :     val fn_variance = Atom.atom "variance"
26 : jhr 3391
27 :     (* function names *)
28 :     val fn_border = Atom.atom "border"
29 :     val fn_clamp = Atom.atom "clamp"
30 :     val fn_det = Atom.atom "det"
31 :     val fn_dist = Atom.atom "dist"
32 :     val fn_evecs = Atom.atom "evecs"
33 :     val fn_evals = Atom.atom "evals"
34 :     val fn_image = Atom.atom "image"
35 :     val fn_inside = Atom.atom "inside"
36 :     val fn_length = Atom.atom "length"
37 :     val fn_lerp = Atom.atom "lerp"
38 : jhr 3398 val fn_load = Atom.atom "load"
39 :     val fn_max = Atom.atom "max"
40 :     val fn_min = Atom.atom "min"
41 : jhr 3391 val fn_mirror = Atom.atom "mirror"
42 :     val fn_modulate = Atom.atom "modulate"
43 :     val fn_normalize = Atom.atom "normalize"
44 :     val fn_principleEvec = Atom.atom "principleEvec"
45 : jhr 3398 val fn_size = Atom.atom "size"
46 : jhr 3391 val fn_trace = Atom.atom "trace"
47 :     val fn_transpose = Atom.atom "transpose"
48 : jhr 3398 val fn_wrap = Atom.atom "wrap"
49 : jhr 3391
50 : jhr 3482 (* standard math functions *)
51 :     val fn_abs = Atom.atom "abs"
52 : jhr 3398 val fn_acos = Atom.atom "acos"
53 :     val fn_asin = Atom.atom "asin"
54 : jhr 3482 val fn_atan = Atom.atom "atan"
55 :     val fn_atan2 = Atom.atom "atan2"
56 :     val fn_ceil = Atom.atom "ceil"
57 : jhr 3398 val fn_cos = Atom.atom "cos"
58 : jhr 3482 val fn_erf = Atom.atom "erf"
59 :     val fn_erfc = Atom.atom "erfc"
60 :     val fn_exp = Atom.atom "exp"
61 :     val fn_floor = Atom.atom "floor"
62 :     val fn_fmod = Atom.atom "fmod"
63 :     val fn_log = Atom.atom "log"
64 :     val fn_log10 = Atom.atom "log10"
65 :     val fn_log2 = Atom.atom "log2"
66 : jhr 3511 val fn_pow = Atom.atom "pow"
67 : jhr 3398 val fn_sin = Atom.atom "sin"
68 : jhr 3482 val fn_sqrt = Atom.atom "sqrt"
69 : jhr 3478 val fn_tan = Atom.atom "tan"
70 : jhr 3398
71 : jhr 3391 (* Query function names *)
72 :     val fn_sphere = Atom.atom "sphere"
73 :    
74 : jhr 3431 (* Sets of strands *)
75 :     val set_active = Atom.atom "active"
76 :     val set_all = Atom.atom "all"
77 :     val set_stable = Atom.atom "stable"
78 :    
79 : jhr 3391 (* kernel names *)
80 :     val kn_bspln3 = Atom.atom "bspln3"
81 :     val kn_bspln5 = Atom.atom "bspln5"
82 :     val kn_c4hexic = Atom.atom "c4hexic"
83 :     val kn_ctmr = Atom.atom "ctmr"
84 :     val kn_tent = Atom.atom "tent"
85 :    
86 :     end

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0