; definizione di costanti
(define PI 3.14)

;; conversione euro lire
(define euro-lire 1936.27)

;; funzione di conversione da euro a lire
;; euro->lire: number -> number
(define (euro->lire e) (* e euro-lire))

;; perche' e' importante l'uso delle costanti?
(define dollaro-lire 2150)

(define (dollaro->lire d) 
  (* d dollaro-lire))

;; Composizione di funzioni
;; problema da risolvere: calcolare, dato l'importo 
;; da pagare in lire (escluso IVA), il prezzo
;; comprensivo dell'imposta
;; domanda: quanti e quali parametri avra'
;; che tipo restituisce?

;; iva: dato un importo, calcola l'importo 
;; dell'imposta
(define (iva prezzo) 
  (* (/ prezzo 100) 20))

;; soluzione del problema
(define (prezzoivato prezzo) 
  (+ prezzo (iva prezzo)))

;; prezzoivato e' un esempio di scomposizione del 
;; problema in sottofunzioni