newDir=SystemDialogInput["Directory"];
AppendTo[$Path,newDir];
Needs["BioMath`"]