-------------------------------------------------------------------------------
--                                                                           --
--                          Experiment Source Code                           --
--              Delta NMR Experiment & Machine Control Interface             --
--                                                                           --
--                     Copyright (c) 2000 JEOL Ltd                           --
--                            All Rights Reserved                            --
--                                                                           --
-------------------------------------------------------------------------------
-- HELP.eng: spin echo
-- Category: solids, spin echo, solids relaxation

header
	filename        => "baba_1D";
	sample_id       => "";
	comment         => "baba_1D";
    process   		=  "1d_solid.list";
	include "header_solid";
end header;

instrument
	include "instrument_solid";
end instrument;

acquisition
	x_domain		=>	"Proton";
	x_offset		=>	5[ppm];
	x_sweep			=>	100[kHz];
	x_points		=>	1024;
	scans			=>	16;
	x_prescans		=>	0;
	mod_return		=>	1;

    y_domain         =  x_domain;
    y_offset         =  x_offset*2;
    y_sweep          => x_sweep;
    y_dwell          =? 1/y_sweep;
    y_points         => 64;

    z_domain         =  x_domain;
    z_offset         =  x_offset*2;
    z_sweep          => x_sweep;
    z_dwell          =? 1/z_sweep;
    z_points         => 64;

    include "acquisition_solid";
    include "acquisition_2d";
end acquisition;

pulse
	collect COMPLEX,OBS COMPLEX COMPLEX;
	initial_wait		=	10.0[ms];

Pulse_Setup	=? "-----------Setup hard pulses-----------";

	obs_width_90		=>	x90,										help "90deg pulse width";
	obs_amp_pulse		=>	100[%], 0[%]->100[%]:0.01[%],				help "ampliper";

BABA_Setup	=? "-----------Setup BABA-----------";

	obs_width_baba		=>	x90,										help "90deg pulse width";
	number_baba		=>	1,											help "number of baba cycle";
	number_baba_b		=>	1,											help "number of baba cycle";

	spinning_freq		=> 100 [kHz],									help "spinning frequency";
	tau			=	(1/spinning_freq) / 2 - obs_width_baba * 2;
	baba_duration		=?	(8/spinning_freq) * number_baba;
	baba_duration_b		=?	(8/spinning_freq) * number_baba_b;

RFDR_Setup	=? "-----------Setup RFDR-----------";

	obs_width_rfdr180		=> x90*2;
	obs_amp_rfdr			=> 100[%], 0[%]->100[%]:0.01[%], help "amp for x_pulse";
	tau1			=	(1/spinning_freq - obs_width_rfdr180) /2;
	number_rfdr		=>	1;
	mixing		=?	16*number_rfdr/spinning_freq;

