NLIBMACROS
for (lmi = 0; lmi < NLIBMACROS; lmi++) {
if (lmi < NLIBMACROS) {
for (i = 0; i < NLIBMACROS; i++) {