# 1 "/u/exp/stan/nmr/lists/pp/SD_noe11ezg_SB"
;SD_noe11ezg
;2D NOE with 11echo and gradients
;phase sensitive using States-TPPI
;with presaturation during relaxation delay and mixing time
;the shortest mixing time ~50 ms!!!! otherwise problems with radiation
;damping
;added decoupling, 9/15/94; thorsten
;changed for DRX, 05/01/96; thorsten

;Allows you to center spectrum anywhere.
;Uses a frequency list:
;	1) set the first value to the desired center of spectrum in f1
;	2) set the second value to water
;	3) set the third value to the desired center of spectrum in f2
;	4) Set o1 to the desired center of spectrum in f2 (needed for DQD)
;changed 1/21/97 - ELW

;d2 calculation added 3-22-97, td


# 1 "/u/exp/stan/nmr/lists/pp//Avance.incl"
;Avance.incl
;
;version  99/08/02





























# 21 "/u/exp/stan/nmr/lists/pp/SD_noe11ezg_SB"

# 1 "/u/exp/stan/nmr/lists/pp//Grad.incl"
;Grad.incl  -  include file for Gradient Spectroscopy
;avance-version
;version 99/02/19
















define list<gradient> EA=<EA>
# 22 "/u/exp/stan/nmr/lists/pp/SD_noe11ezg_SB"



"d11=30m"
"d16=200u"
"l3=td1/2"
"d0=(in0/2)-(p1*4/3.14159)"
"d8=d9-p16-d16"
"d2=1s/(cnst2*4)-(p1*0.667)"

1  ze
   d11
2  d11
3  d11 pl1:f1
4  d11
   setnmr2^0
   d1 fq1:f1			;Center
   setnmr2|0
   p1 ph1
   d0
   p1 ph2
   d8
   p16:gp1                    ;800us
   d16 fq1:f1			;Water  200us
   p1 ph3
   d2
   p1 ph6
   p16:gp2
   d16
   p1 ph7
   d2
   d2
   p1 ph8
   p16:gp2
   d16 fq1:f1			;Center
   go=2 ph31
   d11 wr #0 if #0 ip1 zd
    lo to 3 times 2
     d11 id0
      lo to 4 times l3
   setnmr2^0
exit

ph1= 0 2 0 2  1 3 1 3  2 0 2 0  3 1 3 1
     2 0 2 0  3 1 3 1  0 2 0 2  1 3 1 3
ph2= 0 0 2 2  1 1 3 3  2 2 0 0  3 3 1 1
     2 2 0 0  3 3 1 1  0 0 2 2  1 1 3 3
ph3= 0 0 0 0  1 1 1 1  2 2 2 2  3 3 3 3
ph6= 2 2 2 2  3 3 3 3  0 0 0 0  1 1 1 1
ph7= 0 0 0 0  1 1 1 1  2 2 2 2  3 3 3 3
ph8= 2 2 2 2  3 3 3 3  0 0 0 0  1 1 1 1
ph20=0 0 0 0  0 0 0 0  2 2 2 2  2 2 2 2
ph31=0 2 2 0  1 3 3 1  2 0 0 2  3 1 1 3

;pl1: Proton power level
;p1 :  90 degree proton pulse
;d9 : the mixing time
;d0 : incremented delay (2D) = in0/2-(4/pi*p1)
;d2 : delay for exitation maximum, calculated based 
;     on cnst2 = offset of first max in Hz
;d11: delay for disk I/O                             [30 msec]
;gp1: Homospoil during mixing time
;gp2: Watergate gradient
;in0: 1/(SW) 
;nd0: 1
;NS: 2,4 8,16 or 32 * n
;DS: 4
;td1: number of experiments
;MC2: States-TPPI
; gpz1 35% sine.100
;gpz2  25% sine.100