a                  39 src/CalculiX.h #define NNEW(a,b,c) a=(b *)u_calloc((c),sizeof(b),__FILE__,__LINE__,#a)
a                  40 src/CalculiX.h #define RENEW(a,b,c) a=(b *)u_realloc((b *)(a),(c)*sizeof(b),__FILE__,__LINE__,#a)
a                  41 src/CalculiX.h #define SFREE(a) u_free(a,__FILE__,__LINE__,#a)
a                  45 src/CalculiX.h #define DMEMSET(a,b,c,d) for(im=b;im<c;im++)a[im]=d
a                2231 src/CalculiX.h void FORTRAN(transformatrix,(double *xab,double *p,double *a));
a                  31 src/cascade.c  #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  32 src/cascade.c  #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  28 src/exo.c      #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  29 src/exo.c      #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  28 src/exoselect.c #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  29 src/exoselect.c #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  37 src/exovector.c   double a[9];
a                  77 src/exovector.c 	    FORTRAN(transformatrix,(&trab[7*(inotr[2*i]-1)],&co[3*i],a));
a                  78 src/exovector.c 	    nodal_var_vals[m++]=v[ii]*a[0+(j-1)*3]+v[jj]*a[1+(j-1)*3]+v[kk]*a[2+(j-1)*3];
a                  93 src/exovector.c 	      FORTRAN(transformatrix,(&trab[7*(inotr[2*i]-1)],&co[3*i],a));
a                  97 src/exovector.c 	      nodal_var_vals[m++]=v[ii]*a[0+(j-1)*3]+v[jj]*a[1+(j-1)*3]+v[kk]*a[2+(j-1)*3];
a                 112 src/exovector.c 		FORTRAN(transformatrix,(&trab[7*(inotr[2*i]-1)],&co[3*i],a));
a                 116 src/exovector.c 		nodal_var_vals[n++]=v[ii]*a[0+(j-1)*3]+v[jj]*a[1+(j-1)*3]+v[kk]*a[2+(j-1)*3];
a                  90 src/expand.c           *coefright=NULL,coef,a[9],ratio,reltime,
a                 792 src/expand.c   						    &co[3*node-3],a));
a                 795 src/expand.c   				    if(fabs(a[3*k+idir-1]-coef)<1.e-10){
a                 797 src/expand.c   								&co[3*nodenew-3],a));
a                 798 src/expand.c   					coef=a[3*k+idir-1];
a                 802 src/expand.c   				    if(fabs(a[3*k+idir-1]+coef)<1.e-10){
a                 804 src/expand.c   								&co[3*nodenew-3],a));
a                 805 src/expand.c   					coef=-a[3*k+idir-1];
a                 812 src/expand.c   				    if(fabs(a[3*locdir+idir-1])>1.e-10){
a                 813 src/expand.c   					ratio=coef/a[3*locdir+idir-1];
a                 816 src/expand.c   							    &co[3*nodenew-3],a));
a                 817 src/expand.c   				    coef=ratio*a[3*locdir+idir-1];
a                  24 src/frd.c      #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  25 src/frd.c      #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  24 src/frdselect.c #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  25 src/frdselect.c #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  35 src/frdvector.c   double a[9];
a                  67 src/frdvector.c 	  FORTRAN(transformatrix,(&trab[7*(inotr[2*i]-1)],&co[3*i],a));
a                  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]),
a                  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]),
a                  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]));
a                  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];
a                  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];
a                  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];
a                 103 src/frdvector.c 	      FORTRAN(transformatrix,(&trab[7*(inotr[2*i]-1)],&co[3*i],a));
a                 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]),
a                 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]),
a                 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]));
a                 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];
a                 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];
a                 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];
a                 139 src/frdvector.c 	      FORTRAN(transformatrix,(&trab[7*(inotr[2*i]-1)],&co[3*i],a));
a                 142 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[0]+v[(mi[1]+1)*i+2]*a[1]+
a                 143 src/frdvector.c 				  v[(mi[1]+1)*i+3]*a[2]),
a                 144 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[3]+v[(mi[1]+1)*i+2]*a[4]+
a                 145 src/frdvector.c 				  v[(mi[1]+1)*i+3]*a[5]),
a                 146 src/frdvector.c 			  (float)(v[(mi[1]+1)*i+1]*a[6]+v[(mi[1]+1)*i+2]*a[7]+
a                 147 src/frdvector.c 				  v[(mi[1]+1)*i+3]*a[8]));
a                 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];
a                 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];
a                 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];
a                  24 src/mastruct.c #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  25 src/mastruct.c #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  24 src/mastructcs.c #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  25 src/mastructcs.c #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  24 src/mastructem.c #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  25 src/mastructem.c #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  24 src/mastructf.c #define min(a,b) ((a) <= (b) ? (a) : (b))
a                  25 src/mastructf.c #define max(a,b) ((a) >= (b) ? (a) : (b))
a                  39 src/matrixstorage.c   double *au=NULL,*aa=NULL,*trans=NULL,*aa3=NULL,a[9];
a                 233 src/matrixstorage.c         FORTRAN(transformatrix,(&trab[7*itrans-7],&co[3*i],a));
a                 235 src/matrixstorage.c           trans[3*(idof-1)+j]=a[j];
a                 457 src/matrixstorage.c         FORTRAN(transformatrix,(&trab[7*itrans-7],&co[3*i],a));
a                 459 src/matrixstorage.c           trans[3*(idof-1)+j]=a[j];
a                  45 src/pcgsolver.c void InnerProduct (double *a, double *b, ITG n, double *Sum);
a                 477 src/pcgsolver.c void InnerProduct (double *a, double *b, ITG n, double *Sum)
a                 482 src/pcgsolver.c 		for (i=0; i<n; i++)	       *Sum += a[i]*b[i];
a                 110 src/readfrd.h  ITG stoi(char *string, ITG a, ITG b);
a                 111 src/readfrd.h  double stof(char *string, ITG a, ITG b);
a                 112 src/readfrd.h  void stos(char *string, ITG a, ITG b, char *puffer);
a                 118 src/readfrd.h  double v_betrag(double *a);
a                  15 src/stof.c     double stof(char *string, ITG a, ITG b)
a                  21 src/stof.c       for (i=a-1; i<b; i++)
a                  15 src/stoi.c     ITG stoi(char *string, ITG a, ITG b)
a                  21 src/stoi.c       for (i=a-1; i<b; i++)
a                  16 src/stos.c     void stos(char *string, ITG a, ITG b, char *puffer)
a                  21 src/stos.c       for (i=a-1; i<b; i++)
a                  31 src/stos.c     void stos_inv(char *string, ITG a, ITG b, char *puffer)
a                  36 src/stos.c       for (i=a-1; i<b; i++)
a                  26 src/strcmp1.c    ITG a,b;
a                  29 src/strcmp1.c      a=*s1++;
a                  38 src/strcmp1.c        a='\0';
a                  42 src/strcmp1.c      if(a=='\0'){
a                  43 src/strcmp1.c        a='\0';
a                  47 src/strcmp1.c    }while(a==b);
a                  48 src/strcmp1.c    return(a-b);
a                  30 src/strcmp2.c    ITG a,b,i;
a                  34 src/strcmp2.c      a=*s1++;
a                  38 src/strcmp2.c        a='\0';
a                  42 src/strcmp2.c      if(a=='\0'){
a                  43 src/strcmp2.c        a='\0';
a                  48 src/strcmp2.c    }while((a==b)&&(i<length));
a                  49 src/strcmp2.c    return(a-b);
a                  33 src/u_calloc.c   void *a;
a                  37 src/u_calloc.c     a=NULL;
a                  38 src/u_calloc.c     return(a);
a                  41 src/u_calloc.c   a=calloc(num,size);
a                  42 src/u_calloc.c   if(a==NULL){
a                  54 src/u_calloc.c 	printf("ALLOCATION of variable %s, file %s, line=%d, num=%ld, size=%ld, address= %ld\n",ptr_name,file,line,num,size,(long int)a);
a                  56 src/u_calloc.c     return(a);
a                  32 src/u_realloc.c   void *a;
a                  35 src/u_realloc.c   a=realloc(ptr,size);
a                  37 src/u_realloc.c   if(a==NULL && ptr!=NULL && size!=0){
a                  49 src/u_realloc.c       printf("REALLOCATION of variable %s, file %s, line=%d: size(bytes)=%ld, oldaddress= %ld,address= %ld\n",ptr_name,file,line,size,(long int)ptr,(long int)a);
a                  51 src/u_realloc.c     return(a);
a                   9 src/v_betrag.c double v_betrag(double *a)
a                  14 src/v_betrag.c   return sqrt(a[0]*a[0]+a[1]*a[1]+a[2]*a[2]);