For what it's worth, "obverse" essentially means "best approximation to
inverse".
I want to know if two points are the same, meaning one lies within a
sufficiently small sphere about the other. The correct way for my
application would be to test if the Euclidean distance between them is
sufficiently small.. In my case I know that the points are within some
radius of the origin.
NB. unequal
0 = 1e_17
0
NB. still unequal---expected after reading the NuVoc a few times
0 =!.(1e_14) 1e_17
0
0 =&>: 1e_17
1
under_shift=: (+&5) :. (-&5)
0 =&under_shift 1e_17
1
In my actual situation I have
under_shift=: [: :((] rebuild_structure [ + locations@:]) :.(]
rebuild_structure [ -.~ locations@:]))
Allowing me to write
verb_involving_match&.(x&under_shift) STRUCTURED_NOUN
I also recently had a nice insight using the order restoring grade of
grade.
GRADE=: /: DATA
(verb_in_which_order_matters GRADE { DATA) /: GRADE
Tally ho I'm thrilled. j is fun.
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm