Line data Source code
1 1 : // Distributed under the MIT License.
2 : // See LICENSE.txt for details.
3 :
4 : #pragma once
5 :
6 : /// \file
7 : /// Provides a C++ interface to the Fortran SPHEREPACK library.
8 :
9 : extern "C" {
10 0 : void shagsi_(const int&, const int&, double*, const int&, double*, const int&,
11 : double*, const int&, gsl::not_null<int*>);
12 0 : void shags_(const int&, const int&, const int&, const int&, const int&,
13 : const int&, const int&, const int&, const double*, const int&,
14 : const int&, double*, double*, const int&, const int&, const int&,
15 : const int&, const double*, const int&, double*, const int&,
16 : gsl::not_null<int*>);
17 0 : void shsgsi_(const int&, const int&, double*, const int&, double*, const int&,
18 : double*, const int&, gsl::not_null<int*>);
19 0 : void shsgs_(const int&, const int&, const int&, const int&, const int&,
20 : const int&, const int&, const int&, double*, const int&, const int&,
21 : const double*, const double*, const int&, const int&, const int&,
22 : const int&, const double*, const int&, double*, const int&,
23 : gsl::not_null<int*>);
24 0 : void vhagsi_(const int&, const int&, double*, const int&, double*, const int&,
25 : gsl::not_null<int*>);
26 0 : void vhags_(const int&, const int&, const int&, const int&, const int&,
27 : const int&, const int&, const int&, const double*, const double*,
28 : const int&, const int&, double*, double*, double*, double*,
29 : const int&, const int&, const double*, const int&, double*,
30 : const int&, gsl::not_null<int*>);
31 0 : void vhsgsi_(const int&, const int&, double*, const int&, double*, const int&,
32 : gsl::not_null<int*>);
33 0 : void vhsgs_(const int&, const int&, const int&, const int&, const int&,
34 : const int&, const int&, const int&, double*, double*, const int&,
35 : const int&, const double*, const double*, const double*,
36 : const double*, const int&, const int&, const double*, const int&,
37 : double*, const int&, gsl::not_null<int*>);
38 0 : void slapgs_(const int&, const int&, const int&, const int&, const int&,
39 : const int&, const int&, const int&, double*, const int&,
40 : const int&, const double*, const double*, const int&, const int&,
41 : const double*, const int&, double*, const int&,
42 : gsl::not_null<int*>);
43 0 : void gradgs_(const int&, const int&, const int&, const int&, const int&,
44 : const int&, const int&, const int&, double*, double*, const int&,
45 : const int&, const double*, const double*, const int&, const int&,
46 : const double*, const int&, double*, const int&,
47 : gsl::not_null<int*>);
48 0 : void divgs_(const int&, const int&, const int&, const int&, const int&,
49 : const int&, const int&, const int&, double*, const int&, const int&,
50 : const double*, const double*, const int&, const int&, const double*,
51 : const int&, double*, const int&, gsl::not_null<int*>);
52 0 : void vrtgs_(const int&, const int&, const int&, const int&, const int&,
53 : const int&, const int&, const int&, double*, const int&, const int&,
54 : const double*, const double*, const int&, const int&, const double*,
55 : const int&, double*, const int&, gsl::not_null<int*>);
56 0 : void vtsgsi_(const int&, const int&, double*, const int&, double*, const int&,
57 : double*, const int&, gsl::not_null<int*>);
58 0 : void vtsgs_(const int&, const int&, const int&, const int&, const int&,
59 : const int&, const int&, const int&, double*, double*, const int&,
60 : const int&, const double*, const double*, const double*,
61 : const double*, const int&, const int&, const double*, const int&,
62 : double*, const int&, gsl::not_null<int*>);
63 0 : void alfk_(const int&, const int&, double*);
64 0 : void lfin_(const int&, const double*, const int&, const int&, const int&,
65 : double*, const int&, double*);
66 0 : void gaqd_(const int&, double*, double*, double*, const int&,
67 : gsl::not_null<int*>);
68 : }
|