// Set wdumboX

aXwdumbo = aX90
$pwXwdumbo = 12.0*pwX90
pwXwdumbo = 0.0125*64*trunc($pwXwdumbo/(64*0.0125) + 0.5)

// Reset the amplitude to match the rounded 6pi pulse.

$aXwdumbo = ($pwXwdumbo/pwXwdumbo)*aXwdumbo
aXwdumbo = trunc($aXwdumbo + 0.5)

// set tau with a 4 us window

tauXwdumbo = 0.0125*trunc((pwXwdumbo + 4.0)/0.0125 + 0.5)
sw = 1/(tauXwdumbo*1e-6)
if (npaXwdumbo < 10) then npaXwdumbo = 10 endif

setprotect('scalesw','off',16384)
scalesw = sqrt(3)

// Reset the prep pulses

aXprep1 = aX90
pw1Xprep1 = pwX90
$pw2Xprep1 = pwX90*54.7/90.0
pw2Xprep1 = 0.0125*trunc($pw2Xprep1/0.0125 +0.5)
phXprep1 = 0.0 

// Reset the acquisition delays

r1Xwdumbo = 1.0
r2Xwdumbo = .5
r3Xwdumbo = 0.2
rof3 = 0.2
ddrtc = 0






