language: AWK (gawk) (gawk-3.1.6)
date: 138 days 17 hours ago
link:
visibility: public 
1

{print 2^split($1,a,/[LDFT]/)/2}