Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140TRIG.m"}]];
expr=Column[{qPanel1[1,True],qPanel2[2,True],qPanel3[3,True],qPanel4[4,True],qPanel5[5,True],qSendLocal[$UserDocumentsDirectory]}];