Changeset 34969 in project


Ignore:
Timestamp:
12/29/17 21:14:09 (3 weeks ago)
Author:
kon
Message:

rel 3.3.0

Location:
release/4/srfi-27
Files:
1 edited
24 copied

Legend:

Unmodified
Added
Removed
  • release/4/srfi-27/OO-example.scm

    r34938 r34969  
    1 (use srfi-1 srfi-13 coops srfi-27-distributions)
     1(use srfi-1 srfi-13)
     2(use coops)
     3(use srfi-27-normals srfi-27-exponentials)
    24
    35;; Named (has a name) "concept"
     
    8991
    9092#|
     93(use coops-extras)
    9194(define expn-rd (make-random-distribution make-random-exponentials mu: 0.5))
    92 (use coops-extras)
    9395(describe-object expn-rd)
    9496;#> coops instance of class `<random-distribution>':
    9597;tmpval: #f
    9698;namsym: exponentials
    97 ;  ctor: #<procedure (srfi-27-distributions#make-random-exponentials . tmp302303)>
     99;  ctor: #<procedure (srfi-27-exponentials#make-random-exponentials . tmp302303)>
    98100;params: (0.5)
    99101;   src: #<procedure>
Note: See TracChangeset for help on using the changeset viewer.