Home
last modified time | relevance | path

Searched refs:latt (Results 1 – 25 of 615) sorted by relevance

12345678910>>...25

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-serial/
H A Dtool_invrt.f9 real*8 latt,rlatt,det local
13 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
14 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
15 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
16 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
17 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
18 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
19 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
20 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
21 rlatt(3,3)=latt(1,1)*latt(2,2)-latt(2,1)*latt(1,2)
[all …]
H A Dsmd_lat.F180 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
181 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
182 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
183 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
184 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
185 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
186 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
187 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
213 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
214 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
H A Dtool_volme.f5 SUBROUTINE tool_volme(latt,vol) argument
9 real*8 x,y,z,latt,vol local
11 dimension latt(3,3)
13 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
14 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
15 z=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
17 vol=abs(latt(1,1)*x+latt(2,1)*y+latt(3,1)*z)
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-subgroups/
H A Dtool_invrt.f9 real*8 latt,rlatt,det local
13 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
14 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
15 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
16 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
17 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
18 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
19 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
20 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
21 rlatt(3,3)=latt(1,1)*latt(2,2)-latt(2,1)*latt(1,2)
[all …]
H A Dsmd_lat.F178 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
179 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
180 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
181 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
182 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
183 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
184 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
185 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
211 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
212 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
H A Dsmd_lat_new.F258 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
260 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
262 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
264 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
266 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
268 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
270 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
272 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
313 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
315 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-9-10-08/
H A Dtool_invrt.f9 real*8 latt,rlatt,det local
13 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
14 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
15 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
16 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
17 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
18 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
19 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
20 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
21 rlatt(3,3)=latt(1,1)*latt(2,2)-latt(2,1)*latt(1,2)
[all …]
H A Dsmd_lat.F180 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
181 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
182 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
183 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
184 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
185 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
186 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
187 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
213 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
214 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
H A Dtool_volme.f5 SUBROUTINE tool_volme(latt,vol) argument
9 real*8 x,y,z,latt,vol local
11 dimension latt(3,3)
13 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
14 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
15 z=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
17 vol=abs(latt(1,1)*x+latt(2,1)*y+latt(3,1)*z)
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-original/
H A Dtool_invrt.f5 real*8 latt,rlatt,det local
9 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
10 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
11 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
12 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
13 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
14 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
15 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
16 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
17 rlatt(3,3)=latt(1,1)*latt(2,2)-latt(2,1)*latt(1,2)
[all …]
H A Dtool_volme.f1 SUBROUTINE tool_volme(latt,vol) argument
5 real*8 x,y,z,latt,vol local
7 dimension latt(3,3)
9 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
10 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
11 z=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
13 vol=abs(latt(1,1)*x+latt(2,1)*y+latt(3,1)*z)
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-subgroups/
H A Dtool_invrt.f9 real*8 latt,rlatt,det local
13 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
14 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
15 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
16 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
17 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
18 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
19 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
20 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
21 rlatt(3,3)=latt(1,1)*latt(2,2)-latt(2,1)*latt(1,2)
[all …]
H A Dsmd_lat.F178 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
179 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
180 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
181 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
182 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
183 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
184 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
185 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
211 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
212 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
H A Dsmd_lat_new.F258 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
260 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
262 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
264 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
266 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
268 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
270 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
272 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
313 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
315 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-serial/
H A Dtool_invrt.f9 real*8 latt,rlatt,det local
13 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
14 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
15 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
16 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
17 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
18 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
19 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
20 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
21 rlatt(3,3)=latt(1,1)*latt(2,2)-latt(2,1)*latt(1,2)
[all …]
H A Dsmd_lat.F180 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
181 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
182 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
183 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
184 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
185 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
186 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
187 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
213 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
214 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-9-10-08/
H A Dtool_invrt.f9 real*8 latt,rlatt,det local
13 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
14 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
15 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
16 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
17 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
18 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
19 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
20 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
21 rlatt(3,3)=latt(1,1)*latt(2,2)-latt(2,1)*latt(1,2)
[all …]
H A Dsmd_lat.F180 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
181 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
182 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
183 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
184 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
185 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
186 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
187 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
213 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
214 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-original/
H A Dtool_invrt.f5 real*8 latt,rlatt,det local
9 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
10 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
11 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
12 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
13 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
14 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
15 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
16 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
17 rlatt(3,3)=latt(1,1)*latt(2,2)-latt(2,1)*latt(1,2)
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-new/
H A Dsmd_lat.F178 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
179 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
180 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
181 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
182 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
183 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
184 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
185 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
211 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
212 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-new/
H A Dsmd_lat.F178 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
179 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
180 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
181 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
182 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
183 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
184 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
185 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
211 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
212 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/contrib/marat/rdf/
H A Dmain.f295 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
296 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
297 z=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
311 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
312 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
313 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
314 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
315 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
316 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
317 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/contrib/marat/rdf/
H A Dmain.f295 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
296 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
297 z=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
311 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
312 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
313 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
314 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
315 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
316 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
317 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/smdlib/
H A Dsmd_lat.F180 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
181 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
182 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
183 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
184 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
185 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
186 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
187 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
213 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
214 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/smdlib/
H A Dsmd_lat.F180 rlatt(1,1)=latt(2,2)*latt(3,3)-latt(3,2)*latt(2,3)
181 rlatt(2,1)=latt(3,1)*latt(2,3)-latt(2,1)*latt(3,3)
182 rlatt(3,1)=latt(2,1)*latt(3,2)-latt(3,1)*latt(2,2)
183 rlatt(1,2)=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
184 rlatt(2,2)=latt(1,1)*latt(3,3)-latt(3,1)*latt(1,3)
185 rlatt(3,2)=latt(3,1)*latt(1,2)-latt(1,1)*latt(3,2)
186 rlatt(1,3)=latt(1,2)*latt(2,3)-latt(2,2)*latt(1,3)
187 rlatt(2,3)=latt(2,1)*latt(1,3)-latt(1,1)*latt(2,3)
213 x=latt(2,2)*latt(3,3)-latt(2,3)*latt(2,3)
214 y=latt(3,2)*latt(1,3)-latt(1,2)*latt(3,3)
[all …]

12345678910>>...25