Problem GFortran i CodeBlocks dotyczy modułów i wielu plików
Pracuję z GFortran i CodeBlocks, ale mam problem z modułami i wieloma plikami. ciągle otrzymuję ten błąd:
Fatal Error: Can't open module file 'mesh.mod' for reading at (1): No such file or directory
Z jakiegoś powodu GFortran nie buduje pliku „mesh.mod”. Ten problem nie występuje, gdy cały kod umieszczam w pojedynczym pliku .f90.
Bellow to przykład kodu, który występuje w tym błędzie.
main.f90
MODULE MESH
IMPLICIT NONE
INTEGER :: IMAX,JMAX,NMAX
REAL(8), ALLOCATABLE :: XD(:),YD(:),FX(:,:),FY(:,:)
REAL(8) :: PI,E,DX,DY,H,L,RHO,MU
PARAMETER (PI = ACOS(-1.D0))
PARAMETER (E = 2.718)
END MODULE MESH
!**************************************************************
program Cavity
Use Mesh
implicit none
Real(8), Allocatable :: func(:)
Real(8) :: Der,DfDx
integer :: i
IMAX=10
DX=1./10
Allocate(xd(IMAX),func(IMAX))
Do i=1,IMAX
xd(i)=i*DX
End Do
Do i=1,IMAX
func(i) = xd(i)**2
End Do
Der=Dfdx(func,2)
Write(*,*) Der
End program Cavity
Pochodne.f90
Real(8) Function DfDx(f,i)
Use Mesh
implicit none
Real(8) :: f(1:Imax)
integer :: i
DfDx=(f(i+1)-f(i-1))/(2d0*dx)
return
end function DfDx
Kiedy używam kompilacji wiersza poleceń konsoli zamiast interfejsu CodeBlocks, już rozwiązałem ten problem (Kompilowanie wielu plików za pomocą modułów) ale nadal mam ten problem z CodeBlocks.
Czy ktoś wie, jak rozwiązać ten problem?