annotate clustalomega/clustal-omega-1.0.2/src/clustal/symmatrix.h @ 1:bc707542e5de

Uploaded
author clustalomega
date Thu, 21 Jul 2011 13:35:08 -0400
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
1 /*********************************************************************
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
2 * Clustal Omega - Multiple sequence alignment
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
3 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
4 * Copyright (C) 2010 University College Dublin
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
5 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
6 * Clustal-Omega is free software; you can redistribute it and/or
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
7 * modify it under the terms of the GNU General Public License as
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
8 * published by the Free Software Foundation; either version 2 of the
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
9 * License, or (at your option) any later version.
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
10 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
11 * This file is part of Clustal-Omega.
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
12 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
13 ********************************************************************/
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
14
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
15 /*
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
16 * RCS $Id: symmatrix.h 216 2011-03-19 10:11:53Z andreas $
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
17 */
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
18
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
19 /**
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
20 * Functions for symmetric (square) matrices including diagonal.
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
21 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
22 * Supports the notion of non-square sub-matrices of a symmetric
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
23 * matrix, i.e. where |rows|<|cols| and the corresponding full matrix
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
24 * would be |cols|x|cols|
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
25 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
26 * Instead of making this one big chunk of memory we keep pointers to
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
27 * pointers, so that we can easily realloc (the project where this file
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
28 * originated from needed this for growing a "seed" matrix).
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
29 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
30 * FIXME Allocating one big chunk of memory is probably
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
31 * much faster and also easier to maintain.
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
32 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
33 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
34 */
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
35
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
36 #ifndef CLUSTALO_SYMMATRIX_H
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
37 #define CLUSTALO_SYMMATRIX_H
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
38
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
39
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
40 /**
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
41 * @brief symmetric matrix structure
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
42 */
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
43 typedef struct {
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
44 int nrows; /**< number of rows */
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
45 int ncols; /**< number of columns */
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
46 /**
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
47 * stored data
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
48 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
49 * @note indices range: [i][j-i] i<=j. use getvalue() and
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
50 * setvalue() instead of accessing directly
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
51 *
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
52 * @see SymMatrixGetValue(), SymMatrixSetValue()
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
53 */
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
54 double **data;
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
55 } symmatrix_t;
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
56
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
57
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
58
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
59 extern int
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
60 NewSymMatrix(symmatrix_t **symmat, const int nrows, const int ncols);
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
61
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
62 extern void
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
63 SymMatrixSetValue(symmatrix_t *symmat, const int i, const int j, const double value);
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
64
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
65 extern double
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
66 SymMatrixGetValue(symmatrix_t *symmat, const int i, const int j);
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
67
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
68 extern void
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
69 SymMatrixGetValueP(double **value, symmatrix_t *symmat, const int i, const int j);
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
70
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
71 extern void
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
72 FreeSymMatrix(symmatrix_t **symmat);
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
73
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
74 extern void
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
75 SymMatrixPrint(symmatrix_t *symmat, char **labels, const char *path);
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
76
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
77 extern int
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
78 SymMatrixRead(char *pcFileIn, symmatrix_t **prSymMat_p);
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
79
bc707542e5de Uploaded
clustalomega
parents:
diff changeset
80 #endif