[u/mrichter/AliRoot.git] / MINICERN / packlib / zebra / fq / fzicvd2.inc

*
* $Id$
*
* $Log$
* Revision 1.1.1.1  1996/03/06 10:47:09  mclareni
* Zebra
*
*
*
* fzicvd2.inc
*
#if defined(CERNLIB_QMCDC)
      DATA  IPKVU  / 8, 4, 0,28, 0 /
      DATA  IPKVP  / 6, 4, 0, 0, O"555555555555" /
      DATA  MTAB   /
     +       57,  45,  54,  52,  48,  43,  51,  55,  56,  41
     +,      42,  39,  37,  46,  38,  47,  40,  27,  28,  29
     +,      30,  31,  32,  33,  34,  35,  36,  51,  63,  58
     +,      44,  59,  57,  60,   1,   2,   3,   4,   5,   6
     +,       7,   8,   9,  10,  11,  12,  13,  14,  15,  16
     +,      17,  18,  19,  20,  21,  22,  23,  24,  25,  26
     +,      49,  61,  50,  62,  53,  57,   1,   2,   3,   4
     +,       5,   6,   7,   8,   9,  10,  11,  12,  13,  14
     +,      15,  16,  17,  18,  19,  20,  21,  22,  23,  24
     +,      25,  26,  57 /

C-    ?     !  "  #  $  %  &  '  (    )  *  +  ,  -  .  /  0  1  2
C-    3  4  5  6  7  8  9  :  ;  <    =  >  ?  @  A  B  C  D  E  F
C-    G  H  I  J  K  L  M  N  O  P    Q  R  S  T  U  V  W  X  Y  Z
C-    [  \  ]  ^  _  ?  a  b  c  d    e  f  g  h  i  j  k  l  m  n
C-    o  p  q  r  s  t  u  v  w  x    y  z  ?
#endif
*
* fzicvd2.inc
*
#if defined(CERNLIB_QMIBM)
      DATA  IPKVEC / 8, 0, 0, 0, 0 /
      DATA  MTAB   /
     +      111,  64,  90, 127, 123,  91, 108,  80, 125,  77
     +,      93,  92,  78, 107,  96,  75,  97, 240, 241, 242
     +,     243, 244, 245, 246, 247, 248, 249, 122,  94,  76
     +,     126, 110, 111, 124, 193, 194, 195, 196, 197, 198
     +,     199, 200, 201, 209, 210, 211, 212, 213, 214, 215
     +,     216, 217, 226, 227, 228, 229, 230, 231, 232, 233
     +,     173, 224, 189, 106, 109, 121, 129, 130, 131, 132
     +,     133, 134, 135, 136, 137, 145, 146, 147, 148, 149
     +,     150, 151, 152, 153, 162, 163, 164, 165, 166, 167
     +,     168, 169, 139,  79, 155,  95, 111 /

