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

Begining of implementation of Fourier transform.

Browse Source
This commit is contained in:
salman 2009-08-27 07:05:56 +00:00
parent 1ff78f6361
commit 90823c9f84
2 changed files with 22 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/external/MuSRFitGUI/MSR.pm vendored
View File

@ -443,6 +443,15 @@ runs $RUNS_Line
$PRANGE_Line $PRANGE_Line
$logxy"; $logxy";
$FOURIER_Block=
"###################################################################
FOURIER
units MHz # units either 'Gauss', 'MHz', or 'Mc/s'
fourier_power 12
apodization STRONG # NONE, WEAK, MEDIUM, STRONG
plot POWER # REAL, IMAG, REAL_AND_IMAG, POWER, PHASE
phase 8.50";
# Don't know why but it is needed initially # Don't know why but it is needed initially
$STAT_Block = $STAT_Block =
"############################################################### "###############################################################
@ -450,7 +459,7 @@ STATISTIC --- 0000-00-00 00:00:00
*** FIT DID NOT CONVERGE ***"; *** FIT DID NOT CONVERGE ***";
# Empty line at the end of each block # Empty line at the end of each block
my $FullMSRFile = "$TitleLine$FitParaBlk\n$Full_T_Block\n$RUN_Block\n$COMMANDS_Block\n$PLOT_Block\n$STAT_Block\n"; my $FullMSRFile = "$TitleLine$FitParaBlk\n$Full_T_Block\n$RUN_Block\n$COMMANDS_Block\n$PLOT_Block\n$FOURIER_Block\n$STAT_Block\n";
# Open output file FILENAME.msr # Open output file FILENAME.msr
open( OUTF,q{>},"$FILENAME.msr" ); open( OUTF,q{>},"$FILENAME.msr" );
@ -872,6 +881,15 @@ runs $RUNS_Line
$PRANGE_Line $PRANGE_Line
$logxy"; $logxy";
$FOURIER_Block=
"###################################################################
FOURIER
units MHz # units either 'Gauss', 'MHz', or 'Mc/s'
fourier_power 12
apodization STRONG # NONE, WEAK, MEDIUM, STRONG
plot POWER # REAL, IMAG, REAL_AND_IMAG, POWER, PHASE
phase 8.50";
# Don't know why but it is needed initially # Don't know why but it is needed initially
$STAT_Block = $STAT_Block =
"############################################################### "###############################################################
@ -879,7 +897,7 @@ STATISTIC --- 0000-00-00 00:00:00
*** FIT DID NOT CONVERGE ***"; *** FIT DID NOT CONVERGE ***";
# Empty line at the end of each block # Empty line at the end of each block
my $FullMSRFile = "$TitleLine$FitParaBlk\n$Full_T_Block\n$RUN_Block\n$COMMANDS_Block\n$PLOT_Block\n$STAT_Block\n"; my $FullMSRFile = "$TitleLine$FitParaBlk\n$Full_T_Block\n$RUN_Block\n$COMMANDS_Block\n$PLOT_Block\n$FOURIER_Block\n$STAT_Block\n";
# Open output file FILENAME.msr # Open output file FILENAME.msr
open( OUTF,q{>},"$FILENAME.msr" ); open( OUTF,q{>},"$FILENAME.msr" );

4
src/external/MuSRFitGUI/MuSRFit.pl vendored
View File

@ -1,6 +1,6 @@
# Form implementation generated from reading ui file 'MuSRFit.ui' # Form implementation generated from reading ui file 'MuSRFit.ui'
# #
# Created: Wed Aug 26 17:07:14 2009 # Created: Thu Aug 27 09:03:25 2009
# by: The PerlQt User Interface Compiler (puic) # by: The PerlQt User Interface Compiler (puic)
# #
# WARNING! All changes made in this file will be lost! # WARNING! All changes made in this file will be lost!
@ -1009,7 +1009,7 @@ sub NEW
Qt::Object::connect(fileChangeDirAction, SIGNAL "activated()", this, SLOT "fileChangeDir()"); Qt::Object::connect(fileChangeDirAction, SIGNAL "activated()", this, SLOT "fileChangeDir()");
Qt::Object::connect(musrfit_tabs, SIGNAL "selected(const QString&)", this, SLOT "TabChanged()"); Qt::Object::connect(musrfit_tabs, SIGNAL "selected(const QString&)", this, SLOT "TabChanged()");
Qt::Object::connect(go, SIGNAL "clicked()", this, SLOT "GoFit()"); Qt::Object::connect(go, SIGNAL "clicked()", this, SLOT "GoFit()");
Qt::Object::connect(InitParamTable, SIGNAL "valueChanged(int,int)", this, SLOT "UpdeateTable()"); Qt::Object::connect(InitParamTable, SIGNAL "valueChanged(int,int)", this, SLOT "UpdateMSRFileInitTable()");
setTabOrder(musrfit_tabs, TITLE); setTabOrder(musrfit_tabs, TITLE);
setTabOrder(TITLE, FILENAME); setTabOrder(TITLE, FILENAME);