m_gencif_sub.f90 File Reference

Go to the source code of this file.

Modules
module	m_gencif_sub
Functions/Subroutines
subroutine	m_gencif_sub::printcif (cbuf, aa, nkd, zn, nsi, kd, asi, na, nb, nc)
Variables
character(len=2), dimension(0:102)	m_gencif_sub::atom_name = (/ , ,, ,,,,,,,, ,,,,,,,, ,, ,,,,,,,,,, ,,,,,, ,, ,,,,,,,,,, ,,,,,, ,, ,,,,,,,,,,,,,, ,,,,,,,,,, ,,,,,, ,, ,,,,,,,,,,,,, /)
real(8), parameter	m_gencif_sub::oneau = 0.52917721067d0
real(8), parameter	m_gencif_sub::pi = 3.14159265358979323846d0