smog ( text-analysis -- n )


Vocabulary
text-analysis.private

Inputs
text-analysisan object


Outputs
nan object


Definition
USING: accessors kernel math math.functions ;

IN: text-analysis.private

: smog ( text-analysis -- n )
[ #complex-words>> ] [ #sentences>> 30 swap / ] bi *
sqrt 1.043 * 3.1291 + ;