//CQL code for calibrating radiocarbon dates in Kessler et al. //"Tree-ring-radiocarbon dating paraffin conserved charcoal..." Options() { Resolution=1; }; Plot() { D_Sequence("mxo10-5B") { R_Date("115670 ring 2",638,21); Gap(12); R_Date("115671 ring 14",603,21); Gap(19); R_Combine("Ring 33, combined") { R_Date("115672 ring 33",610,21); R_Date("UCIAMS259533",615,20); }; Gap(3); Date("mxo10-5B outermost ring 36"); }; D_Sequence("mxo10-7") { R_Date("115668 ring 1",643,21); Gap(8); R_Combine("Ring 9, combined") { R_Date("115669 ring 9",552,21); R_Date("UCIAMS259532 ring 9",665,15); }; Gap(1); Date("mxo10-7 outermost ring 10"); }; D_Sequence("mxo10-12") { R_Combine("Ring 0 [pith], combined") { R_Date("115673 ring 0",556,21); R_Date("UCIAMS259534 ring 0",615,20); }; Gap(19); R_Date("115674 ring 19",568,21); Gap(18); R_Combine("Ring 37, combined") { R_Date("115675 ring 37",590,21); R_Date("UCIAMS259535 ring 37",665,15); }; Gap(0); Date("mxo10-12 outermost ring 37"); }; D_Sequence("mxo10-28D") { R_Date("115676 ring 1",643,21); Gap(16); R_Combine("Ring 17, combined") { R_Date("115677 ring 17",694,21); R_Date("UCIAMS259536 ring 17",675,15); }; Gap(1); Date("mxo10-28D outermost ring 18"); }; D_Sequence("mxo10-75") { R_Combine("Ring 9, combined") { R_Date("115664 ring 2",522,21); R_Date("UCIAMS259530 ring 2",575,15); }; Gap(9); R_Date("115665 ring 11",589,21); Gap(9); R_Date("115666 ring 20",580,21); Gap(20); R_Combine("Ring 40, combined") { R_Date("115667 ring 40",626,21); R_Date("UCIAMS259531 ring 40",670,15); }; Gap(13); Date("mxo10-75 outermost ring 53"); }; D_Sequence("mxo10-173") { R_Date("115678 ring 9",635,21); Gap(10); R_Date("115679R ring 19",613,21); Gap(11); R_Date("115679 ring 30",599,21); Gap(20); R_Date("115680 ring 50",589,21); Gap(9); R_Date("Ring 59, UCIAMS259537",650,15); Gap(1); Date("mxo10-173 outermost ring 60"); }; D_Sequence("mxo10-193") { R_Combine("Ring 0 [pith], combined") { R_Date("115660 ring 0",534,21); R_Date("UCIAMS259528 ring 0",620,20); }; Gap(8); R_Date("115661 ring 8",553,21); Gap(22); R_Combine("Ring 30, combined") { R_Date("115662 ring 30",633,21); R_Date("Ring 30, UCIAMS259529",675,15); }; Gap(12); //R_Date("115663 ring 38",931,22); //Gap(4); Date("mxo10-193 outermost ring 42"); }; };