Add max suspended months to specification.

This commit is contained in:
Dominik Pantůček 2023-04-12 20:48:10 +02:00
parent 0fa45c375b
commit 3b67044a6f
5 changed files with 22 additions and 18 deletions

View file

@ -29,6 +29,8 @@
specification
(
member-fees-lookup-table
exchange-rates-lookup-table
member-suspend-max-months
)
(import scheme
@ -39,4 +41,12 @@
(make-period-lookup-table
'(((2010 1) 500 250))))
;; Exchange rates
(define exchange-rates-lookup-table
(make-period-lookup-table
'(((2010 1) 25))))
;; How long the member can be suspended without any action required?
(define member-suspend-max-months 24)
)