Last change
on this file since 45eddeb7 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:
772 bytes
|
Line | |
---|
1 | #if !defined(librefl_h) |
---|
2 | #define librefl_h |
---|
3 | |
---|
4 | typedef struct { |
---|
5 | double re; |
---|
6 | double im; |
---|
7 | } Cplx; |
---|
8 | |
---|
9 | typedef struct { |
---|
10 | Cplx a; |
---|
11 | Cplx b; |
---|
12 | Cplx c; |
---|
13 | Cplx d; |
---|
14 | } matrix; |
---|
15 | |
---|
16 | void cassign(Cplx*, double real, double imag); |
---|
17 | |
---|
18 | void cplx_add(Cplx*, Cplx x,Cplx y); |
---|
19 | |
---|
20 | void rcmult(Cplx*, double x,Cplx y); |
---|
21 | |
---|
22 | void cplx_sub(Cplx*, Cplx x,Cplx y); |
---|
23 | |
---|
24 | void cplx_mult(Cplx*, Cplx x,Cplx y); |
---|
25 | |
---|
26 | void cplx_div(Cplx*, Cplx x,Cplx y); |
---|
27 | |
---|
28 | void cplx_exp(Cplx*, Cplx b); |
---|
29 | |
---|
30 | void cplx_sqrt(Cplx*, Cplx z); |
---|
31 | |
---|
32 | void cplx_cos(Cplx*, Cplx b); |
---|
33 | |
---|
34 | double intersldfunc(int fun_type, double n_sub, double i, double nu, double sld_l, double sld_r); |
---|
35 | double interfunc(int fun_type, double n_sub, double i, double sld_l, double sld_r); |
---|
36 | double linePq(int fun_type, double thick, double sld_in, double sld_out,double r, double q); |
---|
37 | #endif |
---|
Note: See
TracBrowser
for help on using the repository browser.