Skip to main content
added 7 characters in body
Source Link
ovs
  • 61.2k
  • 3
  • 49
  • 164

Haskell, 5050 48 bytes

f[]=1 f('[':a:b:c:d:s)=length[a..c]*f s f(a:s)=f s 

Try it online!Try it online!

Haskell, 50 bytes

f[]=1 f('[':a:b:c:d:s)=length[a..c]*f s f(a:s)=f s 

Try it online!

Haskell, 50 48 bytes

f[]=1 f('[':a:b:c:s)=length[a..c]*f s f(a:s)=f s 

Try it online!

Rollback to Revision 1
Source Link
ovs
  • 61.2k
  • 3
  • 49
  • 164

Haskell, 50 4650 bytes

f[]=1 f(a'[':'-'a:b:c:d:s)=length[a..b]*fc]*f s f(a:s)=f s 

Try it online!Try it online!

Haskell, 50 46 bytes

f[]=1 f(a:'-':b:s)=length[a..b]*f s f(a:s)=f s 

Try it online!

Haskell, 50 bytes

f[]=1 f('[':a:b:c:d:s)=length[a..c]*f s f(a:s)=f s 

Try it online!

added 1 character in body
Source Link
ovs
  • 61.2k
  • 3
  • 49
  • 164

Haskell, 5050 46 bytes

f[]=1 f('[':a:b:c'-':db:s)=length[a..c]*fb]*f s f(a:s)=f s 

Try it online!Try it online!

Haskell, 50 bytes

f[]=1 f('[':a:b:c:d:s)=length[a..c]*f s f(a:s)=f s 

Try it online!

Haskell, 50 46 bytes

f[]=1 f(a:'-':b:s)=length[a..b]*f s f(a:s)=f s 

Try it online!

Source Link
ovs
  • 61.2k
  • 3
  • 49
  • 164
Loading