package Ġorg . simple . clin ic . blood s ugar . history Ċ Ċ import Ġcom . spotify . mob ius . Next Ċ import Ġcom . spotify . mob ius . Update Ċ import Ġorg . simple . clin ic . mob ius . dispatch Ċ import Ġorg . simple . clin ic . mob ius . next Ċ Ċ class ĠB lood S ugar History Screen Update Ġ: ĠUpdate < Blood S ugar History Screen Model , ĠB lood S ugar History Screen Event , ĠB lood S ugar History Screen Effect > Ġ{ ĊĠ Ġoverride Ġfun Ġupdate ( ĊĠĠĠĠĠ Ġmodel : ĠB lood S ugar History Screen Model , ĊĠĠĠĠĠ Ġevent : ĠB lood S ugar History Screen Event ĊĠ Ġ): ĠNext < Blood S ugar History Screen Model , ĠB lood S ugar History Screen Effect > Ġ{ ĊĠĠĠ Ġreturn Ġwhen Ġ( event ) Ġ{ ĊĠĠĠĠĠ Ġis ĠPatient Loaded Ġ-> Ġnext ( model . patient Loaded ( event . patient )) ĊĠĠĠĠĠ Ġis ĠAdd New Blood S ugar Clicked Ġ-> Ġdispatch ( Open Blood S ugar Entry Sheet ( model . patient Uuid )) ĊĠĠĠĠĠ Ġis ĠB lood S ugar Clicked Ġ-> Ġdispatch ( Open Blood S ugar Update Sheet ( event . blood S ugar Measurement )) ĊĠĠĠ Ġ} ĊĠ Ġ} Ċ } Ċ