How is an infinite type hierarchy implemented?

Question

I was reading about sorts in Coq, and I came across this:

The types of types are called sorts.

All sorts have a type and there is an infinite well