fix scheme and fortran