4 ms·

STM doesn't use locking and copying is cheap in a functional language (which this is) because of structural sharing.