Directed Flow of Charm Quarks as a Witness of the Initial Strong Magnetic Field in Ultra-Relativistic Heavy Ion Collisions