Evaluated proc lzero {z n} {format "%0$nd" $n}