C-    ?     !  "  #  $  %  &  '  (    )  *  +  ,  -  .  /  0  1  2
C-    3  4  5  6  7  8  9  :  ;  <    =  >  ?  @  A  B  C  D  E  F
C-    G  H  I  J  K  L  M  N  O  P    Q  R  S  T  U  V  W  X  Y  Z
C-    [  \  ]  ^  _  `  a  b  c  d    e  f  g  h  i  j  k  l  m  n
C-    o  p  q  r  s  t  u  v  w  x    y  z  {  |  }  ~  ?
#endif
*
* fzicvd2.inc
*
#if defined(CERNLIB_QMIBMD)
      DATA  IPKVEC / 8, 0, 0, 0, 0 /
      DATA  MTAB   /
     +      111,  64,  90, 127, 123,  91, 108,  80, 125,  77
     +,      93,  92,  78, 107,  96,  75,  97, 240, 241, 242
     +,     243, 244, 245, 246, 247, 248, 249, 122,  94,  76
     +,     126, 110, 111, 124, 193, 194, 195, 196, 197, 198
     +,     199, 200, 201, 209, 210, 211, 212, 213, 214, 215
     +,     216, 217, 226, 227, 228, 229, 230, 231, 232, 233
     +,     173, 224, 189, 106, 109, 121, 129, 130, 131, 132
     +,     133, 134, 135, 136, 137, 145, 146, 147, 148, 149
     +,     150, 151, 152, 153, 162, 163, 164, 165, 166, 167
     +,     168, 169, 139,  79, 155,  95, 111 /

C-    ?     !  "  #  $  %  &  '  (    )  *  +  ,  -  .  /  0  1  2
C-    3  4  5  6  7  8  9  :  ;  <    =  >  ?  @  A  B  C  D  E  F
C-    G  H  I  J  K  L  M  N  O  P    Q  R  S  T  U  V  W  X  Y  Z
C-    [  \  ]  ^  _  `  a  b  c  d    e  f  g  h  i  j  k  l  m  n
C-    o  p  q  r  s  t  u  v  w  x    y  z  {  |  }  ~  ?
#endif
Commit	Line	Data
fe4da5cc	1	*
	2	* $Id$
	3	*
	4	* $Log$
	5	* Revision 1.1.1.1 1996/03/06 10:47:09 mclareni
	6	* Zebra
	7	*
	8	*
	9	*
	10	* fzicvd2.inc
	11	*
	12	#if defined(CERNLIB_QMCDC)
	13	DATA IPKVU / 8, 4, 0,28, 0 /
	14	DATA IPKVP / 6, 4, 0, 0, O"555555555555" /
	15	DATA MTAB /
	16	+ 57, 45, 54, 52, 48, 43, 51, 55, 56, 41
	17	+, 42, 39, 37, 46, 38, 47, 40, 27, 28, 29
	18	+, 30, 31, 32, 33, 34, 35, 36, 51, 63, 58
	19	+, 44, 59, 57, 60, 1, 2, 3, 4, 5, 6
	20	+, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16
	21	+, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26
	22	+, 49, 61, 50, 62, 53, 57, 1, 2, 3, 4
	23	+, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14
	24	+, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24
	25	+, 25, 26, 57 /
	26
	27	C- ? ! " # $ % & ' ( ) * + , - . / 0 1 2
	28	C- 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F
	29	C- G H I J K L M N O P Q R S T U V W X Y Z
	30	C- [ \ ] ^ _ ? a b c d e f g h i j k l m n
	31	C- o p q r s t u v w x y z ?
	32	#endif
	33	*
	34	* fzicvd2.inc
	35	*
	36	#if defined(CERNLIB_QMIBM)
	37	DATA IPKVEC / 8, 0, 0, 0, 0 /
	38	DATA MTAB /
	39	+ 111, 64, 90, 127, 123, 91, 108, 80, 125, 77
	40	+, 93, 92, 78, 107, 96, 75, 97, 240, 241, 242
	41	+, 243, 244, 245, 246, 247, 248, 249, 122, 94, 76
	42	+, 126, 110, 111, 124, 193, 194, 195, 196, 197, 198
	43	+, 199, 200, 201, 209, 210, 211, 212, 213, 214, 215
	44	+, 216, 217, 226, 227, 228, 229, 230, 231, 232, 233
	45	+, 173, 224, 189, 106, 109, 121, 129, 130, 131, 132
	46	+, 133, 134, 135, 136, 137, 145, 146, 147, 148, 149
	47	+, 150, 151, 152, 153, 162, 163, 164, 165, 166, 167
	48	+, 168, 169, 139, 79, 155, 95, 111 /
	49
	50	C- ? ! " # $ % & ' ( ) * + , - . / 0 1 2
	51	C- 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F
	52	C- G H I J K L M N O P Q R S T U V W X Y Z
	53	C- [ \ ] ^ _ ` a b c d e f g h i j k l m n
	54	C- o p q r s t u v w x y z { \| } ~ ?
	55	#endif
	56	*
	57	* fzicvd2.inc
	58	*
	59	#if defined(CERNLIB_QMIBMD)
	60	DATA IPKVEC / 8, 0, 0, 0, 0 /
	61	DATA MTAB /
	62	+ 111, 64, 90, 127, 123, 91, 108, 80, 125, 77
	63	+, 93, 92, 78, 107, 96, 75, 97, 240, 241, 242
	64	+, 243, 244, 245, 246, 247, 248, 249, 122, 94, 76
65	+, 126, 110, 111, 124, 193, 194, 195, 196, 197, 198
66	+, 199, 200, 201, 209, 210, 211, 212, 213, 214, 215
67	+, 216, 217, 226, 227, 228, 229, 230, 231, 232, 233
68	+, 173, 224, 189, 106, 109, 121, 129, 130, 131, 132
69	+, 133, 134, 135, 136, 137, 145, 146, 147, 148, 149
70	+, 150, 151, 152, 153, 162, 163, 164, 165, 166, 167
71	+, 168, 169, 139, 79, 155, 95, 111 /
72
73	C- ? ! " # $ % & ' ( ) * + , - . / 0 1 2
74	C- 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F
75	C- G H I J K L M N O P Q R S T U V W X Y Z
76	C- [ \ ] ^ _ ` a b c d e f g h i j k l m n
77	C- o p q r s t u v w x y z { \| } ~ ?
78	#endif