The word
consummate may be divided into three parts i.e. con sum mate, each of the three being a legitimate non-esoteric English word.
Please provide more words possessing such feature. The more the merrier,
the longer the better.
fid=fopen('c:\words\36kwords.txt','r');
fido=fopen('c:\vb5 projects\flooble\tripartite36kany.txt','w');
while ~feof(fid)
w=fgetl(fid);
if isequal(w,'hypotenuse')
xx=9;
end
if length(w)>=10
for a=3:length(w)-4
for b=a+1:length(w)-3
w1=w(1:a);
w2=w(a+1:b);
w3=w(b+1:end);
if length(w1)>=3 && length(w2)>=3 && length(w3)>=3
if isword(w1)
if isword(w2)
if isword(w3)
if ~isequal(w3,'ness') ...
&& ~isequal(w3,'nesses') ...
&& ~isequal(w3,'isms')
disp([w ' ' w1 ' ' w2 ' ' w3])
fprintf(fido,'%-25s %-12s %-12s %-12s\n',w,w1,w2,w3);
end
end
end
end
end
end
end
end
end
fclose('all')
function tf=isword36(w)
l=string(length(char(w)));
filename=strcat("c:\words\36k",l,"let.txt");
l=length(char(w));
words=fileread(filename);
first=1; last=length(words)/l;
found=false;
while found==false
mid=floor((first+last)/2);
word=char(extractBetween(words,(mid-1)*l+1,mid*l));
if string(word)==string(w)
found=true;
break
end
if string(w)>string(word)
first=mid+1;
else
last=mid-1;
end
if last<first
break
end
end
tf=found;
end
championships champ ions hips
fluorescent flu ore scent
improbably imp rob ably
nightingale nigh ting ale
nightingales nigh ting ales
outsmarting outs mar ting
subtractions sub tract ions
superstitions supers tit ions
Words had to be 3 or more letters, preventing for example "night in gale".
|
|
Posted by Charlie
on 2024-01-17 08:26:36 |
the short list
