pushing original fortran code up