1 /*
2 * Copyright (c) 2012-2016, The University of Oxford
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are met:
7 * 1. Redistributions of source code must retain the above copyright notice,
8 * this list of conditions and the following disclaimer.
9 * 2. Redistributions in binary form must reproduce the above copyright notice,
10 * this list of conditions and the following disclaimer in the documentation
11 * and/or other materials provided with the distribution.
12 * 3. Neither the name of the University of Oxford nor the names of its
13 * contributors may be used to endorse or promote products derived from this
14 * software without specific prior written permission.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include "sky/private_sky.h"
30 #include "sky/oskar_sky.h"
31 #include "mem/oskar_mem.h"
32 #include <stdlib.h>
33
34 #ifdef __cplusplus
35 extern "C" {
36 #endif
37
oskar_sky_free(oskar_Sky * model,int * status)38 void oskar_sky_free(oskar_Sky* model, int* status)
39 {
40 if (!model) return;
41
42 /* Free the memory. */
43 oskar_mem_free(model->ra_rad, status);
44 oskar_mem_free(model->dec_rad, status);
45 oskar_mem_free(model->I, status);
46 oskar_mem_free(model->Q, status);
47 oskar_mem_free(model->U, status);
48 oskar_mem_free(model->V, status);
49 oskar_mem_free(model->reference_freq_hz, status);
50 oskar_mem_free(model->spectral_index, status);
51 oskar_mem_free(model->rm_rad, status);
52 oskar_mem_free(model->l, status);
53 oskar_mem_free(model->m, status);
54 oskar_mem_free(model->n, status);
55 oskar_mem_free(model->fwhm_major_rad, status);
56 oskar_mem_free(model->fwhm_minor_rad, status);
57 oskar_mem_free(model->pa_rad, status);
58 oskar_mem_free(model->gaussian_a, status);
59 oskar_mem_free(model->gaussian_b, status);
60 oskar_mem_free(model->gaussian_c, status);
61
62 /* Free the structure itself. */
63 free(model);
64 }
65
66 #ifdef __cplusplus
67 }
68 #endif
69