MISC_Setup	=? "-----------Setup Miscellaneous-----------";

	t1			=>	0[us];
	t2			=>	0[us];
	z_filter		=>	1[ms],0[ns]	->	50[ms]	:	20[ns],		help "total echo time";

	relaxation_delay	=>	5.0[s],										help "inter-pulse delay";
	repetition_time		=?	relaxation_delay + x_acq_time,				help "relaxation_delay+x_acq_time";

	obs_atn			=>	xatn,										help "attenuator for x pulse";

	obs_phs_exc_base	=	{{  0},{ 45},{  0},{ 45}}.ystep(90%2);
	obs_phs_exc1		=	obs_phs_exc_base+180;
	obs_phs_exc2		=	obs_phs_exc_base+180;
	obs_phs_exc3		=	obs_phs_exc_base+270;
	obs_phs_exc4		=	obs_phs_exc_base+270;
	obs_phs_exc5		=	obs_phs_exc_base+180;
	obs_phs_exc6		=	obs_phs_exc_base+180;
	obs_phs_exc7		=	obs_phs_exc_base+270;
	obs_phs_exc8		=	obs_phs_exc_base+ 90;

	obs_phs_exc9		=	obs_phs_exc_base+  0;
	obs_phs_exc10		=	obs_phs_exc_base+  0;
	obs_phs_exc11		=	obs_phs_exc_base+ 90;
	obs_phs_exc12		=	obs_phs_exc_base+ 90;
	obs_phs_exc13		=	obs_phs_exc_base+  0;
	obs_phs_exc14		=	obs_phs_exc_base+  0;
	obs_phs_exc15		=	obs_phs_exc_base+ 90;
	obs_phs_exc16		=	obs_phs_exc_base+270;

	obs_phs_exc17		=	obs_phs_exc1 +180;
	obs_phs_exc18		=	obs_phs_exc2 +180;
	obs_phs_exc19		=	obs_phs_exc3 +180;
	obs_phs_exc20		=	obs_phs_exc4 +180;
	obs_phs_exc21		=	obs_phs_exc5 +180;
	obs_phs_exc22		=	obs_phs_exc6 +180;
	obs_phs_exc23		=	obs_phs_exc7 +180;
	obs_phs_exc24		=	obs_phs_exc8 +180;

	obs_phs_exc25		=	obs_phs_exc9 +180;
	obs_phs_exc26		=	obs_phs_exc10+180;
	obs_phs_exc27		=	obs_phs_exc11+180;
	obs_phs_exc28		=	obs_phs_exc12+180;
	obs_phs_exc29		=	obs_phs_exc13+180;
	obs_phs_exc30		=	obs_phs_exc14+180;
	obs_phs_exc31		=	obs_phs_exc15+180;
	obs_phs_exc32		=	obs_phs_exc16+180;

	obs_phs_recov_base	=		{0,90,180,270};
	obs_phs_recov32		=	obs_phs_recov_base+180;
	obs_phs_recov31		=	obs_phs_recov_base+180;
	obs_phs_recov30		=	obs_phs_recov_base+270;
	obs_phs_recov29		=	obs_phs_recov_base+270;
	obs_phs_recov28		=	obs_phs_recov_base+180;
	obs_phs_recov27		=	obs_phs_recov_base+180;
	obs_phs_recov26		=	obs_phs_recov_base+270;
	obs_phs_recov25		=	obs_phs_recov_base+ 90;

	obs_phs_recov24		=	obs_phs_recov_base+  0;
	obs_phs_recov23		=	obs_phs_recov_base+  0;
	obs_phs_recov22		=	obs_phs_recov_base+ 90;
	obs_phs_recov21		=	obs_phs_recov_base+ 90;
	obs_phs_recov20		=	obs_phs_recov_base+  0;
	obs_phs_recov19		=	obs_phs_recov_base+  0;
	obs_phs_recov18		=	obs_phs_recov_base+ 90;
	obs_phs_recov17		=	obs_phs_recov_base+270;

	obs_phs_recov16		=	obs_phs_recov32 +180;
	obs_phs_recov15		=	obs_phs_recov31 +180;
	obs_phs_recov14		=	obs_phs_recov30 +180;
	obs_phs_recov13		=	obs_phs_recov29 +180;
	obs_phs_recov12		=	obs_phs_recov28 +180;
	obs_phs_recov11		=	obs_phs_recov27 +180;
	obs_phs_recov10		=	obs_phs_recov26 +180;
	obs_phs_recov9		=	obs_phs_recov25 +180;

	obs_phs_recov8		=	obs_phs_recov24 +180;
	obs_phs_recov7		=	obs_phs_recov23+180;
	obs_phs_recov6		=	obs_phs_recov22+180;
	obs_phs_recov5		=	obs_phs_recov21+180;
	obs_phs_recov4		=	obs_phs_recov20+180;
	obs_phs_recov3		=	obs_phs_recov19+180;
	obs_phs_recov2		=	obs_phs_recov18+180;
	obs_phs_recov1		=	obs_phs_recov17+180;

