I tried to use SRC files of version 5.1.6 with the version 5.3.4 of Code Saturne but I am experiencing a SIGSEGV error. I isolated the issue. It is coming from my file typecl.f90 (see attached document) that is used to impose a pressure difference between 2 channels that are linked with a pipe.
With the version 5.1.6 every is fine but when I used the version 5.3.4 I faced successive issues:
Firstly I had the following error:
"error : The attributes of this name conflict with those made accessible by a USE statement. [IFRSLB] integer ifrslb, itbslb." during the compilation. So I replaced the variable ifrslb and itbslb involved in the typecl.f90 file by ifrslb2 and itbslb2 which allowed the code to compile.
Now I am facing a SIGSEGV error at the begin of the file (before using ifrslb2 and itbslb2):
Code: Select all
WRITE(*,*) "BEGINNING OF DO LOOP"
do ifac = 1, nfabor
ityp = itypfb(ifac)
if(ityp.le.0.or.ityp.gt.ntypmx) then
itypfb(ifac) = 0
iok = iok + 1
endif
enddo
WRITE(*,*) "END OF DO LOOP"
Thanks a lot!