updatePhase is a function for updating examinee objects after completing a module.
updatePhase updates the phase by calling changePhase.
updatePhase(examinee_object, assessment_structure)an examinee object.
an assessment_structure object.
an examinee object with its current_phase slot updated.
## assessment uses two phases
examinee <- examinee_list_math[[1]]
examinee@current_phase ## P1
examinee <- updatePhase(examinee, assessment_structure_math)
examinee@current_phase ## P2
examinee <- updatePhase(examinee, assessment_structure_math)
examinee@current_phase ## P1