# # This file contains the files: # hncacbse.fa # fahncacbse.r # Gradfa.incl # # To unbundle, sh this file # echo hncacbse.fa 1>&2 cat >hncacbse.fa <<'End of hncacbse.fa' ;hncacbse.fa ;3D HNCaCb - Gradient enhanced. ;Wittekind and Mueller, J. Magn. Reson. B 101, 201-205 (1993) ;Muhandiran and Kay, J. Magn. Reson. B 103, 203-216 (1994) ;Bruker Avance/Xwin-nmr version ;Written up by F. Abildgaard, NMRFAM (abild@nmrfam.wisc.edu) ;Version: 033195, 071895 ; Disclaimer: This pulse program is provided "as is" for your ; information. Support for the use of this pulse program is only ; provided to users of the National Magnetic Resonance Facility ; at Madison (NMRFAM). Users of this pulse program employ it at ; their own risk. Neither NMRFAM or University of Wisconsin-Madison ; are liable for any physical or other damage incurred during the ; use of this pulse program. ;BMRB Pulse Sequence Accession Number: 9 ; ;f2: 15N, f3: 13C, f4: 13C ;use gradient program fahncacbse ;p15=500u ;p16=1.0m ;p17=100u ;p18=2.5m ;p19=250u ;p31 low power pulse at pl16 for N-GARP ; ;pl10 H1 DIPSI-2 ;ds=2m*ns, m=1, 2, ..., ns=8, 16, ... ; ;d2=2.25m ;d3=5.4m ;d4=12.4m ;d5=3.5m ;d8=500u ;d9=10m (ip, id, rd) ;d11=100m (disk i/o) ;d12=10u ;d13=5u ;d16=300u ;d17=50u ;in0=1/2SW(Cab) ;in10=in20=1/2SW(N) ;d10=d4 ;d20=d4-d3 "p22=p2*2" "p23=p3*2" "d6=p1" "d7=p2" "d14=d4-d3-d13*2-d12" "d15=d5-p17-d17" "d25=d5-p17-d17-d13*2-d12" "d18=d8-p19-d13" "d22=d2-p15" "d23=d3-p17-d17" "d24=d3-p18-p15-d13*3-d12" "d26=p2-p3" "d29=p2-p1" #include #include #define SED_ON d13 \n d12 pl0:f4 \n d13 cpds4:f4 #define SED_OFF d13 do:f4 #define DIP_ON d13 \n d12 pl10:f1 \n d13 cpds1:f1 #define DIP_OFF d13 do:f1 \n d12 pl1:f1 1 ze 2 d11 do:f2 d9*2 3 d9 d9*5 4 d9 d9*3 5 d9 d9*2 6 20u LOCKH_OFF d1 pl1:f1 pl2:f2 pl3:f3 p13:c13 (p2 ph0):f2 d13 (p3 ph0):f3 20u LOCKH_ON d13 GRADIENT15(cnst21) d16 (p1 ph0):f1 d13 GRADIENT15(cnst22) d22 (d29 p1*2 ph0):f1 (p22 ph0):f2 d13 GRADIENT15(cnst22) d22 (p1*55 ph0):f1 d13 (p1 ph1):f1 d13 GRADIENT16(cnst23) d16 (p2 ph11):f2 d13 GRADIENT17(cnst24) d17 SED_ON d23 DIP_ON d14 (p22 ph0):f2 (d26 p23 ph0):f3 d4 SED_OFF DIP_OFF d13 GRADIENT17(cnst24) d17 (p2 ph0):f2 d13 GRADIENT15(cnst21) d16 (p3 ph12):f3 d13 GRADIENT17(cnst24) d17 DIP_ON SED_ON d15 (p23 ph0):f3 SED_OFF DIP_OFF d13 GRADIENT17(cnst24) d17 DIP_ON SED_ON d25 (p3 ph1):f3 d0 (p22 ph0):f2 d0 (p3 ph13):f3 SED_OFF DIP_OFF d13 GRADIENT17(cnst24) d17 DIP_ON SED_ON d25 (p23 ph14):f3 SED_OFF DIP_OFF d13 GRADIENT17(cnst24) d17 DIP_ON SED_ON d25 (p3 ph14):f3 (p2 ph15):f2 d10 (p22 ph16):f2 (d26 p23 ph0):f3 d20 DIP_OFF d24 SED_OFF d13 GRADIENT18(cnst25) d16 (p2 ph17):f2 d6 (p1 ph0):f1 d13 GRADIENT15(cnst21) d22 (p22 ph0):f2 (p1*2 ph0):f1 d13 GRADIENT15(cnst21) d22 d7 (p2 ph1):f2 (p1 ph1):f1 d13 GRADIENT15(cnst21) d22 (d29 p1*2 ph0):f1 (p22 ph0):f2 d13 GRADIENT15(cnst21) d22 (p1 ph0):f1 d8 (p1*2 ph0):f1 d13 GRADIENT19(cnst27) d18 pl16:f2 go=2 ph31 cpd2:f2 d11 do:f2 wr #0 if #0 zd d9 ip17 d9 ip17 lo to 3 times 2 d9 dd10 d9 id20 d9 ip15 d9 ip15 d9 ip31 d9 ip31 lo to 4 times l4 d9 rd10 d9 rd20 d9 ip13 d9 ip14 lo to 5 times 2 d9 id0 d9 ip31 d9 ip31 lo to 6 times l6 20u LOCKH_OFF exit ph0=0 ph1=1 ph2=2 ph3=3 ph11=0 2 ph12=0 0 2 2 ph13=1 ph14=0 ph15=0 ph16=0 0 0 0 2 2 2 2 ph17=0 ph31=0 2 2 0 End of hncacbse.fa echo fahncacbse.r 1>&2 cat >fahncacbse.r <<'End of fahncacbse.r' loop ns { p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst22) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst22) } { (0) | (0) | (0) } p16 { (0) | (0) | (0)+(cnst23) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p18 { (0) | (0) | (0)+(cnst25) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p19 { (0) | (0) | (0)+(cnst27) } { (0) | (0) | (0) } } loop ns { p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst22) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst22) } { (0) | (0) | (0) } p16 { (0) | (0) | (0)+(cnst23) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p17 { (0) | (0) | (0)+(cnst24) } { (0) | (0) | (0) } p18 { (0) | (0) | (0)+(cnst25) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p15 { (0) | (0) | (0)+(cnst21) } { (0) | (0) | (0) } p19 { (0) | (0) | (0)+(cnst28) } { (0) | (0) | (0) } } End of fahncacbse.r echo Gradfa.incl 1>&2 cat >Gradfa.incl <<'End of Gradfa.incl' ;Gradfa.incl - include file for Gradient Spectroscopy ;avance-version ;version 94/06/27 #define GRADIENT15(ampl) p15:ngrad:c34 #define GRADIENT16(ampl) p16:ngrad:c34 #define GRADIENT17(ampl) p17:ngrad:c34 #define GRADIENT18(ampl) p18:ngrad:c34 #define GRADIENT19(ampl) p19:ngrad:c34 #define GRADIENT20(ampl) p20:ngrad:c34 #define BLKGRAD setnmr2^0 setnmr0^34 #define UNBLKGRAD setnmr2|0 setnmr0|34 #define BLKGRAMP setnmr0^34 #define UNBLKGRAMP setnmr0|34 End of Gradfa.incl