stablejet is hosted by Hepforge, IPPP Durham
StableJet
pythia6.c
1 #include <string.h>
2 #include "pythia6.h"
3 
4 #ifdef __cplusplus
5 extern "C" {
6 #endif
7 
8 extern void pyupin_(void);
9 extern void pyupev_(void);
10 extern void pylist_(int*);
11 extern void pystat_(int*);
12 extern void pyedit_(int*);
13 extern void py1ent_(int*, int*, double*, double*, double*);
14 extern void py2ent_(int*, int*, int*, double*);
15 extern void pygive_(const char*, int);
16 extern void pyinit_(const char*, const char*, const char*, double*,
17  int, int, int);
18 extern void pyname_(int*, char*);
19 extern double pyr_(int*);
20 extern double pymass_(int*);
21 extern int pychge_(int*);
22 extern void pyevnt_(void);
23 extern void pyevnw_(void);
24 extern void pyexec_(void);
25 extern void pyshow_(int*, int*, double*);
26 
27 void pyshow(int i1, int i2, double Qmax)
28 {
29  pyshow_(&i1, &i2, &Qmax);
30 }
31 
32 void pyexec(void)
33 {
34  pyexec_();
35 }
36 
37 void pyinit(const char* s1, const char* s2, const char* s3, double d)
38 {
39  pyinit_(s1, s2, s3, &d, strlen(s1), strlen(s2), strlen(s3));
40 }
41 
42 void pyedit(int i)
43 {
44  pyedit_(&i);
45 }
46 
47 void pygive(const char* p)
48 {
49  pygive_(p, strlen(p));
50 }
51 
52 void py2ent(int cmd, int p1code, int p2code, double ecms)
53 {
54  py2ent_(&cmd, &p1code, &p2code, &ecms);
55 }
56 
57 void pylist(int i)
58 {
59  pylist_(&i);
60 }
61 
62 void pystat(int i)
63 {
64  pystat_(&i);
65 }
66 
67 void pyupev(void)
68 {
69  pyupev_();
70 }
71 
72 void pyupin(void)
73 {
74  pyupin_();
75 }
76 
77 void pyevnt(void)
78 {
79  pyevnt_();
80 }
81 
82 void pyevnw(void)
83 {
84  pyevnw_();
85 }
86 
87 void pyname(int i, char name[16])
88 {
89  pyname_(&i, &name[0]);
90  name[15] = '\0';
91 }
92 
93 double pyr(void)
94 {
95  int i = 0;
96  return pyr_(&i);
97 }
98 
99 double pymass(int i)
100 {
101  return pymass_(&i);
102 }
103 
104 int pychge(int i)
105 {
106  return pychge_(&i);
107 }
108 
109 void py1ent(int i, int j, double e, double theta, double phi)
110 {
111  py1ent_(&i, &j, &e, &theta, &phi);
112 }
113 
114 #ifdef __cplusplus
115 }
116 #endif