diff --git a/p/GrowthChart.class.php b/p/GrowthChart.class.php
new file mode 100644
index 0000000..e0d7bc8
--- /dev/null
+++ b/p/GrowthChart.class.php
@@ -0,0 +1,181 @@
+<?php
+
+include ("jpgraph-2.1.1/src/jpgraph.php");
+include ("jpgraph-2.1.1/src/jpgraph_line.php");
+include ("jpgraph-2.1.1/src/jpgraph_regstat.php");
+
+/**
+ * GrowthChart class
+ *
+ * @author Jonathan Abbett <jonathan.abbett@childrens.harvard.edu>
+ * @version 1.1
+ * @copyright Jonathan Abbett and Children's Hospital Informatics Program, 2007
+ *
+ */
+class GrowthChart
+{
+        /**
+         * Male sex
+         *
+         */
+        const SEX_MALE                  = 1;
+        /**
+         * Female sex
+         *
+         */
+        const SEX_FEMALE                = 2;
+
+        private $style;
+        private $title;
+        private $sex;
+        private $maxAgeMonths;
+        private $patientXarray;
+        private $patientYarray;
+        private $width;
+        private $height;
+        /**
+         * Constructor, used to initialize necessary variables.
+         *
+         * @param string $style Chart style, from available dataset filenames, i.e. bmi-age, weight-length
+         * @param string $title Title for the graph, provided by M program
+         * @param integer $sex Patient sex, from available SEX constants
+         * @param decimal $maxAgeMonths The greatest patient age used in the chart, used to decide whether chart is infant (0-36 mo.) or regular (2-20 yrs.)
+         * @param integer $width Width of chart in pixels
+         * @param integer $height Height of chart in pixels
+         * @param array $patientXarray Array of decimals for patient X data (i.e. age in months)
+         * @param array $patientYarray Array of decimals for patient Y data (i.e. length, height, BMI, etc.)
+         * @return GrowthChart
+         */
+        public function GrowthChart($style, $title = null, $sex, $maxAgeMonths, $width = 800, $height = 800, $patientXarray = null, $patientYarray = null)
+        {
+                $this->style = $style;
+                $this->title = $title;
+                $this->sex = $sex;
+                $this->maxAgeMonths = $maxAgeMonths;
+                $this->width = $width;
+                $this->height = $height;
+                $this->patientXarray = $patientXarray;
+                $this->patientYarray = $patientYarray;
+        }
+
+        private static function generateSourceXData($min, $max) {
+
+                $data = array();
+
+                $data[] = $min;
+
+                for ($i = $min + 0.5; $i < $max; $i++) {
+                        $data[] = $i;
+                }
+
+                $data[] = $max;
+
+                return $data;
+
+        }
+
+        /**
+         * Renders the chart, outputting a PNG image.
+         *
+         */
+        public function render()
+        {
+
+                // Create and set-up the graph
+                $g  = new Graph($this->width, $this->height, "auto");
+                $g->SetColor('white');
+                $g->SetFrame(false);
+                $g->SetMargin(25,20,20,25);
+                $g->SetMarginColor('white');
+                // Load data from XML
+
+                if ($this->sex == GrowthChart::SEX_MALE) {
+                        $this->style .= '-male';
+                } else {
+                        $this->style .= '-female';
+                }
+
+                if ($this->maxAgeMonths <= 36) {
+                        $this->style .= '-infant';
+                }
+
+                $xml = simplexml_load_file("data/$this->style.xml");
+
+                $xdata = GrowthChart::generateSourceXData((float)$xml->sourceXStart, (float)$xml->sourceXEnd);
+
+                $g->SetScale("linlin", (float)$xml->yMin, (float)$xml->yMax, (float)$xml->xMin, (float)$xml->xMax);
+                if ((float)$xml->ticksMajor != 0) {
+                        $g->yscale->ticks->Set((float)$xml->ticksMajor, (float)$xml->ticksMinor);
+                }
+                $g->xaxis->SetLabelFormat('%1.1f');
+                $g->xaxis->SetFont(FF_TREBUCHE, FS_NORMAL, 9);
+                $g->xgrid->Show(true);
+                $g->yaxis->HideZeroLabel();
+                $g->yaxis->SetFont(FF_TREBUCHE, FS_NORMAL, 9);
+                $g->ygrid->SetFill(true,'#EFEFEF@0.5','#FFFFFF@0.5');
+                if (!empty($this->title))
+                {
+                $g->title->Set($this->title);
+                $g->title->SetColor("red");
+                $g->title->SetFont( FF_FONT2, FS_BOLD);
+                }
+                $xml = simplexml_load_file("data/$this->style.xml");
+
+
+                foreach ($xml->percentile as $p) {
+
+                        $percentile = $p->label;
+                        $yp = array();
+
+                        foreach ($p->value as $value) {
+                                $yp[] = (float)$value;
+                        }
+
+                        // Create the spline
+                        $spline = new Spline($xdata, $yp);
+
+                        // Get smoothed points
+                        list($newx, $newy) = $spline->Get(100);
+
+                        $lplot = new LinePlot($newy, $newx);
+                        $lplot->SetColor('#CCCCCC');
+
+                        if ($percentile == '50')
+                        {
+                                $lplot->SetColor('#666666');
+                        }
+
+                        // Add the plots to the graph and stroke
+                        $g->Add($lplot);
+
+                        // Add percentile label to graph
+                        $txt = new Text($percentile . ($percentile == '3' ? 'rd' : 'th'));
+                        $txt->SetScalePos($xdata[sizeof($xdata)-1]+(float)$xml->percentileXNudge,$yp[sizeof($yp)-1]+(float)$xml->percentileYNudge);
+                        $txt->SetColor('#666666');
+                        $txt->SetFont(FF_TREBUCHE, FS_NORMAL, 9);
+                        $g->AddText($txt);
+                }
+
+                if (!empty($this->patientXarray) && !empty($this->patientYarray) && sizeof($this->patientXarray) == sizeof($this->patientYarray))
+                {
+                        $patientPlot = new LinePlot($this->patientYarray, $this->patientXarray);
+                        $patientPlot->SetColor('orange');
+                        $patientPlot->SetWeight(3);
+                        $patientPlot->value->Show();
+                        $patientPlot->value->SetColor('brown');
+                        $patientPlot->value->SetFont(FF_COURIER, FS_BOLD);
+                        $patientPlot->value->SetAlign('left', 'top');
+                        $patientPlot->value->SetMargin(-5);
+                        $patientPlot->mark->SetType(MARK_DIAMOND);
+                        $patientPlot->mark->SetWidth(7);
+                        $patientPlot->mark->SetColor('orange');
+                        $patientPlot->mark->SetFillColor('red');
+
+                        $g->Add($patientPlot);
+                }
+
+                $g->Stroke();
+        }
+}
+
+?>
\ No newline at end of file
diff --git a/p/PGC.tar.gz b/p/PGC.tar.gz
new file mode 100644
index 0000000..92eacd9
Binary files /dev/null and b/p/PGC.tar.gz differ