time_components function

Extract time components from a model