User:Connel MacKenzie/English nouns with spaces
Jump to navigation
Jump to search
w # r z s x=0 f s x=$o(^wiki2(x)),n=^(x,"name") i n[" ",n'[":",n'["/",n'["-",n'["'",n?1.l1" ".l." ".l,'$d(^wikix($tr(n," ","-"))),'$d(^wikir($tr(n," ","-"))) s t=^wiki2(x,"text") i t["==English==",t["===Noun===" w:($x+$l(n)>75) ! s z=z+1 w "",n," " i '(z#5000) w # r zz
16,968