-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathksprop_info.c
47 lines (32 loc) · 1.13 KB
/
ksprop_info.c
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
/*********************** ksprop_info.c *************************/
/* MIMD version 7 */
/* For clover_invert */
/* Application-dependent routine for writing ksprop info file */
/* This file is an ASCII companion to the KS propagator file
and contains information about the action used to generate it.
This information is consistently written in the pattern
keyword value
or
keyword[n] value1 value2 ... valuen
where n is an integer.
To maintain a semblance of consistency, the possible keywords are
listed in io_ksprop.h.
*/
#include "cl_hyb_includes.h"
#include <string.h>
/*---------------------------------------------------------------------------*/
/* This routine writes the ASCII info file. It is called from one of
the lattice output routines in ../generic_ks/io_prop_ks.c.*/
void write_appl_ksprop_info(FILE *fp)
{
/* This application does not create KS prop files! */
}
char *create_ks_XML(){
char dummy[] = "KS Propagator";
char *filexml = (char *)malloc(sizeof(dummy)+1);
strcpy(filexml, dummy);
return filexml;
}
void free_ks_XML(char *filexml){
if(filexml != NULL)free(filexml);
}