# 1 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/cpmg_T2"
# 1 "<built-in>"
# 1 "<command-line>"
# 1 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/cpmg_T2"
;cpmg for T2 measurement
;avance-version Jan 2018
;T2 measurement using Carr-Purcell-Meiboom-Gill sequence
;
;
;
;pl1 : f1 channel - power level for pulse p1
;p1 : f1 channel -  pi/2 high power pulse
;p2 : f1 channel - pi high power pulse
;d1 : relaxation delay; 1-5 * T1
;d11: delay for disk I/O - 30 msec
;d6: fixed echo time 
;vc : variable loop counter, taken from vc-list
;ns: 8 * n
;td1: number of experiments = number of values in vc-list
;define VCLIST
;vc : vc should contain even numbers to provide for cancellation of 180 degree pulse errors
;this pulse program produces a ser-file (2D)


;$CLASS=solids
;$DIM=pseudo2D
;$TYPE=
;$SUBTYPE=
;$COMMENT=
# 1 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl" 1
;Avance4.incl
;   for AV 4
;
;avance-version (16/08/18)
;
;$CLASS=HighRes Incl
;$COMMENT=


# 19 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl"
;setrtp0 denotes TimingController


# 50 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl"
# 51 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl"


# 63 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl"
# 89 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl"
# 90 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl"


# 123 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl"
;#define LOWQ
;#define HIGHQ


;#define MIX_UP
;#define MIX_DOWN
# 136 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/Avance.incl"
;$Id: Avance4.incl,v 1.11 2016/11/11 13:43:39 ber Exp $
# 28 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/cpmg_T2" 2

"p2=p1*2"
"d11=30m"

# 33 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/cpmg_T2"
# 33 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/cpmg_T2"
1 ze
2 d1
  p1 ph1
3 d6
  p2 ph2
  d6
  lo to 3 times c
  go=2 ph31
  d11 wr #0 if #0 ivc 
  lo to 1 times td1
exit


ph1=0 0 2 2 1 1 3 3 
ph2=1 3 1 3 0 2 0 2
ph31=0 0 2 2 1 1 3 3
# 51 "/root/.topspin-BladeEpu/local_acqu/simulDirs/ppDirs/cpmg_T2"
;
