Last change
on this file since ef63dd9 was
144e032a,
checked in by Paul Kienzle <pkienzle@…>, 7 years ago
|
tinycc doesn't return structures, so must pass return structure as pointer
|
-
Property mode set to
100644
|
File size:
602 bytes
|
Rev | Line | |
---|
[9e531f2] | 1 | #if !defined(o_h) |
---|
| 2 | #define libfunc_h |
---|
| 3 | typedef struct { |
---|
| 4 | double uu; |
---|
| 5 | double dd; |
---|
| 6 | double re_ud; |
---|
| 7 | double im_ud; |
---|
| 8 | double re_du; |
---|
| 9 | double im_du; |
---|
| 10 | } polar_sld; |
---|
| 11 | |
---|
| 12 | int factorial(int i); |
---|
| 13 | |
---|
| 14 | double Si(double x); |
---|
| 15 | |
---|
| 16 | double sinc(double x); |
---|
| 17 | |
---|
[b6c8abe] | 18 | //double gamln(double x); |
---|
[9e531f2] | 19 | |
---|
[144e032a] | 20 | void cal_msld(polar_sld*, int isangle, double qx, double qy, double bn, double m01, double mtheta1, |
---|
[9e531f2] | 21 | double mphi1, double spinfraci, double spinfracf, double spintheta); |
---|
| 22 | |
---|
[b6c8abe] | 23 | //void gser(float *gamser, float a, float x, float *gln); |
---|
[9e531f2] | 24 | |
---|
[b6c8abe] | 25 | //void gcf(float *gammcf, float a, float x, float *gln); |
---|
[9e531f2] | 26 | |
---|
[b6c8abe] | 27 | //float gammp(float a,float x); |
---|
[9e531f2] | 28 | |
---|
[b6c8abe] | 29 | //float erff(float x); |
---|
[9e531f2] | 30 | |
---|
| 31 | #endif |
---|
Note: See
TracBrowser
for help on using the repository browser.