Add cal

This appears unused.