I believe I can write payment tacitly, however I'm having a bad time
finding a tacit form for RootMe (yet another false position root finding
method adverb)
mean =: +/ % #
RootMe =: 1 :'({.~ _2 2"_ {~ _1 1 1"_ -: [: * u)@:({. , mean , {:)'
Also, given that 13 : is known to have bugs (or is it repaired in
current j versions?) Using 13 :literal forms need testing before trusted.
left hook and right hook
monad hook, hook dyadic
yeah wonderful hook!
Here's a fairly direct translation of
pmt=: 3 : 0
0 pmt y
:
'r t b'=. y
D=.(1 + r % 1200) ^ t
b*(r % 1200) * D % D - 1
)
.....................
r =: 0&{
t =: 1&{
b =: 2&{
payment_tacit_dwl =: b * (r % 1200) * (% <:)@:((1 + r % 1200) ^ t)
NB. "And our paranoia test is:"
payment_tacit_dwl 5.75 240 12500
57.4868
......................
|Date: Thu, 13 Sep 2018 14:34:03 +0000
|From: Linda Alvord <lindaalvor...@outlook.com>
|To: "programm...@jsoftware.com" <programm...@jsoftware.com>
|Subject: Re: [Jprogramming] Tacit form: How to handle intermediate
|Message-ID:
|
<mwhpr06mb31521fe1003dd716f29c2529b5...@mwhpr06mb3152.namprd06.prod.outlook.com>
|
|Content-Type: text/plain; charset="utf-8"
|
|Here are two tacit verb for pmt from Raul,
|
|
|pmt1200=:(%<:)@D * 1 0 1 */ .# ]
| pmt=: pmt1200@(%&1200 1 1)
| pmt 5.75 240 12500
|87.7604
|
| D
|[: (^~ >:)/ (2 3$0 1 0 1 0 0) +/ .* ]
|
| pmt1200
|(% <:)@D * 1 0 1 */ .# ]
|
|Can anyone other than Raul or Rob) writ an explicit OR tacit single
sentence definition for:
|
|PMREX=:
|
|PMTTA=:
|
|Cheers, Linda
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
