
{ NOTE:
{   If model numbers are added or removed for vector processors from
{   the list of processor model numbers, the deck RAP$INSTALL_LIB99 and
{   RAP$INSTALL_MATH_LIBRARY must also be updated.

  TYPE
    pmt$processor_model_number = STRING (pmc$processor_model_number_size);

  CONST
    pmc$processor_model_number_size = 4;

  CONST
    pmc$cyber_180_model_unknown = '0000',
    pmc$cyber_180_model_815     = '815 ',
    pmc$cyber_180_model_825     = '825 ',
    pmc$cyber_180_model_830     = '830 ',
    pmc$cyber_180_model_810     = '810 ',
    pmc$cyber_180_model_835     = '835 ',
    pmc$cyber_180_model_855     = '855 ',
    pmc$cyber_180_model_845     = '845 ',
    pmc$cyber_180_model_860     = '860 ',
    pmc$cyber_180_model_850     = '850 ',
    pmc$cyber_180_model_840     = '840 ',
    pmc$cyber_180_model_845S    = '845S',
    pmc$cyber_180_model_855S    = '855S',
    pmc$cyber_180_model_840S    = '840S',
    pmc$cyber_900_model_9603    = '9603',
    pmc$cyber_900_model_9601    = '9601',
    pmc$cyber_900_model_960d    = '9603',   { Soviet Nuclear Safety System.
    pmc$cyber_900_model_960c    = '9601',   { Soviet Nuclear Safety System.
    pmc$cyber_180_model_990     = '990 ',
    pmc$cyber_180_model_990E    = '990E',
    pmc$cyber_900_model_992     = '9923',
    pmc$cyber_900_model_992a    = '9923',   { China Weather System.
    pmc$cyber_900_model_994     = '9943',
    pmc$cyber_2000_model_20s1   = '20S1',   { CPU 46, CM 46, IOU 46.
    pmc$cyber_2000_model_20u1   = '20U1',   { CPU 48, CM 46, IOU 46.
    pmc$cyber_2000_model_20v1   = '20V1',   { CPU 48, CM 48, IOU 46.
    pmc$cyber_180_model_930D    = '930D',
    pmc$cyber_180_model_9303    = '9303',
    pmc$cyber_180_model_9301    = '9301',
    pmc$cyber_900_model_9323    = '9323',
    pmc$cyber_900_model_9321    = '9321',
    pmc$cyber_180_model_930A    = '930A',
    pmc$cyber_900_model_932A    = '932A',
    pmc$cyber_180_model_930B    = '930B',
    pmc$cyber_180_model_930C    = '930C',
    pmc$cyber_900_model_932B    = '932B',

    pmc$cyber_900_model_9703    = '9703',   { CPU 3A, CM 35, IOU 40.
    pmc$cyber_900_model_9701    = '9701',   { CPU 3B, CM 35, IOU 40.
    pmc$cyber_900_model_970d    = '9703',   { CPU 3C, CM 35, IOU 40; Soviet.
    pmc$cyber_900_model_970c    = '9701',   { CPU 3D, CM 35, IOU 40; Soviet.
    pmc$cyber_900_model_9723    = '9723',   { CPU 3A, CM 35, IOU 44.
    pmc$cyber_900_model_9721    = '9721',   { CPU 3B, CM 35, IOU 44.
    pmc$cyber_900_model_972d    = '9723',   { CPU 3C, CM 35, IOU 44; Soviet.
    pmc$cyber_900_model_972c    = '9721';   { CPU 3D, CM 35, IOU 44; Soviet.

  CONST
    pmc$cyber_180_model_992     = '9923',   { Retained for compatibility only.
    pmc$cyber_180_model_994     = '9943',   { Retained for compatibility only.
    pmc$cyber_180_model_9321    = '9321',   { Retained for compatibility only.
    pmc$cyber_180_model_9323    = '9323',   { Retained for compatibility only.
    pmc$cyber_180_model_932A    = '932A',   { Retained for compatibility only.
    pmc$cyber_180_model_932B    = '932B',   { Retained for compatibility only.
    pmc$cyber_180_model_9601    = '9601',   { Retained for compatibility only.
    pmc$cyber_180_model_9603    = '9603';   { Retained for compatibility only.
