| /dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
| H A D | dload.f | 145 nopes=8
148 nopes=4
151 nopes=6
154 nopes=3
165 nopes=3
167 nopes=4
172 nopes=6
174 nopes=8
178 do i=1,nopes
185 do i=1,nopes
[all …]
|
| H A D | faceinfo.f | 31 integer nopes,nope,nelem,jface,mint2d local
35 nopes=4
39 nopes=4
43 nopes=8
47 nopes=8
51 nopes=6
55 nopes=3
65 nopes=3
67 nopes=4
74 nopes=6
[all …]
|
| H A D | getnumberofnodes.f | 31 integer nopes,nope,nelem,jface,mint2d local
37 nopes=4
41 nopes=4
45 nopes=8
49 nopes=8
53 nopes=6
57 nopes=3
67 nopes=3
69 nopes=4
76 nopes=6
[all …]
|
| H A D | calcnormal.f | 101 nopes=8
104 nopes=4
107 nopes=6
110 nopes=3
114 nopes=6
116 nopes=8
133 nopes=3
145 nopes=3
156 nopes=2
168 nopes=2
[all …]
|
| H A D | totalcontact.f | 84 nopes=4
87 nopes=4
90 nopes=8
93 nopes=8
96 nopes=6
99 nopes=3
107 nopes=3
109 nopes=4
114 nopes=6
116 nopes=8
[all …]
|
| H A D | genadvecelem.f | 117 nopes=8
120 nopes=4
123 nopes=6
126 nopes=3
130 nopes=6
132 nopes=8
138 nopes=3
140 nopes=4
151 do k=1,nopes
165 do k=1,nopes
[all …]
|
| H A D | generateeminterfaces.f | 107 nopes=4
110 nopes=4
113 nopes=8
116 nopes=8
119 nopes=6
122 nopes=3
130 nopes=3
132 nopes=4
137 nopes=6
139 nopes=8
[all …]
|
| H A D | gencontelem_n2f.f | 200 nopes=4
204 nopes=4
208 nopes=8
212 nopes=8
216 nopes=6
220 nopes=3
229 nopes=3
231 nopes=4
237 nopes=6
240 nopes=8
[all …]
|
| H A D | calcexternalwork.f | 118 nopes=8
121 nopes=4
124 nopes=6
127 nopes=3
165 nopes=3
167 nopes=4
173 nopes=6
176 nopes=8
185 do i=1,nopes
194 do i=1,nopes
[all …]
|
| H A D | approxplane.f | 19 subroutine approxplane(col,straight,xn,nopes) argument
44 integer i,j,k,nopes local
46 real*8 col(3,nopes),colmean(3),straight(36),ps(8,3),dd,xn(3)
53 do j=1,nopes-1
56 ps(nopes,i)=col(i,1)-col(i,nopes)
62 straight(4*nopes+i)=xn(i)
67 do j=1,nopes
85 do j=1,nopes
94 straight(4*nopes+4)=(-xn(1)*colmean(1)
96 & -xn(3)*colmean(3))/nopes
|
| H A D | tiefaccont.f | 255 nopes=8
258 nopes=4
417 nopes=8
419 nopes=4
421 nopes=6
423 nopes=3
428 nopes=3
430 nopes=4
435 nopes=6
437 nopes=8
[all …]
|
| H A D | distributesens.f | 172 nopes=4
177 nopes=4
182 nopes=8
187 nopes=6
193 nopes=3
198 nopes=3
203 nopes=6
257 nopes=6
268 nopes=8
282 nopes=3
[all …]
|
| H A D | radmatrix.f | 91 nopes=8
94 nopes=4
97 nopes=6
100 nopes=3
127 nopes=3
129 nopes=4
135 nopes=6
138 nopes=8
157 do k=1,nopes
166 do k=1,nopes
[all …]
|
| H A D | slavintpoints.f | 97 do m=1,nopes
110 do m=1,nopes
116 do m=1,nopes
123 if((nopes.eq.3).or.(nopes.eq.4))then
124 do j=1,nopes
154 do m=1,nopes
155 if((nopes.eq.4).or.(nopes.eq.8))then
194 do j=1,nopes
221 do m=1,nopes
226 do j=1,nopes
[all …]
|
| H A D | addizdofdload.f | 32 & izdof(*),nzdof,iload,j,ii,nopes,node,indexe,jdof,ifaceq(8,6), local
62 nopes=8
64 nopes=4
66 nopes=6
68 nopes=3
71 nopes=6
73 nopes=8
77 nopes=3
79 nopes=4
83 do ii=1,nopes
|
| H A D | slavintmortar.f | 140 do m=1,nopes
156 do m=1,nopes
162 do m=1,nopes
173 if(nopes.eq.3 .or. nopes.eq.4)then
174 do j=1,nopes
204 do m=1,nopes
205 if(nopes.eq.4 .or. nopes.eq.8)then
246 do j=1,nopes
275 do j=1,nopes
327 do j=1,nopes
[all …]
|
| H A D | gencontelem_f2f.f | 202 nopes=4
206 nopes=4
210 nopes=8
214 nopes=8
218 nopes=6
222 nopes=3
231 nopes=3
730 if((nopes.eq.4).or.(nopes.eq.8)) then
740 if((nopes.eq.3).or.(nopes.eq.6)) then
752 if((nopes.eq.4).or.(nopes.eq.8)) then
[all …]
|
| H A D | frictionheating.f | 91 nopes=nope-nopem
138 if(nopes.eq.8) then
140 elseif(nopes.eq.4) then
154 do k=1,nopes
168 if(nopes.eq.8) then
170 elseif(nopes.eq.6) then
172 elseif(nopes.eq.4) then
183 if(nopes.eq.8) then
202 if(nopes.eq.8) then
236 if(nopes.eq.8) then
[all …]
|
| H A D | treatmasterface.f | 23 & nopes,slavstraight,xn,xns,xl2s,xl2sp,
32 integer nvertex,nopes,ipe(*),ime(4,*),iactiveline(3,*),
54 & xl2m2(3,j)-slavstraight(nopes*4+4)
62 call sutherland_hodgman(nopes,xn,xl2sp,xl2mp,nodem,
90 call attachline(xl2s,cgp,nopes,xit(3),etat(3),xn,p,dist)
99 & nopes,xit(1),etat(1),xn,p,dist)
101 & nopes,xit(2),etat(2),xn,p,dist)
112 if(nopes.eq.4.and.areaslav+area-4.0d0.gt.1.d-3
117 if(nopes.eq.3.and.areaslav+area-0.5d0.gt.1.d-4
135 call evalshapefunc(xil,etl,xns,nopes,xnl)
[all …]
|
| H A D | addimdnodedload.f | 32 integer nelemload(2,*),ipkon(*),kon(*),iload,ii,nopes,node, local
67 nopes=8
69 nopes=4
71 nopes=6
73 nopes=3
76 nopes=6
78 nopes=8
82 nopes=3
84 nopes=4
88 do ii=1,nopes
|
| H A D | advecforc.f | 59 nopes=nope-1
66 do i=1,nopes
133 & ((lakonl(4:4).eq.'6').and.(nopes.eq.4))) then
139 & ((lakonl(4:5).eq.'15').and.(nopes.eq.8))) then
153 & ((lakonl(4:4).eq.'6').and.(nopes.eq.3))) then
159 if(nopes.eq.8) then
161 elseif(nopes.eq.4) then
163 elseif(nopes.eq.6) then
174 do j=1,nopes
185 do j=1,nopes
[all …]
|
| H A D | resultsem.f | 85 nopes=8
88 nopes=4
91 nopes=6
94 nopes=3
351 nopes=3
353 nopes=4
359 nopes=6
362 nopes=8
369 do j=1,nopes
373 do j=1,nopes
[all …]
|
| H A D | treatmasterface_mortar.f | 50 & nopes,slavstraight,xn,xns,xl2s,xl2sp, argument
96 & xl2m2(3,j)-slavstraight(nopes*4+4)
104 do j=1,nopes
117 call sutherland_hodgman(nopes,xn,xl2sp,xl2mp,nodem,
185 & nopes,xit(1),etat(1),xn,p,dist)
187 & nopes,xit(2),etat(2),xn,p,dist)
199 if((nopes.eq.4 .or. nopes.eq.8)
207 if((nopes.eq.3.or.nopes.eq.6)
235 call evalshapefunc(xil,etl,xns,nopes,xnl)
236 call evalshapefunc(xil,etl,xl2s,nopes,ps)
[all …]
|
| H A D | e_c3d_rhs_th.f | 79 nopes=8
83 nopes=4
87 nopes=6
91 nopes=3
330 nopes=3
332 nopes=4
338 nopes=6
341 nopes=8
346 do i=1,nopes
354 do i=1,nopes
[all …]
|
| H A D | advecstiff.f | 59 nopes=nope-1
66 do i=1,nopes
127 & ((lakonl(4:4).eq.'6').and.(nopes.eq.4))) then
133 & ((lakonl(4:5).eq.'15').and.(nopes.eq.8))) then
147 & ((lakonl(4:4).eq.'6').and.(nopes.eq.3))) then
153 if(nopes.eq.8) then
155 elseif(nopes.eq.4) then
157 elseif(nopes.eq.6) then
168 do j=1,nopes
179 do j=1,nopes
[all …]
|