MODULE FileUnits_OneDim_Module
   USE Numeric_Kinds_Module
   IMPLICIT NONE
   SAVE
   CHARACTER(LEN=200) InputDir
   CHARACTER(LEN=200) OutDIr
   INTEGER(KIND=IW_Kind), PARAMETER:: Screen_Unit       = 0
!   INTEGER(KIND=IW_Kind), PARAMETER:: Msg_unit          = 4
!   INTEGER(KIND=IW_Kind), PARAMETER:: In_Unit           = 5
!   INTEGER(KIND=IW_Kind), PARAMETER:: Out_Unit          = 6
!   INTEGER(KIND=IW_Kind), PARAMETER:: Dbug_Unit         = 7
   INTEGER(KIND=IW_Kind), PARAMETER:: Time_Unit         = 8
   INTEGER(KIND=IW_Kind), PARAMETER:: Pot_Unit          =10
   INTEGER(KIND=IW_Kind), PARAMETER:: SYSPot_Unit       =11
   INTEGER(KIND=IW_Kind), PARAMETER:: Crit_Unit         =12
   INTEGER(KIND=IW_Kind), PARAMETER:: Graf_Unit         =13
   INTEGER(KIND=IW_Kind), PARAMETER:: Morse_Unit        =14
   INTEGER(KIND=IW_Kind), PARAMETER:: DAF_Unit          =15
   INTEGER(KIND=IW_Kind), PARAMETER:: DAFBin_Unit       =16
   INTEGER(KIND=IW_Kind), PARAMETER:: Numerov_Unit      =17
   INTEGER(KIND=IW_Kind), PARAMETER:: NumerovBin_Unit   =18
   INTEGER(KIND=IW_Kind), PARAMETER:: Spectra_Unit      =19
   INTEGER(KIND=IW_Kind), PARAMETER:: PsiDAFG_Unit      =20
   INTEGER(KIND=IW_Kind), PARAMETER:: PsiDAFGS_Unit     =21
   INTEGER(KIND=IW_Kind), PARAMETER:: PsiDAFD_Unit      =22
   INTEGER(KIND=IW_Kind), PARAMETER:: PsiDAFDS_Unit     =23
   INTEGER(KIND=IW_Kind), PARAMETER:: PsiNumerovG_Unit  =24
   INTEGER(KIND=IW_Kind), PARAMETER:: PsiNumerovGS_Unit =25
   INTEGER(KIND=IW_Kind), PARAMETER:: PsiNumerovD_Unit  =26
   INTEGER(KIND=IW_Kind), PARAMETER:: PsiNumerovDS_Unit =27
   INTEGER(KIND=IW_Kind), PARAMETER:: DAF_DVR_Unit      =28
   INTEGER(KIND=IW_Kind), PARAMETER:: Numerov_DVR_Unit  =29
   INTEGER(KIND=IW_Kind), PARAMETER:: EigPltNumerov_Unit=30
   INTEGER(KIND=IW_Kind), PARAMETER:: EigPltDAF_Unit    =31
   INTEGER(KIND=IW_Kind), PARAMETER:: Numerov_Prop_Unit =32
   INTEGER(KIND=IW_Kind), PARAMETER:: Continuum_Unit    =33
   INTEGER(KIND=IW_Kind), PARAMETER:: ContinuumBin_Unit =34
   INTEGER(KIND=IW_Kind), PARAMETER:: BC_Plot_Unit      =35
   INTEGER(KIND=IW_Kind), PARAMETER:: Eig_Plot_Unit     =36 
   INTEGER(KIND=IW_Kind), PARAMETER:: Dipole_Unit       =37
   INTEGER(KIND=IW_Kind), PARAMETER:: DAF_Oscil_Unit    =38
   INTEGER(KIND=IW_Kind), PARAMETER:: Numerov_Oscil_Unit=39
   INTEGER(KIND=IW_Kind), PARAMETER:: BC_Bin_Unit       =40
END MODULE FileUnits_OneDim_Module