implementation module Kogelbaan

import StdEnv

:: T :== Real       // T staat voor tijd (s). 
:: V :== Real       // R staat voor snelheid (m/s).
:: A :== Real       // A staat voor hoek (radialen).
:: G :== Real       // G staat voor valversnelling (m/s^2).
:: D :== Real       // M staat voor afstand (m).

// De valversnelling g is een 'echte' constante:
g                   :: G
g                   = 9.81

// De gevraagde functies:
v_x                 :: // geef type van v_x
v_x                 =  // geef functievoorschrift van v_x

v_y                 :: // geef type van v_y
v_y                 =  // geef functievoorschrift van v_y

x_at                :: // geef type van x_at
x_at                =  // geef functievoorschrift van x_at

y_at                :: // geef type van y_at
y_at                =  // geef functievoorschrift van y_at

h                   :: // geef type van h
h                   =  // geef functievoorschrift van h

// Het bepalen van de beste hoek uit {0.01*pi, 0.02*pi .. 0.5*pi}:
Start               = beste_hoek 5.0

pi                  = 3.1415926

beste_hoek          :: V -> ...
beste_hoek v_0      =