RosettaCodeData/Task/Terminal-control-Unicode-output/Mathematica/terminal-control-unicode-output.math

3 lines
126 B
Text
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
If[StringMatchQ[$CharacterEncoding, "UTF*"], Print[FromCharacterCode[30000]], Print["UTF-8 capable terminal required"]]
->田