package Ġorg . simple . clin ic . blood s ugar . history Ċ Ċ import Ġorg . simple . clin ic . blood s ugar . Blood S ugar Measurement Ċ import Ġorg . simple . clin ic . patient . Patient Ċ import Ġorg . simple . clin ic . widgets . Ui Event Ċ Ċ sealed Ġclass ĠB lood S ugar History Screen Event Ġ: ĠUi Event Ċ Ċ data Ġclass ĠPatient Loaded ( val Ġpatient : ĠPatient ) Ġ: ĠB lood S ugar History Screen Event () Ċ Ċ object ĠAdd New Blood S ugar Clicked Ġ: ĠB lood S ugar History Screen Event () Ġ{ ĊĠ Ġoverride Ġval Ġanalytics Name : ĠString Ġ= Ġ" Blood ĠS ugar ĠHistory : Add ĠNew ĠB lood ĠS ugar " Ċ } Ċ Ċ data Ġclass ĠB lood S ugar Clicked ( val Ġblood S ugar Measurement : ĠB lood S ugar Measurement ) Ġ: ĠB lood S ugar History Screen Event () Ġ{ ĊĠ Ġoverride Ġval Ġanalytics Name : ĠString Ġ= Ġ" Blood ĠS ugar ĠHistory : Blood ĠS ugar ĠClick ed " Ċ } Ċ