| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/prepar/ |
| H A D | pre_angl.F | 8 integer nbnd,nang local
14 nang=0
18 nang=nang+1
20 lang(nang,1)=lbnd(i,2)
21 lang(nang,2)=lbnd(i,1)
22 lang(nang,3)=lbnd(j,2)
25 nang=nang+1
27 lang(nang,1)=lbnd(i,1)
28 lang(nang,2)=lbnd(i,2)
32 nang=nang+1
[all …]
|
| H A D | pre_ang.F | 19 integer nbnd,nang
31 nang=nang+1
32 lang(1,nang)=lbnd(2,i)
33 lang(2,nang)=lbnd(1,i)
34 lang(3,nang)=lbnd(2,j)
38 nang=nang+1
45 nang=nang+1
52 nang=nang+1
63 do 3 i=1,nang
71 do 4 i=1,nang-1
[all …]
|
| H A D | pre_rdsgm.F | 184 nang=nang+1
191 read(lfnsgm,1019) (rang(j,1,nang),rang(j,2,nang),
192 + rang(j,3,nang),rang(j,4,nang),j=1,npar)
195 lang(1,nang)=lang(1,nang)+na
196 lang(2,nang)=lang(2,nang)+na
197 lang(3,nang)=lang(3,nang)+na
214 + rang(j,3,nang),rang(j,4,nang),j=1,nparms)
220 rang(1,1,nang)=rang(ipardef,1,nang)
223 rang(1,2,nang)=rang(ipardef,2,nang)
227 rang(1,3,nang)=rang(ipardef,3,nang)
[all …]
|
| H A D | pre_mklist.F | 6 + lang,rang,mang,nang,
37 integer mang,nang
252 na=nang
257 nang=nang+1
261 lang(4,nang)=0
266 nang=nang+1
275 nang=nang+1
284 nang=nang+1
624 ln=nang/2+1
625 ir=nang
[all …]
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/prepar/ |
| H A D | pre_angl.F | 8 integer nbnd,nang
14 nang=0
18 nang=nang+1
20 lang(nang,1)=lbnd(i,2)
21 lang(nang,2)=lbnd(i,1)
22 lang(nang,3)=lbnd(j,2)
25 nang=nang+1
27 lang(nang,1)=lbnd(i,1)
28 lang(nang,2)=lbnd(i,2)
32 nang=nang+1
[all …]
|
| H A D | pre_ang.F | 19 integer nbnd,nang
31 nang=nang+1
32 lang(1,nang)=lbnd(2,i)
33 lang(2,nang)=lbnd(1,i)
34 lang(3,nang)=lbnd(2,j)
38 nang=nang+1
45 nang=nang+1
52 nang=nang+1
63 do 3 i=1,nang
71 do 4 i=1,nang-1
[all …]
|
| H A D | pre_rdsgm.F | 184 nang=nang+1
191 read(lfnsgm,1019) (rang(j,1,nang),rang(j,2,nang),
192 + rang(j,3,nang),rang(j,4,nang),j=1,npar)
195 lang(1,nang)=lang(1,nang)+na
196 lang(2,nang)=lang(2,nang)+na
197 lang(3,nang)=lang(3,nang)+na
214 + rang(j,3,nang),rang(j,4,nang),j=1,nparms)
220 rang(1,1,nang)=rang(ipardef,1,nang)
223 rang(1,2,nang)=rang(ipardef,2,nang)
227 rang(1,3,nang)=rang(ipardef,3,nang)
[all …]
|
| H A D | pre_mklist.F | 6 + lang,rang,mang,nang,
37 integer mang,nang
252 na=nang
257 nang=nang+1
261 lang(4,nang)=0
266 nang=nang+1
275 nang=nang+1
284 nang=nang+1
624 ln=nang/2+1
625 ir=nang
[all …]
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/argos/ |
| H A D | argos_prepare_a.F | 8 integer nbnd,nang
14 nang=0
18 nang=nang+1
20 lang(nang,1)=lbnd(i,2)
21 lang(nang,2)=lbnd(i,1)
22 lang(nang,3)=lbnd(j,2)
25 nang=nang+1
27 lang(nang,1)=lbnd(i,1)
28 lang(nang,2)=lbnd(i,2)
32 nang=nang+1
[all …]
|
| H A D | argos_prep_angl.F | 8 integer nbnd,nang
15 nang=0
19 nang=nang+1
21 lang(nang,1)=lbnd(i,2)
22 lang(nang,2)=lbnd(i,1)
23 lang(nang,3)=lbnd(j,2)
26 nang=nang+1
28 lang(nang,1)=lbnd(i,1)
29 lang(nang,2)=lbnd(i,2)
33 nang=nang+1
[all …]
|
| H A D | argos_prepare_ang.F | 19 integer nbnd,nang
31 nang=nang+1
32 lang(1,nang)=lbnd(2,i)
33 lang(2,nang)=lbnd(1,i)
34 lang(3,nang)=lbnd(2,j)
38 nang=nang+1
45 nang=nang+1
52 nang=nang+1
63 do 3 i=1,nang
71 do 4 i=1,nang-1
[all …]
|
| H A D | argos_prep_ang.F | 19 integer nbnd,nang
31 nang=nang+1
32 lang(1,nang)=lbnd(2,i)
33 lang(2,nang)=lbnd(1,i)
34 lang(3,nang)=lbnd(2,j)
38 nang=nang+1
45 nang=nang+1
52 nang=nang+1
63 do 3 i=1,nang
71 do 4 i=1,nang-1
[all …]
|
| H A D | argos_prep_rdsgm.F | 184 nang=nang+1
191 read(lfnsgm,1019) (rang(j,1,nang),rang(j,2,nang),
192 + rang(j,3,nang),rang(j,4,nang),j=1,npar)
195 lang(1,nang)=lang(1,nang)+na
196 lang(2,nang)=lang(2,nang)+na
197 lang(3,nang)=lang(3,nang)+na
214 + rang(j,3,nang),rang(j,4,nang),j=1,nparms)
220 rang(1,1,nang)=rang(ipardef,1,nang)
223 rang(1,2,nang)=rang(ipardef,2,nang)
227 rang(1,3,nang)=rang(ipardef,3,nang)
[all …]
|
| H A D | argos_prepare_rdsgm.F | 184 nang=nang+1
191 read(lfnsgm,1019) (rang(j,1,nang),rang(j,2,nang),
192 + rang(j,3,nang),rang(j,4,nang),j=1,npar)
195 lang(1,nang)=lang(1,nang)+na
196 lang(2,nang)=lang(2,nang)+na
197 lang(3,nang)=lang(3,nang)+na
214 + rang(j,3,nang),rang(j,4,nang),j=1,nparms)
220 rang(1,1,nang)=rang(ipardef,1,nang)
223 rang(1,2,nang)=rang(ipardef,2,nang)
227 rang(1,3,nang)=rang(ipardef,3,nang)
[all …]
|
| H A D | argos_prepare_mklist.F | 7 + lang,rang,mang,nang,
39 integer mang,nang
254 na=nang
259 nang=nang+1
263 lang(4,nang)=0
268 nang=nang+1
277 nang=nang+1
286 nang=nang+1
628 ln=nang/2+1
629 ir=nang
[all …]
|
| H A D | argos_prep_mklist.F | 7 + lang,rang,mang,nang,
38 integer mang,nang
253 na=nang
258 nang=nang+1
262 lang(4,nang)=0
267 nang=nang+1
276 nang=nang+1
285 nang=nang+1
627 ln=nang/2+1
628 ir=nang
[all …]
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/argos/ |
| H A D | argos_prepare_a.F | 8 integer nbnd,nang
14 nang=0
18 nang=nang+1
20 lang(nang,1)=lbnd(i,2)
21 lang(nang,2)=lbnd(i,1)
22 lang(nang,3)=lbnd(j,2)
25 nang=nang+1
27 lang(nang,1)=lbnd(i,1)
28 lang(nang,2)=lbnd(i,2)
32 nang=nang+1
[all …]
|
| H A D | argos_prep_angl.F | 8 integer nbnd,nang
15 nang=0
19 nang=nang+1
21 lang(nang,1)=lbnd(i,2)
22 lang(nang,2)=lbnd(i,1)
23 lang(nang,3)=lbnd(j,2)
26 nang=nang+1
28 lang(nang,1)=lbnd(i,1)
29 lang(nang,2)=lbnd(i,2)
33 nang=nang+1
[all …]
|
| H A D | argos_prepare_ang.F | 19 integer nbnd,nang
31 nang=nang+1
32 lang(1,nang)=lbnd(2,i)
33 lang(2,nang)=lbnd(1,i)
34 lang(3,nang)=lbnd(2,j)
38 nang=nang+1
45 nang=nang+1
52 nang=nang+1
63 do 3 i=1,nang
71 do 4 i=1,nang-1
[all …]
|
| H A D | argos_prep_ang.F | 19 integer nbnd,nang
31 nang=nang+1
32 lang(1,nang)=lbnd(2,i)
33 lang(2,nang)=lbnd(1,i)
34 lang(3,nang)=lbnd(2,j)
38 nang=nang+1
45 nang=nang+1
52 nang=nang+1
63 do 3 i=1,nang
71 do 4 i=1,nang-1
[all …]
|
| H A D | argos_prepare_rdsgm.F | 184 nang=nang+1
191 read(lfnsgm,1019) (rang(j,1,nang),rang(j,2,nang),
192 + rang(j,3,nang),rang(j,4,nang),j=1,npar)
195 lang(1,nang)=lang(1,nang)+na
196 lang(2,nang)=lang(2,nang)+na
197 lang(3,nang)=lang(3,nang)+na
214 + rang(j,3,nang),rang(j,4,nang),j=1,nparms)
220 rang(1,1,nang)=rang(ipardef,1,nang)
223 rang(1,2,nang)=rang(ipardef,2,nang)
227 rang(1,3,nang)=rang(ipardef,3,nang)
[all …]
|
| H A D | argos_prep_rdsgm.F | 184 nang=nang+1
191 read(lfnsgm,1019) (rang(j,1,nang),rang(j,2,nang),
192 + rang(j,3,nang),rang(j,4,nang),j=1,npar)
195 lang(1,nang)=lang(1,nang)+na
196 lang(2,nang)=lang(2,nang)+na
197 lang(3,nang)=lang(3,nang)+na
214 + rang(j,3,nang),rang(j,4,nang),j=1,nparms)
220 rang(1,1,nang)=rang(ipardef,1,nang)
223 rang(1,2,nang)=rang(ipardef,2,nang)
227 rang(1,3,nang)=rang(ipardef,3,nang)
[all …]
|
| H A D | argos_prepare_mklist.F | 7 + lang,rang,mang,nang,
39 integer mang,nang
254 na=nang
259 nang=nang+1
263 lang(4,nang)=0
268 nang=nang+1
277 nang=nang+1
286 nang=nang+1
628 ln=nang/2+1
629 ir=nang
[all …]
|
| H A D | argos_prep_mklist.F | 7 + lang,rang,mang,nang,
38 integer mang,nang
253 na=nang
258 nang=nang+1
262 lang(4,nang)=0
267 nang=nang+1
276 nang=nang+1
285 nang=nang+1
627 ln=nang/2+1
628 ir=nang
[all …]
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwdft/grid/ |
| H A D | grid_acc_def.F | 456 nang(itype) = xc_leb_acc2nrd(iangat)
460 nang(itype) = 0
465 nang(itype) = nagrid
485 nang(itype) = xc_leb_acc2nrd(iangat)
491 if(nang(itype).gt.mxnang)mxnang = nang(itype)
516 nang(itype) = nangin(igridin)
526 nang(itype) = nagrid
534 nang(itype) = xc_leb_acc2nrd(iangat)
543 if(nang(itype).gt.mxnang)mxnang = nang(itype)
546 nang(itype) = 0
[all …]
|