Changeset 39381 in project


Ignore:
Timestamp:
11/25/20 19:21:19 (5 months ago)
Author:
Kon Lovett
Message:

fix category

Location:
release/5/fx-utils/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/5/fx-utils/trunk/fx-utils.egg

    r38959 r39381  
    33
    44((synopsis "fx utilities")
    5  (version "4.0.0")
    6  (category misc)
     5 (version "4.0.1")
     6 (category math)
    77 (author "[[kon lovett]]")
    88 (license "BSD")
  • release/5/fx-utils/trunk/fx-utils.scm

    r38796 r39381  
    143143(: fx% (fixnum fixnum --> fixnum))
    144144;
    145 (define (fx% n p)
    146   (fx/ (fx* p n) 100) )
     145(define (fx% n p) (fx/ (fx* p n) 100))
    147146
    148147;;
     
    155154    ((fx= 1 n)  1)
    156155    ((fx= 2 n)  1)
    157     (else
    158       (fx+ (fx! (fx- n 1)) (fx! (fx- n 2))) ) ) )
     156    (else       (fx+ (fx! (fx- n 1)) (fx! (fx- n 2)))) ) )
    159157|#
    160158
Note: See TracChangeset for help on using the changeset viewer.