src/lattice.inc

Fortran project RESTRAX, source module src/lattice.inc.

Source module last modified on Thu, 6 Apr 2006, 11:05;
HTML image of Fortran source automatically generated by for2html on Mon, 29 May 2006, 15:06.


# conversion matrices between rec. lattice and AB coordinates
# CELLVOL is the volume of unit cell
      real*8 smat(4,4),sinv(4,4),cosb(3),mrab(4,4),mabr(4,4) ,cellvol
      common /smatrix/ smat,sinv,cosb,mrab,mabr,cellvol