/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-serial/ |
H A D | tool_invrt.f | 9 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 D | smd_lat.F | 180 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 D | tool_volme.f | 5 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 D | tool_invrt.f | 9 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 D | smd_lat.F | 178 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 D | smd_lat_new.F | 258 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 D | tool_invrt.f | 9 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 D | smd_lat.F | 180 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 D | tool_volme.f | 5 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 D | tool_invrt.f | 5 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 D | tool_volme.f | 1 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 D | tool_invrt.f | 9 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 D | smd_lat.F | 178 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 D | smd_lat_new.F | 258 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 D | tool_invrt.f | 9 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 D | smd_lat.F | 180 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 D | tool_invrt.f | 9 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 D | smd_lat.F | 180 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 D | tool_invrt.f | 5 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 D | smd_lat.F | 178 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 D | smd_lat.F | 178 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 D | main.f | 295 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 D | main.f | 295 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 D | smd_lat.F | 180 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 D | smd_lat.F | 180 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 …]
|