# 1 "C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h"
;t1rho experiment on X nuclei
;
;TS 3 / Jan 2018
;
;
;T1rho experiment, X detected
;uses mc syntax
;uses VPLIST for spinlock pulse length
;
;Avance III version
;parameters:
;p1 : X 90 pi/2 pulse
;pl1 : X power level for pulse p1
;pl2 : =0W, not used
;pl14 : power level for T1rho spin lock pulse
;d1 : recycle delay
;NS : n*4
;vplist : list containing spin lock pulses
;FnMODE: QF
;zgoptns :
;
;
;$CLASS=Solids
;$DIM=pseudo 2D
;$TYPE=
;$SUBTYPE=T1/T2
;$COMMENT=T1rho experiment with X detection

prosol relations=<solids_cp>


"acqt0=0"

# 1 "mc_line 34 file C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h expanding definition part of mc command before ze"
define delay MCWRK
define delay MCREST
"MCWRK = 0.500000*10m"
"MCREST = 10m - 10m"
    dccorr
# 34 "C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h"
1 ze
# 1 "mc_line 34 file C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h expanding definition of mc command after ze"
# 35 "C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h"
# 1 "mc_line 35 file C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h expanding start label for mc command"
2 MCWRK 
LBLF1, MCWRK
  MCREST
# 36 "C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h"
  d1
  (p1 pl1 ph1):f1
  (vp pl14 ph2)
	1u
  go=2 ph31
  1m
# 1 "mc_line 42 file C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h expanding mc command in line"
  MCWRK  wr #0 if #0 zd ivp 
  lo to LBLF1 times td1
  MCWRK
# 43 "C:/Bruker/TOPSPIN21/exp/stan/nmr/lists/pp/user/t1rho.h"
HaltAcqu, 1m
exit

ph0= 0
ph1= 0 2 1 3
ph2= 1 3 2 0  
ph3= 1 3
ph10= 0
ph31= 1 3 2 0


