Error messages from GYRE when installing MESA

[Cheryl96]

Dear Rich,

I have received these error messages when I was trying to compile MESA-r10398 which contains the gyre-5.1

...
gyre/data/tar/tar_fit.m-5.k-3.h5
gyre/data/tar/tar_fit.m-5.k-4.h5
gyre/data/tar/tar_fit.m-5.k-5.h5
gyre/bin/.empty
fpx3 error:file -, line 18
Cannot find core.inc in ../gyre/src:../gyre/src/ad:../gyre/src/bvp:../gyre/src/output:../gyre/src/rad:../gyre/src/cad:../gyre/src/extern:../gyre/src/extern/core:../gyre/src/common:../gyre/src/mode:../gyre/src/poly:../gyre/src/interp:../gyre/src/model:../gyre/src/matrix:../gyre/src/diff:../gyre/src/grid:../gyre/src/ext:../gyre/src/frontend:../gyre/src/rot:../gyre/src/build:../gyre/src/tar:../gyre/src/mesa:../gyre/src/search:../gyre/src/nad:../gyre/src/mesa.
$include 'core.inc'
context:fpx3_mac /shared/storage/physics/brunsden/mesasdk/bin/fpx3 1120 fpx3_std::__ANON__ 1 (?) (?) 256 UUUUUUUUUUUUUUUUU# (?)
Use of uninitialized value $1 in lc at /shared/storage/physics/brunsden/mesasdk/bin/fpx3_deps line 56.
Use of uninitialized value $1 in lc at /shared/storage/physics/brunsden/mesasdk/bin/fpx3_deps line 56.
Use of uninitialized value $1 in lc at /shared/storage/physics/brunsden/mesasdk/bin/fpx3_deps line 56.
fpx3 error:file -, line 18
Cannot find core.inc in ../gyre/src:../gyre/src/ad:../gyre/src/bvp:../gyre/src/output:../gyre/src/rad:../gyre/src/cad:../gyre/src/extern:../gyre/src/extern/core:../gyre/src/common:../gyre/src/mode:../gyre/src/poly:../gyre/src/interp:../gyre/src/model:../gyre/src/matrix:../gyre/src/diff:../gyre/src/grid:../gyre/src/ext:../gyre/src/frontend:../gyre/src/rot:../gyre/src/build:../gyre/src/tar:../gyre/src/mesa:../gyre/src/search:../gyre/src/nad:../gyre/src/mesa.
$include 'core.inc'
context:fpx3_mac /shared/storage/physics/brunsden/mesasdk/bin/fpx3 1120 fpx3_std::__ANON__ 1 (?) (?) 256 UUUUUUUUUUUUUUUUU# (?)
makefile:72: recipe for target 'gyre_lib.f90' failed
make: *** [gyre_lib.f90] Error 1

/shared/storage/physics/brunsden/mesa-r10398/gyre/make
FAILED

/shared/storage/physics/brunsden/mesa-r10398/gyre
./build_and_test FAILED

I’ve also attempted to run ./build_and_test in gyre and make in gyre/make, but both of them gave a similar looking error message.

I have previously installed gyre-5.2 from your website (not from MESA) and it worked perfectly well. Could you please help me with this issue? Many thanks!

Sincerely,
Cheryl Lau

[Cheryl96]

Sorry let me correct my previous post. Gyre works in my home directory and the error only appears when I move it to a university shared filestore.

[rhtownsend]

Hi Cheryl --

The file core.inc should be in $MESA_DIR/gyre/gyre/src/extern/core -- can you see that directory, and is the file there?

cheers,

Rich

[Cheryl96]

Hi Rich,

Yes I can see it.

[rhtownsend]

Hi Rich,

Yes I can see it.

Hmm, this is very puzzling. Can you *read* the file -- i.e., does the command

cat /shared/storage/physics/brunsden/mesa-r10398/gyre/make/../gyre/src/extern/core/core.inc

...return the file contents?

cheers,

Rich

[Cheryl96]

Dear Rich,

I can read the file, this is the output I got:

! Incfile : core
! Purpose : fpx3 macros

$define $ABORT $sub

$local $MESSAGE $1

