# 1 "/u/exp/stan/nmr/lists/pp/stdhnhbwf.3d"
;stdhnhbwf.3d

;Pulses
;p1   : 7-9us 
;pl1  : 3dB
;p10  : 1m	water flipback during WATERGATE
;pl10 : ~47dB
;p20  : 2m	water flipback during ZZ filter 
;pl11 : ~53dB

;p5   : 33us
;pl5  : 0dB
;pcpd3: 200u
;pl15 : ~16dB

;Gradients
;p21  : 2.5m ZZ filtration gradient 1
;gpx1 : +40% ZZ filtration gradient 1

;p22  : 1.0m ZZ filtration gradient 2
;gpx2 : -40% ZZ filtration gradient 2

;p23  : 0.5m WATERGATE water dephasing gradient
;gpx3 : +60% WATERGATE water dephasing gradient
;gpy3 : +60% WATERGATE water dephasing gradient

 "d0=in0/2-p1*0.6366"
 "d1=100ms"
;"d4=2.5m
;"d5=10u"
 "d6=d7-d5-p5*2"
;"d7=27m"
 "d14=d4-p10-p23"
 "d24=p5-p1"
 "d25=p13/2-p1"
;"d30=50u"	;Gradient recovery delay
;"d31=2s"

1   ze
2   10u do:f3
    d1
    10m
3   20m
4   30m
5   20m
6   d31 
    10u fq1:f1		;H2O
    10u pl1:f1
    10u pl5:f3
    p1 ph0
    d4
    (d24 p1*2 ph11) (p5*2 ph0):f3
    d4
    p1 ph11
    10u pl11:f1
    p20 ph2:r
    10u pl1:f1
   	p21:gp1
    	d30
    (p5 ph1):f3
    d5
    (d24 p1*2 ph0) (p5*2 ph0):f3
    d6
    10u fq1:f1		;t1sw center
;
    (d24 p1 ph3 d0 d0 p1 ph0) (d0 p5*2 ph4):f3
;
    10u fq1:f1		;H2O
    d7
    (p5 ph0):f3
    	p22:gp2
    	d30 pl11:f1
    p20 ph12:r
    10u pl1:f1
    p1 ph0
    	p23:gp3
    d14 pl10:f1
    p10 ph6:r
    10u pl1:f1
    (d24 p1*2 ph7) (p5*2 ph0):f3
    10u pl10:f1
    p10 ph6:r
    	p23:gp3
    d14 pl15:f3 fq1:f1	;obs-sw center
    go=2 ph31 cpd3:f3
    10u do:f3
    d1 wr #0 if #0 ip3 zd
    10m dp2
    lo to 3 times 2
    10m ip31 id0
    10m ip31
    lo to 4 times l0
;
    10m rd0 rp2
    10m rp3
    10m ip1
    lo to 5 times 2
    10m ip31 id5
    10m ip31 dd6
    lo to 6 times l1
exit

    ph0 = 0
    ph1 = 0 0 2 2
    ph2 = 2 0	;phcor2
    ph3 = 0 2
    ph4 = 0 0 0 0 1 1 1 1
	  2 2 2 2 3 3 3 3
    ph6 = 0	;phcor6
    ph7 = 2
    ph11= 1
    ph12= 2	;phcor12
    ph31= 0 2 2 0 2 0 0 2

