How an IT guy will teach school sexuality programmes

The Ministry of Education (MOE) has suspended the engagement of external vendors running sexuality programmes in schools, until it completes the vetting of their content. This could be an opportunity for external vendors, other than AWARE, to come up with their own sexuality education programme training materials and bid for the contract.

As such, this will be my proposed training material, as follows...

PROGRAMME TITLE: SEXUALITY EDUCATION

START OF SCRIPT

Set student_sexuality = UNKNOWN
IF sex(attracted_to) = sex(student) THEN
''Set student_sexuality = 'homo';
''GOTO FUNCTION homo_consult;
ELSE
''Set pre—marital sex = FALSE;
''WHILE (married = FALSE) AND (pre-marital sex = FALSE) DO
''''FUNCTION want_to_have_sex (sex_desire);
''''IF sex_desire = TRUE THEN
''''''IF (girl_on_pill = TRUE) OR (got_condom = TRUE) THEN
''''''''GOTO FUNCTION just_do_it;
''''''''sex = TRUE
''''''ELSE
''''''''IF take_chance = TRUE THEN
''''''''''GOTO FUNCTION just_do_it;
''''''''''sex = TRUE
''''''''''GOTO FUNCTION calculate_pregnancy_probability(pregnant);
''''''''''IF pregnant = TRUE THEN GOTO FUNCTION abortion
''''''''END IF
''''''END IF
''''END IF
''END WHILE
END IF

END OF SCRIPT

Ministry of Education,MOE,school sexuality programmes,sexuality education