Yeast DNA Prep protocol - source code

<code>
#include "BioCoder.h"

void main()
{
	start_protocol("Yeast DNA Prep");

	Fluid yeast_cul = new_fluid("yeast culture grown up to appropriate density", "near saturation");
	Fluid break_buffer = new_fluid("breaking buffer", "2% (v/v) Triton X-100, 1% (w/v) SDS, 100 mM NaCl, 10 mM Tris-Cl, pH 8.0, 1 mM EDTA, pH 8.0");
	Fluid phe_chloro_iaa = new_fluid("phenol : chloroform : isoamyl alcohol", "25:24:1", ICE_COLD);
	Fluid te = new_fluid("TE buffer", "10 mM Tris-Cl, pH 8.0, 1 mM EDTA, pH 8.0");
	Fluid ethanol = new_fluid("95% ethanol", ICE_COLD);
	Fluid water = new_fluid("water");

	Solid glass_beads = new_solid("glass beads");

	Container eppendorf1 = new_container(EPPENDORF);
	Container eppendorf2 = new_container(EPPENDORF);
	Container eppendorf3 = new_container(EPPENDORF);

	//1. grow up yeast culture to appropriate density (near saturation)
	//2. spin 1.5 mls of culture for 1 min in microfuge and aspirate off supernatant
	first_step();
	measure_fluid(yeast_cul, vol(1.5, ML), eppendorf1);
	centrifuge_pellet(eppendorf1, speed(SPEED_MAX, RPM), RT, time(1, MINS));

	//3. resuspend pellet in 200 ul breaking buffer
	next_step();
	measure_and_add(eppendorf1, break_buffer, vol(200, UL));
	resuspend(eppendorf1);

	//4. wear gloves and add:
	//       * 200 ul phenol:choloroform:isoamyl alcohol (25:24:1)
	//       * 200 ul (@200 mg) glass beads 
	next_step();
	measure_and_add(eppendorf1, phe_chloro_iaa, vol(200, UL));
	measure_and_add(eppendorf1, glass_beads, 200, MG);
	comment("Wear gloves for this step!");

	//5. close cap tightly and vortex for 2.5 min.
	//       * Be careful when vortexing; label can be dissolved by the phenol.
	//       * Hold cap tightly so it doesn't open or spill.
	next_step();
	vortex(eppendorf1, time(2.5, MINS));
	comment("Be careful when vortexing; label can be dissolved by the phenol.");
	comment("Hold cap tightly so it doesn't open or spill.");

	//6. add 200 ul TE buffer and spin for 5 min, in microfuge
	//7. transfer 350 ml aqueous (top) layer to fresh eppendorf.
	next_step();
	measure_and_add(eppendorf1, te, vol(200, UL));
	centrifuge_phases(eppendorf1, speed(SPEED_MAX, RPM), RT, time(5, MINS), vol(350, UL), eppendorf2);

	//8. add 1 ml 95% ethanol and mix well, let sit for 10 minutes
	next_step();
	measure_and_add(eppendorf2, ethanol, vol(1, ML));
	vortex(eppendorf2);
	store_for(eppendorf2, RT, time(10, MINS));

	//9. spin for 2 min, take off supernatant, and let dry upside down 10 min.
	next_step();
	centrifuge_pellet(eppendorf2, speed(SPEED_MAX, RPM), RT, time(2, MINS));
	invert_dry(eppendorf2, RT, time(10, MINS));

	//10. resuspend pellet in 50 ul TE buffer or water. 
	next_step();
	begin_option();
	measure_and_add(eppendorf2, te, vol(50, UL));
	next_option();
	measure_and_add(eppendorf2, water, vol(50, UL));
	end_option();
	resuspend(eppendorf2);
	comment("You can now use 1-2 ul of this crude yeast plasmid DNA prep to transform E. coli.");

	end_protocol();
}
</code>