diff options
| author | Thomas White <taw@physics.org> | 2021-10-19 20:06:06 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2021-10-19 20:06:06 +0200 |
| commit | 5592dadf5af7bd95890259af689a72ade528f600 (patch) | |
| tree | 8e9ad90247b0890ba1a292e3f44a6d6a452f7149 /guile/starlet/utils.scm | |
| parent | c5013476ca46313307d2537bb956603fe7dc6cac (diff) | |
Replace partial application functions with SRFI-26 "cut"
Diffstat (limited to 'guile/starlet/utils.scm')
| -rw-r--r-- | guile/starlet/utils.scm | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/guile/starlet/utils.scm b/guile/starlet/utils.scm index d5441cb..16e3364 100644 --- a/guile/starlet/utils.scm +++ b/guile/starlet/utils.scm @@ -22,8 +22,6 @@ #:use-module (srfi srfi-1) #:export (print-hash-table copy-hash-table - partial - partial-start in-range mean flatten-sublists @@ -47,15 +45,6 @@ new-ht)) -(define (partial f second-val) - (lambda (first-val) - (f first-val second-val))) - - -(define (partial-start f first-val) - (lambda args - (apply f first-val args))) - (define (in-range a val1 val2) (or |