Skip to main content
added 55 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84

C (gcc), 176 333  168 bytes

Thanks to @Kevin Cruijssen for saving 9 bytes and thanks to @Laikoni for saving 45 bytes!

f(r,nh,a){char*h=rchar*o=r,c[222]={!ho};for(a=!h;*h;o;*o;)++c[*h++];for++c[*o++];for(n=h=!h;222o;222/++n;c[n]&&c[n]++h;c[h]&&c[h]!=a&&(a=!*c))!a&&c[n]&&a&&c[h]&&(a=c[n]a=c[h]);r=!(2/2/a);}/////!(())****++,,,,,[[]]fffffhnoooooorr[[]]fffffrr{{{{{{}}}}}}

Try it online!Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

C (gcc), 176 bytes

Thanks to @Kevin Cruijssen for saving 9 bytes and thanks to @Laikoni for saving 45 bytes!

f(r,n,a){char*h=r,c[222]={!h};for(a=!h;*h;)++c[*h++];for(n=!h;222/++n;c[n]&&c[n]!=a&&(a=!*c))!a&&c[n]&&(a=c[n]);r=!(2/2/a);}/////!(())****++,,,,,[[]]fffffhnoooooorr{{{{{{}}}}}}

Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

C (gcc),  333  168 bytes

Thanks to @Kevin Cruijssen for saving 9 bytes and thanks to @Laikoni for saving 45 bytes!

f(r,h,a){char*o=r,c[222]={!o};for(a=!o;*o;)++c[*o++];for(h=!o;222/++h;c[h]&&c[h]!=a&&(a=!*c))!a&&c[h]&&(a=c[h]);r=!(2/2/a);}/////!(())****++,,,,,[[]]fffffrr{{{{{{}}}}}}

Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

deleted 18 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84

C (gcc), 184176 bytes

Thanks to @Kevin Cruijssen for saving 9 bytes and thanks to @Laikoni for lots of savedsaving 45 bytes!

f(r,n,a){char*h=r,c[222]={!1h};for(a=!1;*h;h;*h;)++c[*h++];for(n=1;222n=!h;222/(++n+1);c[n]&&c[n]++n;c[n]&&c[n]!=a&&(a=1a=!*c))!a&&c[n]&&(a=c[n]);r=!(12/2/a);}//////!!!(()*****+)****++,,,,,1122[[]]cfffffhhhhnoooooorr[[]]fffffhnoooooorr{{{{{{}}}}}}

Try it online!Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

C (gcc), 184 bytes

Thanks to @Kevin Cruijssen and @Laikoni for lots of saved bytes!

f(r,n,a){char*h=r,c[222]={!1};for(a=!1;*h;)++c[*h++];for(n=1;222/(++n+1);c[n]&&c[n]!=a&&(a=1))!a&&c[n]&&(a=c[n]);r=!(1/a);}//////!!!()*****+,,,,,1122[[]]cfffffhhhhnoooooorr{{{{{{}}}}}}

Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

C (gcc), 176 bytes

Thanks to @Kevin Cruijssen for saving 9 bytes and thanks to @Laikoni for saving 45 bytes!

f(r,n,a){char*h=r,c[222]={!h};for(a=!h;*h;)++c[*h++];for(n=!h;222/++n;c[n]&&c[n]!=a&&(a=!*c))!a&&c[n]&&(a=c[n]);r=!(2/2/a);}/////!(())****++,,,,,[[]]fffffhnoooooorr{{{{{{}}}}}}

Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

deleted 10 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84

C (gcc), 192184 bytes

Thanks to @Kevin Cruijssen and @Laikoni for lots of saved bytes!

f(r,n,a){char*h=r,c[222]={!1};for(a=!1;*h;)++c[*h++];for(n=-1;222n=1;222/(++n+1);c[n]&&c[n]-a&&!=a&&(a=-1a=1))!a&&c[n]&&(a=c[n]);r=!(1/a);}//////!!!!()*****+,,,,,-----1122=[[]]cfffffhhhhnoooooorr1122[[]]cfffffhhhhnoooooorr{{{{{{}}}}}}

Try it online!Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

C (gcc), 192 bytes

Thanks to @Kevin Cruijssen and @Laikoni for lots of saved bytes!

f(r,n,a){char*h=r,c[222]={!1};for(a=!1;*h;)++c[*h++];for(n=-1;222/(++n+1);c[n]&&c[n]-a&&(a=-1))!a&&c[n]&&(a=c[n]);r=!(1/a);}//////!!!!()*****+,,,,,-----1122=[[]]cfffffhhhhnoooooorr{{{{{{}}}}}}

Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

C (gcc), 184 bytes

Thanks to @Kevin Cruijssen and @Laikoni for lots of saved bytes!

f(r,n,a){char*h=r,c[222]={!1};for(a=!1;*h;)++c[*h++];for(n=1;222/(++n+1);c[n]&&c[n]!=a&&(a=1))!a&&c[n]&&(a=c[n]);r=!(1/a);}//////!!!()*****+,,,,,1122[[]]cfffffhhhhnoooooorr{{{{{{}}}}}}

Try it online!

C, 333 bytes

i,v;f(S){char*s=S,L[128]={0};for(v=0;*s;)++L[*s++];for(i=-1;++i<128;L[i]&&L[i]-v?v=-1:0)!v&&L[i]?v=L[i]:0;return-v<-1;}/////////!!!!!!!!&&&&&(((((())))))******+++,,,,,,,----00000111122222228888888:::::::<<<<<<<===???????LLLSSSSSSS[[[]]]aaaaaaaacccccccceeeeeeeeffffffhhhhhhhhiinnnnnnnnooooooorrrrssssssttttttttuuuuuuuuvv{{{{{{{}}}}}}}

Even the bytecount is non-discriminating!

Try it online!

deleted 12 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84
Loading
deleted 45 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84
Loading
deleted 8 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84
Loading
added 1255 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84
Loading
added 105 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84
Loading
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84
Loading