// -*- C -*-

letterheight = 25;
linewidth = 3.5;
letterthick = 2.5;

kdiag = 1;

module kay () {
  translate([0.1,0,0])
    cube([linewidth, letterheight, letterthick]);
  translate([0,letterheight/2,0])
    for (mir=[0,1]) {
      mirror([0,mir,0])
	translate([0,-0.1,0])
	multmatrix([[1,kdiag,0,0],
		    [0,1,0,0],
		    [0,0,1,0],
		    [0,0,0,1]])
	cube([linewidth * sqrt(1 + kdiag*kdiag),
	      letterheight/2 + 0.1, letterthick]);
    }
}

kay();