mi                 58 src/CalculiX.h              ITG *nactdof,ITG *mi,ITG *imdmpc,ITG *nmdmpc,ITG *imdboun,
mi                 65 src/CalculiX.h              ITG *nactdof,ITG *mi,ITG *imdmpc,ITG *nmdmpc,ITG *imdboun,
mi                 69 src/CalculiX.h 	     ITG *mi,ITG *izdof,ITG *nzdof,ITG *i,ITG *iznode,ITG *nznode,
mi                 74 src/CalculiX.h 	     ITG *mi,ITG *i,ITG *iznode,ITG *nznode,ITG *nk,
mi                 80 src/CalculiX.h              ITG *nz,ITG *istep,ITG *iinc,ITG *iit,ITG *mi,ITG *imastop,
mi                 89 src/CalculiX.h              ITG *nprint_,ITG *mi,ITG *ntrans_,
mi                139 src/CalculiX.h              double **xstatep,ITG *npmat_,char *matname,ITG *mi,
mi                174 src/CalculiX.h              double *xstate,ITG *npmat_,char *matname,ITG *mi,
mi                205 src/CalculiX.h              double **xstatep,ITG *npmat_,char *matname,ITG *mi,
mi                221 src/CalculiX.h 	     ITG *mi,ITG *ne2));
mi                233 src/CalculiX.h 	    double *qfx,double *h0,ITG *mi,ITG *inomat,ITG *nk);
mi                236 src/CalculiX.h                          double *qfx,double *h0,ITG *mi,ITG *nka,ITG *nkb));
mi                253 src/CalculiX.h                        ITG *mi,double *cpel,double *physcon));
mi                257 src/CalculiX.h 		       ITG *mi,ITG *ielfa,double *cpfa,double *physcon));
mi                281 src/CalculiX.h                         ITG *mi,ITG *ielfa,double *hcfa));
mi                291 src/CalculiX.h void FORTRAN(calcmass,(ITG *ipkon,char *lakon,ITG *kon,double *co,ITG *mi,
mi                302 src/CalculiX.h         double *f_cm,double *f_cs,ITG *mi,ITG *nzs,ITG *nasym,
mi                312 src/CalculiX.h 	double *f_cm,double *f_cs,ITG *mi,ITG *nzs,ITG *nasym,ITG *ithermal);
mi                318 src/CalculiX.h                         ITG *mi));
mi                322 src/CalculiX.h                         ITG *mi,ITG *ielfa));
mi                328 src/CalculiX.h                        ITG *mi,double *umel));
mi                332 src/CalculiX.h                         ITG *mi,ITG *ielfa,double *umfa));
mi                340 src/CalculiX.h              double *dist,ITG *idist,double *area,ITG *ntrit,ITG *mi,ITG *jqrad,
mi                369 src/CalculiX.h 	       ITG *iplas,ITG *npmat_,ITG *mi,ITG *nk_,
mi                415 src/CalculiX.h           ITG *iinc,ITG *iperturb,double *ener,ITG *mi,char *output,
mi                467 src/CalculiX.h     ITG *mi,ITG *ncmat_,double *physcon,ITG *istep,ITG *iinc,
mi                511 src/CalculiX.h                double *xstate,ITG *npmat_,char *matname,ITG *mi,
mi                535 src/CalculiX.h              ITG *iperturb,ITG *ikboun,ITG *nboun,ITG *mi,ITG *imastop,
mi                569 src/CalculiX.h 	     double *vold,ITG *mi,ITG *ielmat));
mi                572 src/CalculiX.h        ITG *iendset,ITG *ialset,ITG *nactdof,ITG *ithermal,ITG *mi,
mi                582 src/CalculiX.h              ITG *imddof,ITG *nmddof,ITG *nactdof,ITG *mi,ITG *imdmpc,
mi                608 src/CalculiX.h            ITG *mi,ITG *cyclicsymmetry,ITG *izdof,ITG *nzdof);
mi                668 src/CalculiX.h                double **xstatep,ITG *npmat_,char *matname,ITG *mi,
mi                704 src/CalculiX.h 	      double *xstate,ITG *npmat_,char *matname,ITG *mi,
mi                758 src/CalculiX.h 	     double *dtime,ITG *mi,ITG *imdnode,ITG *nmdnode,ITG *imdboun,
mi                761 src/CalculiX.h void FORTRAN(effectivemodalmass,(ITG *neq,ITG *nactdof,ITG *mi,double *adb,
mi                785 src/CalculiX.h 	     char *matname,double *qaold,ITG *mi,
mi                813 src/CalculiX.h 		      double *rhcon,ITG *nrhcon,ITG *mi,ITG *nmpc,
mi                821 src/CalculiX.h              ITG *kon,char *lakon,ITG *nk,ITG *ne,ITG *mi,ITG *ielmat,
mi                838 src/CalculiX.h              double *xstate,ITG *npmat_,char *matname,ITG *mi,
mi                859 src/CalculiX.h              ITG *kon,char *lakon,ITG *nfield,ITG *nk,ITG *ne,ITG *mi,
mi                909 src/CalculiX.h                           ITG *iendset,ITG *ialset,ITG *nset,ITG *mi));
mi                914 src/CalculiX.h 	      double *xloadact,ITG *nactdog,ITG *network,ITG *mi,
mi                931 src/CalculiX.h 	 ITG *neigh,ITG *mi,double *stx,double *vr,double *vi,
mi                944 src/CalculiX.h             ITG *iinc,ITG *iperturb,double *ener,ITG *mi,char *output,
mi                954 src/CalculiX.h 	     ITG *inum,ITG *ntrans,ITG *inotr,double *trab,ITG *mi,
mi                964 src/CalculiX.h 	     ITG *mi,ITG *istep,ITG *iinc,ITG *ithermal));
mi                977 src/CalculiX.h                ITG *istartset,ITG *iendset,ITG *ialset,ITG *mi,ITG *ngraph,
mi                989 src/CalculiX.h 			ITG *nelemload,double *xload,ITG *mi));
mi                999 src/CalculiX.h              ITG *iit,ITG *ncmat_,ITG *ntmat_,ITG *mi,ITG *imastop,
mi               1012 src/CalculiX.h      ITG *nmethod,ITG *mi,ITG *imastop,ITG *nslavnode,
mi               1028 src/CalculiX.h        ITG *mi,ITG *nodorig,ITG *ipkon,char *lakon,ITG *kon,ITG *ne));
mi               1043 src/CalculiX.h              ITG *mcs,ITG *inocs,ITG *ntrit,ITG *nk,ITG *mi,double *sidemean));
mi               1098 src/CalculiX.h                          ITG *iit,ITG *mi,ITG *ineighe,ITG *ilboun));
mi               1110 src/CalculiX.h                          ITG *iit,ITG *mi,ITG *ineighe,ITG *ilboun,
mi               1124 src/CalculiX.h              ITG *ne0,ITG *mi,double *xstate,
mi               1132 src/CalculiX.h               ITG *nx,ITG *ny,ITG *nz,ITG *mi,ITG *imastop,ITG *nslavnode,
mi               1148 src/CalculiX.h              double *elcon,ITG *nelcon,ITG *mi,ITG *ne,double *sti,
mi               1178 src/CalculiX.h 	     ITG *mi,ITG *ncmat_,ITG *nstate_,double *cs,ITG *mcs,
mi               1213 src/CalculiX.h 	       ITG *npmat_,double *dtime,char *matname,ITG *mi,
mi               1237 src/CalculiX.h 	       ITG *npmat_,double *dtime,char *matname,ITG *mi,
mi               1263 src/CalculiX.h 	       ITG *npmat_,double *dtime,char *matname,ITG *mi,
mi               1289 src/CalculiX.h 			ITG *nmethod,char *set,ITG *mi,ITG *nmpc,
mi               1321 src/CalculiX.h 	       ITG *npmat_,double *dtime,char *matname,ITG *mi,
mi               1354 src/CalculiX.h 	       ITG *npmat_,double *dtime,char *matname,ITG *mi,
mi               1387 src/CalculiX.h 	       ITG *npmat_,double *dtime,char *matname,ITG *mi,
mi               1418 src/CalculiX.h 	       ITG *npmat_,double *dtime,char *matname,ITG *mi,
mi               1457 src/CalculiX.h               ITG *mi,ITG *mortar,char *typeboun,char *labmpc);
mi               1466 src/CalculiX.h 	       char *labmpc,ITG *mcs,ITG *mi,ITG *mortar);
mi               1473 src/CalculiX.h 	      ITG *ithermal,ITG *mi,ITG *ielmat, double *elcon, ITG *ncmat_, 
mi               1479 src/CalculiX.h                ITG *ipnei,ITG *ineiel,ITG *mi);
mi               1492 src/CalculiX.h void FORTRAN(negativepressure,(ITG *ne0,ITG *ne,ITG *mi,double *stx,
mi               1535 src/CalculiX.h 	     char *matname,double *qaold,ITG *mi,
mi               1560 src/CalculiX.h 		   double *trab,ITG *ntrans,ITG *ithermal,ITG *mi));
mi               1587 src/CalculiX.h                      double *vel,double *vold,ITG *mi,ITG *neij,ITG *nef,
mi               1597 src/CalculiX.h         ITG *nslavnode, ITG *nmastnode,ITG *imastop,ITG *mi,
mi               1604 src/CalculiX.h 	       ITG *iinc,ITG *idiscon,double *vold,ITG *nactdof,ITG *mi);
mi               1608 src/CalculiX.h 	       ITG *iinc,ITG *idiscon,double *vold,ITG *nactdof,ITG *mi);
mi               1617 src/CalculiX.h              double *ener,ITG *mi,ITG *nstate_,ITG *ithermal,
mi               1628 src/CalculiX.h              double *ener,ITG *mi,ITG *nstate_,ITG *ithermal,
mi               1640 src/CalculiX.h 	    ITG *ielmat,ITG *mi));
mi               1650 src/CalculiX.h             double **cop,double **voldp,ITG *ntrit,ITG *inocs,ITG *mi);
mi               1669 src/CalculiX.h        ITG *nmethod,char *set,ITG *mi,ITG * istartset,ITG* iendset,
mi               1683 src/CalculiX.h        ITG *mi,ITG *iemchange,ITG *nam,ITG *iamload,ITG *jqrad,
mi               1692 src/CalculiX.h 	     ITG *ikmpc,ITG *nmpc,ITG *ipompc,ITG *nodempc,ITG *mi, 
mi               1707 src/CalculiX.h                       ITG *mi,double *emn));
mi               1711 src/CalculiX.h 		      ITG *icntrl,double *t,char *filab,ITG *imag,ITG *mi,
mi               1720 src/CalculiX.h 		      ITG *icntrl,double *t,char *filab,ITG *imag,ITG *mi,
mi               1733 src/CalculiX.h 	      ITG *iperturb,ITG *mass,ITG *mi,ITG *iexpl,ITG *mortar,
mi               1744 src/CalculiX.h 	      ITG *iperturb,ITG *mass,ITG *mi,ITG *ics,double *cs,
mi               1757 src/CalculiX.h 	      ITG *iperturb,ITG *mass,ITG *mi,ITG *ielmat,double *elcon,
mi               1772 src/CalculiX.h   ITG *npmat_,ITG *norien,ITG *nam,ITG *nprint,ITG *mi, 
mi               1819 src/CalculiX.h                         double *reltime,ITG *nmethod,char *set,ITG *mi,
mi               1843 src/CalculiX.h 	     double *epl,char *matname,ITG *mi,ITG *ielas,
mi               1863 src/CalculiX.h              double *vold,double *dtime,char *matname,ITG *mi,ITG *ncmat_,
mi               1872 src/CalculiX.h        ITG *mi,double *fmpc,ITG *calcul_fn,
mi               1877 src/CalculiX.h        ITG *mi,double *fmpc,ITG *calcul_fn,ITG *calcul_f,ITG *inomat));
mi               1885 src/CalculiX.h        ITG *mi,double *vini,ITG *nprint,char *prlab,ITG *intpointvar,
mi               1895 src/CalculiX.h        ITG *mi,double *vini,ITG *nprint,char *prlab,ITG *intpointvar,
mi               1908 src/CalculiX.h           ITG *npmat_,char *matname,ITG *mi,ITG *ielas,ITG *icmd,ITG *ncmat_,
mi               1923 src/CalculiX.h        ITG *nmethod,double *ttime,double *xstate,double *epn,ITG *mi,
mi               1944 src/CalculiX.h        ITG *mi,ITG *ncmat_,ITG *nstate_,double *cocon,ITG *ncocon,
mi               1973 src/CalculiX.h 	     double *epl,char *matname,ITG *mi,ITG *ielas,
mi               2044 src/CalculiX.h 	       char *matname,ITG *mi,ITG *ikactmech,ITG *nactmech,
mi               2053 src/CalculiX.h 	ITG *mi,ITG *ncont,ITG *ipe,ITG *ime,double *pslavsurf,
mi               2063 src/CalculiX.h 	       double *reorder,ITG *nreorder,ITG *mi));
mi               2076 src/CalculiX.h              double *senergy,ITG *iener,double *cstr,ITG *mi,
mi               2084 src/CalculiX.h              ITG *iperturb,double *springarea,ITG *nmethod,ITG *mi,ITG *ne0,
mi               2112 src/CalculiX.h           double *xstate,ITG *npmat_,char *matname,ITG *mi,
mi               2135 src/CalculiX.h              ITG *ne,ITG *mi,double *orab,ITG *ielorien,
mi               2164 src/CalculiX.h 	       char *sideload,ITG *mi,ITG *ntrans,double *trab,
mi               2183 src/CalculiX.h 	       char *sideload,ITG *mi,ITG *ntrans,double *trab,
mi               2203 src/CalculiX.h 	       char *sideload,ITG *mi,double *xforcdiff,double *xloaddiff,
mi               2228 src/CalculiX.h 	       ITG *nmpc_,ITG *mi,ITG *nk,ITG *istep,ITG *ikboun,
mi               2253 src/CalculiX.h void FORTRAN(uout,(double *v,ITG *mi,ITG *ithermal));
mi               2256 src/CalculiX.h 			 double *cg,double *straight,ITG *mi));
mi               2259 src/CalculiX.h 			 double *cg,double *straight,ITG *mi,ITG *imastnode,
mi               2328 src/CalculiX.h 		      double *sti,ITG *mi));
mi                 63 src/arpack.c                double **xstatep, ITG *npmat_, char *matname, ITG *mi,
mi                 83 src/arpack.c       info,rvec=1,*select=NULL,lfin,j,lint,iout,ielas=0,icmd=0,mt=mi[1]+1,
mi                204 src/arpack.c   		  RENEW(ener,double,mi[0]*(*ne+*nslavs)*2);
mi                210 src/arpack.c   		  RENEW(ielorien,ITG,mi[2]*(*ne+*nslavs));
mi                211 src/arpack.c   		  for(k=mi[2]**ne;k<mi[2]*(*ne+*nslavs);k++) ielorien[k]=0;
mi                214 src/arpack.c   	      RENEW(ielmat,ITG,mi[2]*(*ne+*nslavs));
mi                215 src/arpack.c   	      for(k=mi[2]**ne;k<mi[2]*(*ne+*nslavs);k++) ielmat[k]=1;
mi                218 src/arpack.c   		  RENEW(xstate,double,*nstate_*mi[0]*(*ne+*nslavs));
mi                219 src/arpack.c   		  for(k=*nstate_*mi[0]**ne;k<*nstate_*mi[0]*(*ne+*nslavs);k++){
mi                250 src/arpack.c   			 imastop,mi,ipe,ime,tietol,&iflagact,
mi                261 src/arpack.c   		  RENEW(ener,double,mi[0]*(*ne+*nintpoint)*2);
mi                267 src/arpack.c   		  RENEW(ielorien,ITG,mi[2]*(*ne+*nintpoint));
mi                268 src/arpack.c   		  for(k=mi[2]**ne;k<mi[2]*(*ne+*nintpoint);k++) ielorien[k]=0;
mi                270 src/arpack.c   	      RENEW(ielmat,ITG,mi[2]*(*ne+*nintpoint));
mi                271 src/arpack.c   	      for(k=mi[2]**ne;k<mi[2]*(*ne+*nintpoint);k++) ielmat[k]=1;
mi                281 src/arpack.c   	     iperturb,ikboun,nboun,mi,imastop,nslavnode,islavnode,islavsurf,
mi                294 src/arpack.c   			    *nstate_*mi[0]*(ne0+maxprevcontel));
mi                295 src/arpack.c   		      for(k=*nstate_*mi[0]*ne0;
mi                296 src/arpack.c   			  k<*nstate_*mi[0]*(ne0+maxprevcontel);++k){
mi                301 src/arpack.c   		  RENEW(xstate,double,*nstate_*mi[0]*(ne0+*nintpoint));
mi                302 src/arpack.c   		  for(k=*nstate_*mi[0]*ne0;k<*nstate_*mi[0]*(ne0+*nintpoint);k++){
mi                312 src/arpack.c                                  &ne0,mi,xstate,pslavsurf,nstate_,
mi                324 src/arpack.c   		  RENEW(xstateini,double,*nstate_*mi[0]*(ne0+*nintpoint));
mi                325 src/arpack.c   		  for(k=0;k<*nstate_*mi[0]*(ne0+*nintpoint);++k){
mi                337 src/arpack.c   		 neq,nzs,nmethod,ithermal,iperturb,mass,mi,ics,cs,
mi                346 src/arpack.c         NNEW(xstateini,double,*nstate_*mi[0]*(ne0+*nslavs));
mi                347 src/arpack.c         for(k=0;k<*nstate_*mi[0]*(ne0+*nslavs);++k){
mi                358 src/arpack.c     NNEW(xstiff,double,(long long)27*mi[0]**ne);
mi                364 src/arpack.c     NNEW(stx,double,6*mi[0]**ne);
mi                366 src/arpack.c         NNEW(qfx,double,3*mi[0]**ne);
mi                378 src/arpack.c   	     xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                396 src/arpack.c   	     xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                434 src/arpack.c   	      xstiff,npmat_,&dtime,matname,mi,
mi                452 src/arpack.c   	      xstiff,npmat_,&dtime,matname,mi,
mi                476 src/arpack.c   		  xstiff,npmat_,&dtime,matname,mi,
mi                504 src/arpack.c   	    mi,sti,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                546 src/arpack.c   		  ntrans,inotr,trab,co,nk,nactdof,jobnamec,mi,ipkon,
mi                809 src/arpack.c         FORTRAN(effectivemodalmass,(neq,nactdof,mi,adb,aub,jq,irow,&nev,z,co,nk));
mi                821 src/arpack.c     NNEW(stx,double,6*mi[0]**ne);
mi                824 src/arpack.c         NNEW(qfx,double,3*mi[0]**ne);
mi                839 src/arpack.c       for(k=0;k<6*mi[0]*ne0;k++){eme[k]=0.;}
mi                873 src/arpack.c       NNEW(eei,double,6*mi[0]*ne0);
mi                875 src/arpack.c   	NNEW(stiini,double,6*mi[0]*ne0);
mi                876 src/arpack.c   	NNEW(enerini,double,mi[0]*ne0);}
mi                890 src/arpack.c   	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                910 src/arpack.c   	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                940 src/arpack.c   	    mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                947 src/arpack.c   	for(k=0;k<*nstate_*mi[0]*(ne0+maxprevcontel);++k){
mi                965 src/arpack.c   	      RENEW(ener,double,mi[0]**ne*2);
mi                971 src/arpack.c   	      RENEW(ielorien,ITG,mi[2]**ne);
mi                973 src/arpack.c   	  RENEW(ielmat,ITG,mi[2]**ne);
mi               1003 src/arpack.c     for(k=0;k<6*mi[0]*ne0;k++){eme[k]=0.;}
mi                 59 src/arpackbu.c              double *xstate, ITG *npmat_, char *matname, ITG *mi,
mi                 76 src/arpackbu.c     inputformat=0,ngraph=1,mt=mi[1]+1,mass[2]={0,0}, stiffness=1, buckling=0, 
mi                135 src/arpackbu.c   NNEW(xstiff,double,(long long)27*mi[0]**ne);
mi                140 src/arpackbu.c   NNEW(stx,double,6*mi[0]**ne);
mi                153 src/arpackbu.c 	     xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                171 src/arpackbu.c 	     xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                201 src/arpackbu.c 	      xstiff,npmat_,&dtime,matname,mi,
mi                219 src/arpackbu.c 	      xstiff,npmat_,&dtime,matname,mi,
mi                251 src/arpackbu.c 	    mi,sti,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                307 src/arpackbu.c   NNEW(stx,double,6*mi[0]**ne);
mi                313 src/arpackbu.c   NNEW(eei,double,6*mi[0]**ne);
mi                315 src/arpackbu.c       NNEW(stiini,double,6*mi[0]**ne);
mi                316 src/arpackbu.c       NNEW(enerini,double,mi[0]**ne);}
mi                328 src/arpackbu.c 	    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                346 src/arpackbu.c 	    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                371 src/arpackbu.c 	    mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                404 src/arpackbu.c 	      xstiff,npmat_,&dtime,matname,mi,
mi                422 src/arpackbu.c 	      xstiff,npmat_,&dtime,matname,mi,
mi                635 src/arpackbu.c   NNEW(stx,double,6*mi[0]**ne);
mi                644 src/arpackbu.c     for(k=0;k<6*mi[0]**ne;k++){eme[k]=0.;}
mi                663 src/arpackbu.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                682 src/arpackbu.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                703 src/arpackbu.c 	    mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                 62 src/arpackcs.c              double **xstatep, ITG *npmat_, char *matname, ITG *mi,
mi                146 src/arpackcs.c   mt=mi[1]+1;
mi                207 src/arpackcs.c 		  RENEW(ener,double,mi[0]*(*ne+*nslavs)*2);
mi                213 src/arpackcs.c 		  RENEW(ielorien,ITG,mi[2]*(*ne+*nslavs));
mi                214 src/arpackcs.c 		  for(k=mi[2]**ne;k<mi[2]*(*ne+*nslavs);k++) ielorien[k]=0;
mi                217 src/arpackcs.c 	      RENEW(ielmat,ITG,mi[2]*(*ne+*nslavs));
mi                218 src/arpackcs.c 	      for(k=mi[2]**ne;k<mi[2]*(*ne+*nslavs);k++) ielmat[k]=1;
mi                221 src/arpackcs.c 		  RENEW(xstate,double,*nstate_*mi[0]*(*ne+*nslavs));
mi                222 src/arpackcs.c 		  for(k=*nstate_*mi[0]**ne;k<*nstate_*mi[0]*(*ne+*nslavs);k++){
mi                253 src/arpackcs.c 			 imastop,mi,ipe,ime,tietol,&iflagact,
mi                264 src/arpackcs.c 		  RENEW(ener,double,mi[0]*(*ne+*nintpoint)*2);
mi                270 src/arpackcs.c 		  RENEW(ielorien,ITG,mi[2]*(*ne+*nintpoint));
mi                271 src/arpackcs.c 		  for(k=mi[2]**ne;k<mi[2]*(*ne+*nintpoint);k++) ielorien[k]=0;
mi                273 src/arpackcs.c 	      RENEW(ielmat,ITG,mi[2]*(*ne+*nintpoint));
mi                274 src/arpackcs.c 	      for(k=mi[2]**ne;k<mi[2]*(*ne+*nintpoint);k++) ielmat[k]=1;
mi                284 src/arpackcs.c 		  iperturb,ikboun,nboun,mi,imastop,nslavnode,islavnode,islavsurf,
mi                297 src/arpackcs.c 			    *nstate_*mi[0]*(ne0+maxprevcontel));
mi                298 src/arpackcs.c 		      for(k=*nstate_*mi[0]*ne0;
mi                299 src/arpackcs.c 			  k<*nstate_*mi[0]*(ne0+maxprevcontel);++k){
mi                304 src/arpackcs.c 		  RENEW(xstate,double,*nstate_*mi[0]*(ne0+*nintpoint));
mi                305 src/arpackcs.c 		  for(k=*nstate_*mi[0]*ne0;k<*nstate_*mi[0]*(ne0+*nintpoint);k++){
mi                315 src/arpackcs.c 			       &ne0,mi,xstate,pslavsurf,nstate_,
mi                327 src/arpackcs.c 		  RENEW(xstateini,double,*nstate_*mi[0]*(ne0+*nintpoint));
mi                328 src/arpackcs.c 		  for(k=0;k<*nstate_*mi[0]*(ne0+*nintpoint);++k){
mi                340 src/arpackcs.c 		       neq,nzs,nmethod,ithermal,iperturb,&mass,mi,ics,cs,
mi                349 src/arpackcs.c       NNEW(xstateini,double,*nstate_*mi[0]*(ne0+*nslavs));
mi                350 src/arpackcs.c       for(k=0;k<*nstate_*mi[0]*(ne0+*nslavs);++k){
mi                361 src/arpackcs.c   NNEW(xstiff,double,(long long)27*mi[0]**ne);
mi                367 src/arpackcs.c   NNEW(stx,double,6*mi[0]**ne);
mi                378 src/arpackcs.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                396 src/arpackcs.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                502 src/arpackcs.c 		xstiff,npmat_,&dtime,matname,mi,
mi                519 src/arpackcs.c 		xstiff,npmat_,&dtime,matname,mi,
mi                542 src/arpackcs.c 		matname,mi,ics,cs,&nm,ncmat_,labmpc,&mass,&stiffness,&buckling,
mi                568 src/arpackcs.c 	      mi,sti,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                610 src/arpackcs.c 			ntrans,inotr,trab,co,nk,nactdof,jobnamec,mi,ipkon,
mi               1021 src/arpackcs.c 	  FORTRAN(effectivemodalmass,(neq,nactdof,mi,adb,aub,jq,irow,&nev,z,co,nk));
mi               1042 src/arpackcs.c       NNEW(stx,double,2*6*mi[0]**ne);
mi               1075 src/arpackcs.c 	  NNEW(stxt,double,2*6*mi[0]**ne*ngraph);
mi               1082 src/arpackcs.c       NNEW(ielmatt,ITG,mi[2]**ne*ngraph);
mi               1094 src/arpackcs.c       for(l=0;l<*ne;l++){ielmatt[mi[2]*l]=ielmat[mi[2]*l];}
mi               1100 src/arpackcs.c       FORTRAN(rectcyl,(cot,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filab,&imag,mi,emn));
mi               1121 src/arpackcs.c 			  ielmatt[mi[2]*(l+i**ne)]=ielmat[mi[2]*l];
mi               1135 src/arpackcs.c 		       &imag,mi,emn));
mi               1236 src/arpackcs.c 	  NNEW(eei,double,6*mi[0]*ne0);
mi               1238 src/arpackcs.c 	      NNEW(stiini,double,6*mi[0]*ne0);
mi               1239 src/arpackcs.c 	      NNEW(enerini,double,mi[0]*ne0);}
mi               1246 src/arpackcs.c 	      for(i=0;i<6*mi[0]*ne0;i++){eme[i]=0.;}
mi               1249 src/arpackcs.c 	      else {kk=*nk;kkv=mt**nk;kk6=6**nk;kkx=6*mi[0]**ne;
mi               1308 src/arpackcs.c 		    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               1327 src/arpackcs.c 		    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               1740 src/arpackcs.c     FORTRAN(rectcyl,(co,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filab,&imag,mi,emn));
mi               1760 src/arpackcs.c       for(l=0;l<6*mi[0]**ne;l++){stxt[l]=stx[l];}
mi               1761 src/arpackcs.c       for(l=0;l<6*mi[0]**ne;l++){stxt[l+6*mi[0]**ne*ngraph]=stx[l+6*mi[0]**ne];}}
mi               2122 src/arpackcs.c 		     &imag,mi,emnt));
mi               2126 src/arpackcs.c           t,filab,&imag,mi,&emnt[6**nk*ngraph]));
mi               2228 src/arpackcs.c 	    mi,stxt,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,&net,
mi               2235 src/arpackcs.c 	for(k=0;k<*nstate_*mi[0]*(ne0+maxprevcontel);++k){
mi               2287 src/arpackcs.c 	      RENEW(ener,double,mi[0]**ne*2);
mi               2293 src/arpackcs.c 	      RENEW(ielorien,ITG,mi[2]**ne);
mi               2295 src/arpackcs.c 	  RENEW(ielmat,ITG,mi[2]**ne);
mi               2325 src/arpackcs.c   for(i=0;i<6*mi[0]*ne0;i++){eme[i]=0.;}
mi                 32 src/biosav.c                   double *qfx,double *h0,ITG *mi,ITG *inomat,ITG *nk){
mi                157 src/biosav.c       h01=h0;mi1=mi;
mi                 39 src/calcresidual.c 	double* f_cs, ITG *mi,ITG *nzs,ITG *nasym,ITG *idamping,
mi                 42 src/calcresidual.c     ITG j,k,mt=mi[1]+1;
mi                 39 src/calcresidual_em.c 	double* f_cs, ITG *mi,ITG *nzs,ITG *nasym,ITG *ithermal){
mi                 41 src/calcresidual_em.c     ITG j,k,mt=mi[1]+1,jstart;
mi                 83 src/ccx_2.8.c    iplas=0,npmat_=0,mi[3]={0,3,1},ntrans,mpcend=-1,namtot_=0,iumat=0,mpcmult,
mi                168 src/ccx_2.8.c     &nmat_,&ntmat_,&npmat_,&norien_,&nam_,&nprint_,mi,&ntrans_,
mi                174 src/ccx_2.8.c  SFREE(set);SFREE(meminset);SFREE(rmeminset);mt=mi[1]+1;
mi                232 src/ccx_2.8.c  	NNEW(knor,ITG,24*(ne1d+ne2d)*(mi[2]+1));
mi                234 src/ccx_2.8.c  	NNEW(thicke,double,mi[2]*nkon_);
mi                346 src/ccx_2.8.c  	NNEW(xstate,double,nstate_*mi[0]*(ne+nslavs));
mi                347 src/ccx_2.8.c  	nxstate=nstate_*mi[0]*(ne+nslavs);
mi                349 src/ccx_2.8.c  	NNEW(xstate,double,nstate_*mi[0]*(ne+nintpoint));
mi                350 src/ccx_2.8.c  	nxstate=nstate_*mi[0]*(ne+nintpoint);
mi                358 src/ccx_2.8.c  	NNEW(ielorien,ITG,mi[2]*ne_);
mi                396 src/ccx_2.8.c      if((istep==0)||((irstrt<0)&&(iprestr>0)))NNEW(prestr,double,6*mi[0]*ne_);
mi                401 src/ccx_2.8.c      NNEW(ielmat,ITG,mi[2]*ne_);
mi                519 src/ccx_2.8.c      NNEW(sti,double,6*mi[0]*ne);
mi                520 src/ccx_2.8.c      NNEW(eme,double,6*mi[0]*ne);
mi                521 src/ccx_2.8.c      if(nener==1)NNEW(ener,double,mi[0]*ne*2);
mi                562 src/ccx_2.8.c  	    plkcon,nplkcon,&iplas,&npmat_,mi,&nk_,trab,inotr,&ntrans,
mi                598 src/ccx_2.8.c         ithermal, co, vold,&icfd,&nmpc_,mi,&nk,&istep,ikboun,&nboun,
mi                606 src/ccx_2.8.c      NNEW(sti,double,6*mi[0]*ne);
mi                610 src/ccx_2.8.c      NNEW(eme,double,6*mi[0]*ne);
mi                615 src/ccx_2.8.c  	RENEW(prestr,double,6*mi[0]*ne);
mi                617 src/ccx_2.8.c  	    for(j=0;j<mi[0];j++){
mi                619 src/ccx_2.8.c  		    sti[6*mi[0]*i+6*j+k]=prestr[6*mi[0]*i+6*j+k];
mi                625 src/ccx_2.8.c  	RENEW(prestr,double,6*mi[0]*ne);
mi                627 src/ccx_2.8.c  	    for(j=0;j<mi[0];j++){
mi                629 src/ccx_2.8.c  		    eme[6*mi[0]*i+6*j+k]=prestr[6*mi[0]*i+6*j+k];
mi                684 src/ccx_2.8.c  	RENEW(thicke,double,mi[2]*nkon);
mi                717 src/ccx_2.8.c      RENEW(ielmat,ITG,mi[2]*ne);
mi                722 src/ccx_2.8.c  	RENEW(xstate,double,nstate_*mi[0]*(ne+nslavs));
mi                723 src/ccx_2.8.c  	for(i=nxstate;i<nstate_*mi[0]*(ne+nslavs);i++){xstate[i]=0.;}
mi                725 src/ccx_2.8.c  	RENEW(xstate,double,nstate_*mi[0]*(ne+nintpoint));
mi                726 src/ccx_2.8.c  	for(i=nxstate;i<nstate_*mi[0]*(ne+nintpoint);i++){xstate[i]=0.;}
mi                742 src/ccx_2.8.c        RENEW(ielorien,ITG,mi[2]*ne);
mi                807 src/ccx_2.8.c                        mi));
mi                882 src/ccx_2.8.c      NNEW(ener,double,mi[0]*ne*2);
mi                926 src/ccx_2.8.c        RENEW(sti,double,6*mi[0]*ne);
mi                927 src/ccx_2.8.c        RENEW(eme,double,6*mi[0]*ne);
mi                928 src/ccx_2.8.c        if(iprestr>0) RENEW(prestr,double,6*mi[0]*ne);
mi                939 src/ccx_2.8.c        if(nener==1)RENEW(ener,double,mi[0]*ne*2);
mi                940 src/ccx_2.8.c        if(norien>0)RENEW(ielorien,ITG,mi[2]*ne);
mi                941 src/ccx_2.8.c        RENEW(ielmat,ITG,mi[2]*ne);
mi                942 src/ccx_2.8.c        for(i=mi[2]*ne0;i<mi[2]*ne;i++)ielmat[i]=1;
mi               1000 src/ccx_2.8.c                     ikboun,ilboun,iperturb,mi,&mortar,typeboun,labmpc);
mi               1013 src/ccx_2.8.c  		 ics,cs,labmpc,&mcs,mi,&mortar);
mi               1041 src/ccx_2.8.c  	     &isolver,mi,&ncmat_,&nstate_,cs,&mcs,&nkon,ener,
mi               1068 src/ccx_2.8.c  	     &xstate,&npmat_,&istep,&ttime,matname,qaold,mi,
mi               1104 src/ccx_2.8.c  	     &xstate,&npmat_,matname,mi,&ncmat_,&nstate_,&ener,jobnamec,
mi               1136 src/ccx_2.8.c  	     &xstate,&npmat_,matname,mi,ics,cs,&mpcend,&ncmat_,
mi               1166 src/ccx_2.8.c  	     xstate,&npmat_,matname,mi,&ncmat_,&nstate_,ener,output,
mi               1198 src/ccx_2.8.c              mi,&ncmat_,&nstate_,&ener,jobnamec,&ttime,set,&nset,
mi               1228 src/ccx_2.8.c              mi,&ncmat_,&nstate_,&ener,jobnamec,&ttime,set,&nset,
mi               1251 src/ccx_2.8.c              mi,&ncmat_,&nstate_,&ener,jobnamec,&ttime,set,&nset,
mi               1276 src/ccx_2.8.c  	     &xstate,&npmat_,&istep,&ttime,matname,qaold,mi,
mi               1364 src/ccx_2.8.c        RENEW(sti,double,6*mi[0]*ne);
mi               1365 src/ccx_2.8.c        RENEW(eme,double,6*mi[0]*ne);
mi               1366 src/ccx_2.8.c        if(iprestr>0) RENEW(prestr,double,6*mi[0]*ne);
mi               1369 src/ccx_2.8.c        if(nener==1)RENEW(ener,double,mi[0]*ne*2);
mi               1370 src/ccx_2.8.c        if(norien>0)RENEW(ielorien,ITG,mi[2]*ne);
mi               1371 src/ccx_2.8.c        RENEW(ielmat,ITG,mi[2]*ne);
mi               1394 src/ccx_2.8.c          mi,&ntrans,&ncs_,&namtot_,&ncmat_,&mpcend,&maxlenmpc,&ne1d,
mi                 38 src/checkconvergence.c           ITG *iinc, ITG *iperturb, double *ener, ITG *mi, char *output,
mi                 57 src/checkconvergence.c         i,j,mt=mi[1]+1,iexceed;
mi                208 src/checkconvergence.c                       nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
mi                217 src/checkconvergence.c                         ipneigh,neigh,mi,sti,vr,vi,stnr,stni,vmax,stnmax,
mi                330 src/checkconvergence.c 		ipkon,inum,kon,lakon,ne,mi,orab,ielorien,co,itg,ntg,vold,
mi                339 src/checkconvergence.c                         ipneigh,neigh,mi,sti,vr,vi,stnr,stni,vmax,stnmax,
mi                462 src/checkconvergence.c                        sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
mi                471 src/checkconvergence.c                         ipneigh,neigh,mi,sti,vr,vi,stnr,stni,vmax,stnmax,
mi                513 src/checkconvergence.c                            nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
mi                522 src/checkconvergence.c                         ipneigh,neigh,mi,sti,vr,vi,stnr,stni,vmax,stnmax,
mi                540 src/checkconvergence.c                            nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
mi                549 src/checkconvergence.c                         ipneigh,neigh,mi,sti,vr,vi,stnr,stni,vmax,stnmax,
mi                609 src/checkconvergence.c                            nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
mi                618 src/checkconvergence.c                         ipneigh,neigh,mi,sti,vr,vi,stnr,stni,vmax,stnmax,
mi                633 src/checkconvergence.c                            nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
mi                642 src/checkconvergence.c                         ipneigh,neigh,mi,sti,vr,vi,stnr,stni,vmax,stnmax,
mi                 50 src/compfluid.c     ITG *mi, ITG *ncmat_, double *physcon, ITG *istep, ITG *iinc,
mi                210 src/compfluid.c 	    isolver,&neq,ipointer,&nzs,ipnei,neiel,mi);
mi                268 src/compfluid.c 		     ithermal,mi));
mi                273 src/compfluid.c 		     ithermal,mi,ielfa));
mi                278 src/compfluid.c 		    ithermal,mi,ielfa,umfa));
mi                283 src/compfluid.c 		    ithermal,mi,umel));
mi                312 src/compfluid.c 	     co,v,itg,ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi                458 src/compfluid.c 	     co,v,itg,ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi                486 src/compfluid.c 			     ithermal,mi));
mi                491 src/compfluid.c 			     ithermal,mi,ielfa));
mi                496 src/compfluid.c 			     ithermal,mi,ielfa,umfa));
mi                501 src/compfluid.c 			    ithermal,mi,umel));
mi                506 src/compfluid.c 			    mi,ielfa,hcfa));
mi                512 src/compfluid.c 			    mi,cpel,physcon));
mi                518 src/compfluid.c 			    mi,ielfa,cpfa,physcon));
mi                975 src/compfluid.c 	      FORTRAN(calchcel,(vel,cocon,ncocon,ielmatf,ntmat_,mi,
mi                984 src/compfluid.c 					  gradtel,nef,&isti,&iqfx,mi));
mi               1003 src/compfluid.c 		      &nfield,nk,nef,mi,&ndim,orab,ielorienf,co,&iorienglob,
mi               1022 src/compfluid.c 		      &nfield,nk,nef,mi,&ndim,orab,ielorienf,co,&iorienglob,
mi               1038 src/compfluid.c                                  xstate,ener,mi,&nstate_,ithermal,co,kon,qfx,
mi               1047 src/compfluid.c 			    matname,filab,inum,ntrans,inotr,trab,mi,istep,
mi                 59 src/complexfreq.c                double *xstate, ITG *npmat_, char *matname, ITG *mi,
mi                 85 src/complexfreq.c     *ialset=*ialsetp,mt=mi[1]+1,kmin,kmax,i1,
mi                139 src/complexfreq.c       kmin=0;kmax=mi[1];if(kmax>2)kmax=2;
mi                144 src/complexfreq.c   NNEW(xstiff,double,(long long)27*mi[0]**ne);
mi                513 src/complexfreq.c 	      xstiff,npmat_,&dtime,matname,mi,ncmat_,
mi                577 src/complexfreq.c 			 ipompc,nodempc,mi,coefmpc,jobnamef,
mi               1102 src/complexfreq.c   NNEW(stx,double,2*6*mi[0]**ne);
mi               1131 src/complexfreq.c     NNEW(stxt,double,2*6*mi[0]**ne*ngraph);
mi               1140 src/complexfreq.c   NNEW(ielmatt,ITG,mi[2]**ne*ngraph);
mi               1152 src/complexfreq.c   for(l=0;l<*ne;l++){ielmatt[mi[2]*l]=ielmat[mi[2]*l];}
mi               1160 src/complexfreq.c     FORTRAN(rectcyl,(cot,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filab,&imag,mi,emn));
mi               1181 src/complexfreq.c 	      ielmatt[mi[2]*(l+i**ne)]=ielmat[mi[2]*l];
mi               1195 src/complexfreq.c 		     &imag,mi,emnt));
mi               1280 src/complexfreq.c     NNEW(eei,double,6*mi[0]**ne);
mi               1282 src/complexfreq.c 	NNEW(stiini,double,6*mi[0]**ne);
mi               1283 src/complexfreq.c 	NNEW(enerini,double,mi[0]**ne);}
mi               1289 src/complexfreq.c       for(i=0;i<6*mi[0]**ne;i++){eme[i]=0.;}
mi               1292 src/complexfreq.c       else {kk=*nk;kkv=mt**nk;kk6=6**nk;kkx=6*mi[0]**ne;
mi               1351 src/complexfreq.c 	    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               1370 src/complexfreq.c 	    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               1392 src/complexfreq.c       FORTRAN(rectcyl,(co,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filab,&imag,mi,emn));
mi               1415 src/complexfreq.c       for(l=0;l<6*mi[0]**ne;l++){stxt[l]=stx[l];}
mi               1416 src/complexfreq.c       for(l=0;l<6*mi[0]**ne;l++){stxt[l+6*mi[0]**ne*ngraph]=stx[l+6*mi[0]**ne];}}
mi               1721 src/complexfreq.c 		       &imag,mi,emnt));
mi               1725 src/complexfreq.c                          cs,&nkt,&icntrl,t,filab,&imag,mi,&emnt[6**nk*ngraph]));
mi               1784 src/complexfreq.c 	    mi,stxt,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,&net,
mi                 33 src/contact.c               ITG *iperturb, ITG *ikboun, ITG *nboun, ITG *mi,
mi                 63 src/contact.c  			cg,straight,mi,imastnode,nmastnode,xmastnor,
mi                 90 src/contact.c            iinc,iit,ncmat_,ntmat_,nmethod,mi,
mi                100 src/contact.c            ielmat,elcon,istep,iinc,iit,ncmat_,ntmat_,mi,imastop,islavsurf,
mi                 32 src/dfdbj.c               ITG *nactcont,ITG *nactcont_,ITG *mi, ITG *cyclicsymmetry,
mi                 36 src/dfdbj.c          jdbcontcol,i1,i3,i4,mt=mi[1]+1,im,*ikactcont=*ikactcontp,
mi                 59 src/dyna.c                    double **xstatep, ITG *npmat_, char *matname, ITG *mi,
mi                 91 src/dyna.c         *itiefac=NULL,*islavsurf=NULL,*islavnode=NULL,mt=mi[1]+1,
mi                169 src/dyna.c           kmin=0;kmax=mi[1];if(kmax>2)kmax=2;
mi                235 src/dyna.c     		       ialset,nactdof,ithermal,mi,imdnode,&nmdnode,
mi                254 src/dyna.c                           imddof,&nmddof,nactdof,mi,imdmpc,&nmdmpc,imdboun,&nmdboun,
mi                261 src/dyna.c                        nactdof,mi,imdmpc,&nmdmpc,imdboun,&nmdboun,
mi                279 src/dyna.c                        nactdof,mi,imdmpc,&nmdmpc,imdboun,&nmdboun,
mi                453 src/dyna.c           RENEW(ielmat,ITG,mi[2]**ne*nsectors);
mi                454 src/dyna.c           if(*norien>0) RENEW(ielorien,ITG,mi[2]**ne*nsectors);
mi                554 src/dyna.c             xstate,npmat_,matname,mi,ics,cs,mpcend,ncmat_,
mi                574 src/dyna.c           RENEW(eme,double,6*mi[0]**ne);
mi                575 src/dyna.c           RENEW(sti,double,6*mi[0]**ne);
mi                578 src/dyna.c           if(*nener==1) RENEW(ener,double,mi[0]**ne*2);
mi                661 src/dyna.c     	      xstiff,npmat_,&dtime,matname,mi,ncmat_,
mi                721 src/dyna.c     	RENEW(ener,double,mi[0]*(*ne+*nslavs)*2);
mi                729 src/dyna.c     	  RENEW(ielorien,ITG,mi[2]*(*ne+*nslavs));
mi                730 src/dyna.c     	  for(k=mi[2]**ne;k<mi[2]*(*ne+*nslavs);k++) ielorien[k]=0;
mi                732 src/dyna.c           RENEW(ielmat,ITG,mi[2]*(*ne+*nslavs));
mi                733 src/dyna.c           for(k=mi[2]**ne;k<mi[2]*(*ne+*nslavs);k++) ielmat[k]=1;
mi                740 src/dyna.c     	  RENEW(xstate,double,*nstate_*mi[0]*(*ne+*nslavs));
mi                741 src/dyna.c     	  for(k=*nstate_*mi[0]**ne;k<*nstate_*mi[0]*(*ne+*nslavs);k++){
mi                746 src/dyna.c     	  NNEW(xstateini,double,*nstate_*mi[0]*(*ne+*nslavs));
mi                747 src/dyna.c     	  for(k=0;k<*nstate_*mi[0]*(*ne+*nslavs);++k){
mi                906 src/dyna.c     	  nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat));
mi                909 src/dyna.c           NNEW(qfx,double,3*mi[0]**ne);}
mi                916 src/dyna.c       NNEW(eei,double,6*mi[0]**ne);
mi                918 src/dyna.c         NNEW(stiini,double,6*mi[0]**ne);
mi                919 src/dyna.c         NNEW(enerini,double,mi[0]**ne);}
mi                951 src/dyna.c     	      nelemload,sideload,mi,
mi                970 src/dyna.c            physcon,ibody,xbodyold,&reltime,veold,matname,mi,ikactmech,
mi               1050 src/dyna.c                   ikboun,nboun,mi,imastop,nslavnode,islavnode,islavsurf,
mi               1061 src/dyna.c     	  imat=ielmat[mi[2]*i];
mi               1077 src/dyna.c     	      plicon,nplicon,npmat_,&senergy,&iener,cstr,mi,
mi               1186 src/dyna.c       if((intpointvar==1)) NNEW(stx,double,6*mi[0]**ne);
mi               1200 src/dyna.c           memcpy(&enerini[0],&ener[0],sizeof(double)*mi[0]*ne0);
mi               1202 src/dyna.c     	  memcpy(&stiini[0],&sti[0],sizeof(double)*6*mi[0]*ne0);
mi               1218 src/dyna.c     	    for(k=0;k<*nstate_*mi[0]*(ne0+*nslavs);++k){
mi               1273 src/dyna.c     	      nelemload,sideload,mi,
mi               1290 src/dyna.c     		    xbodyold,&reltime,veold,matname,mi,ikactmech,&nactmech,
mi               1302 src/dyna.c     		    xbodyold,&reltime,veold,matname,mi,ikactmech,&nactmech,
mi               1389 src/dyna.c     		nelemload,sideload,mi,
mi               1406 src/dyna.c     		    xbodyold,&reltime,veold,matname,mi,ikactmech,&nactmech,
mi               1418 src/dyna.c     		    xbodyold,&reltime,veold,matname,mi,ikactmech,&nactmech,
mi               1689 src/dyna.c     			 &iit,&idiscon,&ncont,trab,ntrans,ithermal,mi));
mi               1696 src/dyna.c     	      b,bp,veold,&dtime,mi,imdnode,&nmdnode,imdboun,&nmdboun,
mi               1713 src/dyna.c                   nplkcon,xstate,npmat_,matname,mi,ncmat_,nstate_,ener,jobnamec,
mi               1787 src/dyna.c     		xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1809 src/dyna.c     	  for(k=0;k<6*mi[0]*ne0;++k){
mi               1826 src/dyna.c     	    mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi               1887 src/dyna.c     			 &iit,&idiscon,&ncont,trab,ntrans,ithermal,mi));
mi               1895 src/dyna.c     	      b,bp,veold,&dtime,mi,imdnode,&nmdnode,imdboun,&nmdboun,
mi               1961 src/dyna.c     	RENEW(ener,double,mi[0]**ne*2);
mi               1967 src/dyna.c     	  RENEW(ielorien,ITG,mi[2]**ne);
mi               1969 src/dyna.c           RENEW(ielmat,ITG,mi[2]**ne);
mi               2015 src/dyna.c           RENEW(ielmat,ITG,mi[2]**ne);
mi               2016 src/dyna.c           if(*norien>0) RENEW(ielorien,ITG,mi[2]**ne);
mi               2048 src/dyna.c           RENEW(eme,double,6*mi[0]**ne);
mi               2049 src/dyna.c           RENEW(sti,double,6*mi[0]**ne);
mi               2050 src/dyna.c           if(*nener==1)RENEW(ener,double,mi[0]**ne*2);
mi                 60 src/dynacont.c 	      double *xstate, ITG *npmat_, char *matname, ITG *mi,
mi                104 src/dynacont.c       i1,icutb=0,iconvergence=0,idivergence=0,mt=mi[1]+1,
mi                127 src/dynacont.c       kmin=0;kmax=mi[1];if(kmax>2)kmax=2;
mi                163 src/dynacont.c           iperturb,ikboun,nboun,mi,imastop,nslavnode,islavnode,islavsurf,
mi                172 src/dynacont.c       imat=ielmat[mi[2]*i];
mi                189 src/dynacont.c 			  &senergy,&iener,cstr,mi,
mi                268 src/dynacont.c 	for(k=0;k<*nstate_*mi[0]*(*ne0+*nslavs);++k){
mi                320 src/dynacont.c 		nelemload,sideload,mi,
mi                337 src/dynacont.c 		   xbodyold,reltime,veold,matname,mi,ikactmech,nactmech,
mi                349 src/dynacont.c 		   xbodyold,reltime,veold,matname,mi,ikactmech,nactmech,
mi                682 src/dynacont.c 			 iit,&idiscon,ncont,trab,ntrans,ithermal,mi));
mi                689 src/dynacont.c 	      b,bp,veold,dtime,mi,imdnode,nmdnode,imdboun,nmdboun,
mi                716 src/dynacont.c 	      iperturb,ikboun,nboun,mi,imastop,nslavnode,islavnode,islavsurf,
mi                723 src/dynacont.c 	imat=ielmat[mi[2]*i];
mi                740 src/dynacont.c 			    &senergy,&iener,cstr,mi,
mi                747 src/dynacont.c 		nmethod,mi,ne0,nstate_,xstateini,xstate,reltime,&nasym));
mi                751 src/dynacont.c 	      fnl,nev,&ikactcont,&ilactcont,nactcont,nactcont_,mi,
mi                 64 src/electromagnetics.c              char *matname, double *qaold, ITG *mi,
mi                 98 src/electromagnetics.c       mt=mi[1]+1,*nactdofinv=NULL, inode,idir,*islavsurf=NULL,
mi                181 src/electromagnetics.c   FORTRAN(gennactdofinv,(nactdof,nactdofinv,nk,mi,nodorig,
mi                187 src/electromagnetics.c   NNEW(xstiff,double,(long long)27*mi[0]**ne);
mi                241 src/electromagnetics.c                        vold,set,nshcon,rhcon,nrhcon,mi,nmpc,nodempc,
mi                248 src/electromagnetics.c                iendset,&kontri,&ntri,&co,&vold,&ntrit,inocs,mi);
mi                288 src/electromagnetics.c   if(*ithermal>1){NNEW(qfx,double,3*mi[0]**ne);}
mi                367 src/electromagnetics.c       NNEW(qfx,double,3*mi[0]**ne);
mi                382 src/electromagnetics.c 	      co,vold,itg,&ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi                401 src/electromagnetics.c 	     &adb,&aub,&ithermalact,iperturb,mass,mi,iexpl,&mortar,
mi                409 src/electromagnetics.c   FORTRAN(gennactdofinv,(nactdof,nactdofinv,nk,mi,nodorig,
mi                426 src/electromagnetics.c 	  xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                452 src/electromagnetics.c 		    xstiff,npmat_,&dtime,matname,mi,
mi                471 src/electromagnetics.c 	  mi,sti,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                538 src/electromagnetics.c 	  xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                579 src/electromagnetics.c 	  nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat));
mi                586 src/electromagnetics.c 	     nstate_,istep,&iinc,iperturb,ener,mi,output,&ithermalact,qfn,
mi                597 src/electromagnetics.c 	  mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                615 src/electromagnetics.c 			    elcon,ncmat_,ntmat_,mi,&ne2));
mi                619 src/electromagnetics.c   biosav(ipkon,kon,lakon,ne,co,qfx,h0,mi,inomat,nk);
mi                667 src/electromagnetics.c        ithermal,co,vold,&icfd,nmpc_,mi,nk,istep,ikboun,nboun,
mi                739 src/electromagnetics.c 	     &adb,&aub,ithermal,iperturb,mass,mi,ielmat,elcon,
mi                858 src/electromagnetics.c 	      co,vold,itg,&ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi                874 src/electromagnetics.c        ctrl,xloadold,&reltime,nmethod,set,mi,istartset,iendset,ialset,nset,
mi                885 src/electromagnetics.c 		 &iinc,&idiscon,vold,nactdof,mi);
mi                905 src/electromagnetics.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                966 src/electromagnetics.c 	       co,vold,itg,&ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi                982 src/electromagnetics.c 	        ctrl,xloadold,&reltime,nmethod,set,mi,istartset,iendset,ialset,
mi                993 src/electromagnetics.c 		  mi,ne,sti,ielmat,nelemload,sideload,xloadact,nload,nload_,
mi               1017 src/electromagnetics.c 		  xstiff,npmat_,&dtime,matname,mi,
mi               1033 src/electromagnetics.c 	    islavnode,nslavnode,&mortar,ntie,f_cm,f_cs,mi,
mi               1051 src/electromagnetics.c 		  mi,sti,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi               1182 src/electromagnetics.c 		  xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1217 src/electromagnetics.c 	      islavnode,nslavnode,&mortar,ntie,f_cm,f_cs,mi,
mi               1269 src/electromagnetics.c 	    xstaten,nstate_,istep,&iinc,iperturb,ener,mi,output,
mi               1342 src/electromagnetics.c 		  xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               1362 src/electromagnetics.c 		 nstate_,istep,&iinc,iperturb,ener,mi,output,ithermal,qfn,
mi               1374 src/electromagnetics.c 		  mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi               1415 src/electromagnetics.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               1435 src/electromagnetics.c 		 nstate_,istep,&iinc,iperturb,ener,mi,output,ithermal,qfn,
mi               1446 src/electromagnetics.c 	      mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                 39 src/exo.c      	 ITG *neigh,ITG *mi,double *stx,double *vr,double *vi,
mi                 67 src/exo.c        ITG ncompvector=3,ifieldvector[3]={1,1,1},icompvector[3]={0,1,2},nfieldvector1[2]={3,0},nfieldvector0[2]={mi[1]+1,0};
mi                 70 src/exo.c        ITG ncompvectph=6,ifieldvectph[6]={1,1,1,2,2,2},icompvectph[6]={1,2,3,1,2,3},nfieldvectph[2]={mi[1]+1,mi[1]+1};
mi                182 src/exo.c      	  for(k=0;k<mi[2];k++){
mi                183 src/exo.c      	    if(ielmat[i*mi[2]+k]==0) break;
mi                262 src/exo.c            strcpy1(material,&matname[80*(ielmat[i*mi[2]]-1)],5);
mi                273 src/exo.c      	  for(k=0;k<mi[2];k++){
mi                274 src/exo.c      	    if(ielmat[i*mi[2]+k]==0) break;
mi                397 src/exo.c      	    for(k=0;k<mi[2];k++){
mi                398 src/exo.c      	      if(ielmat[i*mi[2]+k]==0) break;
mi                430 src/exo.c      	    for(l=0;l<mi[2];l++){
mi                431 src/exo.c      	      if(ielmat[i*mi[2]+l]==0) break;
mi                602 src/exo.c      		  trab,co,istartset,iendset,ialset,mi,ngraph,exoid,
mi                619 src/exo.c      	  exovector(&v[*nk*(mi[1]+1)],&iset,ntrans,filab,&nkcoords,inum,inotr,
mi                620 src/exo.c      		    trab,co,istartset,iendset,ialset,mi,ngraph,exoid,
mi                644 src/exo.c      		  trab,co,istartset,iendset,ialset,mi,ngraph,exoid,
mi                846 src/exo.c      		  trab,co,istartset,iendset,ialset,mi,ngraph,exoid,
mi                863 src/exo.c      	  exovector(&fn[*nk*(mi[1]+1)],&iset,ntrans,filab,&nkcoords,inum,inotr,
mi                864 src/exo.c      		    trab,co,istartset,iendset,ialset,mi,ngraph,exoid,
mi                938 src/exo.c      	    nodal_var_vals[nodes]=stx[6*mi[0]*i+j]; 
mi                968 src/exo.c      	  nodal_var_vals[nodes]=ener[i*mi[0]];
mi               1067 src/exo.c      			 stx,&mi[0]));
mi               1103 src/exo.c      			   &stx[6*mi[0]**ne],&mi[0]));
mi               1127 src/exo.c      				mi,ielmat,thicke,&nterms));
mi               1159 src/exo.c      	  FORTRAN(errorestimator,(&stx[6*mi[0]**ne],stn,ipkon,inum,kon,lakon,nk,ne,
mi               1160 src/exo.c      				  mi,ielmat,thicke,&nterms));
mi               1184 src/exo.c      				mi,ielmat,thicke,&nterms));
mi               1213 src/exo.c      	  FORTRAN(errorestimator,(&qfx[3*mi[0]**ne],qfn,ipkon,inum,kon,lakon,nk,ne,
mi               1214 src/exo.c      				  mi,ielmat,thicke,&nterms));
mi                 28 src/exo.h      	 ITG *neigh,ITG *mi,double *stx,double *vr,double *vi,
mi                 44 src/exo.h                     ITG *istartset,ITG *iendset,ITG *ialset,ITG *mi,ITG *ngraph,
mi                 31 src/exovector.c 	       ITG *mi, ITG *ngraph, int exoid, ITG time_step, 
mi                 65 src/exovector.c 	  nodal_var_vals[m++]=v[(mi[1]+1)*i+j];
mi                 72 src/exovector.c 	    nodal_var_vals[m++]=v[(mi[1]+1)*i+j];
mi                 74 src/exovector.c 	    ii=(mi[1]+1)*i+1;
mi                 75 src/exovector.c 	    jj=(mi[1]+1)*i+2;
mi                 76 src/exovector.c 	    kk=(mi[1]+1)*i+3;
mi                 91 src/exovector.c 	      nodal_var_vals[m++]=v[(mi[1]+1)*i+j];
mi                 94 src/exovector.c 	      ii=(mi[1]+1)*i+1;
mi                 95 src/exovector.c 	      jj=(mi[1]+1)*i+2;
mi                 96 src/exovector.c 	      kk=(mi[1]+1)*i+3;
mi                110 src/exovector.c 		nodal_var_vals[n++]=v[(mi[1]+1)*i+j];
mi                113 src/exovector.c 		ii=(mi[1]+1)*i+1;
mi                114 src/exovector.c 		jj=(mi[1]+1)*i+2;
mi                115 src/exovector.c 		kk=(mi[1]+1)*i+3;
mi                 47 src/expand.c                double *xstate, ITG *npmat_, char *matname, ITG *mi,
mi                 76 src/expand.c           neqh,j1,nodenew,mt=mi[1]+1,istep=1,iinc=1,
mi                112 src/expand.c       NNEW(stx,double,6*mi[0]**ne);
mi                160 src/expand.c   		  FORTRAN(calcmass,(ipkon,lakon,kon,co,mi,&nelem,ne,thicke,
mi                186 src/expand.c   		      FORTRAN(calcmass,(ipkon,lakon,kon,co,mi,&nelem,ne,thicke,
mi                243 src/expand.c       FORTRAN(rectcyl,(co,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filabt,&imag,mi,emn));
mi                264 src/expand.c   			ielmat[mi[2]*(l+i**ne)]=ielmat[mi[2]*l];
mi                280 src/expand.c       FORTRAN(rectcyl,(co,vt,fn,stn,qfn,een,cs,&nkt,&icntrl,t,filabt,&imag,mi,emn));
mi                320 src/expand.c   		nactdof,izdof,nzdof,mi,&iload,iznode,&nznode,nk,
mi                373 src/expand.c   	    FORTRAN(addizdofcload,(nodeforc,ndirforc,nactdof,mi,izdof,
mi                430 src/expand.c   		FORTRAN(addizdofcload,(nodeforc,ndirforc,nactdof,mi,izdof,
mi                463 src/expand.c   	NNEW(eei,double,6*mi[0]**ne);
mi                469 src/expand.c   	    for(i=0;i<6*mi[0]**ne;i++){eme[i]=0.;}
mi                527 src/expand.c   	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                546 src/expand.c   	FORTRAN(rectcylexp,(co,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filabt,&imag,mi,
mi                602 src/expand.c   			    &imag,mi,iznode,&nznode,nsectors,nk,emn));
mi                 35 src/frd.c      	 ITG *neigh,ITG *mi,double *stx,double *vr,double *vi,
mi                 68 src/frd.c            nterms,nout,noutplus,noutmin,mt=mi[1]+1;
mi                 73 src/frd.c            nfieldvector1[2]={3,0},nfieldvector0[2]={mi[1]+1,0},
mi                 80 src/frd.c            nfieldvectph[2]={mi[1]+1,mi[1]+1};
mi                 96 src/frd.c      	ipneigh,neigh,mi,stx,vr,vi,stnr,stni,vmax,stnmax,
mi                297 src/frd.c            imat=ielmat[i*mi[2]];
mi                339 src/frd.c      	  for(k=0;k<mi[2];k++){
mi                340 src/frd.c      	    if(ielmat[i*mi[2]+k]==0) break;
mi                713 src/frd.c      	      trab,co,istartset,iendset,ialset,mi,ngraph,f1,output,m3);
mi                732 src/frd.c      		trab,co,istartset,iendset,ialset,mi,ngraph,f1,output,m3);
mi                755 src/frd.c      	      trab,co,istartset,iendset,ialset,mi,ngraph,f1,output,m3);
mi               1023 src/frd.c      	      trab,co,istartset,iendset,ialset,mi,ngraph,f1,output,m3);
mi               1043 src/frd.c      		trab,co,istartset,iendset,ialset,mi,ngraph,f1,output,m3);
mi               1120 src/frd.c      	  for(j=0;j<6;j++)fprintf(f1,"%12.5E",(float)stx[6*mi[0]*i+j]);
mi               1124 src/frd.c      	      ifl=(float)stx[6*mi[0]*i+j];
mi               1205 src/frd.c      	  fprintf(f1,"%3s%10" ITGFORMAT "%12.5E\n",m1,nodes,(float)ener[i*mi[0]]);
mi               1208 src/frd.c      	  ifl=(float)ener[i*mi[0]];
mi               1324 src/frd.c      		    stx,&mi[0]));
mi               1357 src/frd.c      		      &stx[6*mi[0]**ne],&mi[0]));
mi               1383 src/frd.c      			    mi,ielmat,thicke,&nterms));
mi               1415 src/frd.c            FORTRAN(errorestimator,(&stx[6*mi[0]**ne],stn,ipkon,inum,kon,lakon,nk,ne,
mi               1416 src/frd.c      			      mi,ielmat,thicke,&nterms));
mi               1442 src/frd.c      			    mi,ielmat,thicke,&nterms));
mi               1473 src/frd.c            FORTRAN(errorestimator,(&qfx[3*mi[0]**ne],qfn,ipkon,inum,kon,lakon,nk,ne,
mi               1474 src/frd.c      			      mi,ielmat,thicke,&nterms));
mi                 29 src/frdcyc.c               ITG *iinc, ITG *iperturb, double *ener, ITG *mi, char *output,
mi                 42 src/frdcyc.c         jj,node,i1,i2,nope,iel,indexe,j,ielset,*inotrt=NULL,mt=mi[1]+1,
mi                140 src/frdcyc.c       NNEW(stit,double,6*mi[0]**ne*ngraph);
mi                153 src/frdcyc.c       NNEW(ielmatt,ITG,mi[2]**ne*ngraph);
mi                172 src/frdcyc.c         for(l=0;l<mi[2]**ne;l++){ielmatt[l]=ielmat[l];}
mi                179 src/frdcyc.c     FORTRAN(rectcyl,(cot,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filab,&imag,mi,emn));
mi                210 src/frdcyc.c                 ielmatt[mi[2]*(l+i**ne)]=ielmat[mi[2]*l];
mi                226 src/frdcyc.c   		   &imag,mi,emn));
mi                234 src/frdcyc.c     FORTRAN(rectcyl,(co,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filab,&imag,mi,emn));
mi                257 src/frdcyc.c       for(l=0;l<6*mi[0]**ne;l++){stit[l]=sti[l];};
mi                368 src/frdcyc.c   		   &imag,mi,emn));
mi                379 src/frdcyc.c   	    mi,stit,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,&net,
mi                 26 src/frdvector.c                ITG *istartset,ITG *iendset,ITG *ialset,ITG *mi,ITG *ngraph,
mi                 43 src/frdvector.c                   (float)v[(mi[1]+1)*i+1],
mi                 44 src/frdvector.c 		  (float)v[(mi[1]+1)*i+2],(float)v[(mi[1]+1)*i+3]);
mi                 47 src/frdvector.c 	  ifl=(float)v[(mi[1]+1)*i+1];fwrite(&ifl,sizeof(float),1,f1);
mi                 48 src/frdvector.c 	  ifl=(float)v[(mi[1]+1)*i+2];fwrite(&ifl,sizeof(float),1,f1);
mi                 49 src/frdvector.c 	  ifl=(float)v[(mi[1]+1)*i+3];fwrite(&ifl,sizeof(float),1,f1);
mi                 58 src/frdvector.c                     (float)v[(mi[1]+1)*i+1],
mi                 59 src/frdvector.c 		    (float)v[(mi[1]+1)*i+2],(float)v[(mi[1]+1)*i+3]);
mi                 62 src/frdvector.c 	    ifl=(float)v[(mi[1]+1)*i+1];fwrite(&ifl,sizeof(float),1,f1);
mi                 63 src/frdvector.c 	    ifl=(float)v[(mi[1]+1)*i+2];fwrite(&ifl,sizeof(float),1,f1);
mi                 64 src/frdvector.c 	    ifl=(float)v[(mi[1]+1)*i+3];fwrite(&ifl,sizeof(float),1,f1);
mi                 70 src/frdvector.c 		    (float)(v[(mi[1]+1)*i+1]*a[0]+v[(mi[1]+1)*i+2]*a[1]+v[(mi[1]+1)*i+3]*a[2]),
mi                 71 src/frdvector.c 		    (float)(v[(mi[1]+1)*i+1]*a[3]+v[(mi[1]+1)*i+2]*a[4]+v[(mi[1]+1)*i+3]*a[5]),
mi                 72 src/frdvector.c 		    (float)(v[(mi[1]+1)*i+1]*a[6]+v[(mi[1]+1)*i+2]*a[7]+v[(mi[1]+1)*i+3]*a[8]));
mi                 75 src/frdvector.c 	    ifl=(float)v[(mi[1]+1)*i+1]*a[0]+v[(mi[1]+1)*i+2]*a[1]+v[(mi[1]+1)*i+3]*a[2];
mi                 77 src/frdvector.c 	    ifl=(float)v[(mi[1]+1)*i+1]*a[3]+v[(mi[1]+1)*i+2]*a[4]+v[(mi[1]+1)*i+3]*a[5];
mi                 79 src/frdvector.c 	    ifl=(float)v[(mi[1]+1)*i+1]*a[6]+v[(mi[1]+1)*i+2]*a[7]+v[(mi[1]+1)*i+3]*a[8];
mi                 94 src/frdvector.c 		  fprintf(f1,"%3s%10" ITGFORMAT "%12.5E%12.5E%12.5E\n",m1,i+1,(float)v[(mi[1]+1)*i+1],
mi                 95 src/frdvector.c 			  (float)v[(mi[1]+1)*i+2],(float)v[(mi[1]+1)*i+3]);
mi                 98 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+1];fwrite(&ifl,sizeof(float),1,f1);
mi                 99 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+2];fwrite(&ifl,sizeof(float),1,f1);
mi                100 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+3];fwrite(&ifl,sizeof(float),1,f1);
mi                106 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[0]+v[(mi[1]+1)*i+2]*a[1]+v[(mi[1]+1)*i+3]*a[2]),
mi                107 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[3]+v[(mi[1]+1)*i+2]*a[4]+v[(mi[1]+1)*i+3]*a[5]),
mi                108 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[6]+v[(mi[1]+1)*i+2]*a[7]+v[(mi[1]+1)*i+3]*a[8]));
mi                111 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+1]*a[0]+v[(mi[1]+1)*i+2]*a[1]+v[(mi[1]+1)*i+3]*a[2];
mi                113 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+1]*a[3]+v[(mi[1]+1)*i+2]*a[4]+v[(mi[1]+1)*i+3]*a[5];
mi                115 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+1]*a[6]+v[(mi[1]+1)*i+2]*a[7]+v[(mi[1]+1)*i+3]*a[8];
mi                130 src/frdvector.c 		    fprintf(f1,"%3s%10" ITGFORMAT "%12.5E%12.5E%12.5E\n",m1,i+1,(float)v[(mi[1]+1)*i+1],
mi                131 src/frdvector.c 			    (float)v[(mi[1]+1)*i+2],(float)v[(mi[1]+1)*i+3]);
mi                134 src/frdvector.c 		    ifl=(float)v[(mi[1]+1)*i+1];fwrite(&ifl,sizeof(float),1,f1);
mi                135 src/frdvector.c 		    ifl=(float)v[(mi[1]+1)*i+2];fwrite(&ifl,sizeof(float),1,f1);
mi                136 src/frdvector.c 		    ifl=(float)v[(mi[1]+1)*i+3];fwrite(&ifl,sizeof(float),1,f1);
mi                142 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[0]+v[(mi[1]+1)*i+2]*a[1]+
mi                143 src/frdvector.c 				  v[(mi[1]+1)*i+3]*a[2]),
mi                144 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[3]+v[(mi[1]+1)*i+2]*a[4]+
mi                145 src/frdvector.c 				  v[(mi[1]+1)*i+3]*a[5]),
mi                146 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[6]+v[(mi[1]+1)*i+2]*a[7]+
mi                147 src/frdvector.c 				  v[(mi[1]+1)*i+3]*a[8]));
mi                150 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+1]*a[0]+v[(mi[1]+1)*i+2]*a[1]+v[(mi[1]+1)*i+3]*a[2];
mi                152 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+1]*a[3]+v[(mi[1]+1)*i+2]*a[4]+v[(mi[1]+1)*i+3]*a[5];
mi                154 src/frdvector.c 		  ifl=(float)v[(mi[1]+1)*i+1]*a[6]+v[(mi[1]+1)*i+2]*a[7]+v[(mi[1]+1)*i+3]*a[8];
mi                 56 src/linstatic.c              ITG *mi, ITG *ncmat_, ITG *nstate_, double *cs, ITG *mcs,
mi                 76 src/linstatic.c       mt=mi[1]+1,ne0,*integerglob=NULL,iglob=0,*ipneigh=NULL,*neigh=NULL,
mi                155 src/linstatic.c 	      co,vold,itg,&ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi                165 src/linstatic.c   NNEW(xstiff,double,(long long)27*mi[0]**ne);
mi                170 src/linstatic.c   NNEW(stx,double,6*mi[0]**ne);
mi                180 src/linstatic.c 	  xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                216 src/linstatic.c 	    xstiff,npmat_,&dtime,matname,mi,
mi                314 src/linstatic.c 	  NNEW(stx,double,6*mi[0]**ne);
mi                320 src/linstatic.c 	  NNEW(eei,double,6*mi[0]**ne);
mi                322 src/linstatic.c 	      NNEW(stiini,double,6*mi[0]**ne);
mi                323 src/linstatic.c 	      NNEW(enerini,double,mi[0]**ne);}
mi                336 src/linstatic.c 	    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                432 src/linstatic.c     NNEW(stx,double,6*mi[0]**ne);
mi                438 src/linstatic.c     NNEW(eei,double,6*mi[0]**ne);
mi                440 src/linstatic.c 	NNEW(stiini,double,6*mi[0]**ne);
mi                441 src/linstatic.c 	NNEW(enerini,double,mi[0]**ne);}
mi                450 src/linstatic.c 	    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                465 src/linstatic.c     memcpy(&sti[0],&stx[0],sizeof(double)*6*mi[0]**ne);
mi                481 src/linstatic.c                    nstate_,istep,&iinc,iperturb,ener,mi,output,ithermal,
mi                496 src/linstatic.c 	    mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                525 src/linstatic.c 	    mi,sti,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                 33 src/mastruct.c               ITG *iperturb, ITG *mi,ITG *mortar,char *typeboun,
mi                 44 src/mastruct.c       *irow=NULL,icolumn,nmastboun,mt=mi[1]+1,jmax;
mi                161 src/mastruct.c       if(ndirboun[i]>mi[1]) continue;
mi                169 src/mastruct.c       if(nodempc[3*index+1]>mi[1]) continue;
mi                246 src/mastruct.c       for(jj=0;jj<mi[1]*nope;++jj){
mi                248 src/mastruct.c 	j=jj/mi[1];
mi                249 src/mastruct.c 	k=jj-mi[1]*j;
mi                254 src/mastruct.c 	for(ll=jj;ll<mi[1]*nope;++ll){
mi                256 src/mastruct.c 	  l=ll/mi[1];
mi                257 src/mastruct.c 	  m=ll-mi[1]*l;
mi                 33 src/mastructcs.c               ITG *mi,ITG *mortar){
mi                 45 src/mastructcs.c     icomplex2,kdof1,kdof2,ilength,lprev,ij,mt=mi[1]+1;
mi                115 src/mastructcs.c       if(ndirboun[i]>mi[1]) continue;
mi                121 src/mastructcs.c       if(nodempc[3*index+1]>mi[1]) continue;
mi                 32 src/mastructem.c 	      ITG *ithermal,ITG *mi,ITG *ielmat, double *elcon, ITG *ncmat_, 
mi                 43 src/mastructem.c     *irow=NULL,mt=mi[1]+1,imat,idomain,jmin,jmax;
mi                 77 src/mastructem.c 	  imat=ielmat[i*mi[2]];
mi                110 src/mastructem.c 	  imat=ielmat[i*mi[2]];
mi                164 src/mastructem.c       if(ndirboun[i]>mi[1]){continue;}
mi                170 src/mastructem.c     if(nodempc[3*index+1]>mi[1]) continue;
mi                231 src/mastructem.c       for(jj=0;jj<mi[1]*nope;++jj){
mi                233 src/mastructem.c 	j=jj/mi[1];
mi                234 src/mastructem.c 	k=jj-mi[1]*j;
mi                239 src/mastructem.c 	for(ll=jj;ll<mi[1]*nope;++ll){
mi                241 src/mastructem.c 	  l=ll/mi[1];
mi                242 src/mastructem.c 	  m=ll-mi[1]*l;
mi                369 src/mastructem.c       imat=ielmat[i*mi[2]];
mi                 30 src/mastructf.c                ITG *ipnei,ITG *neiel,ITG *mi){
mi                 33 src/mastructf.c       nzs_,kflag,isize,*mast1=NULL,*irow=NULL,neighbor,mt=mi[1]+1,numfaces;
mi                 29 src/matrixstorage.c 		char *jobnamec, ITG *mi, ITG *ipkon, char *lakon,
mi                 36 src/matrixstorage.c     ic,id,itrans,ndim2,*ipoindex=NULL,mt=mi[1]+1,*nactdofinv=NULL,
mi                549 src/matrixstorage.c   FORTRAN(gennactdofinv,(nactdof,nactdofinv,nk,mi,nodorig,
mi                 21 src/matrixstorage.h                    ITG *nactdof,char *jobnamec,ITG *mi,ITG *ipkon,
mi                 64 src/nonlingeo.c              char *matname, double *qaold, ITG *mi,
mi                101 src/nonlingeo.c       *islavact=NULL,mt=mi[1]+1,*nactdofinv=NULL,*ipe=NULL, 
mi                258 src/nonlingeo.c   FORTRAN(gennactdofinv,(nactdof,nactdofinv,nk,mi,nodorig,
mi                264 src/nonlingeo.c   NNEW(xstiff,double,(long long)27*mi[0]**ne);
mi                306 src/nonlingeo.c 				     nelemload,xload,mi));
mi                325 src/nonlingeo.c                        vold,set,nshcon,rhcon,nrhcon,mi,nmpc,nodempc,
mi                332 src/nonlingeo.c 		 iendset,&kontri,&ntri,&co,&vold,&ntrit,inocs,mi);
mi                387 src/nonlingeo.c       NNEW(ielmatf,ITG,mi[2]*nef);
mi                388 src/nonlingeo.c       if(*norien>0) NNEW(ielorienf,ITG,mi[2]*nef);
mi                404 src/nonlingeo.c        vel,vold,mi,neij,&nef,nactdoh,ipkonf,lakonf,ielmatf,ielmat,
mi                419 src/nonlingeo.c   if(*ithermal>1){NNEW(qfx,double,3*mi[0]**ne);}
mi                444 src/nonlingeo.c 	      RENEW(ener,double,mi[0]*(*ne+*nslavs)*2);
mi                450 src/nonlingeo.c 	      RENEW(ielorien,ITG,mi[2]*(*ne+*nslavs));
mi                451 src/nonlingeo.c 	      for(k=mi[2]**ne;k<mi[2]*(*ne+*nslavs);k++) ielorien[k]=0;
mi                454 src/nonlingeo.c 	  RENEW(ielmat,ITG,mi[2]*(*ne+*nslavs));
mi                455 src/nonlingeo.c 	  for(k=mi[2]**ne;k<mi[2]*(*ne+*nslavs);k++) ielmat[k]=1;
mi                458 src/nonlingeo.c 	      RENEW(xstate,double,*nstate_*mi[0]*(*ne+*nslavs));
mi                459 src/nonlingeo.c 	      for(k=*nstate_*mi[0]**ne;k<*nstate_*mi[0]*(*ne+*nslavs);k++){
mi                520 src/nonlingeo.c       NNEW(xstateini,double,*nstate_*mi[0]*(*ne+*nslavs));
mi                521 src/nonlingeo.c       for(k=0;k<*nstate_*mi[0]*(*ne+*nslavs);++k){
mi                526 src/nonlingeo.c   NNEW(eei,double,6*mi[0]**ne);
mi                527 src/nonlingeo.c   NNEW(stiini,double,6*mi[0]**ne);
mi                528 src/nonlingeo.c   NNEW(emeini,double,6*mi[0]**ne);
mi                530 src/nonlingeo.c       NNEW(enerini,double,mi[0]**ne);
mi                596 src/nonlingeo.c 	      co,vold,itg,&ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi                622 src/nonlingeo.c 			 &iit,&idiscon,&ncont,trab,ntrans,ithermal,mi));
mi                636 src/nonlingeo.c 	      &adb,&aub,ithermal,iperturb,mass,mi,iexpl,mortar,
mi                648 src/nonlingeo.c       NNEW(stx,double,6*mi[0]**ne);
mi                659 src/nonlingeo.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi                704 src/nonlingeo.c 	      xstiff,npmat_,&dtime,matname,mi,
mi                727 src/nonlingeo.c 	      mi,sti,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi                733 src/nonlingeo.c 	  FORTRAN(uout,(v,mi,ithermal));
mi                817 src/nonlingeo.c       NNEW(stx,double,6*mi[0]**ne);
mi                830 src/nonlingeo.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi                844 src/nonlingeo.c 	  for(k=0;k<6*mi[0]*ne0;++k){
mi                902 src/nonlingeo.c 	      for(k=0;k<6*mi[0]*ne0;++k){
mi                908 src/nonlingeo.c 	      for(k=0;k<mi[0]*ne0;++k){enerini[k]=ener[k];}
mi                912 src/nonlingeo.c 		  for(k=0;k<*nstate_*mi[0]*(ne0+*nslavs);++k){
mi                948 src/nonlingeo.c 	      co,vold,itg,&ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi                962 src/nonlingeo.c        ctrl,xloadold,&reltime,nmethod,set,mi,istartset,iendset,ialset,nset,
mi                974 src/nonlingeo.c             xload,nload,xbody,ipobody,nbody,ielmatf,matname,mi,ncmat_,
mi               1034 src/nonlingeo.c                      imastop,mi,ipe,ime,tietol,&iflagact,
mi               1045 src/nonlingeo.c 		      RENEW(ener,double,mi[0]*(*ne+*nintpoint)*2);
mi               1051 src/nonlingeo.c 		      RENEW(ielorien,ITG,mi[2]*(*ne+*nintpoint));
mi               1052 src/nonlingeo.c 		      for(k=mi[2]**ne;k<mi[2]*(*ne+*nintpoint);k++) ielorien[k]=0;
mi               1054 src/nonlingeo.c 		  RENEW(ielmat,ITG,mi[2]*(*ne+*nintpoint));
mi               1055 src/nonlingeo.c 		  for(k=mi[2]**ne;k<mi[2]*(*ne+*nintpoint);k++) ielmat[k]=1;
mi               1065 src/nonlingeo.c 		  iperturb,ikboun,nboun,mi,imastop,nslavnode,islavnode,
mi               1081 src/nonlingeo.c 				      imat=ielmat[i*mi[2]];
mi               1102 src/nonlingeo.c                                 *nstate_*mi[0]*(ne0+maxprevcontel));
mi               1103 src/nonlingeo.c 			  for(k=*nstate_*mi[0]*ne0;
mi               1104 src/nonlingeo.c                                 k<*nstate_*mi[0]*(ne0+maxprevcontel);++k){
mi               1109 src/nonlingeo.c 		      RENEW(xstate,double,*nstate_*mi[0]*(ne0+*nintpoint));
mi               1110 src/nonlingeo.c 		      for(k=*nstate_*mi[0]*ne0;k<*nstate_*mi[0]*(ne0+*nintpoint);k++){
mi               1120 src/nonlingeo.c                                &ne0,mi,xstate,pslavsurf,nstate_,
mi               1132 src/nonlingeo.c 		      RENEW(xstateini,double,*nstate_*mi[0]*(ne0+*nintpoint));
mi               1133 src/nonlingeo.c 		      for(k=0;k<*nstate_*mi[0]*(ne0+*nintpoint);++k){
mi               1150 src/nonlingeo.c 			 &iit,&idiscon,&ncont,trab,ntrans,ithermal,mi));
mi               1165 src/nonlingeo.c 	  &adb,&aub,ithermal,iperturb,mass,mi,iexpl,mortar,
mi               1173 src/nonlingeo.c       FORTRAN(gennactdofinv,(nactdof,nactdofinv,nk,mi,nodorig,
mi               1204 src/nonlingeo.c 		 &iinc,&idiscon,vold,nactdof,mi);
mi               1207 src/nonlingeo.c       NNEW(stx,double,6*mi[0]**ne);
mi               1259 src/nonlingeo.c 		  xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1287 src/nonlingeo.c 		  xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1301 src/nonlingeo.c 	      for(k=0;k<6*mi[0]*ne0;++k){
mi               1342 src/nonlingeo.c 	      co,vold,itg,&ntg,amname,ikboun,ilboun,nelemload,sideload,mi,
mi               1356 src/nonlingeo.c 	     ctrl,xloadold,&reltime,nmethod,set,mi,istartset,iendset,ialset,
mi               1379 src/nonlingeo.c                       ikboun,nboun,mi,imastop,nslavnode,islavnode,islavsurf,
mi               1395 src/nonlingeo.c 					  imat=ielmat[i*mi[2]];
mi               1427 src/nonlingeo.c 		&idiscon,&ncont,trab,ntrans,ithermal,mi));
mi               1444 src/nonlingeo.c 		&adb,&aub,ithermal,iperturb,mass,mi,iexpl,mortar,
mi               1452 src/nonlingeo.c 	      FORTRAN(gennactdofinv,(nactdof,nactdofinv,nk,mi,nodorig,
mi               1457 src/nonlingeo.c 	      NNEW(stx,double,6*mi[0]**ne);
mi               1472 src/nonlingeo.c 		xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               1509 src/nonlingeo.c 		  xstiff,npmat_,&dtime,matname,mi,
mi               1533 src/nonlingeo.c 		  xstiff,npmat_,&dtime,matname,mi,
mi               1567 src/nonlingeo.c 		  xbodyold,&reltime,veold,matname,mi,ikactmech,
mi               1606 src/nonlingeo.c 	      xstiff,npmat_,&dtime,matname,mi,ncmat_,
mi               1615 src/nonlingeo.c 	 islavnode,nslavnode,mortar,ntie,f_cm,f_cs,mi,
mi               1637 src/nonlingeo.c 		  mi,sti,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi               1643 src/nonlingeo.c 	  FORTRAN(uout,(v,mi,ithermal));
mi               1821 src/nonlingeo.c       NNEW(stx,double,6*mi[0]**ne);
mi               1833 src/nonlingeo.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1861 src/nonlingeo.c 	  for(k=0;k<6*mi[0]*ne0;++k){
mi               1871 src/nonlingeo.c 	  FORTRAN(negativepressure,(&ne0,ne,mi,stx,&pressureratio));
mi               1880 src/nonlingeo.c 	 islavnode,nslavnode,mortar,ntie,f_cm,f_cs,mi,
mi               1990 src/nonlingeo.c 	  xstaten,nstate_,istep,&iinc,iperturb,ener,mi,output,
mi               2040 src/nonlingeo.c 	  for(k=0;k<6*mi[0]*ne0;++k){
mi               2046 src/nonlingeo.c 	  for(k=0;k<mi[0]*ne0;++k){ener[k]=enerini[k];}
mi               2048 src/nonlingeo.c       for(k=0;k<*nstate_*mi[0]*(ne0+maxprevcontel);++k){
mi               2078 src/nonlingeo.c 		   co,vold,xo,yo,zo,x,y,z,nx,ny,nz,mi,
mi               2110 src/nonlingeo.c       NNEW(stx,double,6*mi[0]**ne);
mi               2135 src/nonlingeo.c 	      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               2157 src/nonlingeo.c                nstate_,istep,&iinc,iperturb,ener,mi,output,ithermal,qfn,
mi               2162 src/nonlingeo.c 	FORTRAN(uout,(v,mi,ithermal));
mi               2176 src/nonlingeo.c 	    mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi               2182 src/nonlingeo.c 	  FORTRAN(uout,(v,mi,ithermal));
mi               2213 src/nonlingeo.c     NNEW(stx,double,6*mi[0]**ne);
mi               2237 src/nonlingeo.c 	    xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,&icmd,
mi               2259 src/nonlingeo.c              nstate_,istep,&iinc,iperturb,ener,mi,output,ithermal,qfn,
mi               2264 src/nonlingeo.c       FORTRAN(uout,(v,mi,ithermal));
mi               2279 src/nonlingeo.c 	    mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,ne,
mi               2285 src/nonlingeo.c 	FORTRAN(uout,(v,mi,ithermal));
mi               2398 src/nonlingeo.c 	RENEW(ener,double,mi[0]**ne*2);
mi               2404 src/nonlingeo.c 	  RENEW(ielorien,ITG,mi[2]**ne);
mi               2406 src/nonlingeo.c       RENEW(ielmat,ITG,mi[2]**ne);
mi                 30 src/precontact.c         ITG *nslavnode, ITG *nmastnode,ITG *imastop,ITG *mi,
mi                 52 src/precontact.c 			   cg,straight,mi,imastnode,nmastnode,xmastnor,
mi                 83 src/precontact.c 		mi,imastop,nslavnode,islavnode,set,nset,istartset,
mi                146 src/precontact.c 	        	mi,ncont,ipe,ime,pslavsurf,&ii,&l,&ntri));
mi                 36 src/prediction.c 	       ITG *iinc, ITG *idiscon, double *vold, ITG *nactdof, ITG *mi){
mi                 38 src/prediction.c     ITG j,k,mt=mi[1]+1;
mi                 36 src/prediction_em.c 	       ITG *iinc, ITG *idiscon, double *vold, ITG *nactdof, ITG *mi){
mi                 38 src/prediction_em.c     ITG j,k,mt=mi[1]+1,jstart;
mi                 28 src/radcyc.c               ITG *mi){
mi                 34 src/radcyc.c     ITG i,is,nsegments,idtie,nkt,icntrl,imag=0,*kontri=NULL,mt=mi[1]+1,
mi                137 src/radcyc.c     FORTRAN(rectcyl,(co,v,fn,stn,qfn,een,cs,nk,&icntrl,t,filab,&imag,mi,emn));
mi                158 src/radcyc.c   		   &imag,mi,emnt));
mi                 66 src/radflowload.c                  double *reltime, ITG *nmethod, char *set, ITG *mi,
mi                 77 src/radflowload.c   ITG nhrs=1,info=0,i,j,iin=0,icntrl,icutb=0,iin_abs=0,mt=mi[1]+1,im,
mi                118 src/radflowload.c 			   istep,iit,mi,ineighe,ilboun,&channel,iaxial));
mi                129 src/radflowload.c 			   istep,iit,mi,ineighe,ilboun));
mi                142 src/radflowload.c 			  reltime,nmethod,set,mi,ineighe,cama,&vamt,
mi                159 src/radflowload.c 			     nbody,vold,xloadold,reltime,nmethod,set,mi,
mi                180 src/radflowload.c 				 nbody,vold,xloadold,reltime,nmethod,set,mi,
mi                198 src/radflowload.c 	       reltime,nmethod,set,mi,ineighe,cama,&vamt,
mi                285 src/radflowload.c 	      nelemload,xloadact,nactdog,network,mi,ne,ipkon,lakon,kon));
mi                296 src/radflowload.c                             mi));
mi                396 src/radflowload.c 				cs,mcs,inocs,ntrit,nk,mi,&sidemean));
mi                410 src/radflowload.c               ntrit1=ntrit;mi1=mi;jqrad1=jqrad;irowrad1=irowrad;
mi                481 src/radflowload.c           time,iviewfile,xloadold,reltime,nmethod,mi,iemchange,nam,
mi                 38 src/readinput.c       norien,nam,nprint,mi[3],ntrans,ncs,namtot,ncmat,memmpc,ne1d,
mi                211 src/readinput.c               &nprint,mi,&ntrans,&ncs,&namtot,&ncmat,&memmpc,
mi                 34 src/remastruct.c 	      ITG *iperturb, ITG *mass, ITG *mi,ITG *iexpl,ITG *mortar,
mi                 50 src/remastruct.c     mt=mi[1]+1;
mi                 75 src/remastruct.c              ikboun,ilboun,iperturb,mi,mortar,typeboun,labmpc);
mi                 32 src/remastructar.c 	      ITG *iperturb, ITG *mass, ITG *mi, ITG *ics, double *cs,
mi                 47 src/remastructar.c     mt=mi[1]+1;
mi                 75 src/remastructar.c 		 ikboun,ilboun,iperturb,mi,mortar,typeboun,labmpc);
mi                 84 src/remastructar.c 		 ics,cs,labmpc,mcs,mi,mortar);
mi                 34 src/remastructem.c 	      ITG *iperturb, ITG *mass, ITG *mi, ITG *ielmat, double *elcon,
mi                 50 src/remastructem.c     mt=mi[1]+1;
mi                 74 src/remastructem.c 	     ikmpc,ilmpc,ipointer,nzs,ithermal,mi,ielmat,elcon,
mi                 56 src/results.c         double *epn,char *matname,ITG *mi,ITG *ielas,ITG *icmd,ITG *ncmat_,
mi                 75 src/results.c          intpointvart,mt=mi[1]+1,i,j,*ithread=NULL;
mi                161 src/results.c         veold,accold,bet,gam,dtime,mi,vini,nprint,prlab,
mi                170 src/results.c  		ttime,ielmat,matname,mi,istep,iinc,ithermal));
mi                192 src/results.c          mi1=mi;ielas1=ielas;icmd1=icmd;ncmat1_=ncmat_;nstate1_=nstate_;
mi                275 src/results.c          xstate1=xstate;npmat1_=npmat_;matname1=matname;mi1=mi;
mi                333 src/results.c  	    coefmpc,labmpc,nmpc,mi,fmpc,&calcul_fn,&calcul_f));
mi                342 src/results.c         epn,mi,
mi                 57 src/resultsinduction.c        double *epn,char *matname,ITG *mi,ITG *ielas,ITG *icmd,ITG *ncmat_,
mi                 78 src/resultsinduction.c         intpointvart,mt=mi[1]+1,i,j,*ithread=NULL,*islavsurf=NULL,
mi                162 src/resultsinduction.c        veold,dtime,mi,vini,nprint,prlab,
mi                177 src/resultsinduction.c 		ttime,ielmat,matname,mi,istep,iinc,ithermal));
mi                187 src/resultsinduction.c         matname1=matname;mi1=mi;ncmat1_=ncmat_;sti1=sti;alcon1=alcon;
mi                226 src/resultsinduction.c         xstate1=xstate;npmat1_=npmat_;matname1=matname;mi1=mi;
mi                284 src/resultsinduction.c 	    coefmpc,labmpc,nmpc,mi,fmpc,&calcul_fn,&calcul_f,inomat));
mi                293 src/resultsinduction.c        epn,mi,
mi                 60 src/steadystate.c                double *xstate, ITG *npmat_, char *matname, ITG *mi,
mi                 86 src/steadystate.c     nzse[3],mt=mi[1]+1,*ikactmech=NULL,nactmech,id,nasym=0,
mi                206 src/steadystate.c 		       ialset,nactdof,ithermal,mi,imdnode,&nmdnode,
mi                225 src/steadystate.c                       imddof,&nmddof,nactdof,mi,imdmpc,&nmdmpc,imdboun,&nmdboun,
mi                233 src/steadystate.c                    nactdof,mi,imdmpc,&nmdmpc,imdboun,&nmdboun,
mi                251 src/steadystate.c                    nactdof,mi,imdmpc,&nmdmpc,imdboun,&nmdboun,
mi                495 src/steadystate.c       RENEW(ielmat,ITG,mi[2]**ne*nsectors);
mi                496 src/steadystate.c       if(*norien>0) RENEW(ielorien,ITG,mi[2]**ne*nsectors);
mi                548 src/steadystate.c         xstate,npmat_,matname,mi,ics,cs,mpcend,ncmat_,
mi                568 src/steadystate.c       RENEW(eme,double,6*mi[0]**ne);
mi                570 src/steadystate.c       if(*nener==1) RENEW(ener,double,mi[0]**ne);
mi                616 src/steadystate.c 	  nload,nodeboun,nboun,ndirboun,ithermal,co,vold,mi,ielmat));
mi                672 src/steadystate.c 	  NNEW(stx,double,6*mi[0]**ne);
mi                673 src/steadystate.c 	  NNEW(eei,double,6*mi[0]**ne);
mi                676 src/steadystate.c 	      NNEW(qfx,double,3*mi[0]**ne);}
mi                683 src/steadystate.c 	      NNEW(stiini,double,6*mi[0]**ne);
mi                684 src/steadystate.c 	      NNEW(enerini,double,mi[0]**ne);}
mi                957 src/steadystate.c 	  for(i=0;i<6*mi[0]**ne;i++){eme[i]=0.;}
mi                977 src/steadystate.c 	        xstiff,npmat_,&dtime,matname,mi,ncmat_,
mi               1020 src/steadystate.c 	       ikboun,ilboun,nelemload,sideload,mi,
mi               1056 src/steadystate.c                        xbodyold,&reltime,veold,matname,mi,ikactmechr,
mi               1201 src/steadystate.c                        xbodyold,&reltime,veold,matname,mi,ikactmechi,
mi               1590 src/steadystate.c 		    br,bi,veold,&dtime,mi,imdnode,&nmdnode,imdboun,&nmdboun,
mi               1602 src/steadystate.c 		      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1618 src/steadystate.c 		    br,bi,veold,&dtime,mi,imdnode,&nmdnode,imdboun,&nmdboun,
mi               1630 src/steadystate.c 		      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1662 src/steadystate.c 	    mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,&neg,
mi               1676 src/steadystate.c 		    bi,br,veold,&dtime,mi,imdnode,&nmdnode,imdboun,&nmdboun,
mi               1688 src/steadystate.c 		      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1704 src/steadystate.c 		    bi,br,veold,&dtime,mi,imdnode,&nmdnode,imdboun,&nmdboun,
mi               1716 src/steadystate.c 		      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               1864 src/steadystate.c 	    mi,stx,va,vp,stna,stnp,vmax,stnmax,&ngraph,veold,ener,&neg,
mi               2031 src/steadystate.c 	    amname,ikboun,ilboun,nelemload,sideload,mi,
mi               2189 src/steadystate.c 	  for(i=0;i<6*mi[0]**ne;i++){eme[i]=0.;}
mi               2253 src/steadystate.c 	            xstiff,npmat_,&dtime,matname,mi,ncmat_,
mi               2312 src/steadystate.c 		xbodyold,&reltime,veold,matname,mi,ikactmech,&nactmech,
mi               2664 src/steadystate.c 	      NNEW(stx,double,6*mi[0]**ne);
mi               2668 src/steadystate.c 		  NNEW(qfx,double,3*mi[0]**ne);}
mi               2674 src/steadystate.c 	      NNEW(eei,double,6*mi[0]**ne);
mi               2676 src/steadystate.c 		  NNEW(stiini,double,6*mi[0]**ne);
mi               2677 src/steadystate.c 		  NNEW(enerini,double,mi[0]**ne);}
mi               2702 src/steadystate.c                     coefmpc,labmpc,nmpc,&btot[l*neq[1]],&bp[l*neq[1]],veold,&dtime,mi,
mi               2716 src/steadystate.c 		      xstateini,xstiff,xstate,npmat_,epn,matname,mi,&ielas,
mi               2739 src/steadystate.c 		  mi,stx,vr,vi,stnr,stni,vmax,stnmax,&ngraph,veold,ener,&neg,
mi               2815 src/steadystate.c       RENEW(ielmat,ITG,mi[2]**ne);
mi               2816 src/steadystate.c       if(*norien>0) RENEW(ielorien,ITG,mi[2]**ne);
mi               2848 src/steadystate.c       RENEW(eme,double,6*mi[0]**ne);
mi               2849 src/steadystate.c       if(*nener==1)RENEW(ener,double,mi[0]**ne);
mi                 31 src/tiedcontact.c 	       ITG *nmpc_, ITG *mi, ITG *nk,ITG *istep,ITG *ikboun,
mi                 99 src/tiedcontact.c   FORTRAN(updatecont,(koncont,&ncont,co,vold,cg,straight,mi));