what is the number of theater plays in black humour?
(COUNT (AND theater.play (JOIN (R theater.theater_genre.plays_in_this_genre) (JOIN (R media_common.media_genre.parent_genre) m.0vgkd))))