Alex, Steven,
NB. Insert verb between items of gerund
IT =: conjunction def ' (u`n) @. (}: 1j1 # >: i. #n) '
* IT (sin`cos`tan) NB. Insert verb * in
Train (sin cos tan)
sin * cos * tan
CST =. * IT (sin`cos`tan) NB. CST is a verb. It is a
train of 2 forks
CST 5 6 7 NB. CST is monadic
verb because tan and cos and sin are
0.919536 0.078073 0.431631
1 2 3 CST 4 5 6 NB. used dyadically,
gives powers of application (see BOND in vocab)
0.57275 0.919536 0.078073
_1.24397 0.191416 0.0473628
0.51559 0.104062 0.0706409
1 2 3 * IT (sin`cos`tan) 4 5 6 NB. Used directly
0.57275 0.919536 0.078073
_1.24397 0.191416 0.0473628
0.51559 0.104062 0.0706409
Ian
Ian Shannon
Landscape Modelling and Decision Support Section
Department of Environment, Climate Change & Water (NSW)
PO Box A290 Sydney South
NSW 1232
P: +61 - 299 955 490
M: +61 - 428 296 729
E: Ian (dot) Shannon (at) environment (dot) nsw (dot) gov (dot) au
W: http://www.environment.nsw.gov.au
Please consider the environment before printing my email
-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of
[email protected]
Sent: Sunday, 5 December 2010 3:00 PM
To: [email protected]
Subject: Programming Digest, Vol 63, Issue 2
Send Programming mailing list submissions to
[email protected]
To subscribe or unsubscribe via the World Wide Web, visit
http://jsoftware.com/cgi-bin/mailman/listinfo/programming
or, via email, send a message with subject or body 'help' to
[email protected]
You can reach the person managing the list at
[email protected]
When replying, please edit your Subject line so it is more specific
than "Re: Contents of Programming digest..."
Today's Topics:
1. Re: Generic operations on verbs (Steven Taylor)
----------------------------------------------------------------------
Message: 1
Date: Sat, 4 Dec 2010 07:55:09 +0000
From: Steven Taylor <[email protected]>
Subject: Re: [Jprogramming] Generic operations on verbs
To: [email protected]
Message-ID:
<[email protected]>
Content-Type: text/plain; charset=ISO-8859-1
Thanks for those examples Roger + the original question Alex.
Forks, obverse, and the Iversonian idea of open, operate, close are holding
together a bit more strongly for me now.
sin=:1&o.
cos=:2&o.
tan=:3&o.
f=:*
a=:1 2 3
b=:4 5 6
a >@(f&.>/)@(sin;cos;tan) b
0.57275 0.919536 0.078073
_1.24397 0.191416 0.0473628
0.51559 0.104062 0.0706409
-Steven
------------------------------
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
End of Programming Digest, Vol 63, Issue 2
******************************************
----------------------------------------------------------------------------------------------------------------------------------------------------------------------
This email is intended for the addressee(s) named and may contain confidential
and/or privileged information.
If you are not the intended recipient, please notify the sender and then delete
it immediately.
Any views expressed in this email are those of the individual sender except
where the sender expressly and with authority states them to be the views of
the Department of Environment, Climate Change & Water NSW.
PLEASE CONSIDER THE ENVIRONMENT BEFORE PRINTING THIS EMAIL
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
