Desktop Calculator


Code

	calc:@[_n;`a`b`c`d`n0`n1`n2`n3`n4`n5`n6`n7`n8`n9`lp`rp`fa`fs`fm`fd`fe`fx;:[;"exp,:(~_v)`l"]]
	calc[.;`l]:"abcd0123456789()+-*%: "
	calc.eval:"err:\"\";:[*t:@[.:;(`space;exp);:];err:t 1;exp:5:t 1];"
	calc.clear:"exp:\"\""
	calc[.;`c]:`button
	\d calc
	space:.();exp:err:"";exp..l:err..l:`;err..e:0
	\d ~
	l:"a vector calculator in k"
	a:(`exp
	   `err
	   `fe`fx
	   `a`b`c`d
	   `n0`n1`n2`n3
	   `n4`n5`n6`n7
	   `n8`n9`lp`rp
	   `fa`fs`fm`fd
	   `eval`clear)
	\d ^
	`show$`calc 

GUI