Image convolution: Difference between revisions

m
Line 614:
pad=:adverb define
'a b'=. (<.,.>.) 0.5 0.5 p. $m
a"_`(<:@],0,]-1:)`(#1:)}~&# # b"_`(<:@],0,]-1:)`(#1:)}~&(1{$) #"1 ]
)
 
6,962

edits