Fortran schema uniform mesh example