lakon              62 src/CalculiX.h              ITG *kon,char *lakon,ITG *i,ITG *imdnode,ITG *nmdnode,
lakon              73 src/CalculiX.h              ITG *kon,char *lakon,ITG *nactdof,ITG *izdof,ITG *nzdof,
lakon              84 src/CalculiX.h              char *lakon,ITG *islavsurf));
lakon             102 src/CalculiX.h 	     char *lakon,ITG *ncone,double *tietol,ITG *ismallsliding,
lakon             152 src/CalculiX.h void arpackbu(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon             219 src/CalculiX.h void FORTRAN(assigndomtonodes,(ITG *ne,char *lakon,ITG *ipkon,ITG *kon,
lakon             232 src/CalculiX.h void biosav(ITG *ipkon,ITG *kon,char *lakon,ITG *ne,double *co,
lakon             235 src/CalculiX.h void FORTRAN(biotsavart,(ITG *ipkon,ITG *kon,char *lakon,ITG *ne,double *co,
lakon             245 src/CalculiX.h 		       double *xbody,double *coel,double *vel,char *lakon,
lakon             267 src/CalculiX.h void FORTRAN(calcgradpel,(ITG *ne,char *lakon,ITG *ipnei,double *vfa,
lakon             271 src/CalculiX.h void FORTRAN(calcgradtel,(ITG *ne,char *lakon,ITG *ipnei,double *vfa,
lakon             275 src/CalculiX.h void FORTRAN(calcgradvel,(ITG *ne,char *lakon,ITG *ipnei,double *vfa,
lakon             291 src/CalculiX.h void FORTRAN(calcmass,(ITG *ipkon,char *lakon,ITG *kon,double *co,ITG *mi,
lakon             346 src/CalculiX.h void FORTRAN(calinput,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon             405 src/CalculiX.h              ITG *ifaboun,ITG *ipkon,ITG *kon,char *lakon,ITG *nface,ITG *ne));
lakon             410 src/CalculiX.h void checkconvergence(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon             527 src/CalculiX.h 	     char *lakon,ITG *ipkon,ITG *kon,ITG *koncont,ITG *ne,
lakon             553 src/CalculiX.h 			 char *lakon,ITG *ne,ITG *neq));
lakon             566 src/CalculiX.h void FORTRAN(createinum,(ITG *ipkon,ITG *inum,ITG *kon,char *lakon,ITG *nk,
lakon             576 src/CalculiX.h        ITG *nset,ITG *ntie,char *tieset,char *set,char *lakon,ITG *kon,
lakon             586 src/CalculiX.h              char *lakon,char *set,ITG *nset,ITG *ialset,ITG *ipkon,
lakon             592 src/CalculiX.h              ITG *inomat,ITG *ne,ITG *ipkon,char *lakon,ITG *kon,
lakon             682 src/CalculiX.h void dynacont(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne, 
lakon             800 src/CalculiX.h void FORTRAN(elementpernode,(ITG *iponoel,ITG *inoel,char *lakon,ITG *ipkon,
lakon             804 src/CalculiX.h                       ITG *nelemload,ITG *ipkon,ITG *kon,char *lakon,
lakon             821 src/CalculiX.h              ITG *kon,char *lakon,ITG *nk,ITG *ne,ITG *mi,ITG *ielmat,
lakon             824 src/CalculiX.h void expand(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon             859 src/CalculiX.h              ITG *kon,char *lakon,ITG *nfield,ITG *nk,ITG *ne,ITG *mi,
lakon             896 src/CalculiX.h                      char *lakon,ITG *ntie,char *tieset));
lakon             899 src/CalculiX.h 			  double *bc,char *lakon,
lakon             915 src/CalculiX.h 	      ITG *ne,ITG *ipkon,char *lakon,ITG *kon));
lakon             923 src/CalculiX.h void frd(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne0,
lakon             939 src/CalculiX.h void frdcyc(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne,double *v,
lakon             951 src/CalculiX.h void FORTRAN(frdfluid,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon             962 src/CalculiX.h void FORTRAN(frditeration,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon             991 src/CalculiX.h void FORTRAN(genadvecelem,(ITG *inodesd,ITG *ipkon,ITG *ne,char *lakon,
lakon             995 src/CalculiX.h              ITG *ipkon,ITG *kon,char *lakon,double *cg,double *straight,
lakon            1006 src/CalculiX.h      ITG *ipkon,ITG *kon,char *lakon,
lakon            1020 src/CalculiX.h 	     ITG *ialset,ITG *iactive,ITG *ipkon,char *lakon,ITG *kon,
lakon            1028 src/CalculiX.h        ITG *mi,ITG *nodorig,ITG *ipkon,char *lakon,ITG *kon,ITG *ne));
lakon            1031 src/CalculiX.h           ITG *ipkon,ITG *kon,char *lakon,char *set,ITG *istartset,
lakon            1062 src/CalculiX.h 		          double *xbody,double *coel,double *vel,char *lakon,
lakon            1067 src/CalculiX.h 	     char *lakon,ITG *ipkon,ITG *kon,ITG **koncontp,
lakon            1081 src/CalculiX.h void FORTRAN(initialcfd,(ITG *ne,ITG *ipkon,ITG *kon,char *lakon,
lakon            1089 src/CalculiX.h                          char *lakon,double *v,ITG * ipkon,ITG *kon,
lakon            1101 src/CalculiX.h                          char *lakon,double *v,ITG * ipkon,ITG *kon,
lakon            1123 src/CalculiX.h void FORTRAN(interpolatestate,(ITG *ne,ITG *ipkon,ITG *kon,char *lakon,
lakon            1147 src/CalculiX.h void FORTRAN(jouleheating,(ITG *ipkon,char *lakon,ITG *kon,double *co,
lakon            1157 src/CalculiX.h void linstatic(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            1193 src/CalculiX.h                char *lakon,
lakon            1217 src/CalculiX.h void FORTRAN(mafilldm,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            1243 src/CalculiX.h void FORTRAN(mafillem,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            1279 src/CalculiX.h 			ITG *nelemload,double *xloadact,char *lakon,
lakon            1293 src/CalculiX.h void FORTRAN(mafillp,(ITG *ne,char *lakon,ITG *ipnei,
lakon            1301 src/CalculiX.h void FORTRAN(mafillsm,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            1334 src/CalculiX.h void FORTRAN(mafillsmas,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            1368 src/CalculiX.h                char *lakon,
lakon            1399 src/CalculiX.h                char *lakon,
lakon            1435 src/CalculiX.h                double *volume,ITG *compressible,ITG *ielfa,char *lakon,
lakon            1446 src/CalculiX.h 	     ITG *ielfa,char *lakon,ITG *ifabou,ITG *nbody,ITG *neq,
lakon            1451 src/CalculiX.h void mastruct(ITG *nk,ITG *kon,ITG *ipkon,char*lakon,ITG *ne,
lakon            1459 src/CalculiX.h void mastructcs(ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            1468 src/CalculiX.h void mastructem(ITG *nk, ITG *kon, ITG *ipkon, char *lakon, ITG *ne,
lakon            1476 src/CalculiX.h void mastructf(ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon            1495 src/CalculiX.h void FORTRAN(networkinum,(ITG *ipkon,ITG *inum,ITG *kon,char *lakon,
lakon            1503 src/CalculiX.h        char *lakon,char *set,ITG *istartset,ITG *iendset,ITG *ialset,
lakon            1557 src/CalculiX.h                    ITG *icascade,ITG *kon,ITG *ipkon,char *lakon,
lakon            1563 src/CalculiX.h 	     ITG *ialset,ITG *imast,ITG *ipkon,ITG *kon,char *lakon,
lakon            1582 src/CalculiX.h void FORTRAN(precfd,(ITG *ne,ITG *ipkon,ITG *kon,char *lakon,ITG *ipnei,
lakon            1593 src/CalculiX.h         char *lakon, ITG *ipkon, ITG *kon, ITG *koncont, ITG *ne,
lakon            1616 src/CalculiX.h              char *lakon,double *stx,double *eei,double *xstate,
lakon            1627 src/CalculiX.h              char *lakon,double *stx,double *eei,double *xstate,
lakon            1638 src/CalculiX.h             ITG *ipkon,char *lakon,ITG *kon,ITG *ialset,char *prset,
lakon            1647 src/CalculiX.h void radcyc(ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon            1655 src/CalculiX.h        char *sideload,ITG *nelemload,double *xloadact,char *lakon,ITG *ipiv,
lakon            1676 src/CalculiX.h        char *sideload,ITG *nelemload,double *xloadact,char *lakon,
lakon            1728 src/CalculiX.h               ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon            1741 src/CalculiX.h               ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon            1752 src/CalculiX.h               ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon            1778 src/CalculiX.h   char *lakon,ITG *nodeboun,ITG *ndirboun,ITG *iamboun,double *xboun, 
lakon            1806 src/CalculiX.h                         ITG *nelemload,double *xloadact,char *lakon,
lakon            1825 src/CalculiX.h void results(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            1861 src/CalculiX.h void FORTRAN(resultsem,(double *co,ITG *kon,ITG *ipkon,char *lakon,
lakon            1899 src/CalculiX.h void FORTRAN(resultsmech,(double *co,ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon            1919 src/CalculiX.h        char *lakon,ITG *ne,double *v,double *stn,ITG *inum,double *stx,
lakon            1936 src/CalculiX.h        char *lakon,double *v,
lakon            1956 src/CalculiX.h void resultsinduction(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            1990 src/CalculiX.h void FORTRAN(rhsp,(ITG *ne,char *lakon,ITG *nactdoh,ITG *ipnei,
lakon            2028 src/CalculiX.h void FORTRAN(rhs,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon            2048 src/CalculiX.h         ITG *kon,char *lakon,double *straight,
lakon            2088 src/CalculiX.h void steadystate(double **co,ITG *nk,ITG **kon,ITG **ipkon,char **lakon,ITG *ne, 
lakon            2134 src/CalculiX.h              ITG *ipkon,ITG *inum,ITG *kon,char *lakon,
lakon            2214 src/CalculiX.h void FORTRAN(tiefaccont,(char *lakon,ITG *ipkon,ITG *kon,ITG *ntie,
lakon            2223 src/CalculiX.h                char *lakon,ITG *ipkon,ITG *kon,double *tietol,
lakon            2238 src/CalculiX.h 	  char *lakon,ITG *ipkon,ITG *kon,ITG *koncont,char *kind1,
lakon            2246 src/CalculiX.h void FORTRAN(ufaceload,(double *co,ITG *ipkon,ITG *kon,char *lakon,
lakon            2262 src/CalculiX.h                          ITG *iendset,ITG *ialset,ITG *ipkon,char *lakon,
lakon            2326 src/CalculiX.h void FORTRAN(zienzhu,(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon              80 src/arpack.c         description[13]="            ",*lakon=NULL;
lakon             122 src/arpack.c     irow=*irowp;ener=*enerp;xstate=*xstatep;ipkon=*ipkonp;lakon=*lakonp;
lakon             184 src/arpack.c   	  lakon,ipkon,kon,&koncont,nslavs,tietol,&ismallsliding,&itiefac,
lakon             207 src/arpack.c   	      RENEW(lakon,char,8*(*ne+*nslavs));
lakon             247 src/arpack.c   			 iendset,ialset,itietri,lakon,ipkon,kon,koncont,ne,
lakon             264 src/arpack.c   	      RENEW(lakon,char,8*(*ne+*nintpoint));
lakon             277 src/arpack.c   	     ialset,itietri,lakon,ipkon,kon,koncont,ne,cg,straight,nkon,
lakon             311 src/arpack.c   		      FORTRAN(interpolatestate,(ne,ipkon,kon,lakon,
lakon             336 src/arpack.c   		 kon,ipkon,lakon,ne,nactdof,icol,jq,&irow,isolver,
lakon             370 src/arpack.c        results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             388 src/arpack.c        results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             425 src/arpack.c       FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             443 src/arpack.c         FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             466 src/arpack.c   	  FORTRAN(mafillsmas,(co,nk,kon,ipkon,lakon,ne,nodeboun,
lakon             500 src/arpack.c       frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon             547 src/arpack.c                     lakon,kon,ne,mei,nboun,nmpc,cs,mcs);
lakon             881 src/arpack.c         results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon             901 src/arpack.c         results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon             936 src/arpack.c       frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon             968 src/arpack.c   	  RENEW(lakon,char,8**ne);
lakon            1010 src/arpack.c     *irowp=irow;*enerp=ener;*xstatep=xstate;*ipkonp=ipkon;*lakonp=lakon;
lakon              37 src/arpackbu.c void arpackbu(double *co, ITG *nk, ITG *kon, ITG *ipkon, char *lakon,
lakon             145 src/arpackbu.c      results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             163 src/arpackbu.c      results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             192 src/arpackbu.c     FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             210 src/arpackbu.c     FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             247 src/arpackbu.c     frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon             319 src/arpackbu.c     results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon             338 src/arpackbu.c     results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon             367 src/arpackbu.c   frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon             395 src/arpackbu.c     FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             413 src/arpackbu.c     FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             654 src/arpackbu.c       results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon             673 src/arpackbu.c       results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon             699 src/arpackbu.c     frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon              81 src/arpackcs.c       lakonl[2]=" \0",*lakon=NULL;
lakon             134 src/arpackcs.c   irow=*irowp;ener=*enerp;xstate=*xstatep;ipkon=*ipkonp;lakon=*lakonp;
lakon             187 src/arpackcs.c 	      lakon,ipkon,kon,&koncont,nslavs,tietol,&ismallsliding,&itiefac,
lakon             210 src/arpackcs.c 	      RENEW(lakon,char,8*(*ne+*nslavs));
lakon             250 src/arpackcs.c 			 iendset,ialset,itietri,lakon,ipkon,kon,koncont,ne,
lakon             267 src/arpackcs.c 	      RENEW(lakon,char,8*(*ne+*nintpoint));
lakon             280 src/arpackcs.c 		  ialset,itietri,lakon,ipkon,kon,koncont,ne,cg,straight,nkon,
lakon             314 src/arpackcs.c 		      FORTRAN(interpolatestate,(ne,ipkon,kon,lakon,
lakon             339 src/arpackcs.c 		       kon,ipkon,lakon,ne,nactdof,icol,jq,&irow,isolver,
lakon             370 src/arpackcs.c       results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             388 src/arpackcs.c       results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             442 src/arpackcs.c 	      if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon             443 src/arpackcs.c 	      else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon             444 src/arpackcs.c 	      else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon             445 src/arpackcs.c 	      else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon             446 src/arpackcs.c 	      else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon             447 src/arpackcs.c 	      else if (strcmp1(&lakon[8*iel+3],"6")==0)nope=6;
lakon             448 src/arpackcs.c 	      else if (strcmp1(&lakon[8*iel],"ES")==0){
lakon             449 src/arpackcs.c 		  lakonl[0]=lakon[8*iel+7];
lakon             466 src/arpackcs.c 		  if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon             467 src/arpackcs.c 		  else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon             468 src/arpackcs.c 		  else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon             469 src/arpackcs.c 		  else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon             470 src/arpackcs.c 		  else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon             493 src/arpackcs.c 	  FORTRAN(mafillsmcs,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             510 src/arpackcs.c 	  FORTRAN(mafillsmcs,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             532 src/arpackcs.c 	      FORTRAN(mafillsmcsas,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,
lakon             564 src/arpackcs.c 	  frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon             611 src/arpackcs.c 			lakon,kon,ne,mei,nboun,nmpc,cs,mcs);
lakon            1093 src/arpackcs.c       for(l=0;l<8**ne;l++){lakont[l]=lakon[l];}
lakon            1124 src/arpackcs.c 			      lakont[l2+i*8**ne]=lakon[l2];
lakon            1299 src/arpackcs.c 		  results(co,nk,kon,ipkon,lakon,ne,&v[kkv],&stn[kk6],inum,
lakon            1318 src/arpackcs.c 		  results(co,nk,kon,ipkon,lakon,ne,&v[kkv],&stn[kk6],inum,
lakon            2290 src/arpackcs.c 	  RENEW(lakon,char,8**ne);
lakon            2332 src/arpackcs.c   *irowp=irow;*enerp=ener;*xstatep=xstate;*ipkonp=ipkon;*lakonp=lakon;
lakon              31 src/biosav.c   void biosav(ITG *ipkon,ITG *kon,char *lakon,ITG *ne,double *co,
lakon             156 src/biosav.c       ipkon1=ipkon;kon1=kon;lakon1=lakon;ne1=ne;co1=co;qfx1=qfx;
lakon              71 src/ccx_2.8.c       *filab=NULL, *lakon=NULL, *labmpc=NULL, *prlab=NULL, *prset=NULL, 
lakon             216 src/ccx_2.8.c      NNEW(lakon,char,8*ne_);
lakon             550 src/ccx_2.8.c    FORTRAN(calinput,(co,&nk,kon,ipkon,lakon,&nkon,&ne,
lakon             596 src/ccx_2.8.c         lakon, ipkon, kon,tietol,&nmpc, &mpcfree, &memmpc_,
lakon             666 src/ccx_2.8.c      RENEW(lakon,char,8*ne);
lakon             913 src/ccx_2.8.c        RENEW(lakon,char,8*(ne+nload));
lakon             919 src/ccx_2.8.c        FORTRAN(genadvecelem,(inodesd,ipkon,&ne,lakon,kon,&nload,
lakon             924 src/ccx_2.8.c        RENEW(lakon,char,8*ne);
lakon             960 src/ccx_2.8.c        FORTRAN(ufaceload,(co,ipkon,kon,lakon,&nboun,nodeboun,
lakon             997 src/ccx_2.8.c  	  mastruct(&nk,kon,ipkon,lakon,&ne,nodeboun,ndirboun,&nboun,ipompc,
lakon            1010 src/ccx_2.8.c        mastructcs(&nk,kon,ipkon,lakon,&ne,nodeboun,ndirboun,&nboun,
lakon            1032 src/ccx_2.8.c  	linstatic(co,&nk,kon,ipkon,lakon,&ne,nodeboun,ndirboun,xboun,&nboun, 
lakon            1056 src/ccx_2.8.c  	nonlingeo(&co,&nk,&kon,&ipkon,&lakon,&ne,nodeboun,ndirboun,xboun,&nboun, 
lakon            1094 src/ccx_2.8.c  	  arpack(co,&nk,&kon,&ipkon,&lakon,&ne,nodeboun,ndirboun,xboun,&nboun, 
lakon            1126 src/ccx_2.8.c  	  arpackcs(co,&nk,&kon,&ipkon,&lakon,&ne,nodeboun,ndirboun,
lakon            1156 src/ccx_2.8.c  	arpackbu(co,&nk,kon,ipkon,lakon,&ne,nodeboun,ndirboun,xboun,&nboun, 
lakon            1186 src/ccx_2.8.c        dyna(&co,&nk,&kon,&ipkon,&lakon,&ne,&nodeboun,&ndirboun,&xboun,&nboun,
lakon            1216 src/ccx_2.8.c        steadystate(&co,&nk,&kon,&ipkon,&lakon,&ne,&nodeboun,&ndirboun,&xboun,&nboun,
lakon            1239 src/ccx_2.8.c        complexfreq(&co,&nk,&kon,&ipkon,&lakon,&ne,&nodeboun,&ndirboun,&xboun,&nboun,
lakon            1263 src/ccx_2.8.c  	electromagnetics(&co,&nk,&kon,&ipkon,&lakon,&ne,nodeboun,
lakon            1362 src/ccx_2.8.c        RENEW(lakon,char,8*ne);
lakon            1397 src/ccx_2.8.c          lakon,nodeboun,ndirboun,iamboun,xboun,ikboun,ilboun,ipompc,
lakon            1444 src/ccx_2.8.c  SFREE(co);SFREE(kon);SFREE(ipkon);SFREE(lakon);
lakon              33 src/checkconvergence.c void checkconvergence(double *co, ITG *nk, ITG *kon, ITG *ipkon, char *lakon,
lakon             208 src/checkconvergence.c                       nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
lakon             213 src/checkconvergence.c 		    frd(co,nk,kon,ipkon,lakon,ne,vold,stn,inum,nmethod,
lakon             330 src/checkconvergence.c 		ipkon,inum,kon,lakon,ne,mi,orab,ielorien,co,itg,ntg,vold,
lakon             335 src/checkconvergence.c 	    frd(co,nk,kon,ipkon,lakon,ne,vold,stn,inum,nmethod,
lakon             462 src/checkconvergence.c                        sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
lakon             467 src/checkconvergence.c 		    frd(co,nk,kon,ipkon,lakon,ne,vold,stn,inum,nmethod,
lakon             513 src/checkconvergence.c                            nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
lakon             518 src/checkconvergence.c 			frd(co,nk,kon,ipkon,lakon,ne,vold,stn,inum,nmethod,
lakon             540 src/checkconvergence.c                            nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
lakon             545 src/checkconvergence.c 			frd(co,nk,kon,ipkon,lakon,ne,vold,stn,inum,nmethod,
lakon             609 src/checkconvergence.c                            nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
lakon             614 src/checkconvergence.c 			frd(co,nk,kon,ipkon,lakon,ne,vold,stn,inum,nmethod,
lakon             633 src/checkconvergence.c                            nk,sti,stn,ipkon,inum,kon,lakon,ne,mi,orab,
lakon             638 src/checkconvergence.c 			frd(co,nk,kon,ipkon,lakon,ne,vold,stn,inum,nmethod,
lakon              74 src/complexfreq.c   char fneig[132]="",description[13]="            ",*lakon=NULL,*labmpc=NULL,
lakon             123 src/complexfreq.c   co=*cop;kon=*konp;ipkon=*ipkonp;lakon=*lakonp;ielmat=*ielmatp;
lakon             401 src/complexfreq.c 	  if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon             402 src/complexfreq.c 	  else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon             403 src/complexfreq.c 	  else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon             404 src/complexfreq.c 	  else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon             405 src/complexfreq.c 	  else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon             420 src/complexfreq.c 	    if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon             421 src/complexfreq.c 	    else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon             422 src/complexfreq.c 	    else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon             423 src/complexfreq.c 	    else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon             424 src/complexfreq.c 	    else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon             503 src/complexfreq.c       FORTRAN(mafillcorio,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,
lakon            1151 src/complexfreq.c   for(l=0;l<8**ne;l++){lakont[l]=lakon[l];}
lakon            1184 src/complexfreq.c 		lakont[l2+i*8**ne]=lakon[l2];
lakon            1342 src/complexfreq.c 	results(co,nk,kon,ipkon,lakon,ne,&v[kkv],&stn[kk6],inum,
lakon            1361 src/complexfreq.c 	results(co,nk,kon,ipkon,lakon,ne,&v[kkv],&stn[kk6],inum,
lakon            1826 src/complexfreq.c   *cop=co;*konp=kon;*ipkonp=ipkon;*lakonp=lakon;*ielmatp=ielmat;
lakon              25 src/contact.c  	     char *lakon, ITG *ipkon, ITG *kon, ITG *koncont, ITG *ne,
lakon              65 src/contact.c  			iendset,ialset,ipkon,lakon,kon,cs,mcs,ics));
lakon              87 src/contact.c  	FORTRAN(gencontelem_n2f,(tieset,ntie,itietri,ne,ipkon,kon,lakon,
lakon              99 src/contact.c  	  lakon,cg,straight,ifree,koncont,co,vold,xo,yo,zo,x,y,z,nx,ny,nz,
lakon              73 src/dyna.c       char fneig[132]="",description[13]="            ",*lakon=NULL,*labmpc=NULL,
lakon             153 src/dyna.c       co=*cop;kon=*konp;ipkon=*ipkonp;lakon=*lakonp;ielmat=*ielmatp;
lakon             238 src/dyna.c     		       nboun,nset,ntie,tieset,set,lakon,kon,ipkon,labmpc,
lakon             252 src/dyna.c     	      FORTRAN(addimdnodedload,(nelemload,sideload,ipkon,kon,lakon,
lakon             270 src/dyna.c           FORTRAN(elementpernode,(iponoel,inoel,lakon,ipkon,kon,ne));
lakon             281 src/dyna.c                        iponoel,inoel,prlab,prset,nprint,lakon,set,nset,
lakon             452 src/dyna.c           RENEW(lakon,char,8**ne*nsectors);
lakon             547 src/dyna.c           expand(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             634 src/dyna.c           if(strcmp1(&lakon[i*8],"ED")==0){
lakon             652 src/dyna.c           FORTRAN(mafilldm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             699 src/dyna.c     	  lakon,ipkon,kon,&koncont,nslavs,tietol,&ismallsliding,&itiefac,
lakon             719 src/dyna.c           RENEW(lakon,char,8*(*ne+*nslavs));
lakon             905 src/dyna.c       FORTRAN(createinum,(ipkon,inum,kon,lakon,nk,ne,&cflag[0],nelemload,
lakon             962 src/dyna.c       FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            1046 src/dyna.c     	      ialset,itietri,lakon,ipkon,kon,koncont,ne,cg,straight,nkon,
lakon            1063 src/dyna.c     	  for(j=0;j<8;j++){lakonl[j]=lakon[8*i+j];}
lakon            1281 src/dyna.c     	  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            1293 src/dyna.c     	  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            1397 src/dyna.c     		  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            1409 src/dyna.c     		  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            1688 src/dyna.c     			 kon,ipkon,lakon,ne,&reltime,&newstep,xboun,fmpc,
lakon            1703 src/dyna.c     	  dynacont(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon            1778 src/dyna.c     	results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon            1822 src/dyna.c     	frd(co,&nkg,kon,ipkon,lakon,&neg,v,stn,inum,nmethod,
lakon            1886 src/dyna.c     			 kon,ipkon,lakon,ne,&reltime,&newstep,xboun,fmpc,
lakon            1964 src/dyna.c           RENEW(lakon,char,8**ne);
lakon            2014 src/dyna.c           RENEW(lakon,char,8**ne);
lakon            2096 src/dyna.c       *cop=co;*konp=kon;*ipkonp=ipkon;*lakonp=lakon;*ielmatp=ielmat;
lakon              38 src/dynacont.c void dynacont(double *co, ITG *nk, ITG *kon, ITG *ipkon, char *lakon, ITG *ne, 
lakon             158 src/dynacont.c 	  ialset,itietri,lakon,ipkon,kon,koncont,ne,cg,
lakon             174 src/dynacont.c       for(j=0;j<8;j++){lakonl[j]=lakon[8*i+j];}
lakon             328 src/dynacont.c 	  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon             340 src/dynacont.c 	  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon             681 src/dynacont.c 			 kon,ipkon,lakon,ne,reltime,&newstep,xboun,fmpc,
lakon             711 src/dynacont.c 	      ialset,itietri,lakon,ipkon,kon,koncont,ne,cg,
lakon             725 src/dynacont.c 	for(j=0;j<8;j++){lakonl[j]=lakon[8*i+j];}
lakon              80 src/electromagnetics.c   char description[13]="            ",*lakon=NULL,jobnamef[396]="",
lakon             160 src/electromagnetics.c   ipkon=*ipkonp;lakon=*lakonp;kon=*konp;ielorien=*ielorienp;
lakon             182 src/electromagnetics.c 			 ipkon,lakon,kon,ne));
lakon             237 src/electromagnetics.c 		       ipkon,kon,lakon,ielmat,ne,nload,
lakon             247 src/electromagnetics.c 	  radcyc(nk,kon,ipkon,lakon,ne,cs,mcs,nkon,ialset,istartset,
lakon             391 src/electromagnetics.c       if(strcmp1(&lakon[8*i+6],"L")!=0){
lakon             399 src/electromagnetics.c 	     kon,ipkon,lakon,ne,nactdof,icol,jq,&irow,isolver,
lakon             410 src/electromagnetics.c 			 ipkon,lakon,kon,ne));
lakon             419 src/electromagnetics.c   results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             443 src/electromagnetics.c   FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xbounold,nboun,
lakon             467 src/electromagnetics.c       frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,&nmethodact,
lakon             530 src/electromagnetics.c   results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             554 src/electromagnetics.c       if(strcmp1(&lakon[8*i+6],"L")!=0){
lakon             557 src/electromagnetics.c 	  if(strcmp1(&lakon[8*i+3],"6")==0){nope=6;}
lakon             558 src/electromagnetics.c 	  else if(strcmp1(&lakon[8*i+3],"8")==0){nope=8;}
lakon             559 src/electromagnetics.c 	  else if(strcmp1(&lakon[8*i+3],"1")==0){nope=15;}
lakon             578 src/electromagnetics.c   FORTRAN(createinum,(ipkon,inum,kon,lakon,nk,ne,&cflag[0],nelemload,
lakon             584 src/electromagnetics.c       frdcyc(co,nk,kon,ipkon,lakon,ne,v,stn,inum,&nmethodact,kode,filab,een,
lakon             593 src/electromagnetics.c       frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,&nmethodact,
lakon             614 src/electromagnetics.c   FORTRAN(assigndomtonodes,(ne,lakon,ipkon,kon,ielmat,inomat,
lakon             619 src/electromagnetics.c   biosav(ipkon,kon,lakon,ne,co,qfx,h0,mi,inomat,nk);
lakon             627 src/electromagnetics.c       if(strcmp1(&lakon[8*i+6],"L")==0){
lakon             651 src/electromagnetics.c 	      iendset,ialset,tieset,inomat,ne,ipkon,lakon,kon,ntie,
lakon             665 src/electromagnetics.c        lakon,ipkon,kon,tietol,nmpc, &mpcfree,&memmpc_,
lakon             685 src/electromagnetics.c 	  ialset,iactive,ipkon,lakon,kon,ikmpc,nmpc,&maxfaces));
lakon             697 src/electromagnetics.c        ialset,&imast,ipkon,kon,lakon,imastnode,&nmastnode,
lakon             737 src/electromagnetics.c 	     kon,ipkon,lakon,ne,nactdof,icol,jq,&irow,isolver,
lakon             866 src/electromagnetics.c        ac,bc,nload,sideload,nelemload,xloadact,lakon,ipiv,ntmat_,vold,
lakon             897 src/electromagnetics.c       resultsinduction(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon             974 src/electromagnetics.c                 bcr,ipivr,ac,bc,nload,sideload,nelemload,xloadact,lakon,ipiv,
lakon             992 src/electromagnetics.c 	      FORTRAN(jouleheating,(ipkon,lakon,kon,co,elcon,nelcon,
lakon            1007 src/electromagnetics.c 	  FORTRAN(mafillem,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,
lakon            1047 src/electromagnetics.c 	      frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon            1174 src/electromagnetics.c 	  resultsinduction(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon            1267 src/electromagnetics.c 	  checkconvergence(co,nk,kon,ipkon,lakon,ne,stn,nmethod, 
lakon            1334 src/electromagnetics.c 	  resultsinduction(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon            1355 src/electromagnetics.c 	  FORTRAN(networkinum,(ipkon,inum,kon,lakon,ne,itg,&ntg));
lakon            1360 src/electromagnetics.c 	      frdcyc(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,kode,filab,een,
lakon            1369 src/electromagnetics.c 	      frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon            1407 src/electromagnetics.c       resultsinduction(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon            1428 src/electromagnetics.c       FORTRAN(networkinum,(ipkon,inum,kon,lakon,ne,itg,&ntg));
lakon            1433 src/electromagnetics.c 	  frdcyc(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,kode,filab,een,
lakon            1442 src/electromagnetics.c 	  frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon            1565 src/electromagnetics.c   *ipkonp=ipkon;*lakonp=lakon;*konp=kon;*ielorienp=ielorien;
lakon              31 src/exo.c      void exo(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne0,
lakon             173 src/exo.c      	}else if(strcmp1(&lakon[8*i],"ESPRNGC")==0){
lakon             175 src/exo.c      	}else if(strcmp1(&lakon[8*i],"ESPRNGF")==0){
lakon             177 src/exo.c      	}else if(strcmp1(&lakon[8*i],"DCOUP3D")==0){
lakon             179 src/exo.c      	}else if(strcmp2(&lakon[8*i+6],"LC",2)==0){
lakon             247 src/exo.c            }else if(strcmp1(&lakon[8*i],"F")==0){
lakon             249 src/exo.c            }else if(strcmp1(&lakon[8*i],"ESPRNGC")==0){
lakon             251 src/exo.c            }else if(strcmp1(&lakon[8*i],"ESPRNGF")==0){
lakon             253 src/exo.c            }else if(strcmp1(&lakon[8*i],"DCOUP3D")==0){
lakon             261 src/exo.c            strcpy1(curblk,&lakon[8*i],5);
lakon             263 src/exo.c            if(strcmp1(&lakon[8*i+3],"2")==0){
lakon             265 src/exo.c      	if(((strcmp1(&lakon[8*i+6]," ")==0)||
lakon             267 src/exo.c      	    (strcmp1(&lakon[8*i+6],"I")==0))&&
lakon             268 src/exo.c      	   (strcmp2(&lakon[8*i+6],"LC",2)!=0)){
lakon             270 src/exo.c      	}else if(strcmp2(&lakon[8*i+6],"LC",2)==0){
lakon             282 src/exo.c      	}else if(strcmp1(&lakon[8*i+6],"B")==0){
lakon             289 src/exo.c            }else if(strcmp1(&lakon[8*i+3],"8")==0){
lakon             290 src/exo.c      	if((strcmp1(&lakon[8*i+6]," ")==0)||
lakon             294 src/exo.c      	}else if(strcmp1(&lakon[8*i+6],"B")==0){
lakon             296 src/exo.c      	  if(strcmp1(&lakon[8*i+4],"R")==0){
lakon             298 src/exo.c      	  }else if(strcmp1(&lakon[8*i+4],"I")==0){
lakon             303 src/exo.c      	  if(strcmp1(&lakon[8*i+4],"R")==0){
lakon             305 src/exo.c      	  }else if(strcmp1(&lakon[8*i+4],"I")==0){
lakon             309 src/exo.c            }else if((strcmp1(&lakon[8*i+3],"10")==0)||
lakon             310 src/exo.c      	       (strcmp1(&lakon[8*i+3],"14")==0)){
lakon             313 src/exo.c            }else if(strcmp1(&lakon[8*i+3],"4")==0){
lakon             316 src/exo.c            }else if(strcmp1(&lakon[8*i+3],"15")==0){
lakon             317 src/exo.c      	if((strcmp1(&lakon[8*i+6]," ")==0)||
lakon             325 src/exo.c            }else if(strcmp1(&lakon[8*i+3],"6")==0){
lakon             326 src/exo.c      	if((strcmp1(&lakon[8*i+6]," ")==0)||
lakon             336 src/exo.c            }else if(strcmp1(&lakon[8*i],"D")==0){
lakon             347 src/exo.c            }else if((strcmp1(&lakon[8*i],"E")==0)&&
lakon             348 src/exo.c      	       (strcmp1(&lakon[8*i+6],"A")==0)){
lakon             926 src/exo.c      	  if((strcmp1(&lakon[8*i+1],"S")!=0)||(strcmp1(&lakon[8*i+6],"C")!=0))
lakon             933 src/exo.c      	    if((strcmp1(&lakon[8*i+1],"S")!=0)||(strcmp1(&lakon[8*i+6],"C")!=0))
lakon             935 src/exo.c      	    strcpy1(text,&lakon[8*i+7],1);
lakon             957 src/exo.c      	  if((strcmp1(&lakon[8*i+1],"S")!=0)||(strcmp1(&lakon[8*i+6],"C")!=0))
lakon             964 src/exo.c      	  if((strcmp1(&lakon[8*i+1],"S")!=0)||(strcmp1(&lakon[8*i+6],"C")!=0))
lakon             966 src/exo.c      	  nope=atoi(&lakon[8*i+7])+1;
lakon            1066 src/exo.c      	FORTRAN(zienzhu,(co,nk,kon,ipkon,lakon,ne0,stn,ipneigh,neigh,
lakon            1102 src/exo.c                FORTRAN(zienzhu,(co,nk,kon,ipkon,lakon,ne0,stn,ipneigh,neigh,
lakon            1126 src/exo.c      	FORTRAN(errorestimator,(stx,stn,ipkon,inum,kon,lakon,nk,ne,
lakon            1159 src/exo.c      	  FORTRAN(errorestimator,(&stx[6*mi[0]**ne],stn,ipkon,inum,kon,lakon,nk,ne,
lakon            1183 src/exo.c      	FORTRAN(errorestimator,(qfx,qfn,ipkon,inum,kon,lakon,nk,ne,
lakon            1213 src/exo.c      	  FORTRAN(errorestimator,(&qfx[3*mi[0]**ne],qfn,ipkon,inum,kon,lakon,nk,ne,
lakon              20 src/exo.h      void exo(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne0,
lakon              33 src/expand.c   void expand(double *co, ITG *nk, ITG *kon, ITG *ipkon, char *lakon,
lakon             148 src/expand.c   		  if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon             149 src/expand.c   		  else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon             150 src/expand.c   		  else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon             151 src/expand.c   		  else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon             152 src/expand.c   		  else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon             153 src/expand.c   		  else if (strcmp1(&lakon[8*iel+3],"6")==0)nope=6;
lakon             154 src/expand.c   		  else if (strcmp1(&lakon[8*iel],"ES")==0){
lakon             155 src/expand.c   		      lakonl[0]=lakon[8*iel+7];
lakon             160 src/expand.c   		  FORTRAN(calcmass,(ipkon,lakon,kon,co,mi,&nelem,ne,thicke,
lakon             178 src/expand.c   		      if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon             179 src/expand.c   		      else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon             180 src/expand.c   		      else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon             181 src/expand.c   		      else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon             182 src/expand.c   		      else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon             186 src/expand.c   		      FORTRAN(calcmass,(ipkon,lakon,kon,co,mi,&nelem,ne,thicke,
lakon             268 src/expand.c   			    lakon[l2+i*8**ne]=lakon[l2];
lakon             319 src/expand.c   	FORTRAN(addizdofdload,(nelemload,sideload,ipkon,kon,lakon,
lakon             518 src/expand.c   	    results(co,nk,kon,ipkon,lakon,ne,&v[kkv],&stn[kk6],inum,
lakon              27 src/frd.c      void frd(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne0,
lakon              92 src/frd.c          exo(co,nk,kon,ipkon,lakon,ne0,v,stn,inum,nmethod,kode,
lakon             261 src/frd.c      	    }else if(strcmp1(&lakon[8*i],"ESPRNGC")==0){
lakon             263 src/frd.c      	    }else if(strcmp1(&lakon[8*i],"ESPRNGF")==0){
lakon             265 src/frd.c                  }else if(strcmp1(&lakon[8*i],"DCOUP3D")==0){
lakon             286 src/frd.c            }else if(strcmp1(&lakon[8*i],"F")==0){
lakon             288 src/frd.c            }else if(strcmp1(&lakon[8*i],"ESPRNGC")==0){
lakon             290 src/frd.c            }else if(strcmp1(&lakon[8*i],"ESPRNGF")==0){
lakon             292 src/frd.c            }else if(strcmp1(&lakon[8*i],"DCOUP3D")==0){
lakon             298 src/frd.c            if(strcmp1(&lakon[8*i+3],"2")==0){
lakon             302 src/frd.c      	if(((strcmp1(&lakon[8*i+6]," ")==0)||
lakon             304 src/frd.c      	    (strcmp1(&lakon[8*i+6],"I")==0))&&
lakon             305 src/frd.c                 (strcmp2(&lakon[8*i+6],"LC",2)!=0)){
lakon             332 src/frd.c      	}else if(strcmp2(&lakon[8*i+6],"LC",2)==0){
lakon             372 src/frd.c      	}else if(strcmp1(&lakon[8*i+6],"B")==0){
lakon             393 src/frd.c      	  if(strcmp1(&lakon[8*i+6],"A")==0) iaxial=1;
lakon             408 src/frd.c            }else if(strcmp1(&lakon[8*i+3],"8")==0){
lakon             409 src/frd.c      	  if((strcmp1(&lakon[8*i+6]," ")==0)||
lakon             427 src/frd.c      	  }else if(strcmp1(&lakon[8*i+6],"B")==0){
lakon             431 src/frd.c      	      if(strcmp1(&lakon[8*i+4],"R")==0){
lakon             444 src/frd.c      	      }else if(strcmp1(&lakon[8*i+4],"I")==0){
lakon             462 src/frd.c      	      if(strcmp1(&lakon[8*i+6],"A")==0) iaxial=1;
lakon             463 src/frd.c      	      if((strcmp1(&lakon[8*i+4],"R")==0)||
lakon             464 src/frd.c      		 (strcmp1(&lakon[8*i+4]," ")==0)){
lakon             478 src/frd.c      	      }else if(strcmp1(&lakon[8*i+4],"I")==0){
lakon             494 src/frd.c            }else if((strcmp1(&lakon[8*i+3],"10")==0)||
lakon             495 src/frd.c                     (strcmp1(&lakon[8*i+3],"14")==0)){
lakon             512 src/frd.c            }else if(strcmp1(&lakon[8*i+3],"4")==0){
lakon             529 src/frd.c            }else if(strcmp1(&lakon[8*i+3],"15")==0){
lakon             530 src/frd.c      	if((strcmp1(&lakon[8*i+6]," ")==0)||
lakon             562 src/frd.c      	  if(strcmp1(&lakon[8*i+6],"A")==0) iaxial=1;
lakon             577 src/frd.c            }else if(strcmp1(&lakon[8*i+3],"6")==0){
lakon             578 src/frd.c      	  if((strcmp1(&lakon[8*i+6]," ")==0)||
lakon             600 src/frd.c      	      if(strcmp1(&lakon[8*i+6],"A")==0) iaxial=1;
lakon             615 src/frd.c            }else if((strcmp1(&lakon[8*i],"D")==0)&&(ithermal[1]>1)){
lakon             666 src/frd.c            }else if((strcmp1(&lakon[8*i],"E")==0)&&
lakon             667 src/frd.c                     (strcmp1(&lakon[8*i+6],"A")==0)){
lakon            1096 src/frd.c            if((strcmp1(&lakon[8*i+1],"S")!=0)||(strcmp1(&lakon[8*i+6],"C")!=0))
lakon            1113 src/frd.c            if((strcmp1(&lakon[8*i+1],"S")!=0)||(strcmp1(&lakon[8*i+6],"C")!=0))
lakon            1115 src/frd.c            strcpy1(text,&lakon[8*i+7],1);
lakon            1188 src/frd.c            if((strcmp1(&lakon[8*i+1],"S")!=0)||(strcmp1(&lakon[8*i+6],"C")!=0))
lakon            1200 src/frd.c            if((strcmp1(&lakon[8*i+1],"S")!=0)||(strcmp1(&lakon[8*i+6],"C")!=0))
lakon            1202 src/frd.c            nope=atoi(&lakon[8*i+7])+1;
lakon            1323 src/frd.c          FORTRAN(zienzhu,(co,nk,kon,ipkon,lakon,ne0,stn,ipneigh,neigh,
lakon            1356 src/frd.c            FORTRAN(zienzhu,(co,nk,kon,ipkon,lakon,ne0,stn,ipneigh,neigh,
lakon            1382 src/frd.c          FORTRAN(errorestimator,(stx,stn,ipkon,inum,kon,lakon,nk,ne,
lakon            1415 src/frd.c            FORTRAN(errorestimator,(&stx[6*mi[0]**ne],stn,ipkon,inum,kon,lakon,nk,ne,
lakon            1441 src/frd.c          FORTRAN(errorestimator,(qfx,qfn,ipkon,inum,kon,lakon,nk,ne,
lakon            1473 src/frd.c            FORTRAN(errorestimator,(&qfx[3*mi[0]**ne],qfn,ipkon,inum,kon,lakon,nk,ne,
lakon              24 src/frdcyc.c   void frdcyc(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne,double *v,
lakon              81 src/frdcyc.c           if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon              82 src/frdcyc.c           else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon              83 src/frdcyc.c           else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon              84 src/frdcyc.c           else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon              85 src/frdcyc.c           else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon             100 src/frdcyc.c             if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon             101 src/frdcyc.c             else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon             102 src/frdcyc.c             else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon             103 src/frdcyc.c             else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon             104 src/frdcyc.c             else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon             171 src/frdcyc.c         for(l=0;l<8**ne;l++){lakont[l]=lakon[l];}
lakon             213 src/frdcyc.c                   lakont[l2+i*8**ne]=lakon[l2];
lakon              26 src/inicont.c                 char *lakon, ITG *ipkon, ITG *kon, ITG **koncontp,
lakon              62 src/inicont.c  	  ialset,lakon,&ncone,tietol,ismallsliding,kind1,kind2,mortar,
lakon              72 src/inicont.c  	  ialset,itietri,lakon,ipkon,kon,koncont,kind1,kind2,co,nk));
lakon              91 src/inicont.c    FORTRAN(findsurface,(ipoface,nodface,ne,ipkon,kon,lakon,ntie,
lakon             108 src/inicont.c    FORTRAN(tiefaccont,(lakon,ipkon,kon,ntie,tieset,nset,set,
lakon              35 src/linstatic.c void linstatic(double *co, ITG *nk, ITG *kon, ITG *ipkon, char *lakon,
lakon             172 src/linstatic.c   results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             207 src/linstatic.c   FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xbounact,nboun,
lakon             329 src/linstatic.c 	  results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             443 src/linstatic.c     results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             479 src/linstatic.c       frdcyc(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,kode,filab,een,t1act,
lakon             492 src/linstatic.c 	frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon             521 src/linstatic.c     frd(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,
lakon              27 src/mastruct.c void mastruct(ITG *nk, ITG *kon, ITG *ipkon, char *lakon, ITG *ne,
lakon              64 src/mastruct.c 	  if(strcmp1(&lakon[8*i],"F")==0)continue;
lakon              67 src/mastruct.c           if (strcmp1(&lakon[8*i+3],"8I")==0)nope=11;
lakon              68 src/mastruct.c 	  else if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon              70 src/mastruct.c 	  else if(strcmp1(&lakon[8*i+3],"2")==0)nope=26;
lakon              71 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon              72 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon              73 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"14")==0)nope=14;
lakon              74 src/mastruct.c 	  else if ((strcmp1(&lakon[8*i+3],"4")==0)||
lakon              75 src/mastruct.c                    (strcmp1(&lakon[8*i+2],"4")==0)) nope=4;
lakon              76 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon              77 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon              78 src/mastruct.c 	  else if (strcmp1(&lakon[8*i],"E")==0){
lakon              79 src/mastruct.c 	      if((strcmp1(&lakon[8*i+6],"C")==0)&&(*mortar==1)){
lakon              82 src/mastruct.c 		  lakonl[0]=lakon[8*i+7];
lakon             104 src/mastruct.c 	  if(strcmp1(&lakon[8*i],"F")==0)continue;
lakon             106 src/mastruct.c 	  if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon             107 src/mastruct.c 	  else if(strcmp1(&lakon[8*i+3],"2")==0)nope=26;
lakon             108 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon             109 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon             110 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"14")==0)nope=14;
lakon             111 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"4")==0)nope=4;
lakon             112 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon             113 src/mastruct.c 	  else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon             114 src/mastruct.c 	  else if (strcmp1(&lakon[8*i],"E")==0){
lakon             115 src/mastruct.c 	      if((strcmp1(&lakon[8*i+6],"C")==0)&&(*mortar==1)){
lakon             118 src/mastruct.c 		  lakonl[0]=lakon[8*i+7];
lakon             121 src/mastruct.c 	  }else if (strcmp1(&lakon[8*i],"D ")==0){
lakon             224 src/mastruct.c       if(strcmp1(&lakon[8*i],"F")==0)continue;
lakon             227 src/mastruct.c       if (strcmp1(&lakon[8*i+3],"8I")==0)nope=11;
lakon             228 src/mastruct.c       else if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon             230 src/mastruct.c       else if(strcmp1(&lakon[8*i+3],"2")==0)nope=26;
lakon             231 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon             232 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon             233 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"14")==0)nope=14;
lakon             234 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"4")==0)nope=4;
lakon             235 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon             236 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon             237 src/mastruct.c       else if (strcmp1(&lakon[8*i],"E")==0){
lakon             238 src/mastruct.c 	  if((strcmp1(&lakon[8*i+6],"C")==0)&&(*mortar==1)){
lakon             241 src/mastruct.c 	      lakonl[0]=lakon[8*i+7];
lakon             390 src/mastruct.c       if(strcmp1(&lakon[8*i],"F")==0)continue;
lakon             392 src/mastruct.c       if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon             393 src/mastruct.c       else if(strcmp1(&lakon[8*i+3],"2")==0)nope=26;
lakon             394 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon             395 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon             396 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"14")==0)nope=14;
lakon             397 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"4")==0)nope=4;
lakon             398 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon             399 src/mastruct.c       else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon             400 src/mastruct.c       else if (strcmp1(&lakon[8*i],"E")==0){
lakon             401 src/mastruct.c 	  if((strcmp1(&lakon[8*i+6],"C")==0)&&(*mortar==1)){
lakon             404 src/mastruct.c 	      lakonl[0]=lakon[8*i+7];
lakon             407 src/mastruct.c       }else if (strcmp1(&lakon[8*i],"D ")==0){
lakon              27 src/mastructcs.c void mastructcs(ITG *nk, ITG *kon, ITG *ipkon, char *lakon, ITG *ne,
lakon              67 src/mastructcs.c     if (strcmp1(&lakon[8*i+3],"8I")==0)nope=11;
lakon              68 src/mastructcs.c     else if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon              70 src/mastructcs.c     else if(strcmp1(&lakon[8*i+3],"2")==0)nope=26;
lakon              71 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon              72 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon              73 src/mastructcs.c     else if ((strcmp1(&lakon[8*i+3],"4")==0)||
lakon              74 src/mastructcs.c 	     (strcmp1(&lakon[8*i+2],"4")==0)) nope=4;
lakon              75 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon              76 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon              77 src/mastructcs.c     else if (strcmp1(&lakon[8*i],"E")==0){
lakon              78 src/mastructcs.c 	if((strcmp1(&lakon[8*i+6],"C")==0)&&(*mortar==1)){
lakon              81 src/mastructcs.c 	    lakonl[0]=lakon[8*i+7];
lakon             152 src/mastructcs.c     if(strcmp1(&lakon[8*i],"C3D8I")==0){nope=11;}
lakon             153 src/mastructcs.c     else if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon             155 src/mastructcs.c     else if(strcmp1(&lakon[8*i+3],"2")==0)nope=26;
lakon             156 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon             157 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon             158 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"4")==0)nope=4;
lakon             159 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon             160 src/mastructcs.c     else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon             161 src/mastructcs.c     else if (strcmp1(&lakon[8*i],"E")==0){
lakon             162 src/mastructcs.c 	if((strcmp1(&lakon[8*i+6],"C")==0)&&(*mortar==1)){
lakon             165 src/mastructcs.c 	    lakonl[0]=lakon[8*i+7];
lakon              27 src/mastructem.c void mastructem(ITG *nk, ITG *kon, ITG *ipkon, char *lakon, ITG *ne,
lakon              64 src/mastructem.c 	  if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon              65 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon              66 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon              67 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"4")==0) nope=4;
lakon              68 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon              69 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon             115 src/mastructem.c 	  if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon             116 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon             117 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon             118 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"4")==0)nope=4;
lakon             119 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon             120 src/mastructem.c 	  else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon             121 src/mastructem.c 	  else if (strcmp1(&lakon[8*i],"E")==0){
lakon             122 src/mastructem.c 	      lakonl[0]=lakon[8*i+7];
lakon             124 src/mastructem.c 	  else if (strcmp1(&lakon[8*i],"D ")==0){
lakon             223 src/mastructem.c       if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon             224 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon             225 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon             226 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"4")==0)nope=4;
lakon             227 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon             228 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon             374 src/mastructem.c       if(strcmp1(&lakon[8*i+3],"20")==0)nope=20;
lakon             375 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"8")==0)nope=8;
lakon             376 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"10")==0)nope=10;
lakon             377 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"4")==0)nope=4;
lakon             378 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"15")==0)nope=15;
lakon             379 src/mastructem.c       else if (strcmp1(&lakon[8*i+3],"6")==0)nope=6;
lakon             380 src/mastructem.c       else if (strcmp1(&lakon[8*i],"E")==0){
lakon             381 src/mastructem.c 	  lakonl[0]=lakon[8*i+7];
lakon             383 src/mastructem.c       else if (strcmp1(&lakon[8*i],"D ")==0){
lakon              27 src/mastructf.c void mastructf(ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon              49 src/mastructf.c       if(strcmp1(&lakon[8*i+3],"8")==0){
lakon              51 src/mastructf.c       }else if(strcmp1(&lakon[8*i+3],"6")==0){
lakon              29 src/matrixstorage.c 		char *jobnamec, ITG *mi, ITG *ipkon, char *lakon,
lakon             550 src/matrixstorage.c 			 ipkon,lakon,kon,ne));
lakon              22 src/matrixstorage.h                    char *lakon,ITG *kon,ITG *ne,ITG *mei,ITG *nboun,
lakon              82 src/nonlingeo.c   char description[13]="            ",*lakon=NULL,jobnamef[396]="",
lakon             149 src/nonlingeo.c   ipkon=*ipkonp;lakon=*lakonp;kon=*konp;ielorien=*ielorienp;
lakon             218 src/nonlingeo.c 		  if(strcmp1(&lakon[i*8],"ED")==0){
lakon             259 src/nonlingeo.c 			 ipkon,lakon,kon,ne));
lakon             321 src/nonlingeo.c 		       ipkon,kon,lakon,ielmat,ne,nload,
lakon             331 src/nonlingeo.c 	  radcyc(nk,kon,ipkon,lakon,ne,cs,mcs,nkon,ialset,istartset,
lakon             380 src/nonlingeo.c       if(strcmp1(&lakon[8*i],"F")==0){
lakon             401 src/nonlingeo.c       FORTRAN(precfd,(ne,ipkon,kon,lakon,ipnei,neifa,neiel,ipoface,
lakon             424 src/nonlingeo.c 	  lakon,ipkon,kon,&koncont,nslavs,tietol,&ismallsliding,&itiefac,
lakon             447 src/nonlingeo.c 	  RENEW(lakon,char,8*(*ne+*nslavs));
lakon             621 src/nonlingeo.c 			 kon,ipkon,lakon,ne,&reltime,&newstep,xboun,fmpc,
lakon             634 src/nonlingeo.c 	      kon,ipkon,lakon,ne,nactdof,icol,jq,&irow,isolver,
lakon             651 src/nonlingeo.c       results(co,nk,kon,ipkon,lakon,ne,vold,stn,inum,stx,
lakon             695 src/nonlingeo.c       FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xbounold,nboun,
lakon             723 src/nonlingeo.c 	  frd(co,nk,kon,ipkon,lakon,&ne0,v,stn,inum,nmethod,
lakon             822 src/nonlingeo.c       results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon             954 src/nonlingeo.c        ac,bc,nload,sideload,nelemload,xloadact,lakon,ipiv,ntmat_,vold,
lakon            1031 src/nonlingeo.c                      iendset,ialset,itietri,lakon,ipkon,kon,koncont,ne,
lakon            1048 src/nonlingeo.c 		  RENEW(lakon,char,8*(*ne+*nintpoint));
lakon            1061 src/nonlingeo.c 		  ialset,itietri,lakon,ipkon,kon,koncont,ne,cg,straight,nkon,
lakon            1079 src/nonlingeo.c 			      if(strcmp1(&lakon[i*8],"ES")==0){
lakon            1080 src/nonlingeo.c 				  if(strcmp1(&lakon[i*8+6],"C")==0){
lakon            1119 src/nonlingeo.c 			  FORTRAN(interpolatestate,(ne,ipkon,kon,lakon,
lakon            1149 src/nonlingeo.c 			 kon,ipkon,lakon,ne,&reltime,&newstep,xboun,fmpc,
lakon            1163 src/nonlingeo.c 	  kon,ipkon,lakon,ne,nactdof,icol,jq,&irow,isolver,
lakon            1174 src/nonlingeo.c 			     ipkon,lakon,kon,ne));
lakon            1251 src/nonlingeo.c 	  results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon            1279 src/nonlingeo.c 	  results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon            1348 src/nonlingeo.c 	     ac,bc,nload,sideload,nelemload,xloadact,lakon,ipiv,
lakon            1374 src/nonlingeo.c 		      ialset,itietri,lakon,ipkon,kon,koncont,ne,cg,
lakon            1393 src/nonlingeo.c 				  if(strcmp1(&lakon[i*8],"ES")==0){
lakon            1394 src/nonlingeo.c 				      if(strcmp1(&lakon[i*8+6],"C")==0){
lakon            1426 src/nonlingeo.c 	        kon,ipkon,lakon,ne,&reltime,&newstep,xboun,fmpc,&iit,
lakon            1442 src/nonlingeo.c 		kon,ipkon,lakon,ne,nactdof,icol,jq,&irow,isolver,
lakon            1453 src/nonlingeo.c 				     ipkon,lakon,kon,ne));
lakon            1464 src/nonlingeo.c 	      results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon            1500 src/nonlingeo.c 	FORTRAN(mafillsm,(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xbounact,nboun,
lakon            1523 src/nonlingeo.c 	    FORTRAN(mafillsmas,(co,nk,kon,ipkon,lakon,ne,nodeboun,
lakon            1557 src/nonlingeo.c 	  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            1595 src/nonlingeo.c 	  FORTRAN(mafilldm,(co,nk,kon,ipkon,lakon,ne,nodeboun,
lakon            1633 src/nonlingeo.c 	  frd(co,nk,kon,ipkon,lakon,&ne0,v,stn,inum,nmethod,
lakon            1825 src/nonlingeo.c       results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon            1988 src/nonlingeo.c       checkconvergence(co,nk,kon,ipkon,lakon,ne,stn,nmethod, 
lakon            2127 src/nonlingeo.c       results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon            2155 src/nonlingeo.c 	frdcyc(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,kode,filab,een,
lakon            2172 src/nonlingeo.c 	  frd(co,nk,kon,ipkon,lakon,&ne0,v,stn,inum,nmethod,
lakon            2229 src/nonlingeo.c     results(co,nk,kon,ipkon,lakon,ne,v,stn,inum,stx,
lakon            2257 src/nonlingeo.c       frdcyc(co,nk,kon,ipkon,lakon,ne,v,stn,inum,nmethod,kode,filab,een,
lakon            2275 src/nonlingeo.c 	frd(co,nk,kon,ipkon,lakon,&ne0,v,stn,inum,nmethod,
lakon            2401 src/nonlingeo.c       RENEW(lakon,char,8**ne);
lakon            2436 src/nonlingeo.c   *ipkonp=ipkon;*lakonp=lakon;*konp=kon;*ielorienp=ielorien;
lakon              26 src/precontact.c         char *lakon, ITG *ipkon, ITG *kon, ITG *koncont, ITG *ne,
lakon              54 src/precontact.c 			   iendset,ialset,ipkon,lakon,kon,cs,mcs,ics));
lakon              85 src/precontact.c                 ipkon,kon,lakon,islavsurf));
lakon             143 src/precontact.c 			lakon,straight,nintpoint,koncont,co,vold,
lakon              24 src/radcyc.c   void radcyc(ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon              69 src/radcyc.c           if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon              70 src/radcyc.c           else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon              71 src/radcyc.c           else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon              72 src/radcyc.c           else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon              73 src/radcyc.c           else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon              87 src/radcyc.c             if(strcmp1(&lakon[8*iel+3],"2")==0)nope=20;
lakon              88 src/radcyc.c             else if (strcmp1(&lakon[8*iel+3],"8")==0)nope=8;
lakon              89 src/radcyc.c             else if (strcmp1(&lakon[8*iel+3],"10")==0)nope=10;
lakon              90 src/radcyc.c             else if (strcmp1(&lakon[8*iel+3],"4")==0)nope=4;
lakon              91 src/radcyc.c             else if (strcmp1(&lakon[8*iel+3],"15")==0)nope=15;
lakon              48 src/radflowload.c                  ITG *nelemload,double *xloadact,char *lakon,ITG *ipiv,
lakon             112 src/radflowload.c 	      FORTRAN(initialnet,(itg,ieg,ntg,ac,bc,lakon,v,
lakon             123 src/radflowload.c 		  FORTRAN(initialchannel,(itg,ieg,ntg,ac,bc,lakon,v,
lakon             136 src/radflowload.c 			  lakon,ntmat_,v,shcon,nshcon,ipkon,kon,co,nflow,
lakon             154 src/radflowload.c 			     nelemload,xloadact,lakon,ntmat_,v,
lakon             175 src/radflowload.c 				 nelemload,xloadact,lakon,ntmat_,v,
lakon             193 src/radflowload.c 	       xloadact,lakon,ntmat_,v,shcon,nshcon,ipkon,kon,co,
lakon             285 src/radflowload.c 	      nelemload,xloadact,nactdog,network,mi,ne,ipkon,lakon,kon));
lakon             291 src/radflowload.c 	FORTRAN(flowoutput,(itg,ieg,ntg,nteq,bc,lakon,ntmat_,
lakon             479 src/radflowload.c           xloadact,lakon,vold,ipkon,kon,co,nloadtr,tarea,tenv,physcon,
lakon              29 src/remastruct.c               ITG *kon, ITG *ipkon, char *lakon, ITG *ne,
lakon              72 src/remastruct.c     mastruct(nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,nboun,ipompc,
lakon              29 src/remastructar.c               ITG *kon, ITG *ipkon, char *lakon, ITG *ne,
lakon              72 src/remastructar.c 	mastruct(nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,nboun,ipompc,
lakon              81 src/remastructar.c       mastructcs(nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,nboun,
lakon              29 src/remastructem.c               ITG *kon, ITG *ipkon, char *lakon, ITG *ne,
lakon              72 src/remastructem.c     mastructem(nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,nboun,ipompc,
lakon              42 src/results.c  void results(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne,
lakon             169 src/results.c  	FORTRAN(frditeration,(co,nk,kon,ipkon,lakon,ne,v,
lakon             182 src/results.c  	co1=co;kon1=kon;ipkon1=ipkon;lakon1=lakon;ne1=ne;v1=v;
lakon             268 src/results.c  	co1=co;kon1=kon;ipkon1=ipkon;lakon1=lakon;v1=v;
lakon             339 src/results.c      FORTRAN(resultsprint,(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon              42 src/resultsinduction.c void resultsinduction(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,
lakon             176 src/resultsinduction.c 	FORTRAN(frditeration,(co,nk,kon,ipkon,lakon,ne,v,
lakon             185 src/resultsinduction.c 	co1=co;kon1=kon;ipkon1=ipkon;lakon1=lakon;v1=v;elcon1=elcon;
lakon             219 src/resultsinduction.c 	co1=co;kon1=kon;ipkon1=ipkon;lakon1=lakon;v1=v;
lakon             290 src/resultsinduction.c     FORTRAN(resultsprint,(co,nk,kon,ipkon,lakon,ne,v,stn,inum,
lakon              72 src/steadystate.c   char fneig[132]="",description[13]="            ",*lakon=NULL,*labmpc=NULL,
lakon             134 src/steadystate.c   co=*cop;kon=*konp;ipkon=*ipkonp;lakon=*lakonp;ielmat=*ielmatp;
lakon             209 src/steadystate.c 		       nboun,nset,&ntie,tieset,set,lakon,kon,ipkon,labmpc,
lakon             223 src/steadystate.c 	      FORTRAN(addimdnodedload,(nelemload,sideload,ipkon,kon,lakon,
lakon             242 src/steadystate.c       FORTRAN(elementpernode,(iponoel,inoel,lakon,ipkon,kon,ne));
lakon             253 src/steadystate.c                    iponoel,inoel,prlab,prset,nprint,lakon,set,nset,
lakon             494 src/steadystate.c       RENEW(lakon,char,8**ne*nsectors);
lakon             541 src/steadystate.c       expand(co,nk,kon,ipkon,lakon,ne,nodeboun,ndirboun,xboun,nboun,
lakon             588 src/steadystate.c       if(strcmp1(&lakon[i*8],"ED")==0){
lakon             615 src/steadystate.c   FORTRAN(createinum,(ipkon,inum,kon,lakon,nk,ne,&cflag[0],nelemload,
lakon             967 src/steadystate.c 	      FORTRAN(mafilldm,(co,nk,kon,ipkon,lakon,ne,nodeboun,
lakon            1047 src/steadystate.c 	  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            1192 src/steadystate.c 	  FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            1593 src/steadystate.c 	      results(co,nk,kon,ipkon,lakon,ne,vr,stnr,inum,
lakon            1621 src/steadystate.c 	      results(co,nk,kon,ipkon,lakon,ne,vr,stnr,inum,
lakon            1658 src/steadystate.c 	  frd(co,&nkg,kon,ipkon,lakon,&neg,vr,stnr,inum,nmethod,
lakon            1679 src/steadystate.c 	      results(co,nk,kon,ipkon,lakon,ne,vi,stni,inum,
lakon            1707 src/steadystate.c 	      results(co,nk,kon,ipkon,lakon,ne,vi,stni,inum,
lakon            1860 src/steadystate.c 	  frd(co,&nkg,kon,ipkon,lakon,&neg,vi,stni,inum,nmethod,
lakon            2243 src/steadystate.c 		  FORTRAN(mafilldm,(co,nk,kon,ipkon,lakon,ne,nodeboun,
lakon            2303 src/steadystate.c 	      FORTRAN(rhs,(co,nk,kon,ipkon,lakon,ne,
lakon            2706 src/steadystate.c 	      results(co,nk,kon,ipkon,lakon,ne,vr,stn,inum,
lakon            2735 src/steadystate.c 	      frd(co,&nkg,kon,ipkon,lakon,&neg,vr,stn,inum,nmethod,
lakon            2814 src/steadystate.c       RENEW(lakon,char,8**ne);
lakon            2890 src/steadystate.c   *cop=co;*konp=kon;*ipkonp=ipkon;*lakonp=lakon;*ielmatp=ielmat;
lakon              25 src/tiedcontact.c                char *lakon, ITG *ipkon, ITG *kon,
lakon              60 src/tiedcontact.c 	  ialset,lakon,&ncone,tietol,&ismallsliding,kind1,
lakon              78 src/tiedcontact.c 	  ialset,itietri,lakon,ipkon,kon,koncont,kind1,kind2,co,nk));
lakon             107 src/tiedcontact.c   FORTRAN(nodestiedface,(tieset,ntie,ipkon,kon,lakon,set,istartset,
lakon             174 src/tiedcontact.c 	  lakon,set,istartset,iendset,ialset,cg,straight,