A model of meteoric iron in the upper atmosphere