Example: Quadratic Equation Solver

A first Fortran 90 that actually does something useful. However it is not modern Fortran --- it is bad Fortran.

• Finds the roots of equations of the form ax^2 + bx + c = 0;
  
  
• the coefficients a, b and c are assumed to be real;
  
  
• solutions can be real or complex;
  
  
• source code.