## [inca2](https://github.com/luser-dr00g/inca/blob/master/README2.md) 124

 i:[((n%2)^2)>((x-(n-1)%2)^2)+(y-(n-1)%2)^2
 j:(,(~y%2)i.(~y)){' ('
 k:[(|(y-n%2))<x
 l:(,(@~1+y%2)k.(~y)){' V'
 c:y y#(jn<y),ly

This mostly uses the formulas from the python example, but using jot-dots and iotas instead of double-looping. The `i` function performs the circular test for the `j` function which invokes *jot-dot* upon it. And the `k` function performs the triangle test for the `l` function. The `c` function catenates the results of `j` and `l` and reshapes it to N&times;N.

In action.

 ./inca2
 i:[((n%2)^2)>((x-(n-1)%2)^2)+(y-(n-1)%2)^2
 j:(,(~y%2)i.(~y)){' ('
 k:[(|(y-n%2))<x
 l:(,(@~1+y%2)k.(~y)){' V'
 c:y y#(jn<y),ly
 
 c3
 (((
 VV
 
 c4
 (( 
 ((((
 VVV
 V 
 c5
 ((( 
 (((((
 VVVV
 VV 
 
 c9
 ((((( 
 ((((((( 
 (((((((((
 (((((((((
 VVVVVVVV
 VVVVVV 
 VVVV 
 VV