Ignore:
Timestamp:
04/28/18 03:37:44 (17 months ago)
Author:
Kon Lovett
Message:

begin typing, dep /

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/srfi-27/trunk/srfi-27-cauchys.scm

    r34968 r35456  
    3232    (+ median (* sigma (tan (* *pi* (- (randoms) 0.5)))))) )
    3333
    34 (define (make-random-cauchys #!key (median 0.0) (sigma 1.0) (randoms (random-real/current)))
     34(define (make-random-cauchys #!key (median 0.0) (sigma 1.0) (randoms (current-random-real)))
    3535  (check-real 'make-random-cauchys median 'median)
    3636  (check-positive-real 'make-random-cauchys sigma 'sigma)
Note: See TracChangeset for help on using the changeset viewer.