#na-two-pulse-24-phase-cycling-p2.in # approach: 24-phase cycling the two pulses and the receiver # spin-3/2 central-transition echo amplitude optimization # versus the second-pulse duration # in two-pulse phase-modulated -3Q-MAS sequence, # the first-pulse duration p1 = 5 micro seconds spinsys { channels 23Na nuclei 23Na quadrupole 1 1 1e6 0 0 0 0 } par { proton_frequency 400e6 spin_rate 10000 variable tsw 0.5 sw 1.0e6/tsw np 41 crystal_file rep100 gamma_angles 10 start_operator I1z detect_operator I1c verbose 1101 variable rf 100000 variable p1 5 } proc pulseq {} { global par maxdt $par(tsw) acq $par(ph31) pulse $par(p1) $par(rf) $par(ph1) for {set i 1} {$i < $par(np)} {incr i} { pulse $par(tsw) $par(rf) $par(ph2) acq $par(ph31) } } proc main {} { global par foreach p {{ 0 0 270}\ { 60 0 90}\ {120 0 270}\ {180 0 90}\ {240 0 270}\ {300 0 90}\ { 0 90 90}\ { 60 90 270}\ {120 90 90}\ {180 90 270}\ {240 90 90}\ {300 90 270}\ { 0 180 270}\ { 60 180 90}\ {120 180 270}\ {180 180 90}\ {240 180 270}\ {300 180 90}\ { 0 270 90}\ { 60 270 270}\ {120 270 90}\ {180 270 270}\ {240 270 90}\ {300 270 270}} { set par(ph1) [lindex $p 0] set par(ph2) [lindex $p 1] set par(ph31) [lindex $p 2] set g [fsimpson] if [info exists f] { fadd $f $g funload $g } else { set f $g } } fsave $f $par(name).fid funload $f puts "Larmor frequency (Hz) of 23Na: " puts [resfreq 23Na $par(proton_frequency)] } # SIMP # NP=41 # SW=2000000 # TYPE=FID # DATA # 0 0 # 2.09922822 -2.77555756e-17 # 6.34304518 3.67761377e-16 # 9.00910329 4.99600361e-16 # 8.66050705 7.77156117e-16 # 6.79038071 9.99200722e-16 # 5.45470498 1.77635684e-15 # 5.19311644 9.57567359e-16 # 5.00222595 3.46944695e-16 # 4.01503049 4.16333634e-16 # 2.86908614 2.49800181e-16 # 2.84886138 4.16333634e-16 # 4.09893333 4.19803081e-16 # 5.56975162 8.04911693e-16 # 6.32589372 1.38777878e-15 # 6.18966891 1.38777878e-15 # 5.44609664 9.43689571e-16 # 4.43025526 1.11022302e-15 # 3.43797585 7.63278329e-16 # 2.90616202 4.54497551e-16 # 3.35147662 3.60822483e-16 # 4.8430532 7.77156117e-16 # 6.63926553 5.96744876e-16 # 7.63088381 8.46545056e-16 # 7.34253752 7.42461648e-16 # 6.37997143 1.58206781e-15 # 5.62709452 1.58206781e-15 # 5.26425859 1.33226763e-15 # 4.95258841 9.99200722e-16 # 4.60580358 1.30451205e-15 # 4.57054021 6.31439345e-16 # 5.20369812 1.09114107e-15 # 6.34406795 1.04777298e-15 # 7.29706122 1.1379786e-15 # 7.57284428 9.43689571e-16 # 7.30935259 8.04911693e-16 # 6.79580111 8.04911693e-16 # 6.23946044 1.536965e-15 # 6.00356474 1.15185639e-15 # 6.32093294 1.45716772e-15 # 6.98926573 1.20736754e-15 # END