search

danieljprice / phantom

Phantom Smoothed Particle Hydrodynamics and Magnetohydrodynamics code
https://phantomsph.github.io
Other
94 stars 223 forks source link

error phantom testsuite #482

Open martinatoscani opened 9 months ago

martinatoscani commented 9 months ago

Context: cloning PHANTOM from GitHub repository and running the testsuite. Problem: 'make test' gives the following error: 1 Error: Function 'findloc' at (1) has no IMPLICIT type ../src/setup/set_hierarchical_utils.f90:444.18:

index = int(data(findloc(int(data(:,2)), hier_int, 1),1)) 1 Error: Function 'findloc' at (1) has no IMPLICIT type ../src/setup/set_hierarchical_utils.f90:406.21:

accr1 = hs%sinks(findloc(hs%labels%sink,trim(adjustl(hl_temp))//'1', 1))%ac
                 1

Error: Function 'findloc' at (1) has no IMPLICIT type ../src/setup/set_hierarchical_utils.f90:412.21:

accr2 = hs%sinks(findloc(hs%labels%sink,trim(adjustl(hl_temp))//'2', 1))%ac
                 1

Error: Function 'findloc' at (1) has no IMPLICIT type ../src/setup/set_hierarchical_utils.f90:417.12:

hl_index = findloc(hs%labels%hl, trim(adjustl(hl_temp)), 1) 1 Error: Function 'findloc' at (1) has no IMPLICIT type