1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
/*
Copyright (C) 2006-2007 M.A.L. Marques
This Source Code Form is subject to the terms of the Mozilla Public
License, v. 2.0. If a copy of the MPL was not distributed with this
file, You can obtain one at http://mozilla.org/MPL/2.0/.
*/
#include "util.h"
#define XC_GGA_K_PEARSON 511 /* Pearson */
#include "maple2c/gga_k_pearson.c"
#define func maple2c_func
#define XC_KINETIC_FUNCTIONAL
#include "work_gga_x.c"
const xc_func_info_type xc_func_info_gga_k_pearson = {
XC_GGA_K_PEARSON,
XC_KINETIC,
"Pearson 1992",
XC_FAMILY_GGA,
{&xc_ref_Lacks1994_4446, &xc_ref_Pearson1985_881, &xc_ref_Pearson1983, NULL, NULL},
XC_FLAGS_3D | XC_FLAGS_HAVE_EXC | XC_FLAGS_HAVE_VXC | XC_FLAGS_HAVE_FXC | XC_FLAGS_HAVE_KXC,
1e-32,
0, NULL, NULL,
NULL, NULL, NULL,
work_gga_k,
NULL
};
|
