MODULE Jtot_Module
   USE Numeric_Kinds_Module
   USE Parity_Module
   IMPLICIT NONE
   SAVE
   INTEGER(KIND=IW_Kind) jtot
END MODULE Jtot_Module