xyzorder.F90 Source File


Files dependent on this one

sourcefile~~xyzorder.f90~~AfferentGraph sourcefile~xyzorder.f90 xyzorder.F90 sourcefile~electric_moments.f90 electric_moments.F90 sourcefile~electric_moments.f90->sourcefile~xyzorder.f90 sourcefile~int1.f90 int1.F90 sourcefile~electric_moments.f90->sourcefile~int1.f90 sourcefile~mod_1e_primitives.f90 mod_1e_primitives.F90 sourcefile~mod_1e_primitives.f90->sourcefile~xyzorder.f90 sourcefile~grd1.f90 grd1.F90 sourcefile~grd1.f90->sourcefile~mod_1e_primitives.f90 sourcefile~int1.f90->sourcefile~mod_1e_primitives.f90 sourcefile~get_basis_overlap.f90 get_basis_overlap.F90 sourcefile~get_basis_overlap.f90->sourcefile~int1.f90 sourcefile~hf_gradient.f90 hf_gradient.F90 sourcefile~hf_gradient.f90->sourcefile~grd1.f90 sourcefile~huckel.f90 huckel.F90 sourcefile~huckel.f90->sourcefile~int1.f90 sourcefile~int1e.f90 int1e.F90 sourcefile~int1e.f90->sourcefile~int1.f90 sourcefile~resp.f90 resp.F90 sourcefile~resp.f90->sourcefile~int1.f90 sourcefile~tdhf_energy.f90 tdhf_energy.F90 sourcefile~tdhf_energy.f90->sourcefile~int1.f90 sourcefile~tdhf_gradient.f90 tdhf_gradient.F90 sourcefile~tdhf_gradient.f90->sourcefile~grd1.f90 sourcefile~tdhf_sf_lib.f90 tdhf_sf_lib.F90 sourcefile~tdhf_sf_lib.f90->sourcefile~int1.f90 sourcefile~guess_huckel.f90 guess_huckel.F90 sourcefile~guess_huckel.f90->sourcefile~huckel.f90 sourcefile~tdhf_mrsf_energy.f90 tdhf_mrsf_energy.F90 sourcefile~tdhf_mrsf_energy.f90->sourcefile~tdhf_sf_lib.f90 sourcefile~tdhf_sf_energy.f90 tdhf_sf_energy.F90 sourcefile~tdhf_sf_energy.f90->sourcefile~tdhf_sf_lib.f90 sourcefile~tdhf_z_vector.f90 tdhf_z_vector.F90 sourcefile~tdhf_z_vector.f90->sourcefile~tdhf_sf_lib.f90

Source Code

module xyz_order

 implicit none

 private

 integer, parameter, public :: &
     X__ = 1, &
     Y__ = 2, &
     Z__ = 3, &

     XX_ = 1, &
     YY_ = 2, &
     ZZ_ = 3, &
     XY_ = 4, &
     XZ_ = 5, &
     YZ_ = 6, &

     XXX = 1, &
     YYY = 2, &
     ZZZ = 3, &
     XXY = 4, &
     XXZ = 5, &
     YYX = 6, &
     YYZ = 7, &
     ZZX = 8, &
     ZZY = 9, &
     XYZ = 10

end module xyz_order