Add a variable to store the output name length in fortran_open