Change T and F to TRUE,FALSE.
Bug fix in dat.TKE, added avg=TRUE,smooth=TRUE to
dat calls for u'u', v'v' and w'w' in this expression:
-    x <- sqrt(dat("u'u'")^2 + dat("v'v'")^2 + dat("w'w'")^2)/2
Also, fix in w'co2': add avg=TRUE,smooth=TRUE when getting dat("co2"):
+        rhoc <- dat(expand("co2",what),avg=TRUE,smooth=TRUE)