# oneYx.in (SIMPSON 3.1) #one pulse Y(90°)-detection for positive gyromagnetic ratio nuclei, #Mx versus offset varying from 0 to np kHz in steps of 1 kHz spinsys { channels 29Si nuclei 29Si shift 1 0 0 0 0 0 0 } par { proton_frequency 400e6 variable tsw 0.5 sw 1.0e6/tsw np 71 crystal_file alpha0beta0 gamma_angles 1 start_operator I1z detect_operator 2*I1x verbose 1101 variable rf 50000 variable p1 5 } proc pulseq {} { global par for {set i 0} {$i < $par(np)} {incr i} { offset [expr $i*1000] pulse $par(p1) $par(rf) -y acq reset } } proc main {} { global par fsave [fsimpson] $par(name).fid puts "Larmor frequency (Hz) of 29Si: " puts [resfreq 29Si $par(proton_frequency)] } #SIMP #NP=71 #SW=2000000 #TYPE=FID #DATA #-1 0 #-0.999800011 0 #-0.99920017 0 #-0.998200863 0 #-0.996802726 0 #-0.995006653 0 #-0.992813793 0 #-0.990225545 0 #-0.987243562 0 #-0.983869749 0 #-0.980106259 0 #-0.975955494 0 #-0.971420102 0 #-0.966502975 0 #-0.961207248 0 #-0.955536295 0 #-0.949493728 0 #-0.943083395 0 #-0.936309372 0 #-0.929175969 0 #-0.921687719 0 #-0.913849378 0 #-0.905665922 0 #-0.89714254 0 #-0.888284634 0 #-0.879097816 0 #-0.869587897 0 #-0.859760891 0 #-0.849623005 0 #-0.839180638 0 #-0.828440372 0 #-0.817408973 0 #-0.806093382 0 #-0.794500709 0 #-0.782638232 0 #-0.770513389 0 #-0.758133773 0 #-0.745507127 0 #-0.732641336 0 #-0.719544426 0 #-0.706224553 0 #-0.692690002 0 #-0.678949176 0 #-0.665010593 0 #-0.650882881 0 #-0.636574769 0 #-0.622095081 0 #-0.607452731 0 #-0.592656716 0 #-0.577716111 0 #-0.562640059 0 #-0.547437766 0 #-0.532118498 0 #-0.516691569 0 #-0.501166336 0 #-0.485552195 0 #-0.469858571 0 #-0.454094913 0 #-0.438270687 0 #-0.422395368 0 #-0.406478435 0 #-0.390529365 0 #-0.374557624 0 #-0.358572661 0 #-0.342583903 0 #-0.326600746 0 #-0.31063255 0 #-0.294688631 0 #-0.278778258 0 #-0.262910643 0 #-0.247094934 0 #END