# | Line 2 | Line 2 | subroutine setFortranSim(setThisSim, CnGlobal, CnLocal | |
---|---|---|
2 | CnLocalExcludes, CexcludesLocal, CnGlobalExcludes, CexcludesGlobal, & | |
3 | CmolMembership, Cmfact, CnGroups, CglobalGroupMembership, & | |
4 | status) | |
5 | < | use definitions, ONLY : dp |
5 | > | use definitions |
6 | use simulation | |
7 | ||
8 | type (simtype) :: setThisSim | |
# | Line 30 | Line 30 | subroutine setFortranBox(cHmat, cHmatInv, cBoxIsOrthor | |
30 | ||
31 | subroutine setFortranBox(cHmat, cHmatInv, cBoxIsOrthorhombic) | |
32 | use simulation, only : setBox | |
33 | < | use definitions, ONLY : dp |
33 | > | use definitions |
34 | real(kind=dp), dimension(3,3) :: cHmat, cHmatInv | |
35 | integer :: cBoxIsOrthorhombic | |
36 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |