This is used to split a blocked dimension of length `l` down to `l` length-one blocks, which potentially can make a tensor more sparse. Probably this should have a better name, and be defined in [`BlockSparseArrays.jl`](https://github.com/ITensor/BlockSparseArrays.jl).