MODULE Li2_a3Sigma_MLR
USE Numeric_Kinds_Module
IMPLICIT NONE
REAL(KIND=WP_Kind), PARAMETER:: De=333.758_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: re=4.17005_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: C6=6.718500E+06_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: C8=1.129629E+08_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: C10=2.78683E+09_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: bds=3.30_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: cds=0.4230_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: rho=0.540_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: rref=8.0_WP_Kind
REAL(KIND=WP_Kind), PARAMETER:: beta(0:3)=(/-.51608_WP_Kind,-.09782_WP_Kind,0.1137_WP_Kind,-.0248_WP_Kind/)
REAL(KIND=WP_Kind), PARAMETER:: u(1)=0.059_WP_Kind

INTEGER, PARAMETER:: p=5, q=3
INTEGER, PARAMETER:: pad=6, qad=6 

ENDMODULE Li2_a3Sigma_MLR