Home
last modified time | relevance | path

Searched refs:xmastnor (Results 1 – 12 of 12) sorted by relevance

/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Dnormalsoninterface.f262 xmastnor(1,index1)=xmastnor(1,index1)
264 xmastnor(2,index1)=xmastnor(2,index1)
266 xmastnor(3,index1)=xmastnor(3,index1)
291 xmastnor(1,index1)=xmastnor(1,index1)
293 xmastnor(2,index1)=xmastnor(2,index1)
295 xmastnor(3,index1)=xmastnor(3,index1)
319 xmastnor(1,index1)=xmastnor(1,index1)
347 xmastnor(1,id)=xmastnor(1,index1)
349 xmastnor(2,id)=xmastnor(2,index1)
351 xmastnor(3,id)=xmastnor(3,index1)
[all …]
H A Dupdatecontpen.f255 xmastnor(1,index1)=xmastnor(1,index1)
257 xmastnor(2,index1)=xmastnor(2,index1)
259 xmastnor(3,index1)=xmastnor(3,index1)
284 xmastnor(1,index1)=xmastnor(1,index1)
286 xmastnor(2,index1)=xmastnor(2,index1)
288 xmastnor(3,index1)=xmastnor(3,index1)
312 xmastnor(1,index1)=xmastnor(1,index1)
314 xmastnor(2,index1)=xmastnor(2,index1)
316 xmastnor(3,index1)=xmastnor(3,index1)
354 dd=dsqrt(xmastnor(1,l)**2+xmastnor(2,l)**2+
[all …]
H A Dcreateinterfacempcs.f19 subroutine createinterfacempcs(imastnode,xmastnor,nmastnode, argument
29 real*8 xmastnor(3,*),coefmpc(*),xnor(3) local
40 xnor(j)=xmastnor(j,i)
75 coefmpc(mpcfree)=xmastnor(j,i)
87 coefmpc(mpcfree)=xmastnor(j,i)
99 coefmpc(mpcfree)=xmastnor(j,i)
H A Dcontact.c35 ITG *imastnode, ITG *nmastnode, double *xmastnor, in contact() argument
53 DMEMSET(xmastnor,0,3*nmastnode[*ntie],0.); in contact()
56 cg,straight,mi,imastnode,nmastnode,xmastnor, in contact()
H A Dprecontact.c32 ITG *nintpoint,double **pslavsurfp,double *xmastnor,double *cs, in precontact() argument
49 DMEMSET(xmastnor,0,3*nmastnode[*ntie],0.); in precontact()
52 cg,straight,mi,imastnode,nmastnode,xmastnor, in precontact()
H A Darpack.c114 *xmastnor=NULL,*areaslav=NULL,*xnoels=NULL,theta=0., in arpack() local
260 NNEW(xmastnor,double,3*nmastnode[*ntie]); in arpack()
265 NNEW(xmastnor,double,3*nmastnode[*ntie]); in arpack()
274 nintpoint,&pslavsurf,xmastnor,cs,mcs,ics,clearini, in arpack()
346 imastnode,nmastnode,xmastnor,filab,mcs,ics,&nasym, in arpack()
1230 SFREE(springarea);SFREE(xmastnor); in arpack()
H A Dlinstatic.c107 *areaslav=NULL,*xmastnor=NULL,theta=0.,*ener=NULL,*xstate=NULL, in linstatic() local
228 NNEW(xmastnor,double,3*nmastnode[*ntie]); in linstatic()
233 NNEW(xmastnor,double,3*nmastnode[*ntie]); in linstatic()
243 &nintpoint,&pslavsurf,xmastnor,cs,mcs,ics,clearini, in linstatic()
289 imastnode,nmastnode,xmastnor,filab,mcs,ics,&nasym, in linstatic()
1205 SFREE(springarea);SFREE(xmastnor); in linstatic()
H A Darpackcs.c125 *xmastnor=NULL,*areaslav=NULL,*dc=NULL,*di=NULL,*xnoels=NULL, in arpackcs() local
267 NNEW(xmastnor,double,3*nmastnode[*ntie]); in arpackcs()
272 NNEW(xmastnor,double,3*nmastnode[*ntie]); in arpackcs()
281 nintpoint,&pslavsurf,xmastnor,cs,mcs,ics,clearini, in arpackcs()
352 imastnode,nmastnode,xmastnor,filab,mcs,ics,&nasym, in arpackcs()
2534 SFREE(springarea);SFREE(xmastnor); in arpackcs()
H A Delectromagnetics.c137 *enerini=NULL,*emn=NULL,*xmastnor=NULL,*fnext=NULL, in electromagnetics() local
794 NNEW(xmastnor,double,3*8*maxfaces); in electromagnetics()
798 &nmastnode,xmastnor,co)); in electromagnetics()
825 FORTRAN(createinterfacempcs,(imastnode,xmastnor,&nmastnode, in electromagnetics()
829 SFREE(imastnode);SFREE(xmastnor); in electromagnetics()
H A Dnonlingeo.c161 *xmastnor=NULL,*emeini=NULL,*tinc,*tper,*tmin,*tmax,*tincf, in nonlingeo() local
829 NNEW(xmastnor,double,3*nmastnode[*ntie]); in nonlingeo()
1706 nintpoint,&pslavsurf,xmastnor,cs,mcs,ics,clearini, in nonlingeo()
1797 imastnode,nmastnode,xmastnor,filab,mcs,ics,&nasym, in nonlingeo()
2185 &reltime,imastnode,nmastnode,xmastnor, in nonlingeo()
3993 SFREE(springarea);SFREE(xmastnor); in nonlingeo()
H A DCalculiX.h1067 double *xmastnor,char *filab,ITG *mcs,
1256 void FORTRAN(createinterfacempcs,(ITG *imastnode,double *xmastnor,
1580 ITG *imastnode,ITG *nmastnode,double *xmastnor,
4135 ITG *imastnode,ITG *nmastnode,double *xmastnor,double *co));
4334 ITG *nintpoint,double **pslavsurfp,double *xmastnor,double *cs,
6004 ITG *nmastnode,double *xmastnor,ITG *ntie,
H A Ddyna.c135 *xmastnor=NULL,*emeini=NULL,*xstate=NULL,*clearini=NULL, in dyna() local