;1.7) Program: RIDER (Relaxation-Induced Dipolar Exchange with Recoupling) ;Description: Selects C bonded to N (and slowly rotating segments) ;Requires: !!; Same pulse sequence as CODEX; in contrast to SPIDER, only 1H-13C double-res. ;equipment is needed; but slow dynamics will produce artifacts. ;Reference(s): Saalwachter & KSR, J. Magn. Reson. 145, 161-172 (2000). ;srcodex.toss ;from srcodex.ksr (no TOSS) ;from srcodex.ksr on SGI with modifications ;centerband-only detection of exchange ;Detlef's phase cycle put in (from ercodexmh.ksr, dated 5-24-2000) ;with multiple power levels on 13C (pl1/pl11) and 1H (pl2/pl12/pl22) ;1H at pl22 during 13C 180 pulses define delay cd15mp1 define delay cd15m1h define delay cd15mp2 "l20=aq/(p8*2)" ;loop for tppm dec "d15=0.25s/l31-2u" "cd15mp1=0.25s/l31-p1-2u" "cd15m1h=0.25s/l31-p1-p1/2-2u" "cd15mp2=0.25s/l31-p2-2u" "d30=p3+d19+p15-p1-2u" ;rotor synch.delay in tm "d25=(1s/l31)*0.1226-(p2/2)-2u-3u" "d26=(1s/l31)*0.0773-p2" ;too short for power level switch "d27=(1s/l31)*0.2236-p2-6u" "d28=(1s/l31)*1.0433-p2-6u" "d29=(1s/l31)*0.7744-(p2/2)-3u-d13" ;----------------------------------------- 1 ze 10u pl1:f1 ;preselect pl1 drive power level for F1 2 d1 do:f2 ;recycle delay, turn the decoupler off 10u pl2:f2 ;preselect pl2 drive power for F2 1u:f2 ph1 1u:f1 ph2 rpp5 ;reset phase lists for xy-8 ;................................................................... trigpe4 ;record rotor phase p3:f2 ph1 ;proton 90 pulse d19 ;allow time for the phase shift on F2 (p15 ph2):f1 (p15 ph17):f2 ;contact pulse 1u cw:f2 ;turn on F2 decoupling 1u pl12:f2 ;set decoupling drive power level cd15mp1 pl11:f1 ;tr/4 d15:f1 ph5 ;tr/4 2u pl22:f2 ;high 1H power during 13C pulse p2:f1 ph5^ ;13C 180 deg. pulse 2u pl12:f2 d15 3 cd15mp2:f1 ph5 2u pl22:f2 ;high 1H power during 13C pulse p2:f1 ph5^ ;13C 180 deg. pulse 2u pl12:f2 d15 lo to 3 times l0 ;an even number cd15m1h pl1:f1 ;tr/4 2u pl22:f2 ;high 1H power during 13C pulse ;----------------------------------------------------------------- p1:f1 ph8 ;first mixing time d6 do:f2 trigpe4 ;same phase as above d30:f1 ph9 2u cw:f2 pl22:f2 p1:f1 ph9 ;----------------------------------------------------------------- 2u pl12:f2 cd15m1h pl11:f1 ;tr/4 4 d15:f1 ph5 2u pl22:f2 ;high 1H power during 13C pulse p2:f1 ph5^ ;13C 180 deg. pulse 2u pl12:f2 cd15mp2 lo to 4 times l0 ;an even number d15:f1 ph5 ;tr/4 2u pl22:f2 ;high 1H power during 13C pulse p2:f1 ph5^ ;13C 180 deg. pulse 2u pl12:f2 d15 cd15mp1 pl1:f1 ;tr/4 2u pl22:f2 ;=================================================================== p1:f1 ph3 ; second z-filter d16 do:f2 trigpe4 ;same phase as above d30:f1 ph4 d18 ; delay for gamma integral d18=k*tr/K 2u cw:f2 pl12:f2 p1:f1 ph4 ;=================================================================== d25 ; 3u pl22:f2 p2:f1 ph23 ;180 13C #1 d26 ; p2:f1 ph24 ;180 13C #2 3u pl12:f2 d27 ; 3u pl22:f2 p2:f1 ph25 ;180 13C #3 3u pl12:f2 d28 3u pl22:f2 p2:f1 ph26 ;180 13C #4 3u pl12:f2 d29 cpds2:f2 ; 2u:f1 ph0 ;dead time delay, reset RF phase to detect go=2 ph31 ;do NS scans 10u do:f2 ;turn decoupler off 10m id18 ;increment d18 by in18=tr/L5 //gamma integral// lo to 2 times l5 wr #0 exit ph0= 0 ;reference phase for detection ph1= 0 2 ;1H 90 excitation ph2= 0 ;13C CP ph3= 3 3 3 3 3 3 3 3 ;store for 2nd z period 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 ph4= 1 1 2 2 3 3 0 0 ;readout after 2nd z period ph5= 0 1 0 1 1 0 1 0 ;xy-8 ph8= 3 3 3 3 3 3 3 3 ;+z cosine store for tm 3 3 3 3 3 3 3 3 ;+z cosine 2 2 2 2 2 2 2 2 ;+z sine 2 2 2 2 2 2 2 2 ;+z sine 1 1 1 1 1 1 1 1 ;-z cosine 1 1 1 1 1 1 1 1 ;-z cosine 0 0 0 0 0 0 0 0 ;-z sine 0 0 0 0 0 0 0 0 ;-z sine 3 3 3 3 3 3 3 3 ;+z cosine store for tm 3 3 3 3 3 3 3 3 ;+z cosine 2 2 2 2 2 2 2 2 ;+z sine 2 2 2 2 2 2 2 2 ;+z sine 1 1 1 1 1 1 1 1 ;-z cosine 1 1 1 1 1 1 1 1 ;-z cosine 0 0 0 0 0 0 0 0 ;-z sine 0 0 0 0 0 0 0 0 ;-z sine ph9= 1 1 1 1 1 1 1 1 ;read-out after tm 3 3 3 3 3 3 3 3 0 0 0 0 0 0 0 0 2 2 2 2 2 2 2 2 1 1 1 1 1 1 1 1 ;read-out after tm 3 3 3 3 3 3 3 3 0 0 0 0 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 ;read-out after tm 3 3 3 3 3 3 3 3 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 ;read-out after tm 3 3 3 3 3 3 3 3 ph13= (360) 10 ph14= (360) 0 ph17= 1 ;1H CP ph23= 1 1 2 2 3 3 0 0 ;180 13C #1 TOSS ph24= 3 3 0 0 1 1 2 2 ;180 13C #2 ph25= 1 1 2 2 3 3 0 0 ;180 13C #3 3 3 0 0 1 1 2 2 ph26= 2 2 1 1 0 0 3 3 ;180 13C #4 0 0 3 3 2 2 1 1 ph31= 0 2 1 3 2 0 3 1 ;receiver phase 2 0 3 1 0 2 1 3 0 2 1 3 2 0 3 1 2 0 3 1 0 2 1 3 2 0 3 1 0 2 1 3 0 2 1 3 2 0 3 1 2 0 3 1 0 2 1 3 0 2 1 3 2 0 3 1