diff options
author | Johannes Hofmann <Johannes.Hofmann@gmx.de> | 2006-12-12 18:47:11 +0100 |
---|---|---|
committer | Johannes Hofmann <Johannes.Hofmann@gmx.de> | 2006-12-12 18:47:11 +0100 |
commit | ecf37e45b96cae7596edffbe5b381ba123bc5c5f (patch) | |
tree | ded67dce3a9812d3a30a9bb9de4feeaae83ac54b /src/lsq_funcs.mac | |
parent | f8726929e645539456bd1f5fd2a37160b10778a5 (diff) |
add ProjectionTangentialLSQ class
Diffstat (limited to 'src/lsq_funcs.mac')
-rw-r--r-- | src/lsq_funcs.mac | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/src/lsq_funcs.mac b/src/lsq_funcs.mac index f2a70b9..3e1bc18 100644 --- a/src/lsq_funcs.mac +++ b/src/lsq_funcs.mac @@ -15,29 +15,29 @@ y : y_unrot * cos(c_tilt) - x_unrot * sin(c_tilt)$ x_expand : trigexpand(x)$ y_expand : trigexpand(y)$ -args: "(double c_view, double c_nick, double scale, double k0, double k1, double m_view, double m_nick)"$ +args: "(double c_view, double c_nick, double c_tilt, double scale, double k0, double k1, double m_view, double m_nick)"$ -sprint("double mac_x", args, "{ return",string(subst(pow, "^", x_expand)),"}"," +sprint("double mac_x", args, "{ return",string(subst(pow, "^", x_expand)),";}"," ")$ -sprint("double mac_y", args, "{ return", string(subst(pow, "^",y_expand)),"}"," +sprint("double mac_y", args, "{ return", string(subst(pow, "^",y_expand)),";}"," ")$ -sprint("double mac_x_dc_view", args, "{ return", string(subst(pow, "^",diff(x_expand, c_view))),"}"," +sprint("double mac_x_dc_view", args, "{ return", string(subst(pow, "^",diff(x_expand, c_view))),";}"," ")$ -sprint("double mac_x_dc_nick", args, "{ return", string(subst(pow, "^",diff(x_expand, c_nick))),"}"," +sprint("double mac_x_dc_nick", args, "{ return", string(subst(pow, "^",diff(x_expand, c_nick))),";}"," ")$ -sprint("double mac_x_dscale", args, "{ return",string(subst(pow, "^",diff(x_expand, scale))),"}"," +sprint("double mac_x_dscale", args, "{ return",string(subst(pow, "^",diff(x_expand, scale))),";}"," ")$ -sprint("double mac_x_dk0", args, "{ return",string(subst(pow, "^",diff(x_expand, k0))),"}"," +sprint("double mac_x_dk0", args, "{ return",string(subst(pow, "^",diff(x_expand, k0))),";}"," ")$ -sprint("double mac_x_dk1",args, "{ return", string(subst(pow, "^",diff(x_expand, k1))),"}"," +sprint("double mac_x_dk1",args, "{ return", string(subst(pow, "^",diff(x_expand, k1))),";}"," ")$ -sprint("double mac_y_dc_view",args, "{ return", string(subst(pow, "^",diff(y_expand, c_view))),"}"," +sprint("double mac_y_dc_view",args, "{ return", string(subst(pow, "^",diff(y_expand, c_view))),";}"," ")$ -sprint("double mac_y_dc_nick",args, "{ return", string(subst(pow, "^",diff(y_expand, c_nick))),"}"," +sprint("double mac_y_dc_nick",args, "{ return", string(subst(pow, "^",diff(y_expand, c_nick))),";}"," ")$ -sprint("double mac_y_dscale", args, "{ return",string(subst(pow, "^",diff(y_expand, scale))),"}"," +sprint("double mac_y_dscale", args, "{ return",string(subst(pow, "^",diff(y_expand, scale))),";}"," ")$ -sprint("double mac_y_dk0", args, "{ return",string(subst(pow, "^",diff(y_expand, k0))),"}"," +sprint("double mac_y_dk0", args, "{ return",string(subst(pow, "^",diff(y_expand, k0))),";}"," ")$ -sprint("double mac_y_dk1",args, "{ return", string(subst(pow, "^",diff(y_expand, k1))),"}"," +sprint("double mac_y_dk1",args, "{ return", string(subst(pow, "^",diff(y_expand, k1))),";}"," ")$ |