...

      write to BC(client_addr, H_Data)

          }

define SC_doctor_access():

...

  send inform_consent(client_addr, request, doctor_addr)

}

define SC_patient_consent(doctor_addr, request):

...

   write to BC(client_addr, response)

}

  V.        Further Research

...