all cleaned up
added fortran program