/* diserr.h			CIC Proprietary
 *-----------------------------------------------------------------------------
 * SCCS Version 1.2, 15:34:25 1/7/93
 *-----------------------------------------------------------------------------
 * Define LOCAL table of error messages for use in errhdl().
 *
 * DO NOT EDIT diserr.h DIRECTLY.  It is assembled automatically from
 * the file diserr.ha, which contains the first part of diserr.h, and
 * from errhdl2.hm, which is generated automatically by wrtdisfil.exe.
 * To make changes, either edit diserr.ha or change the wrtdisfil
 * functions that generate errhdl2.hm.
 *
 *  4-Apr-1986	P. Edberg
 *  09-Jan-92   K. Rolle       Changed name from errhdl2.ha to diserr.ha.
 *-----------------------------------------------------------------------------
 */

/* Everything up to here is from diserr.ha */
LOCAL CIC_TEXT *chkmsgST[] =
		{
		"",
		"(iparm1 >= -180)",
		"(iparm1 <= 180)",
		"(iparm2 >= -180)",
		"(iparm2 <= 180)",
		"rangechkB(ibeg, iend, 3)",
		"(ilower >= -180)",
		"(ilower <= 180)",
		"(iupper >= -180)",
		"(iupper <= 180)",
		"(ilower < iupper)",
		"(ilower >= -180)",
		"(ilower <= 180)",
		"(iupper >= -180)",
		"(iupper <= 180)",
		"(ilower < iupper)",
		"(ilower >= -180)",
		"(ilower <= 180)",
		"(iupper >= -180)",
		"(iupper <= 180)",
		"(ilower < iupper)",
		"(numtru >= 0)",
		"(numtru <= 15)",
		"(ilower >= -180)",
		"(ilower <= 180)",
		"(iupper >= -180)",
		"(iupper <= 180)",
		"(ilower < iupper)",
		"(numtru >= 0)",
		"(numtru <= 15)",
		"rangechkB(ibeg, iend, 3)",
		"alphachkB(bparm, \"CN\")",
		"rangechkB(ibeg, iend, 9)",
		"rangechkB(ibeg, iend, 2)",
		"(ithres >= -500)",
		"(ithres <= 500)",
		"(itype >= 0)",
		"(itype <= 3)",
		"rangechkB(ibeg, iend, 2)",
		"(ithres >= -500)",
		"(ithres <= 500)",
		"(limit >= 0)",
		"(limit <= 180)",
		"(itype >= 0)",
		"(itype <= 3)",
		"rangechkB(ibeg, iend, 2)",
		"(ithres >= 10)",
		"(ithres <= 100)",
		"rangechkB(ibeg, iend, 3)",
		"(ithres >= 60)",
		"(ithres <= 950)",
		"rangechkB(ibeg, iend, 1)",
		"alphachkB(bparm, \"RLHD\")",
		"rangechkB(ibeg, iend, 3)",
		"alphachkB(iparm1, \"BEMRLA\")",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"alphachkB(iparm3, \"EFAB\")",
		"alphachkB(iparm1, \"BEMRLA\")",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"alphachkB(iparm1, \"BEMRLA\")",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"alphachkB(iparm1, \"CVH\")",
		"(iparm2 >= 1)",
		"(iparm2 <= 60)",
		"alphachkB(iparm1, \"HV\")",
		"(iparm2 >= 1)",
		"(iparm2 <= 60)",
		"(lghseg >= 1)",
		"(lghseg <= 15)",
		"(ianglw >= 0)",
		"(ianglw <= 180)",
		"(iangup >= 0)",
		"(iangup <= 180)",
		"(idirlw >= -180)",
		"(idirlw <= 180)",
		"(idirup >= -180)",
		"(idirup <= 180)",
		"(lghseg >= 1)",
		"(lghseg <= 15)",
		"(ianglw >= 0)",
		"(ianglw <= 180)",
		"(iangup >= 0)",
		"(iangup <= 180)",
		"(idirlw >= -180)",
		"(idirlw <= 180)",
		"(idirup >= -180)",
		"(idirup <= 180)",
		"(ithres >= 100)",
		"(ithres <= 1000)",
		"alphachkB(bparm, \"SELD\")",
		"alphachkB(iparm, \"LR\")",
		"rangechkB(ibeg, iend, 3)",
		"alphachkB(iparm1, \"BEMHLA\")",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"alphachkB(iparm3, \"EFAB\")",
		"alphachkB(iparm1, \"BEMHLA\")",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"alphachkB(iparm1, \"BEMHLA\")",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"rangechkB(ibeg1, iend1, 3)",
		"rangechkB(ibeg2, iend2, 3)",
		"rangechkB(ibeg1, iend1, 5)",
		"rangechkB(ibeg2, iend2, 5)",
		"rangechkB(ibeg1, iend1, 3)",
		"rangechkB(ibeg2, iend2, 3)",
		"rangechkB(ibeg1, iend1, 5)",
		"rangechkB(ibeg2, iend2, 5)",
		"alphachkB(bparm, \"HDLRABWXYZ\")",
		"rangechkB(ibeg, iend, 1)",
		"rangechkB(ibeg, iend, 3)",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"(iparm2 >= -15)",
		"(iparm2 <= 15)",
		"(ithres >= 100)",
		"(ithres <= 1000)",
		"alphachkB(bparm, \"SELD\")",
		"alphachkB(type, \"ADSR\")",
		"(type >= 1)",
		"(type <= 100)"
		};


