unit uw0840a; interface uses uw0840b; implementation end.