Class | gamma_matrix_class |
In: |
SingletMesons_Simple_v1.3/gamma_matrix_class.F90
|
Constant : | |||||
NOP =NDIM*NDIM : | integer, parameter
|
Subroutine : | |
this : | type(gamma_matrix_obj), intent(inout) |
subroutine new_gamma_matrix(this) implicit none type(gamma_matrix_obj), intent(inout) :: this #include "gamma_matrix.h90" this%status=1 return end subroutine