save_uc_thick#:= uc_thick#;	uc_thick#:= lc_thick#;
save_uc_med#:= uc_med#;		uc_med#:= lc_med#;
save_uc_thin#:= uc_thin#;	uc_thin#:= lc_thin#;
save_uc_thick:= uc_thick;	uc_thick:= lc_thick;
save_uc_med:= uc_med;		uc_med:= lc_med;
save_uc_thin:= uc_thin;		uc_thin:=lc_thin;
save_ucpen:= ucpen;		ucpen:= lcpen;
save_ucthickpen:= ucthickpen;	ucthickpen:= lcthickpen;
save_ucmedpen:= ucmedpen;	ucmedpen:= lcmedpen;
save_uccurvepen:= uccurvepen;	uccurvepen:= lccurvepen;
save_ucthinpen:= ucthinpen;	ucthinpen:= lcthinpen;
save_uc_o_pen:= uc_o_pen;	uc_o_pen:= lc_o_pen;
save_uc_xscale:= uc_xscale;	uc_xscale:=lc_xscale;
save_uc_bar:= uc_bar;		uc_bar:= 0.55*1/3[xheight,cap];
string save_extra_beginchar;
save_extra_beginchar:= extra_beginchar;
extra_beginchar:= "charcode:= charcode+32; " &
  "charht:= 1/3[xheight#,cap#]; " &
  "h:= vround(charht*hppp); " &
  "charwd:= charht/cap#*(charwd-2u#)+2u#; " &
  "w:= hround(charwd*hppp); " &
  extra_beginchar;

input glrmu;

extra_beginchar:= save_extra_beginchar;
uc_xscale:= save_uc_xscale;
uc_o_pen:= save_uc_o_pen;
ucthinpen:= save_ucthinpen;
uccurvepen:= save_uccurvepen;
ucmedpen:= save_ucmedpen;
ucthickpen:= save_ucthickpen;
ucpen:= save_ucpen;
uc_thin:= save_uc_thin;
uc_med:= save_uc_med;
uc_thick:= save_uc_thick;
uc_thin#:= save_uc_thin#;
uc_med#:= save_uc_med#;
uc_thick#:= save_uc_thick#;
uc_bar:= save_uc_bar;