LMU/musrfit
LMU/musrfit
5
0
Fork 0
Code Issues 6 Pull Requests Actions Packages Projects Releases 3 Activity

Fix bug for two run blocks with different parameters.

Browse Source
This commit is contained in:
salman 2009-10-19 15:45:42 +00:00
parent 0a5d35944d
commit 62cf91fbbf
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/external/MuSRFitGUI/msr2dat vendored
View File

@ -56,14 +56,17 @@ foreach $Arg (@ARGV) {
} }
# Nice trick, make a hash for unique RUN lines # Nice trick, make a hash for unique RUN lines
# Find spectrum lines # Problem here if we have the same run fit twice (ranges etc)
@MAPS = grep {/map /} @file; @MAPS = grep {/map /} @file;
@RUNS = grep {/RUN/} @file; @RUNS = grep {/RUN/} @file;
$counter=0; $counter=0;
# for ($i=0;$i<=$#RUNS;$i++) {
# $key=$RUNS[$i].$MAPS[$i];
# $key =~ s/\s+//g;
foreach $key (@RUNS){ foreach $key (@RUNS){
# This gets rid of duplicates # This gets rid of duplicates
$RUN{$key}=$counter; $RUN{$key}=$counter;
$MAP{$key}=$MAPS[$counter]; $MAP{$key}=$MAP{$key}.$MAPS[$counter];
$counter++; $counter++;
} }