181 	       ITG *nslavnode, ITG *islavnode,  in inimortar()  argument
315   NNEW(islavactdoftie,ITG,nslavnode[*ntie]);  in inimortar()
316   NNEW(bp,double,nslavnode[*ntie]);  in inimortar()
317   NNEW(islavact,ITG,nslavnode[*ntie]);  in inimortar()
318   NNEW(gap,double,nslavnode[*ntie]);  in inimortar()
319   NNEW(slavnor,double,3*nslavnode[*ntie]);  in inimortar()
320   NNEW(slavtan,double,6*nslavnode[*ntie]);  in inimortar()
321   NNEW(cdisp,double,6*nslavnode[*ntie]);  in inimortar()
326   NNEW(cstress,double,mt*nslavnode[*ntie]);  in inimortar()
331   NNEW(bpini,double,nslavnode[*ntie]);  in inimortar()
332   NNEW(islavactini,ITG,nslavnode[*ntie]);    in inimortar()
333   NNEW(cstressini,double,mt*nslavnode[*ntie]);  in inimortar()
351       for(j=nslavnode[i];j<nslavnode[i+1];j++){  in inimortar()
362     NNEW(lambdaiwan,double,3**iwan*nslavnode[*ntie]);  in inimortar()
363     NNEW(lambdaiwanini,double,3**iwan*nslavnode[*ntie]);  in inimortar()
372 	  for(j=nslavnode[i];j<nslavnode[i+1];j++){  in inimortar()
409       for(j=nslavnode[i]; j<nslavnode[i+1]; j++){  in inimortar()
422   NNEW(autloc,double, 3*nslavnode[*ntie]);  in inimortar()
423   NNEW(irowtloc,ITG,3*nslavnode[*ntie]);  in inimortar()
425   NNEW(autlocinv,double, 3*nslavnode[*ntie]);  in inimortar()
426   NNEW(irowtlocinv,ITG, 3*nslavnode[*ntie]);  in inimortar()
479   buildtquad(ntie,ipkon,kon,nk,lakon,nslavnode,itiefac,tieset,  in inimortar()
500   NNEW(nslavspc,ITG,2*nslavnode[*ntie]);  in inimortar()
502   NNEW(nslavmpc,ITG,2*nslavnode[*ntie]);  in inimortar()
504   NNEW(nslavspc2,ITG,2*nslavnode[*ntie]);  in inimortar()
506   NNEW(nslavmpc2,ITG,2*nslavnode[*ntie]);  in inimortar()