我有一个简单的Fortran程序，它从包含对象的网格数据的文本文件中读取数据。它使用名为mesh的模块，其中包含读取文件并将数据放入mesh_container变量的函数
这是代码：
program prueba2
use mesh
! prueba leyendo un archivo mesh .msh
TYPE(mesh_container) :: meshs
Character(len=40) :: file
print *, 'Nombre del archivo'
read *, file
meshs = load_mesh(file)
print *, 'Ahora vamos a esportarlo'
call export_mesh('nuevo.msh',meshs)
! meshs es la variables con los mesh
!call build_solid_faces(meshs)
print *, 'Fino, ojala aiga servido'
end program prueba2
运行时，显示cubito.msh的结果：
$ gfortran -o prueba1a constants.f90 mesh.f90 prueba1.f90
$ ./prueba1a
Introduzca el archivo .msh que quiere leer
cubito.msh
Mesh version: 2.2
Mesh file loaded successfully.
- Read 14 nodes
- Read 24 faces
- Read 12 lines
- Read 24 solids
Ahora vamos a esportarlo
Fino, ojala aiga servido, vea el archivo nuevo.msh
但是当我添加其他模块时，再次编译并运行会出现这个
$ gfortran constants.f90 linalg.f90 aux.f90 mesh.f90 prueba2.f90
$ ./a.out
Nombre del archivo
cubito.msh
Could not open mesh file cubito.mshAhora vamos a esportarlonuevo.mshFino, ojala aiga servidoD�;�O�����l����b����a�������D����l���������������`����H�������D����l~����!
我不知道为什么会出现这些符号且程序无法识别文件cubito.msh
但是当我输入一个不存在的时候，我得到了这个：
$ ./a.out
Nombre del archivo
c
Unrecognized mesh file extension!
此文件位于我的Github repository中，prueba1位于存储库的根目录中，prueba2位于test文件夹中。