----------------------------------

	obs_phs_exc_base_b	=	{{  0},{  0},{ 45},{ 45}}.zstep(90%2);
	obs_phs_exc1b		=	obs_phs_exc_base_b+180;
	obs_phs_exc2b		=	obs_phs_exc_base_b+180;
	obs_phs_exc3b		=	obs_phs_exc_base_b+270;
	obs_phs_exc4b		=	obs_phs_exc_base_b+270;
	obs_phs_exc5b		=	obs_phs_exc_base_b+180;
	obs_phs_exc6b		=	obs_phs_exc_base_b+180;
	obs_phs_exc7b		=	obs_phs_exc_base_b+270;
	obs_phs_exc8b		=	obs_phs_exc_base_b+ 90;

	obs_phs_exc9b		=	obs_phs_exc_base_b+  0;
	obs_phs_exc10b		=	obs_phs_exc_base_b+  0;
	obs_phs_exc11b		=	obs_phs_exc_base_b+ 90;
	obs_phs_exc12b		=	obs_phs_exc_base_b+ 90;
	obs_phs_exc13b		=	obs_phs_exc_base_b+  0;
	obs_phs_exc14b		=	obs_phs_exc_base_b+  0;
	obs_phs_exc15b		=	obs_phs_exc_base_b+ 90;
	obs_phs_exc16b		=	obs_phs_exc_base_b+270;

	obs_phs_exc17b		=	obs_phs_exc1b +180;
	obs_phs_exc18b		=	obs_phs_exc2b +180;
	obs_phs_exc19b		=	obs_phs_exc3b +180;
	obs_phs_exc20b		=	obs_phs_exc4b +180;
	obs_phs_exc21b		=	obs_phs_exc5b +180;
	obs_phs_exc22b		=	obs_phs_exc6b +180;
	obs_phs_exc23b		=	obs_phs_exc7b +180;
	obs_phs_exc24b		=	obs_phs_exc8b +180;

	obs_phs_exc25b		=	obs_phs_exc9b +180;
	obs_phs_exc26b		=	obs_phs_exc10b+180;
	obs_phs_exc27b		=	obs_phs_exc11b+180;
	obs_phs_exc28b		=	obs_phs_exc12b+180;
	obs_phs_exc29b		=	obs_phs_exc13b+180;
	obs_phs_exc30b		=	obs_phs_exc14b+180;
	obs_phs_exc31b		=	obs_phs_exc15b+180;
	obs_phs_exc32b		=	obs_phs_exc16b+180;

	obs_phs_recov_base_b	=	{4(0),4(90),4(180),4(270)};
	obs_phs_recov32b	=	obs_phs_recov_base_b+180;
	obs_phs_recov31b	=	obs_phs_recov_base_b+180;
	obs_phs_recov30b	=	obs_phs_recov_base_b+270;
	obs_phs_recov29b	=	obs_phs_recov_base_b+270;
	obs_phs_recov28b	=	obs_phs_recov_base_b+180;
	obs_phs_recov27b	=	obs_phs_recov_base_b+180;
	obs_phs_recov26b	=	obs_phs_recov_base_b+270;
	obs_phs_recov25b	=	obs_phs_recov_base_b+ 90;

	obs_phs_recov24b	=	obs_phs_recov_base_b+  0;
	obs_phs_recov23b	=	obs_phs_recov_base_b+  0;
	obs_phs_recov22b	=	obs_phs_recov_base_b+ 90;
	obs_phs_recov21b	=	obs_phs_recov_base_b+ 90;
	obs_phs_recov20b	=	obs_phs_recov_base_b+  0;
	obs_phs_recov19b	=	obs_phs_recov_base_b+  0;
	obs_phs_recov18b	=	obs_phs_recov_base_b+ 90;
	obs_phs_recov17b	=	obs_phs_recov_base_b+270;

	obs_phs_recov16b	=	obs_phs_recov32b +180;
	obs_phs_recov15b	=	obs_phs_recov31b +180;
	obs_phs_recov14b	=	obs_phs_recov30b +180;
	obs_phs_recov13b	=	obs_phs_recov29b +180;
	obs_phs_recov12b	=	obs_phs_recov28b +180;
	obs_phs_recov11b	=	obs_phs_recov27b +180;
	obs_phs_recov10b	=	obs_phs_recov26b +180;
	obs_phs_recov9b		=	obs_phs_recov25b +180;

	obs_phs_recov8b		=	obs_phs_recov24b +180;
	obs_phs_recov7b		=	obs_phs_recov23b+180;
	obs_phs_recov6b		=	obs_phs_recov22b+180;
	obs_phs_recov5b		=	obs_phs_recov21b+180;
	obs_phs_recov4b		=	obs_phs_recov20b+180;
	obs_phs_recov3b		=	obs_phs_recov19b+180;
	obs_phs_recov2b		=	obs_phs_recov18b+180;
	obs_phs_recov1b		=	obs_phs_recov17b+180;

