Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
C
common-math
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Incidents
Environments
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
common-math
common-math
Commits
1eea17aa
Commit
1eea17aa
authored
Nov 12, 2018
by
Marco Antoniotti
💬
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Fixed a few exports.
parent
c9110a0e
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
7 deletions
+4
-7
common-math-package.lisp
common-math-package.lisp
+4
-7
No files found.
common-math-package.lisp
View file @
1eea17aa
...
...
@@ -88,24 +88,19 @@ argument as the optional one.
)
;; Generic names (shadowing CL symbols).
(
:shadow
"="
"+"
"-"
"*"
"/"
">"
"<"
">="
"<="
"/="
)
(
:shadow
"PLUSP"
"MINUSP"
"ZEROP"
)
(
:shadow
"EXPT"
"GCD"
"LCM"
)
(
:shadow
"EXP
"
"EXP
T"
"GCD"
"LCM"
)
(
:export
"="
"+"
"-"
"*"
"/"
">"
"<"
">="
"<="
"/="
)
(
:export
"PLUSP"
"MINUSP"
"ZEROP"
)
(
:export
"EXPT"
"GCD"
"LCM"
)
(
:export
"EXP
"
"EXP
T"
"GCD"
"LCM"
)
(
:export
"INCREASING"
"DECREASING"
)
(
:export
"MINIMUM"
"MAXIMUM"
"MINMAX"
)
(
:export
"OUTER-PRODUCT"
)
(
:export
"INNER-PRODUCT"
"DOT"
)
(
:export
"SUM"
)
(
:export
"PRODUCT"
)
...
...
@@ -125,9 +120,11 @@ argument as the optional one.
(
:export
"GCD."
".GCD."
"LCM."
".LCM."
)
(
:export
"INNER-PRODUCT"
"OUTER-PRODUCT"
"DOT"
)
(
:export
"/*"
"./*."
)
; Inner product.
(
:export
"*/"
".*/."
)
; Outer product.
(
:export
"INNER-SUM"
"OUTER-SUM"
)
(
:export
"/+"
"./+."
)
; Inner sum.
(
:export
"+/"
".+/."
)
; Outer sum.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment