A source user-routine compilation error: Symbol ‘mxtetg’ at (1) has no IMPLICIT type

Advanced Features and User Routines
1

Hello,

I’m trying to compile a new source_newgen.f user routine on a linux-cluster using fff compiler:
fff source_newgen.f,
but the output message complains on many similar errors related to some variables which I did not define:

user00004@node-00:~/fluka$ fff source_newgen.f

gfortran -c -I/usr/local/fluka/include -g -cpp -O3 -fd-lines-as-comments -Wall -Waggregate-return -Wcast-align -Wline-truncation -Wno-conversion -Wno-integer-division -Wno-tabs -Wno-unused-dummy-argument -Wno-unused-function -Wno-unused-parameter -Wno-unused-variable -Wsystem-headers -Wuninitialized -Wunused-label -mtune=generic -msse2 -mfpmath=sse -fPIC -fexpensive-optimizations -funroll-loops -fstrength-reduce -fno-automatic -finit-local-zero -ffixed-line-length-132 -fbackslash -funderscoring -frecord-marker=4 -falign-commons -fbacktrace -frange-check -fbounds-check -fdump-core -ftrapping-math -ffpe-trap=invalid,zero,overflow -o source_newgen.o source_newgen.f

tetgcm.inc:25:24:

Error: Symbol ‘mxtetg’ at (1) has no IMPLICIT type; did you mean ‘mxoutu’?

tetgcm.inc:28:47:

Error: Symbol ‘irttet’ at (1) has no IMPLICIT type; did you mean ‘irot’?

tetgcm.inc:27:38:

Error: Symbol ‘mxtetg’ at (1) has no IMPLICIT type; did you mean ‘mxoutu’?

tetgcm.inc:29:47:

Error: Symbol ‘nrg2tt’ at (1) has no IMPLICIT type; did you mean ‘nrgflk’?

tetgcm.inc:29:30:

Error: Symbol ‘nrgtet’ at (1) has no IMPLICIT type; did you mean ‘nrgflk’?

tetgcm.inc:30:38:

Error: Symbol ‘ntetfa’ at (1) has no IMPLICIT type; did you mean ‘ntstar’?

tetgcm.inc:30:46:

Error: Symbol ‘ntetgm’ at (1) has no IMPLICIT type; did you mean ‘ntstar’?

tetgcm.inc:30:30:

Error: Symbol ‘ntetid’ at (1) has no IMPLICIT type; did you mean ‘ntstis’?

tetgcm.inc:27:30:

Error: Symbol ‘x0tetg’ at (1) has no IMPLICIT type

tetgcm.inc:27:47:

Error: Symbol ‘y0tetg’ at (1) has no IMPLICIT type

tetgcm.inc:27:64:

Error: Symbol ‘z0tetg’ at (1) has no IMPLICIT type

The same compilation process works well on my laptop (both via Flair compilation interface and the CLI $fff source_newgen.f command), and also I copied the source_library.inc to my working directory on the cluster as it’s suggested in the lecture:

image
image1515×397 106 KB

Does anybody have an idea what might cause the errors and how can I fix them?

Cheers,
Ihor

FLUKA: 4-5.1
Operating system: Ubuntu 24.04
Compiler: gfortran 13.3

2

Dear Ihor,

To clarify, are you trying to compile it on a cluster with 4-5.1?

In the recent release (4-5.2), the declarations inside tetgcm.inc were changed to explicit,
to facilitate access to properties of UMESH regions. The new default version of source_newgen.f won’t compile against older FLUKA versions.

If you still have to use it, please comment out include tetgcm.inc on top of the routine,
and keep the UMESH section (10) commented out, since older FLUKA doesn’t have these features.

Cheers,
Volodymyr

3

Dear Volodymyr,

Thanks for the answer – this helped to solve the problem! Yes, I was trying to compile the source_newgen.f user routine copied from FLUKA 4-5.2 installed on my laptop on the cluster where FLUKA 4-5.1 is installed, so your guess happened to be the correct one. Thank you again!
I didn’t know the 4-5.1 version does not support tetgcm.inc and naively tried to compile the new source_newgen.f with the old-version’s compiler.

Cheers,
Ihor