A Mathematical Model of Action Potential in Cells of Vascular Plants