# 1 "/opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr" ;hmqcf3phpr ;avance-version (07/04/04) ;HMQC ;2D correlation via zero and double quantum coherence ;phase sensitive ;with decoupling during acquisition ;using f3 - channel ; ;A. Bax, R.H. Griffey & B.L. Hawkins, J. Magn. Reson. 55, 301 (1983) ; ;$CLASS=HighRes ;$DIM=2D ;$TYPE= ;$SUBTYPE= ;$COMMENT= # 1 "/opt/topspin2.1/exp/stan/nmr/lists/pp/Avance.incl" 1 ;Avance2.incl ; for 1 ; ;avance-version (07/08/21) ; ;$CLASS=HighRes Incl ;$COMMENT= ;$Id: pulseprogram,v 1.1 2021/02/11 14:13:44 bmrbsvc Exp $ # 18 "/opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr" 2 "p2=p1*2" "d2=1s/(cnst2*2)" "d11=30m" "d12=20u" "d13=4u" "d0=3u" "in0=inf1/2" # 1 "mc_line 33 file /opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr expanding definition part of mc command before ze" define delay MCWRK define delay MCREST define loopcounter ST1CNT "ST1CNT = td1 / (2)" "MCWRK = 0.250000*d11" "MCREST = d11 - d11" dccorr # 33 "/opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr" 1 ze # 1 "mc_line 33 file /opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr expanding definition of mc command after ze" # 34 "/opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr" # 1 "mc_line 34 file /opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr expanding start label for mc command" 2 MCWRK * 2 do:f3 LBLSTS1, MCWRK LBLF1, MCWRK MCREST # 35 "/opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr" 3 d12 pl9:f1 d1 cw:f1 ph29 d13 do:f1 d12 pl1:f1 p1 ph1 d2 pl3:f3 p21:f3 ph3 d0 p2 ph2 d0 p21:f3 ph4 d13 d2 pl16:f3 go=2 ph31 cpd3:f3 # 1 "mc_line 49 file /opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr expanding mc command in line" MCWRK do:f3 wr #0 if #0 zd ip3 MCWRK ip29 lo to LBLSTS1 times 2 MCWRK id0 lo to LBLF1 times ST1CNT MCWRK # 50 "/opt/topspin2.1/exp/stan/nmr/lists/pp/hmqcf3phpr" exit ph1=0 ph2=0 ph3=0 2 ph4=0 0 2 2 ph29=0 ph31=0 2 2 0 ;pl1 : f1 channel - power level for pulse (default) ;pl3 : f3 channel - power level for pulse (default) ;pl9 : f1 channel - power level for presaturation ;pl16: f3 channel - power level for CPD/BB decoupling ;p1 : f1 channel - 90 degree high power pulse ;p2 : f1 channel - 180 degree high power pulse ;p21: f3 channel - 90 degree high power pulse ;d0 : incremented delay (2D) [3 usec] ;d1 : relaxation delay; 1-5 * T1 ;d2 : 1/(2J)XH ;d11: delay for disk I/O [30 msec] ;d12: delay for power switching [20 usec] ;d13: short delay [4 usec] ;cnst2: = J(XH) ;inf1: 1/SW(X) = 2 * DW(X) ;in0: 1/(2 * SW(X)) = DW(X) ;nd0: 2 ;NS: 4 * n ;DS: 16 ;td1: number of experiments ;FnMODE: States-TPPI, TPPI, States or QSEQ ;cpd3: decoupling according to sequence defined by cpdprg3 ;pcpd3: f3 channel - 90 degree pulse for decoupling sequence ;$Id: pulseprogram,v 1.1 2021/02/11 14:13:44 bmrbsvc Exp $