1 /*
2 Teem: Tools to process and visualize scientific data and images .
3 Copyright (C) 2012, 2011, 2010, 2009 University of Chicago
4 Copyright (C) 2008, 2007, 2006, 2005 Gordon Kindlmann
5 Copyright (C) 2004, 2003, 2002, 2001, 2000, 1999, 1998 University of Utah
6
7 This library is free software; you can redistribute it and/or
8 modify it under the terms of the GNU Lesser General Public License
9 (LGPL) as published by the Free Software Foundation; either
10 version 2.1 of the License, or (at your option) any later version.
11 The terms of redistributing and/or modifying this software also
12 include exceptions to the LGPL that facilitate static linking.
13
14 This library is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 Lesser General Public License for more details.
18
19 You should have received a copy of the GNU Lesser General Public License
20 along with this library; if not, write to Free Software Foundation, Inc.,
21 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22 */
23
24 #include "ten.h"
25 #include "privateTen.h"
26
27 #define PARM_NUM 6
28 static const tenModelParmDesc
29 parmDesc[] = {
30 /* 0 */ {"B0", 0.0, TEN_MODEL_B0_MAX, AIR_FALSE, AIR_FALSE, 0},
31 /* 1 */ {"length", 0.0, TEN_MODEL_DIFF_MAX, AIR_FALSE, AIR_FALSE, 0},
32 /* 2 */ {"radius", 0.0, TEN_MODEL_DIFF_MAX, AIR_FALSE, AIR_FALSE, 0},
33 /* 3 */ {"x", -1.0, 1.0, AIR_FALSE, AIR_TRUE, 0},
34 /* 4 */ {"y", -1.0, 1.0, AIR_FALSE, AIR_TRUE, 1},
35 /* 5 */ {"z", -1.0, 1.0, AIR_FALSE, AIR_TRUE, 2}
36 };
37
38 static void
simulate(double * dwiSim,const double * parm,const tenExperSpec * espec)39 simulate(double *dwiSim, const double *parm, const tenExperSpec *espec) {
40 unsigned int ii;
41 double b0, length, radius, vec[3], ten[7],
42 ident[7] = {1, 1, 0, 0, 1, 0, 1};
43
44 b0 = parm[0];
45 length = parm[1];
46 radius = parm[2];
47 vec[0] = parm[3];
48 vec[1] = parm[4];
49 vec[2] = parm[5];
50 TEN_T3V_OUTER(ten, vec);
51 TEN_T_SCALE_ADD2(ten, length - radius, ten, radius, ident);
52 for (ii=0; ii<espec->imgNum; ii++) {
53 double adc, bb;
54 bb = espec->bval[ii];
55 adc = TEN_T3V_CONTR(ten, espec->grad + 3*ii);
56 dwiSim[ii] = b0*exp(-bb*adc);
57 }
58 return;
59 }
60
61 static char *
parmSprint(char str[AIR_STRLEN_MED],const double * parm)62 parmSprint(char str[AIR_STRLEN_MED], const double *parm) {
63 sprintf(str, "(%g) %gX%g (%g,%g,%g)", parm[0],
64 parm[1], parm[2], parm[3], parm[4], parm[5]);
65 return str;
66 }
67
68 _TEN_PARM_ALLOC
69 _TEN_PARM_RAND
70 _TEN_PARM_STEP
71 _TEN_PARM_DIST
72 _TEN_PARM_COPY
73 _TEN_PARM_CONVERT_NOOP
74
75 _TEN_SQE
76 _TEN_SQE_GRAD_CENTDIFF
77 _TEN_SQE_FIT(tenModel1Cylinder)
78
79 _TEN_NLL
80 _TEN_NLL_GRAD_STUB
81 _TEN_NLL_FIT_STUB
82
83 tenModel
84 _tenModel1Cylinder = {
85 TEN_MODEL_STR_1CYLINDER,
86 _TEN_MODEL_FIELDS
87 };
88 const tenModel *const tenModel1Cylinder = &_tenModel1Cylinder;
89