$if($MESSAGE)
write(UNIT=ERROR_UNIT, FMT=*) $str(ABORT at line $line_num $context_doc:)
write(UNIT=ERROR_UNIT, FMT=*) $str($MESSAGE)
$else
write(UNIT=ERROR_UNIT, FMT=*) $str(ABORT at line $line_num $context_doc)
$endif

stop 'Program aborted'

$endsub

!****

$define $ABORT_DEBUG $sub

$local $MESSAGE $1

$if($DEBUG)
$ABORT($MESSAGE)
$endif

$endsub

!****

$define $WARN $sub

$local $MESSAGE $1

$if($MESSAGE)
write(UNIT=ERROR_UNIT, FMT=*) $str(INFO at line $line_num $context_doc:)
write(UNIT=ERROR_UNIT, FMT=*) $str($MESSAGE)
$else
write(UNIT=ERROR_UNIT, FMT=*) $str(INFO at line $line_num $context_doc)
$endif

$endsub

!****

$define $WARN_DEBUG $sub

$local $MESSAGE $1

$if($DEBUG)
$WARN($MESSAGE)
$endif

$endsub

!****

$define $ASSERT $sub

$local $CONDITION $1
$local $MESSAGE $2

$if($MESSAGE)
if(.NOT. ($CONDITION)) then
write(UNIT=ERROR_UNIT, FMT=*) $str(ASSERT ''$CONDITION'' failed at line $line_num $context_doc:)
write(UNIT=ERROR_UNIT, FMT=*) $str($MESSAGE)
stop
endif
$else
if(.NOT. $CONDITION) then
write(UNIT=ERROR_UNIT, FMT=*) $str(ASSERT ''$CONDITION'' failed at line $line_num $context_doc)
stop
endif
$endif

$endsub

!****

$define $ASSERT_DEBUG $sub

$local $CONDITION $1
$local $MESSAGE $2

$if($DEBUG)
$ASSERT($CONDITION,$MESSAGE)
$endif

$endsub

!****

$define $CHECK_BOUNDS $sub

$local $SIZE_A $1
$local $SIZE_B $2

$if($DEBUG)

if($SIZE_A/= $SIZE_B) then
write(UNIT=ERROR_UNIT, FMT=*) $str($SIZE_A , $SIZE_A
write(UNIT=ERROR_UNIT, FMT=*) $str($SIZE_B , $SIZE_B
write(UNIT=ERROR_UNIT, FMT=*) $str(CHECK_BOUNDS $SIZE_A==$SIZE_B failed at line $line_num $context_doc)
stop
endif

$endif

$endsub

!****

$perl
xmacro 'ARRAY_SPEC', sub {
my @a = @_; @a = get_args() unless @a;
die("Invalid number of arguments:".scalar @a) unless (scalar @a == 1 || scalar @a == 2);
if($a[0] > 0) {
my @dim_spec = ();
for(my $i=1; $i <= $a[0]; $i++) {
if(defined($a[1])) {
push @dim_spec, "SIZE($a[1],$i)";
}
else {
push @dim_spec, ":";
}
}
return "(".join(",", @dim_spec).")";
}
else {
return "";
}
};
$endperl

!****

$perl
xmacro 'ARRAY_EXPAND', sub {
my @a = @_; @a = get_args() unless @a;
die("Invalid number of arguments:".scalar @a) unless (scalar @a == 2 || scalar @a == 3);
my @elems = ();
if(scalar @a == 3) {
for(my $i=1; $i <= $a[2]; $i++) {
push @elems, "$a[0]($i):$a[1]($i)";
}
} else {
for(my $i=1; $i <= $a[1]; $i++) {
push @elems, "$a[0]($i)";
}
}
return join(",", @elems);
};
$endperl

!****

$perl
xmacro 'ARRAY_FIRST', sub {
my @a = @_; @a = get_args() unless @a;
die("Invalid number of arguments") if scalar @a != 2;
if($a[1] > 0) {
return $a[0]."(".join(",", ("1") x $a[1]).")";
}
else {
return $a[0];
}
};
$endperl

Thanks!

Sincerely,

Cheryl