var imgGrpOrd="site|seq1|seq2|seq34".split("|");

var imgSet = new Array();
    imgSet["site"]   ="dp474|dp455|dp1586|dp1555".split("|");
    imgSet["seq1"]   ="py180o".split("|");
    imgSet["seq2"]   ="ds1212h41|ds1212h42|ds1236i_hornerid|ds1236i_idmidronea|ds1236i_cheilostome".split("|");
    imgSet["seq34"]  ="py171i|py171l|py171h|py171j|py171k|py171m".split("|");


var imgInfo = new Array();
    //       tab caption | species | file position | location | measurements | Fig Nr (dynamic) | spare | spare

    imgInfo["dp474"]    = "Ideal<BR>cement|IC|CH1-4|||||".split("|");
    imgInfo["dp455"]    = "Mixed<BR>tailings|HC|CH1-4|||||".split("|");
    imgInfo["dp1586"]   = "Sequence<BR>2|DC|CH2|||||".split("|");
    imgInfo["dp1555"]   = "Sequence<BR>3|OC|CH3|||||".split("|");

    imgInfo["py180o"]    = "<I>Proto-<BR>mississippiensis</I>|Pm|tp|Castle Hayne Sequence 1, Duplin Co., NC ||||".split("|");

    imgInfo["ds1212h41"]    = "<I>Proto-<BR>scutella</I>|Pc|t|Castle Hayne Seq 2 ||||".split("|");
  //imgInfo["ds1212h42"]    = "<I>Santee-<BR>lampas</I>|So|t|Castle Hayne Seq 2 ||||".split("|");
    imgInfo["ds1212h42"]    = "<I>Eurhodia<BR>holmesi</I>|Eh|t|Castle Hayne Seq 2 ||||".split("|");
    imgInfo["ds1236i_hornerid"]    = "Bryozoa<BR>1|B1|b1|Castle Hayne Seq 2 ||||".split("|");
    imgInfo["ds1236i_idmidronea"]  = "Bryozoa<BR>2|B2|b2|Castle Hayne Seq 2 ||||".split("|");
    imgInfo["ds1236i_cheilostome"] = "Bryozoa<BR>3|B3|b3|Castle Hayne Seq 2 ||||".split("|");


    imgInfo["py171i"]    = "<I>Periarchus<BR>lyelli</I>|Pl|t|Castle Hayne Seq 3/4 ||||".split("|");
    imgInfo["py171l"]    = "<I>Echino-<BR>lampas</I>|Ea|t|Castle Hayne Seq 3/4 ||||".split("|");
    imgInfo["py171h"]    = "<I>Linthia<BR>hanoverensis</I>|Lh|t|Castle Hayne Seq 3/4 ||||".split("|");
    imgInfo["py171j"]    = "<I>Ryncho-<BR>lampas</I>|Rc|t|Castle Hayne Seq 3/4 ||||".split("|");
    imgInfo["py171k"]    = "<I>Eurhodia<BR>rugosa</I>|Erd|t|Castle Hayne Seq 3/4 ||||".split("|");
    imgInfo["py171m"]    = "<I>Unifascia<BR>carol.</I>|Uc|t|Castle Hayne Seq 3/4 ||||".split("|");

var spNm = new Array();
    spNm["IC"]   = "Ideal Cement, New Hanover Co., NC";
    spNm["HC"]   = "New Hanover Co., NC";
    spNm["OC"]   = "Onslow Co., NC";
    spNm["DC"]   = "Duplin Co., NC";

    spNm["Ea"]   = "<i>Echinolampas appendiculata</i>";
    spNm["Esp"]  = "<i>Eurhodia sp</i>";
    spNm["Erd"]  = "<i>Eurhodia rugosa depressa</i>";
    spNm["Eh"]   = "<i>Eurhodia holmesi</i>";

    spNm["Lh"]   = "<i>Linthia hanoverensis</i>";
    spNm["Pl"]   = "<i>Periarchus lyelli</i>";
    spNm["Pc"]   = "<i>Protoscutella conradi</i>"; 
    spNm["Pp"]   = "<i>Protoscutella plana</i>";
    spNm["Pm"]   = "<i>Protoscutella mississippiensis</i>";
    spNm["Rsp"]  = "<i>Ryncholampas sp</i>";
    spNm["Rc"]   = "<i>Ryncholampas carolinensis</i>";

    spNm["Usp"]  = "<i>Unifascia sp</i>";
    spNm["Uc"]   = "<i>Unifascia carolinensis</i>";

    spNm["So"]   = "<i>Santeelampas oviformis</i>";


  //spNm["B1"]   = "Cyclostome bryozoans, Horneridae";
  //spNm["B2"]   = "Cyclostome bryozoans, non-hornerid";
  //spNm["B3"]   = "Cheilostome bryozoans (flat branching)";

    spNm["B1"]   = "Cyclostome bryozoans";
    spNm["B2"]   = "Cyclostome bryozoans, tubuliporids";
    spNm["B3"]   = "Cheilostome bryozoans (flat branching)";


var thPos = new Array();
    thPos["t"]    = "Test: (Aboral (l), oral (c) and lateral (r)";
    thPos["tp"]   = "Test: (Aboral (l), oral (c) and posterior (r)";


    thPos["CH1-4"]= "Castle Hayne tailings, Seq 1-4";
    thPos["CH2"]  = "Castle Hayne Fm, Sequence 2";
    thPos["CH3"]  = "Castle Hayne Fm, Sequence 3";


  //thPos["b1"]   = "a-h) probably <I>Hornera jacksonica</I>; i) possibly <I>jacksonica</I>; j) possibly <I>H. tenuirama</I>";
  //thPos["b2"]   = "a-c) probably <I>Idmidronea maxillaris</I>;  d) probably  <I>I. rosacea</I>; e) possibly <I>Idmonea magnireversa</I>";
  //thPos["b3"]   = "<BR>a-e) various undetermined taxa";


    thPos["b1"]   = "a-d) hornerid, <I>Hornera spp</I>; e) possibly hornerid; f) crisinid, possibly <I>Crisidmonea sp</I>";
    thPos["b2"]   = "<BR>a-c) <I>Idmidronea spp</I>";
    thPos["b3"]   = "<BR>a) undetermined genus; b) possibly <I>Tubucella sp</I>";