Input
take 5 $ termes_cosinus 0 cosinus 0 (1%100000) map fromRational $ take 5 $ termes_cosinus (314%100) fromRational $ cosinus (314%100) (1%100000)
Output
[1 % 1,0 % 1,0 % 1,0 % 1,0 % 1] 1 % 1 [1.0,-4.9298,4.050488006666667,-1.331206385017689,0.23437790131643582] -1.0000028659910203