VPL := [[[4, {{1, 3}}], [2*l, m, 2*n], [l, m, n, m], [1/2/l, 1/m, 1/2/n, 1/m]]
];