* * $Id: fzicvd2.inc,v 1.1.1.1 1996/03/06 10:47:09 mclareni Exp $ * * $Log: fzicvd2.inc,v $ * 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