@@ -50,7 +50,7 @@ module dftd4_param
5050 & p_m05, p_m052x, p_m08hx, p_lcwhpbe, p_mn12l, p_tauhcthhyb, &
5151 & p_sogga11x, p_n12sx, p_mn12sx, p_mn15, p_glyp, p_bop, &
5252 & p_mpw1b95, p_revpbe0dh, p_revtpss0, p_revdsdpbep86, p_revdsdpbe, &
53- & p_revdsdblyp, p_revdodpbep86
53+ & p_revdsdblyp, p_revdodpbep86, p_am05
5454 end enum
5555 integer , parameter :: df_enum = kind (p_invalid)
5656
@@ -280,6 +280,10 @@ subroutine get_d4eeq_bjatm_parameter(dfnum, param, s9)
280280 param = dftd_param ( & ! (SAW190103)
281281 & s6= 1.0000_wp , s8= 0.59493760_wp , a1= 0.71422359_wp , a2= 6.35314182_wp )
282282 ! Fitset: MD= 0.08395 MAD= 0.24888 RMSD= 0.34879
283+ case (p_mn12sx)
284+ param = dftd_param ( & ! (SAW211021)
285+ & s6= 1.0000_wp , s8= 0.85964873_wp , a1= 0.62662681_wp , a2= 5.62088906_wp )
286+ ! Fitset: MD= 0.16131 MAD= 0.34142 RMSD= 0.47113
283287 case (p_mpw1b95)
284288 param = dftd_param ( & ! (SAW190107)
285289 & s6= 1.0000_wp , s8= 0.50093024_wp , a1= 0.41585097_wp , a2= 4.99154869_wp )
@@ -336,6 +340,14 @@ subroutine get_d4eeq_bjatm_parameter(dfnum, param, s9)
336340 param = dftd_param ( & ! (SAW190103)
337341 & s6= 1.0000_wp , s8= 0.95948085_wp , a1= 0.38574991_wp , a2= 4.80688534_wp )
338342 ! Fitset: MD= -0.20544 MAD= 0.33635 RMSD= 0.51168
343+ case (p_pbesol)
344+ param = dftd_param ( & ! (SAW211021)
345+ & s6= 1.0000_wp , s8= 1.71885698_wp , a1= 0.47901421_wp , a2= 5.96771589_wp )
346+ ! Fitset: MD= -0.28899 MAD= 0.52215 RMSD= 0.93584
347+ case (p_am05)
348+ param = dftd_param ( & ! (SAW211021)
349+ & s6= 1.0000_wp , s8= 1.71885838_wp , a1= 0.47901431_wp , a2= 5.96771581_wp )
350+ ! Fitset: MD= -0.28899 MAD= 0.52215 RMSD= 0.93584
339351 case (p_pw1pw)
340352 param = dftd_param ( & ! (SAW190103)
341353 & s6= 1.0000_wp , s8= 0.96850170_wp , a1= 0.42427511_wp , a2= 5.02060636_wp )
@@ -772,6 +784,8 @@ pure function get_functional_id(df) result(num)
772784 num = p_b97m
773785 case (' wb97m' , ' ωb97m' , ' omegab97m' )
774786 num = p_wb97m
787+ case (' am05' )
788+ num = p_am05
775789 end select
776790end function get_functional_id
777791
0 commit comments