Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

29 lines (25 sloc) 6.37 kb
module Exercises where
-- base
import Prelude
type ExerciseIO = ([Double], [Double])
io :: String -> ExerciseIO
io "e311"
= ([11,29,46,47,57,24,50,92,10,84],
[5.5,14.5,23,23.5,28.5,12,25,46,5,42])
io "e314"
= ([11,29,46,47,57,24,50,92,10,84,-18,-29,-25,-40,-35],
[3.3166247903554,5.385164807134504,6.782329983125268,6.855654600401044,7.54983443527075,4.898979485566356,7.0710678118654755,9.591663046625438,3.1622776601683795,9.16515138991168,-1,-1,-1,-1,-1])
io "e318" = ([pi / 6], [0.49999999999999994])
io "e319"
= ([1.66,2,1.72,2,1.67,1,1.74,1,1.63,2,1.74,2,1.76,1,1.65,1,1.79,2,1.61,2,1.79,1,1.62,1,1.77,2,1.76,1,1.73,1,1.69,1,1.61,2,1.67,1,1.78,2,1.71,2,1.71,2,1.64,2,1.77,1,1.6,1,1.73,2,1.78,1,1.8,1,1.64,2,1.73,2,1.65,2,1.75,1,1.73,2,1.68,1,1.63,2,1.73,2,1.67,2,1.66,2,1.74,2,1.8,2,1.69,2,1.73,2,1.68,2,1.69,2,1.74,2,1.67,2,1.73,1,1.78,2,1.71,1,1.68,2,1.68,2],
[1.8,1.6,1.72,1.74,1.79,1.77,1.78,1.71,1.71,1.73,1.73,1.73,1.73,1.74,1.8,1.73,1.74,1.78,1.66,1.67,1.63,1.65,1.61,1.62,1.69,1.61,1.67,1.64,1.6,1.64,1.65,1.68,1.63,1.67,1.66,1.69,1.68,1.69,1.67,1.68,1.68])
io "e320"
= ([71.0,77.0,98.0,73.0,99.0,58.0,24.0,98.0,2.0,91.0,34.0,93.0,43.0,84.0,76.0,50.0,31.0,70.0,99.0,46.0,94.0,8.0,56.0,99.0,21.0,95.0,80.0,87.0,85.0,64.0,40.0,41.0,34.0,8.0,76.0,28.0,86.0,97.0,67.0,30.0,4.0,10.0,60.0,56.0,1.0,93.0,95.0,38.0,28.0,92.0],
[51.06666666666667,72.9,98.0,1.0,98.0,58.0,98.0,84.0,76.0,70.0,94.0,56.0,80.0,64.0,76.0,86.0,60.0,56.0,92.0,71.0,43.0,31.0,21.0,41.0,67.0,1.0])
io "e321"
= ([19.0,21.0,34.0,21.0,28.0,22.0,36.0,29.0,19.0,18.0,38.0,26.0,29.0,31.0,21.0,26.0,17.0,33.0,24.0,37.0,17.0,40.0,39.0,20.0,35.0,40.0,15.0,26.0,40.0,25.0,37.0,22.0,18.0,16.0,22.0,32.0,30.0,22.0,22.0,30.0,28.0,20.0,18.0,34.0,36.0,20.0,29.0,40.0,22.0,20.0,20.0,15.0,22.0,19.0,34.0,31.0,27.0,28.0,34.0,32.0,31.0,35.0,15.0,24.0,28.0,15.0,33.0,36.0,40.0,17.0,37.0,22.0,16.0,17.0,34.0,29.0,37.0,20.0,36.0,20.0,32.0,20.0,30.0,16.0,35.0,30.0,27.0,31.0,25.0,33.0,17.0,23.0,37.0,40.0,30.0,38.0,36.0,37.0,36.0,33.0,40.0,23.0,32.0,26.0,28.0,25.0,19.0,20.0,40.0,15.0,23.0,22.0,38.0,19.0,36.0,17.0,18.0,40.0,20.0,32.0,16.0],
[15.0,40.0,27.297520661157026,60.0])
io "e323"
= ([663.0,0.0,0.0,0.0,0.0,0.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,2.0,2.0,2.0,3.0,3.0,3.0,3.0,3.0,3.0,4.0,4.0,4.0,5.0,5.0,5.0,6.0,6.0,6.0,6.0,7.0,7.0,7.0,7.0,7.0,7.0,7.0,7.0,8.0,8.0,8.0,8.0,8.0,8.0,9.0,9.0,9.0,9.0,9.0,9.0,9.0,10.0,10.0,10.0,10.0,10.0,10.0,11.0,11.0,11.0,11.0,11.0,12.0,12.0,12.0,12.0,12.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,13.0,14.0,14.0,14.0,14.0,14.0,15.0,15.0,15.0,15.0,16.0,16.0,16.0,16.0,16.0,17.0,17.0,17.0,17.0,17.0,17.0,17.0,17.0,17.0,18.0,18.0,18.0,18.0,18.0,19.0,19.0,19.0,19.0,19.0,19.0,19.0,19.0,19.0,20.0,20.0,20.0,20.0,21.0,21.0,21.0,21.0,21.0,21.0,21.0,22.0,22.0,22.0,22.0,22.0,22.0,22.0,22.0,23.0,23.0,23.0,23.0,23.0,23.0,24.0,24.0,24.0,24.0,24.0,24.0,25.0,25.0,25.0,25.0,25.0,25.0,25.0,26.0,26.0,26.0,26.0,26.0,26.0,26.0,26.0,26.0,26.0,27.0,27.0,27.0,27.0,27.0,27.0,27.0,27.0,28.0,28.0,28.0,28.0,28.0,28.0,29.0,29.0,29.0,29.0,29.0,29.0,29.0,29.0,30.0,30.0,30.0,30.0,30.0,30.0,30.0,30.0,30.0,31.0,31.0,31.0,31.0,31.0,31.0,31.0,31.0,32.0,32.0,32.0,32.0,32.0,32.0,32.0,32.0,32.0,33.0,33.0,33.0,33.0,33.0,33.0,34.0,34.0,34.0,34.0,34.0,34.0,34.0,34.0,35.0,35.0,35.0,35.0,35.0,35.0,35.0,36.0,36.0,36.0,36.0,36.0,37.0,37.0,37.0,37.0,37.0,37.0,37.0,37.0,38.0,38.0,38.0,38.0,38.0,38.0,39.0,39.0,39.0,39.0,39.0,39.0,39.0,40.0,40.0,40.0,40.0,41.0,41.0,41.0,41.0,41.0,42.0,42.0,42.0,42.0,42.0,42.0,42.0,42.0,43.0,43.0,43.0,43.0,43.0,43.0,43.0,44.0,44.0,44.0,44.0,44.0,44.0,44.0,44.0,44.0,44.0,44.0,45.0,45.0,45.0,46.0,46.0,46.0,46.0,46.0,46.0,46.0,46.0,46.0,47.0,47.0,47.0,47.0,47.0,47.0,47.0,48.0,48.0,48.0,48.0,48.0,48.0,48.0,49.0,49.0,49.0,49.0,49.0,49.0,49.0,49.0,49.0,50.0,50.0,50.0,50.0,50.0,51.0,51.0,51.0,51.0,51.0,51.0,51.0,52.0,52.0,52.0,52.0,52.0,52.0,52.0,53.0,53.0,53.0,53.0,54.0,54.0,54.0,54.0,54.0,55.0,55.0,55.0,55.0,55.0,55.0,56.0,56.0,56.0,56.0,56.0,56.0,57.0,57.0,57.0,57.0,58.0,58.0,58.0,58.0,58.0,58.0,59.0,59.0,59.0,60.0,60.0,60.0,60.0,60.0,61.0,61.0,61.0,61.0,61.0,61.0,61.0,62.0,62.0,62.0,62.0,62.0,62.0,63.0,63.0,63.0,63.0,63.0,64.0,64.0,64.0,64.0,64.0,65.0,65.0,65.0,65.0,65.0,65.0,66.0,66.0,66.0,66.0,66.0,66.0,66.0,67.0,67.0,67.0,67.0,67.0,67.0,68.0,68.0,68.0,68.0,68.0,69.0,69.0,69.0,69.0,69.0,70.0,70.0,70.0,70.0,70.0,70.0,70.0,71.0,71.0,71.0,71.0,71.0,71.0,71.0,71.0,72.0,72.0,72.0,72.0,72.0,73.0,73.0,73.0,73.0,73.0,73.0,73.0,73.0,74.0,74.0,74.0,74.0,74.0,74.0,74.0,74.0,74.0,74.0,75.0,75.0,75.0,75.0,75.0,75.0,75.0,75.0,75.0,75.0,76.0,76.0,76.0,76.0,76.0,77.0,77.0,77.0,77.0,78.0,78.0,78.0,79.0,79.0,79.0,79.0,79.0,80.0,80.0,80.0,80.0,80.0,80.0,80.0,80.0,81.0,81.0,81.0,81.0,81.0,81.0,81.0,81.0,81.0,81.0,81.0,81.0,82.0,82.0,82.0,82.0,82.0,82.0,82.0,83.0,83.0,83.0,83.0,83.0,83.0,83.0,84.0,84.0,84.0,84.0,84.0,84.0,85.0,85.0,85.0,85.0,85.0,86.0,86.0,86.0,86.0,86.0,86.0,86.0,86.0,86.0,87.0,87.0,87.0,87.0,87.0,87.0,87.0,87.0,87.0,88.0,88.0,88.0,88.0,88.0,88.0,88.0,89.0,89.0,89.0,89.0,90.0,90.0,90.0,90.0,90.0,90.0,90.0,90.0,91.0,91.0,91.0,91.0,91.0,91.0,91.0,92.0,92.0,92.0,92.0,92.0,92.0,92.0,92.0,92.0,92.0,92.0,92.0,93.0,93.0,93.0,93.0,93.0,94.0,94.0,94.0,94.0,94.0,94.0,94.0,94.0,94.0,94.0,94.0,95.0,95.0,95.0,95.0,95.0,96.0,96.0,96.0,96.0,96.0,96.0,97.0,97.0,97.0,97.0,97.0,97.0,97.0,97.0,98.0,98.0,98.0,98.0,98.0,98.0,98.0,98.0,98.0,98.0,99.0,99.0,99.0],
[4.0,9.0,4.0,5.0,2.0,2.0,3.0,7.0,5.0,6.0,5.0,4.0,4.0,15.0,4.0,3.0,4.0,8.0,4.0,8.0,3.0,6.0,7.0,5.0,5.0,6.0,9.0,7.0,5.0,7.0,8.0,7.0,8.0,5.0,7.0,6.0,4.0,7.0,5.0,6.0,3.0,4.0,7.0,6.0,10.0,2.0,8.0,6.0,6.0,8.0,4.0,6.0,6.0,3.0,4.0,5.0,5.0,3.0,5.0,2.0,4.0,6.0,5.0,4.0,4.0,5.0,6.0,5.0,4.0,4.0,6.0,7.0,4.0,7.0,9.0,9.0,4.0,3.0,2.0,4.0,7.0,11.0,6.0,6.0,5.0,4.0,8.0,8.0,6.0,3.0,7.0,6.0,11.0,4.0,10.0,4.0,5.0,7.0,9.0,0.0,1.0,2.0,3.0,4.0,5.0,6.0,7.0,8.0,9.0,10.0,11.0,12.0,13.0,14.0,15.0,16.0,17.0,18.0,19.0,20.0,21.0,22.0,23.0,24.0,25.0,26.0,27.0,28.0,29.0,30.0,31.0,32.0,33.0,34.0,35.0,36.0,37.0,38.0,39.0,40.0,41.0,42.0,43.0,44.0,45.0,46.0,47.0,48.0,49.0,50.0,51.0,52.0,53.0,54.0,55.0,56.0,57.0,58.0,59.0,60.0,61.0,62.0,63.0,64.0,65.0,66.0,67.0,68.0,69.0,70.0,71.0,72.0,73.0,74.0,75.0,76.0,77.0,78.0,79.0,80.0,81.0,82.0,83.0,84.0,85.0,86.0,87.0,88.0,89.0,90.0,91.0,92.0,93.0,94.0,95.0,96.0,97.0,98.0,99.0])
io _ = error "io _"
Jump to Line
Something went wrong with that request. Please try again.