2.2 Generazione di combinazioni affini di due punti

Esercizio scrivere una funzione points, con testa

DEF points (n::isint) (p1,p2::ispoint) =

che prenda in ingresso un intero n e una coppia <p1,p2> di punti 3D e restituisca in uscita una sequenza di 2n + 1 punti combinazione affine di quelli dati. Si usi la precedente funzione coeffs per generare la sequenza di coppie di scalari da usare per le combinazioni affini.

points:2:<<1,2,3>,<0,3,2>>

 =_ <<-2,5,0>,<-1,4,1>,<0,3,2>,<1,2,3>,<2,1,4>>