----------------------------------

	obs_phs_rfdr			=	{  0};

	obs_phs_restore	=	{16(  0),16(120),16(240)};
	obs_phs_acq	=	{2(2(  0,180),2(180,  0)),2(2(120,300),2(120,300)),2(2(240, 60),2(240, 60))}.ystep(180%2).zstep(180%2);

	include "pulse_solid";
	module_config		=	"solid_sample";

begin
	initial_wait;
	relaxation_delay;

	loop number_baba times
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc1,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc2,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc3,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc4,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc5,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc6,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc7,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc8,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc9,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc10,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc11,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc12,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc13,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc14,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc15,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc16,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc17,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc18,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc19,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc20,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc21,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc22,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc23,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc24,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc25,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc26,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc27,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc28,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc29,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc30,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc31,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc32,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	end loop;

	t1 ystep 1/y_sweep;

	loop number_baba times
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov1,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov2,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov3,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov4,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov5,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov6,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov7,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov8,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov9,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov10,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov11,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov12,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov13,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov14,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov15,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov16,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov17,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov18,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov19,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov20,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov21,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov22,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov23,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov24,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov25,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov26,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov27,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov28,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov29,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov30,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov31,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov32,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	end loop;

	loop number_rfdr times
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+  0,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+ 90,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+  0,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+ 90,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;

		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+ 90,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+180,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+ 90,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+180,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;

		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+180,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+270,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+180,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+270,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;

		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+270,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+  0,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+270,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
		tau1;
		obs_width_rfdr180,	(obs.gate,	obs.phs.obs_phs_rfdr+  0,	obs.amp.obs_amp_rfdr,	obs.atn.obs_atn);
		tau1;
	end loop;


	loop number_baba_b times
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc1b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc2b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc3b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc4b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc5b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc6b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc7b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc8b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc9b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc10b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc11b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc12b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc13b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc14b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc15b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc16b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc17b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc18b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc19b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc20b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc21b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc22b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc23b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc24b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc25b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc26b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc27b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc28b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc29b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc30b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc31b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_exc32b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	end loop;

	t2 zstep 1/z_sweep;

	loop number_baba_b times
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov1b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov2b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov3b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov4b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov5b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov6b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov7b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov8b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov9b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov10b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov11b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov12b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov13b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov14b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov15b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov16b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov17b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov18b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov19b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov20b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov21b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov22b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov23b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov24b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov25b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov26b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov27b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov28b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov29b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov30b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov31b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	tau;
	obs_width_baba,		(obs.gate,	obs.phs.obs_phs_recov32b,	obs.amp.obs_amp_pulse,	obs.atn.obs_atn);

	end loop;

	z_filter;

	obs_width_90,		(obs.gate,	obs.phs.obs_phs_restore,		obs.amp.obs_amp_pulse,	obs.atn.obs_atn);
	acq( dead_time, delay, obs_phs_acq );
end pulse;