+strunc('a c ', 9) => "a c"
+
+strunc('a c ', 7) => "a c"
+
+strunc('a c ', 6) => "a c"
+
+strunc('a c ', 5) => "a c"
+
+strunc('a c ', 4) => "a c"
+
+strunc('a c ', 3) => "a c"
+
+strunc('a c ', 2) => "a"
+
+strunc('a c ', 1) => "a"
+
+strunc('a c ', 0) => ""
+
+evaluate.sps:13.34-13.37: error: DEBUG EVALUATE: Treating unexpected non-
+integer value 0.75 as missing.
+ 13 | DEBUG EVALUATE /strunc('a c ', 0.75).
+ | ^~~~
+
+strunc('a c ', 0.75) => "a c "
+
+strunc('a c ', -1) => ""
+
+strunc('a c ', $sysmis) => "a c "
+
+strunc(' abc ', 9) => " abc"
+
+strunc(' abc ', 8) => " abc"
+
+strunc(' abc ', 7) => " abc"
+
+strunc(' abc ', 6) => " abc"
+
+strunc(' abc ', 5) => " abc"
+
+strunc(' abc ', 4) => " ab"
+
+strunc(' abc ', 3) => " a"
+
+strunc(' abc ', 2) => ""
+
+strunc(' abc ', 1) => ""
+
+evaluate.sps:27.35-27.37: error: DEBUG EVALUATE: Treating unexpected non-
+integer value 1.5 as missing.
+ 27 | DEBUG EVALUATE /strunc(' abc ', 1.5).
+ | ^~~
+
+strunc(' abc ', 1.5) => " abc "
+
+strunc(' abc ', -1) => ""
+
+strunc(' abc ', $sysmis) => " abc "