I was able to fix the problem. Since I did not need the reordering of the
standards, I changed the relevant lines of code back to the previous version.
Here are the instructions I wrote myself to keep track of what I did:
To fix Athena standards ordering issue:
open this file:
DemeterPerl>perl>site>lib>Demeter>LCF.pm (I opened in VSCode)
Find: "foreach my $st (sort {$b cmp $a} @{ $self->standards }) {"
Replace: "foreach my $st (@{ $self->standards }) {"
Find: "my @stand = sort {$b cmp $a} keys %{ $self->options };"
Replace: "my @stand = keys %{ $self->options };"
Find: "my @stand = sort {$b cmp $a} keys %{ $self->options };"
Replace: "my @stand = keys %{ $self->options };"
open this file:
DemeterPerl>perl>site>lib>Demeter>templates>analysis>ifeffit>lcf_report.tmpl (I
opened in VSCode)
Find: "{foreach $st (sort {$b cmp $a} @{ $S->standards }) {$OUT .= sprintf(".
%-20s %.3f (%.3f) %.3f (%.3f)\n", $st->name, $S->weight($st), $S->e0($st))
}}"
Replace: "{foreach $st (@{ $S->standards }) {$OUT .= sprintf(". %-20s %.3f
(%.3f) %.3f (%.3f)\n", $st->name, $S->weight($st), $S->e0($st)) }}"
open this file:
DemeterPerl>perl>site>lib>Demeter>templates>analysis>ifeffit>lcf_save.tmpl (I
opened in VSCode)
Find: "$components = join(" ", grep {$_ =~ s{ +}{_}g; $_} sort {$b cmp $a} map
{$_->name} (@{$S->standards}));"
Replace: "$components = join(" ", grep {$_ =~ s{ +}{_}g; $_} map {$_->name}
(@{$S->standards}));"
Find: "@list = sort {$b cmp $a} map {$_->group} (@{$S->standards});"
Replace: "@list = map {$_->group} (@{$S->standards});"
Save file.
Changes to the code are based on this webpage:
https://github.com/bruceravel/demeter/commit/8cacd7e4939590d454c1a38df350ce7ae04eb7a4#diff-16d1eaa24e392ad4fb800dc13a2d48ec838274af07b0b04314a615e78f044578R63
ifeffit mailing list:
https://millenia.cars.aps.anl.gov/mailman3/lists/ifeffit.millenia.cars.aps.anl.gov/
to unsubscribe, send mail to ifeffit-le...@millenia.cars.aps.anl.gov
