US state supreme court keeps Trump on Michigan ballot