// ############################## START FUNC ############################################
// In this function all aromatic rings that share atoms with other aromatic rings are
// dispatched. Isolated, aromatic rings are returned

function ar_red(ar_atoms)
{

if(ar_atoms.charAt(0)=="#") ar_atoms=ar_atoms.substring(1,ar_atoms.length);

var tupp=ar_atoms.split("#");
var atomer=new Array(0);
var n=0;
var m=0;
var a_red="";
var mark=true;

for(n=0;n<tupp.length;n++){
atomer=tupp[n].split(" ");
var mark=true;
 for(m=0;m<atomer.length;m++){
 if(ar_atoms.split(" "+atomer[m]+" ").length>2) mark=false;
 }
if(mark) a_red=a_red+tupp[n]+"#";
}

if(a_red!="") a_red=a_red.substring(0,a_red.length-1);  // chop last "#";

return a_red;

}

// ############################### end func ############################################