SCM Repository
[diderot] Annotation of /trunk/src/basis/basis-names.sml
Annotation of /trunk/src/basis/basis-names.sml
Parent Directory
| 
Revision Log
Revision 47 -
(view)
(download)
| 1 : |
jhr |
47 |
(* basis-names.sml
|
| 2 : |
|
|
*
|
| 3 : |
|
|
* COPYRIGHT (c) 2010 The Diderot Project (http://diderot.cs.uchicago.edu)
|
| 4 : |
|
|
* All rights reserved.
|
| 5 : |
|
|
*
|
| 6 : |
|
|
* Builtin names used for Basis functions.
|
| 7 : |
|
|
*)
|
| 8 : |
|
|
|
| 9 : |
|
|
structure BasisNames =
|
| 10 : |
|
|
struct
|
| 11 : |
|
|
|
| 12 : |
|
|
(* operators *)
|
| 13 : |
|
|
val op_at = Atom.atom "@"
|
| 14 : |
|
|
val op_add = Atom.atom "+"
|
| 15 : |
|
|
val op_sub = Atom.atom "-"
|
| 16 : |
|
|
val op_mul = Atom.atom "*"
|
| 17 : |
|
|
val op_div = Atom.atom "/"
|
| 18 : |
|
|
val op_lt = Atom.atom "<"
|
| 19 : |
|
|
val op_lte = Atom.atom "<="
|
| 20 : |
|
|
val op_eql = Atom.atom "=="
|
| 21 : |
|
|
val op_neq = Atom.atom "!="
|
| 22 : |
|
|
val op_gte = Atom.atom ">="
|
| 23 : |
|
|
val op_gt = Atom.atom ">"
|
| 24 : |
|
|
val op_D = Atom.atom "D"
|
| 25 : |
|
|
val op_orelse = Atom.atom "||"
|
| 26 : |
|
|
val op_andalso = Atom.atom "&&"
|
| 27 : |
|
|
val op_norm = Atom.atom "|()|"
|
| 28 : |
|
|
|
| 29 : |
|
|
(* function names *)
|
| 30 : |
|
|
val fn_convolve = Atom.atom "convolve"
|
| 31 : |
|
|
val fn_cos = Atom.atom "cos"
|
| 32 : |
|
|
val fn_dot = Atom.atom "dot"
|
| 33 : |
|
|
val fn_inside = Atom.atom "inside"
|
| 34 : |
|
|
val fn_load = Atom.atom "load"
|
| 35 : |
|
|
val fn_pow = Atom.atom "pow"
|
| 36 : |
|
|
val fn_sin = Atom.atom "sin"
|
| 37 : |
|
|
|
| 38 : |
|
|
(* kernel names *)
|
| 39 : |
|
|
val kn_bspln3 = Atom.atom "bspln3"
|
| 40 : |
|
|
|
| 41 : |
|
|
end
|
