Simple fortran example with both f77 and f90 code