RosettaCodeData/Task/Terminal-control-Inverse-video/J/terminal-control-inverse-video.j
2023-07-01 13:44:08 -04:00

5 lines
322 B
Text

;:';:,#.*."3,(C.A.)/\/&.:;:' NB. some output beforehand
attributes REVERSEVIDEO NB. does as it says
2 o.^:a:0 NB. solve the fixed point equation cos(x) == x
attributes OFF NB. no more blinky flashy
parseFrench=:;:,#.*."3,(C.A.)/\/&.:;: NB. just kidding! More output.