Hi! I have a=:'an-as-tig-mat-ic' or b=:'tim-ing'
and a function:
fra=: 3 : 0
p=.(]<;._1 ) '-',y NB. cut
o=.<:$p
p=.>p,each '-'
((' ' ([: I. '-' = ])} ]) o{p) o}p NB. replacing
)
fra a
an-
as-
tig-
mat-
ic
fra b
tim-
ing
I would like to know if there is a simpler way to get the same result.
Thanks
Gian Medri
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
