| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/argos/ |
| H A D | argos_cafe_fpsw.F | 243 rwx(iax,1)=xi(iax,1)-xj(iax,1,iwa)
246 rwi2(iax)=one/(rwx(iax,1)**2+rwx(iax,2)**2+rwx(iax,3)**2)
265 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
266 rw(iax)=facu(iax)*(c12*rwi6(iax)-c6)*rwi6(iax)
271 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
378 fi(iax,1,1)=fi(iax,1,1)+f(iax)*rwx(iax,1)
379 fi(iax,2,1)=fi(iax,2,1)+f(iax)*rwx(iax,2)
380 fi(iax,3,1)=fi(iax,3,1)+f(iax)*rwx(iax,3)
381 fj(iax,1,iwa)=fj(iax,1,iwa)-f(iax)*rwx(iax,1)
382 fj(iax,2,iwa)=fj(iax,2,iwa)-f(iax)*rwx(iax,2)
[all …]
|
| H A D | argos_cafe_fss.F | 256 rwx(iax,1)=xi(iax,1)-xj(iax,1)
270 rw(iax)=facu(iax)*q*rwi1(iax)
271 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
308 f(iax)=f(iax)+q*rwi2(iax)*(ferfc*rwi1(iax)-fderfc)
340 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
342 rw(iax)=rw(iax)+facu(iax)*q*rffss/rwi2(iax)
373 f(iax)=f(iax)+q*rwi2(iax)*(ferfc*rwi1(iax)-fderfc)
375 rw(iax)=rw(iax)+facu(iax)*q*rffss/rwi2(iax)
415 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
420 rw(iax)=facu(iax)*(c12*rwi6(iax)-c6)*rwi6(iax)
[all …]
|
| H A D | argos_cafe_fpww.F | 194 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
197 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
215 fj(iax,1,jwa)=fj(iax,1,jwa)-f(iax)*rwx(iax,1)
216 fj(iax,2,jwa)=fj(iax,2,jwa)-f(iax)*rwx(iax,2)
217 fj(iax,3,jwa)=fj(iax,3,jwa)-f(iax)*rwx(iax,3)
223 fi(iax,1,iwa)=f(iax)*rwx(iax,1)
224 fi(iax,2,iwa)=f(iax)*rwx(iax,2)
225 fi(iax,3,iwa)=f(iax)*rwx(iax,3)
229 fi(iax,1,iwa)=fi(iax,1,iwa)+f(iax)*rwx(iax,1)
230 fi(iax,2,iwa)=fi(iax,2,iwa)+f(iax)*rwx(iax,2)
[all …]
|
| H A D | argos_cafe_fpss.F | 283 rwx(iax,1)=xi(iax,1)-xj(iax,1)
284 rwx(iax,2)=xi(iax,2)-xj(iax,2)
285 rwx(iax,3)=xi(iax,3)-xj(iax,3)
364 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
369 rw(iax)=facu(iax)*(c12*rwi6(iax)-c6)*rwi6(iax)
370 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
699 rwx(iax,1)=xi(iax,1)-xj(iax,1)
700 rwx(iax,2)=xi(iax,2)-xj(iax,2)
701 rwx(iax,3)=xi(iax,3)-xj(iax,3)
720 rwx(iax,1)=xi(iax,1)-xj(iax,1)
[all …]
|
| H A D | argos_cafe_fsw.F | 515 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
516 rw(iax)=facu(iax)*(c12*rwi6(iax)-c6)*rwi6(iax)
521 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
546 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
559 f(iax)=f(iax)+q*rwi2(iax)*(ferfc*rwi1(iax)-fderfc)
588 fi(iax,1,1)=fi(iax,1,1)+f(iax)*rwx(iax,1)
589 fi(iax,2,1)=fi(iax,2,1)+f(iax)*rwx(iax,2)
590 fi(iax,3,1)=fi(iax,3,1)+f(iax)*rwx(iax,3)
591 fj(iax,1,iwa)=fj(iax,1,iwa)-f(iax)*rwx(iax,1)
592 fj(iax,2,iwa)=fj(iax,2,iwa)-f(iax)*rwx(iax,2)
[all …]
|
| H A D | argos_cafe_fww.F | 397 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
400 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
415 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
422 f(iax)=f(iax)+q*rwi2(iax)*(ferfc*rwi1(iax)-fderfc)
448 fj(iax,1,jwa)=fj(iax,1,jwa)-f(iax)*rwx(iax,1)
449 fj(iax,2,jwa)=fj(iax,2,jwa)-f(iax)*rwx(iax,2)
450 fj(iax,3,jwa)=fj(iax,3,jwa)-f(iax)*rwx(iax,3)
456 fi(iax,1,iwa)=f(iax)*rwx(iax,1)
462 fi(iax,1,iwa)=fi(iax,1,iwa)+f(iax)*rwx(iax,1)
463 fi(iax,2,iwa)=fi(iax,2,iwa)+f(iax)*rwx(iax,2)
[all …]
|
| H A D | argos_cafe_dsw.F | 248 rx=xj(iax,1,jwa)-xi(iax,1)
249 ry=xj(iax,2,jwa)-xi(iax,2)
250 rz=xj(iax,3,jwa)-xi(iax,3)
261 fi(iax,1)=fi(iax,1)+((rmj-qaj)*rx-pjx)*ri3
262 fi(iax,2)=fi(iax,2)+((rmj-qaj)*ry-pjy)*ri3
263 fi(iax,3)=fi(iax,3)+((rmj-qaj)*rz-pjz)*ri3
288 iax=iax+lswin(isa,ipsw)
339 rx=xj(iax,1,jwa)-xi(iax,1)
340 ry=xj(iax,2,jwa)-xi(iax,2)
341 rz=xj(iax,3,jwa)-xi(iax,3)
[all …]
|
| H A D | argos_cafe_dww.F | 147 rx=xj(iax,1,jwa)-xi(iax,1,iwa)
148 ry=xj(iax,2,jwa)-xi(iax,2,iwa)
149 rz=xj(iax,3,jwa)-xi(iax,3,iwa)
160 fi(iax,1,iwa)=fi(iax,1,iwa)+((rmj-qaj)*rx-pjx)*ri3
172 iax=0
186 iax=iax+lwwin(iwm,ipww)
231 rx=xj(iax,1,jwa)-xi(iax,1,iwa)
232 ry=xj(iax,2,jwa)-xi(iax,2,iwa)
233 rz=xj(iax,3,jwa)-xi(iax,3,iwa)
256 iax=0
[all …]
|
| H A D | argos_cafe_dss.F | 231 isa=isal(iax)
244 rx=xj(iax,1)-xi(iax,1)
245 ry=xj(iax,2)-xi(iax,2)
246 rz=xj(iax,3)-xi(iax,3)
268 iax=0
280 iax=iax+lssin(isa,ipss)
320 rx=xj(iax,1)-xi(iax,1)
321 ry=xj(iax,2)-xi(iax,2)
322 rz=xj(iax,3)-xi(iax,3)
344 iax=0
[all …]
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/argos/ |
| H A D | argos_cafe_fpsw.F | 243 rwx(iax,1)=xi(iax,1)-xj(iax,1,iwa)
246 rwi2(iax)=one/(rwx(iax,1)**2+rwx(iax,2)**2+rwx(iax,3)**2)
265 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
266 rw(iax)=facu(iax)*(c12*rwi6(iax)-c6)*rwi6(iax)
271 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
378 fi(iax,1,1)=fi(iax,1,1)+f(iax)*rwx(iax,1)
379 fi(iax,2,1)=fi(iax,2,1)+f(iax)*rwx(iax,2)
380 fi(iax,3,1)=fi(iax,3,1)+f(iax)*rwx(iax,3)
381 fj(iax,1,iwa)=fj(iax,1,iwa)-f(iax)*rwx(iax,1)
382 fj(iax,2,iwa)=fj(iax,2,iwa)-f(iax)*rwx(iax,2)
[all …]
|
| H A D | argos_cafe_fss.F | 256 rwx(iax,1)=xi(iax,1)-xj(iax,1)
270 rw(iax)=facu(iax)*q*rwi1(iax)
271 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
308 f(iax)=f(iax)+q*rwi2(iax)*(ferfc*rwi1(iax)-fderfc)
340 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
342 rw(iax)=rw(iax)+facu(iax)*q*rffss/rwi2(iax)
373 f(iax)=f(iax)+q*rwi2(iax)*(ferfc*rwi1(iax)-fderfc)
375 rw(iax)=rw(iax)+facu(iax)*q*rffss/rwi2(iax)
415 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
420 rw(iax)=facu(iax)*(c12*rwi6(iax)-c6)*rwi6(iax)
[all …]
|
| H A D | argos_cafe_fpww.F | 194 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
197 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
215 fj(iax,1,jwa)=fj(iax,1,jwa)-f(iax)*rwx(iax,1)
216 fj(iax,2,jwa)=fj(iax,2,jwa)-f(iax)*rwx(iax,2)
217 fj(iax,3,jwa)=fj(iax,3,jwa)-f(iax)*rwx(iax,3)
223 fi(iax,1,iwa)=f(iax)*rwx(iax,1)
224 fi(iax,2,iwa)=f(iax)*rwx(iax,2)
225 fi(iax,3,iwa)=f(iax)*rwx(iax,3)
229 fi(iax,1,iwa)=fi(iax,1,iwa)+f(iax)*rwx(iax,1)
230 fi(iax,2,iwa)=fi(iax,2,iwa)+f(iax)*rwx(iax,2)
[all …]
|
| H A D | argos_cafe_fpss.F | 283 rwx(iax,1)=xi(iax,1)-xj(iax,1)
284 rwx(iax,2)=xi(iax,2)-xj(iax,2)
285 rwx(iax,3)=xi(iax,3)-xj(iax,3)
364 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
369 rw(iax)=facu(iax)*(c12*rwi6(iax)-c6)*rwi6(iax)
370 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
699 rwx(iax,1)=xi(iax,1)-xj(iax,1)
700 rwx(iax,2)=xi(iax,2)-xj(iax,2)
701 rwx(iax,3)=xi(iax,3)-xj(iax,3)
720 rwx(iax,1)=xi(iax,1)-xj(iax,1)
[all …]
|
| H A D | argos_cafe_fsw.F | 515 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
516 rw(iax)=facu(iax)*(c12*rwi6(iax)-c6)*rwi6(iax)
521 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
546 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
559 f(iax)=f(iax)+q*rwi2(iax)*(ferfc*rwi1(iax)-fderfc)
588 fi(iax,1,1)=fi(iax,1,1)+f(iax)*rwx(iax,1)
589 fi(iax,2,1)=fi(iax,2,1)+f(iax)*rwx(iax,2)
590 fi(iax,3,1)=fi(iax,3,1)+f(iax)*rwx(iax,3)
591 fj(iax,1,iwa)=fj(iax,1,iwa)-f(iax)*rwx(iax,1)
592 fj(iax,2,iwa)=fj(iax,2,iwa)-f(iax)*rwx(iax,2)
[all …]
|
| H A D | argos_cafe_fww.F | 397 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
400 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
415 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
422 f(iax)=f(iax)+q*rwi2(iax)*(ferfc*rwi1(iax)-fderfc)
448 fj(iax,1,jwa)=fj(iax,1,jwa)-f(iax)*rwx(iax,1)
449 fj(iax,2,jwa)=fj(iax,2,jwa)-f(iax)*rwx(iax,2)
450 fj(iax,3,jwa)=fj(iax,3,jwa)-f(iax)*rwx(iax,3)
456 fi(iax,1,iwa)=f(iax)*rwx(iax,1)
462 fi(iax,1,iwa)=fi(iax,1,iwa)+f(iax)*rwx(iax,1)
463 fi(iax,2,iwa)=fi(iax,2,iwa)+f(iax)*rwx(iax,2)
[all …]
|
| H A D | argos_cafe_dsw.F | 248 rx=xj(iax,1,jwa)-xi(iax,1)
249 ry=xj(iax,2,jwa)-xi(iax,2)
250 rz=xj(iax,3,jwa)-xi(iax,3)
261 fi(iax,1)=fi(iax,1)+((rmj-qaj)*rx-pjx)*ri3
262 fi(iax,2)=fi(iax,2)+((rmj-qaj)*ry-pjy)*ri3
263 fi(iax,3)=fi(iax,3)+((rmj-qaj)*rz-pjz)*ri3
288 iax=iax+lswin(isa,ipsw)
339 rx=xj(iax,1,jwa)-xi(iax,1)
340 ry=xj(iax,2,jwa)-xi(iax,2)
341 rz=xj(iax,3,jwa)-xi(iax,3)
[all …]
|
| H A D | argos_cafe_dww.F | 147 rx=xj(iax,1,jwa)-xi(iax,1,iwa)
148 ry=xj(iax,2,jwa)-xi(iax,2,iwa)
149 rz=xj(iax,3,jwa)-xi(iax,3,iwa)
160 fi(iax,1,iwa)=fi(iax,1,iwa)+((rmj-qaj)*rx-pjx)*ri3
172 iax=0
186 iax=iax+lwwin(iwm,ipww)
231 rx=xj(iax,1,jwa)-xi(iax,1,iwa)
232 ry=xj(iax,2,jwa)-xi(iax,2,iwa)
233 rz=xj(iax,3,jwa)-xi(iax,3,iwa)
256 iax=0
[all …]
|
| H A D | argos_cafe_dss.F | 231 isa=isal(iax)
244 rx=xj(iax,1)-xi(iax,1)
245 ry=xj(iax,2)-xi(iax,2)
246 rz=xj(iax,3)-xi(iax,3)
268 iax=0
280 iax=iax+lssin(isa,ipss)
320 rx=xj(iax,1)-xi(iax,1)
321 ry=xj(iax,2)-xi(iax,2)
322 rz=xj(iax,3)-xi(iax,3)
344 iax=0
[all …]
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/cafe/ |
| H A D | cf_d.F | 186 iax=iax+lwwin(iwm,ipww)
276 iax=iax+lwwin(iwm,ipww)
572 iax=iax+lswin(isa,ipsw)
666 iax=iax+lswin(isa,ipsw)
918 rx=xj(iax,1)-xi(iax,1)
919 ry=xj(iax,2)-xi(iax,2)
920 rz=xj(iax,3)-xi(iax,3)
954 iax=iax+lssin(isa,ipss)
994 rx=xj(iax,1)-xi(iax,1)
995 ry=xj(iax,2)-xi(iax,2)
[all …]
|
| H A D | cf_f.fh | 437 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
440 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
456 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
490 fj(iax,1,jwa)=fj(iax,1,jwa)-f(iax)*rwx(iax,1)
491 fj(iax,2,jwa)=fj(iax,2,jwa)-f(iax)*rwx(iax,2)
1311 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
1317 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
1343 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
2201 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
2270 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
[all …]
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/cafe/ |
| H A D | cf_d.F | 186 iax=iax+lwwin(iwm,ipww)
276 iax=iax+lwwin(iwm,ipww)
572 iax=iax+lswin(isa,ipsw)
666 iax=iax+lswin(isa,ipsw)
918 rx=xj(iax,1)-xi(iax,1)
919 ry=xj(iax,2)-xi(iax,2)
920 rz=xj(iax,3)-xi(iax,3)
954 iax=iax+lssin(isa,ipss)
994 rx=xj(iax,1)-xi(iax,1)
995 ry=xj(iax,2)-xi(iax,2)
[all …]
|
| H A D | cf_f.fh | 437 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
440 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
456 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
490 fj(iax,1,jwa)=fj(iax,1,jwa)-f(iax)*rwx(iax,1)
491 fj(iax,2,jwa)=fj(iax,2,jwa)-f(iax)*rwx(iax,2)
1311 rwi6(iax)=rwi2(iax)*rwi2(iax)*rwi2(iax)
1317 f(iax)=f(iax)+(cf12*rwi6(iax)-cf6)*rwi6(iax)*rwi2(iax)
1343 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
2201 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
2270 f(iax)=f(iax)+q*rwi1(iax)*rwi2(iax)
[all …]
|
| /dports/science/lammps/lammps-stable_29Sep2021/tools/lmp2arc/src/ |
| H A D | unwrap_molecules.c | 6 register int i,iax,imol; in unwrap_molecules() local
14 for (iax=0; iax < 3; iax++) { in unwrap_molecules()
20 if (coord[i].truef[iax] < min_true) min_true = coord[i].truef[iax]; in unwrap_molecules()
21 if (coord[i].truef[iax] > max_true) max_true = coord[i].truef[iax]; in unwrap_molecules()
38 for (iax=0; iax < 3; iax++) { in unwrap_molecules()
64 i++) if (coord[i].fract[iax] > 0.80) coord[i].fract[iax] -= 1.0; in unwrap_molecules()
68 i++) if (coord[i].fract[iax] <= 0.20) coord[i].fract[iax] += 1.0; in unwrap_molecules()
73 i++) if (coord[i].fract[iax] > 0.80) coord[i].fract[iax] -= 1.0; in unwrap_molecules()
77 i++) if (coord[i].fract[iax] < 0.20) coord[i].fract[iax] += 1.0; in unwrap_molecules()
81 i++) if (coord[i].fract[iax] > 0.80) coord[i].fract[iax] -= 1.0; in unwrap_molecules()
[all …]
|
| /dports/net/iaxmodem/iaxmodem-1.2.0/lib/libiax2/src/ |
| H A D | Makefile.am | 11 libiax_la_SOURCES = iax2-parser.c iax.c md5.c jitterbuf.c
12 EXTRA_DIST = md5.h frame.h iax-client.h iax2.h iax2-parser.h jitterbuf.h
15 mkdir -p $(includedir)/iax
16 install -m 644 md5.h $(includedir)/iax
17 install -m 644 frame.h $(includedir)/iax
18 install -m 644 iax.h $(includedir)/iax
19 install -m 644 iax2.h $(includedir)/iax
20 install -m 644 iax2-parser.h $(includedir)/iax
21 install -m 644 iax-client.h $(includedir)/iax
|
| /dports/games/flightgear/flightgear-2020.3.11/3rdparty/iaxclient/lib/libiax2/src/ |
| H A D | Makefile.am | 11 libiax_la_SOURCES = iax2-parser.c iax.c md5.c jitterbuf.c
12 EXTRA_DIST = md5.h frame.h iax-client.h iax2.h iax2-parser.h jitterbuf.h
15 mkdir -p $(includedir)/iax
16 install -m 644 md5.h $(includedir)/iax
17 install -m 644 frame.h $(includedir)/iax
18 install -m 644 iax.h $(includedir)/iax
19 install -m 644 iax2.h $(includedir)/iax
20 install -m 644 iax2-parser.h $(includedir)/iax
21 install -m 644 iax-client.h $(includedir)/iax
|