Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
00001 /* 00002 00003 Copyright (C) 2000, 2001 Silicon Graphics, Inc. All Rights Reserved. 00004 00005 This program is free software; you can redistribute it and/or modify it 00006 under the terms of version 2 of the GNU General Public License as 00007 published by the Free Software Foundation. 00008 00009 This program is distributed in the hope that it would be useful, but 00010 WITHOUT ANY WARRANTY; without even the implied warranty of 00011 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 00012 00013 Further, this software is distributed without any warranty that it is 00014 free of the rightful claim of any third person regarding infringement 00015 or the like. Any license provided herein, whether implied or 00016 otherwise, applies only to this software file. Patent licenses, if 00017 any, provided herein do not apply to combinations of this program with 00018 other software, or any other product whatsoever. 00019 00020 You should have received a copy of the GNU General Public License along 00021 with this program; if not, write the Free Software Foundation, Inc., 59 00022 Temple Place - Suite 330, Boston MA 02111-1307, USA. 00023 00024 Contact information: Silicon Graphics, Inc., 1600 Amphitheatre Pky, 00025 Mountain View, CA 94043, or: 00026 00027 http://www.sgi.com 00028 00029 For further information regarding this notice, see: 00030 00031 http://oss.sgi.com/projects/GenInfo/NoticeExplan 00032 00033 */ 00034 00035 00036 00037 /* USMID: "\n@(#)5.0_pl/headers/s_asg_expr.h 5.3 05/25/99 17:45:47\n" */ 00038 00039 00040 extern boolean resolve_ext_opr(opnd_type *, boolean, boolean, boolean, 00041 boolean *, 00042 expr_arg_type *, 00043 expr_arg_type *); 00044 00045 extern int opr_to_str(operator_type, char *); 00046 00047 exp_tbl_type bin_add_tbl[Num_Linear_Types][Num_Linear_Types] = { 00048 /* Err_Res */ { 00049 /* Err_Res */ {FALSE, Err_Res }, 00050 /* Short_Char_Const */ {FALSE, Err_Res }, 00051 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00052 /* Typeless_1 */ {FALSE, Err_Res }, 00053 /* Typeless_2 */ {FALSE, Err_Res }, 00054 /* Typeless_4 */ {FALSE, Err_Res }, 00055 /* Typeless_8 */ {FALSE, Err_Res }, 00056 /* Long_Typeless */ {FALSE, Err_Res }, 00057 /* Integer_1 */ {FALSE, Err_Res }, 00058 /* Integer_2 */ {FALSE, Err_Res }, 00059 /* Integer_4 */ {FALSE, Err_Res }, 00060 /* Integer_8 */ {FALSE, Err_Res }, 00061 /* Real_4 */ {FALSE, Err_Res }, 00062 /* Real_8 */ {FALSE, Err_Res }, 00063 /* Real_16 */ {FALSE, Err_Res }, 00064 /* Complex_4 */ {FALSE, Err_Res }, 00065 /* Complex_8 */ {FALSE, Err_Res }, 00066 /* Complex_16 */ {FALSE, Err_Res }, 00067 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00068 /* Logical_1 */ {FALSE, Err_Res }, 00069 /* Logical_2 */ {FALSE, Err_Res }, 00070 /* Logical_4 */ {FALSE, Err_Res }, 00071 /* Logical_8 */ {FALSE, Err_Res }, 00072 /* Character_1 */ {FALSE, Err_Res }, 00073 /* Character_2 */ {FALSE, Err_Res }, 00074 /* Character_4 */ {FALSE, Err_Res }, 00075 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00076 /* Structure_Type */ {FALSE, Err_Res }, 00077 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00078 }, 00079 /* Short_Char_Const */ { 00080 /* Err_Res */ {FALSE, Err_Res }, 00081 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 00082 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 00083 /* Typeless_1 */ {TRUE , Typeless_1 }, 00084 /* Typeless_2 */ {TRUE , Typeless_2 }, 00085 /* Typeless_4 */ {TRUE , Typeless_4 }, 00086 /* Typeless_8 */ {TRUE , Typeless_8 }, 00087 /* Long_Typeless */ {FALSE, Err_Res }, 00088 /* Integer_1 */ {TRUE , Integer_1 }, 00089 /* Integer_2 */ {TRUE , Integer_2 }, 00090 /* Integer_4 */ {TRUE , Integer_4 }, 00091 /* Integer_8 */ {TRUE , Integer_8 }, 00092 /* Real_4 */ {TRUE , Real_4 }, 00093 /* Real_8 */ {TRUE , Real_8 }, 00094 /* Real_16 */ {TRUE , Real_16 }, 00095 /* Complex_4 */ {TRUE , Complex_4 }, 00096 /* Complex_8 */ {TRUE , Complex_8 }, 00097 /* Complex_16 */ {TRUE , Complex_16 }, 00098 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00099 /* Logical_1 */ {FALSE, Err_Res }, 00100 /* Logical_2 */ {FALSE, Err_Res }, 00101 /* Logical_4 */ {FALSE, Err_Res }, 00102 /* Logical_8 */ {FALSE, Err_Res }, 00103 /* Character_1 */ {FALSE, Err_Res }, 00104 /* Character_2 */ {FALSE, Err_Res }, 00105 /* Character_4 */ {FALSE, Err_Res }, 00106 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00107 /* Structure_Type */ {FALSE, Err_Res }, 00108 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00109 }, 00110 /* Short_Typeless_Const */ { 00111 /* Err_Res */ {FALSE, Err_Res }, 00112 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 00113 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 00114 /* Typeless_1 */ {TRUE , Typeless_1 }, 00115 /* Typeless_2 */ {TRUE , Typeless_2 }, 00116 /* Typeless_4 */ {TRUE , Typeless_4 }, 00117 /* Typeless_8 */ {TRUE , Typeless_8 }, 00118 /* Long_Typeless */ {FALSE, Err_Res }, 00119 /* Integer_1 */ {TRUE , Integer_1 }, 00120 /* Integer_2 */ {TRUE , Integer_2 }, 00121 /* Integer_4 */ {TRUE , Integer_4 }, 00122 /* Integer_8 */ {TRUE , Integer_8 }, 00123 /* Real_4 */ {TRUE , Real_4 }, 00124 /* Real_8 */ {TRUE , Real_8 }, 00125 /* Real_16 */ {TRUE , Real_16 }, 00126 /* Complex_4 */ {TRUE , Complex_4 }, 00127 /* Complex_8 */ {TRUE , Complex_8 }, 00128 /* Complex_16 */ {TRUE , Complex_16 }, 00129 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00130 /* Logical_1 */ {FALSE, Err_Res }, 00131 /* Logical_2 */ {FALSE, Err_Res }, 00132 /* Logical_4 */ {FALSE, Err_Res }, 00133 /* Logical_8 */ {FALSE, Err_Res }, 00134 /* Character_1 */ {FALSE, Err_Res }, 00135 /* Character_2 */ {FALSE, Err_Res }, 00136 /* Character_4 */ {FALSE, Err_Res }, 00137 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00138 /* Structure_Type */ {FALSE, Err_Res }, 00139 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00140 }, 00141 /* Typeless_1 */ { 00142 /* Err_Res */ {FALSE, Err_Res }, 00143 /* Short_Char_Const */ {TRUE , Typeless_1 }, 00144 /* Short_Typeless_Const */ {TRUE , Typeless_1 }, 00145 /* Typeless_1 */ {TRUE , Typeless_1 }, 00146 /* Typeless_2 */ {TRUE , Typeless_2 }, 00147 /* Typeless_4 */ {TRUE , Typeless_4 }, 00148 /* Typeless_8 */ {TRUE , Typeless_8 }, 00149 /* Long_Typeless */ {FALSE, Err_Res }, 00150 /* Integer_1 */ {TRUE , Integer_1 }, 00151 /* Integer_2 */ {TRUE , Integer_2 }, 00152 /* Integer_4 */ {TRUE , Integer_4 }, 00153 /* Integer_8 */ {TRUE , Integer_8 }, 00154 /* Real_4 */ {FALSE, Err_Res }, 00155 /* Real_8 */ {FALSE, Err_Res }, 00156 /* Real_16 */ {FALSE, Err_Res }, 00157 /* Complex_4 */ {FALSE, Err_Res }, 00158 /* Complex_8 */ {FALSE, Err_Res }, 00159 /* Complex_16 */ {FALSE, Err_Res }, 00160 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00161 /* Logical_1 */ {FALSE, Err_Res }, 00162 /* Logical_2 */ {FALSE, Err_Res }, 00163 /* Logical_4 */ {FALSE, Err_Res }, 00164 /* Logical_8 */ {FALSE, Err_Res }, 00165 /* Character_1 */ {FALSE, Err_Res }, 00166 /* Character_2 */ {FALSE, Err_Res }, 00167 /* Character_4 */ {FALSE, Err_Res }, 00168 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00169 /* Structure_Type */ {FALSE, Err_Res }, 00170 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00171 }, 00172 /* Typeless_2 */ { 00173 /* Err_Res */ {FALSE, Err_Res }, 00174 /* Short_Char_Const */ {TRUE , Typeless_2 }, 00175 /* Short_Typeless_Const */ {TRUE , Typeless_2 }, 00176 /* Typeless_1 */ {TRUE , Typeless_2 }, 00177 /* Typeless_2 */ {TRUE , Typeless_2 }, 00178 /* Typeless_4 */ {TRUE , Typeless_4 }, 00179 /* Typeless_8 */ {TRUE , Typeless_8 }, 00180 /* Long_Typeless */ {FALSE, Err_Res }, 00181 /* Integer_1 */ {TRUE , Integer_1 }, 00182 /* Integer_2 */ {TRUE , Integer_2 }, 00183 /* Integer_4 */ {TRUE , Integer_4 }, 00184 /* Integer_8 */ {TRUE , Integer_8 }, 00185 /* Real_4 */ {FALSE, Err_Res }, 00186 /* Real_8 */ {FALSE, Err_Res }, 00187 /* Real_16 */ {FALSE, Err_Res }, 00188 /* Complex_4 */ {FALSE, Err_Res }, 00189 /* Complex_8 */ {FALSE, Err_Res }, 00190 /* Complex_16 */ {FALSE, Err_Res }, 00191 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00192 /* Logical_1 */ {FALSE, Err_Res }, 00193 /* Logical_2 */ {FALSE, Err_Res }, 00194 /* Logical_4 */ {FALSE, Err_Res }, 00195 /* Logical_8 */ {FALSE, Err_Res }, 00196 /* Character_1 */ {FALSE, Err_Res }, 00197 /* Character_2 */ {FALSE, Err_Res }, 00198 /* Character_4 */ {FALSE, Err_Res }, 00199 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00200 /* Structure_Type */ {FALSE, Err_Res }, 00201 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00202 }, 00203 /* Typeless_4 */ { 00204 /* Err_Res */ {FALSE, Err_Res }, 00205 /* Short_Char_Const */ {TRUE , Typeless_4 }, 00206 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 00207 /* Typeless_1 */ {TRUE , Typeless_4 }, 00208 /* Typeless_2 */ {TRUE , Typeless_4 }, 00209 /* Typeless_4 */ {TRUE , Typeless_4 }, 00210 /* Typeless_8 */ {TRUE , Typeless_8 }, 00211 /* Long_Typeless */ {FALSE, Err_Res }, 00212 /* Integer_1 */ {TRUE , Integer_1 }, 00213 /* Integer_2 */ {TRUE , Integer_2 }, 00214 /* Integer_4 */ {TRUE , Integer_4 }, 00215 /* Integer_8 */ {TRUE , Integer_8 }, 00216 /* Real_4 */ {TRUE , Real_4 }, 00217 /* Real_8 */ {FALSE, Err_Res }, 00218 /* Real_16 */ {FALSE, Err_Res }, 00219 /* Complex_4 */ {FALSE, Err_Res }, 00220 /* Complex_8 */ {FALSE, Err_Res }, 00221 /* Complex_16 */ {FALSE, Err_Res }, 00222 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00223 /* Logical_1 */ {FALSE, Err_Res }, 00224 /* Logical_2 */ {FALSE, Err_Res }, 00225 /* Logical_4 */ {FALSE, Err_Res }, 00226 /* Logical_8 */ {FALSE, Err_Res }, 00227 /* Character_1 */ {FALSE, Err_Res }, 00228 /* Character_2 */ {FALSE, Err_Res }, 00229 /* Character_4 */ {FALSE, Err_Res }, 00230 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00231 /* Structure_Type */ {FALSE, Err_Res }, 00232 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00233 }, 00234 /* Typeless_8 */ { 00235 /* Err_Res */ {FALSE, Err_Res }, 00236 /* Short_Char_Const */ {TRUE , Typeless_8 }, 00237 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 00238 /* Typeless_1 */ {TRUE , Typeless_8 }, 00239 /* Typeless_2 */ {TRUE , Typeless_8 }, 00240 /* Typeless_4 */ {TRUE , Typeless_8 }, 00241 /* Typeless_8 */ {TRUE , Typeless_8 }, 00242 /* Long_Typeless */ {FALSE, Err_Res }, 00243 /* Integer_1 */ {TRUE , Integer_1 }, 00244 /* Integer_2 */ {TRUE , Integer_2 }, 00245 /* Integer_4 */ {TRUE , Integer_4 }, 00246 /* Integer_8 */ {TRUE , Integer_8 }, 00247 /* Real_4 */ {TRUE , Real_4 }, 00248 /* Real_8 */ {TRUE , Real_8 }, 00249 /* Real_16 */ {FALSE, Err_Res }, 00250 /* Complex_4 */ {FALSE, Err_Res }, 00251 /* Complex_8 */ {FALSE, Err_Res }, 00252 /* Complex_16 */ {FALSE, Err_Res }, 00253 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00254 /* Logical_1 */ {FALSE, Err_Res }, 00255 /* Logical_2 */ {FALSE, Err_Res }, 00256 /* Logical_4 */ {FALSE, Err_Res }, 00257 /* Logical_8 */ {FALSE, Err_Res }, 00258 /* Character_1 */ {FALSE, Err_Res }, 00259 /* Character_2 */ {FALSE, Err_Res }, 00260 /* Character_4 */ {FALSE, Err_Res }, 00261 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00262 /* Structure_Type */ {FALSE, Err_Res }, 00263 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00264 }, 00265 /* Long_Typeless */ { 00266 /* Err_Res */ {FALSE, Err_Res }, 00267 /* Short_Char_Const */ {FALSE, Err_Res }, 00268 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00269 /* Typeless_1 */ {FALSE, Err_Res }, 00270 /* Typeless_2 */ {FALSE, Err_Res }, 00271 /* Typeless_4 */ {FALSE, Err_Res }, 00272 /* Typeless_8 */ {FALSE, Err_Res }, 00273 /* Long_Typeless */ {FALSE, Err_Res }, 00274 /* Integer_1 */ {FALSE, Err_Res }, 00275 /* Integer_2 */ {FALSE, Err_Res }, 00276 /* Integer_4 */ {FALSE, Err_Res }, 00277 /* Integer_8 */ {FALSE, Err_Res }, 00278 /* Real_4 */ {FALSE, Err_Res }, 00279 /* Real_8 */ {FALSE, Err_Res }, 00280 /* Real_16 */ {FALSE, Err_Res }, 00281 /* Complex_4 */ {FALSE, Err_Res }, 00282 /* Complex_8 */ {FALSE, Err_Res }, 00283 /* Complex_16 */ {FALSE, Err_Res }, 00284 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00285 /* Logical_1 */ {FALSE, Err_Res }, 00286 /* Logical_2 */ {FALSE, Err_Res }, 00287 /* Logical_4 */ {FALSE, Err_Res }, 00288 /* Logical_8 */ {FALSE, Err_Res }, 00289 /* Character_1 */ {FALSE, Err_Res }, 00290 /* Character_2 */ {FALSE, Err_Res }, 00291 /* Character_4 */ {FALSE, Err_Res }, 00292 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00293 /* Structure_Type */ {FALSE, Err_Res }, 00294 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00295 }, 00296 /* Integer_1 */ { 00297 /* Err_Res */ {FALSE, Err_Res }, 00298 /* Short_Char_Const */ {TRUE , Integer_1 }, 00299 /* Short_Typeless_Const */ {TRUE , Integer_1 }, 00300 /* Typeless_1 */ {TRUE , Integer_1 }, 00301 /* Typeless_2 */ {TRUE , Integer_1 }, 00302 /* Typeless_4 */ {TRUE , Integer_1 }, 00303 /* Typeless_8 */ {TRUE , Integer_1 }, 00304 /* Long_Typeless */ {FALSE, Err_Res }, 00305 /* Integer_1 */ {FALSE, Integer_1 }, 00306 /* Integer_2 */ {FALSE, Integer_2 }, 00307 /* Integer_4 */ {FALSE, Integer_4 }, 00308 /* Integer_8 */ {FALSE, Integer_8 }, 00309 /* Real_4 */ {FALSE, Real_4 }, 00310 /* Real_8 */ {FALSE, Real_8 }, 00311 /* Real_16 */ {FALSE, Real_16 }, 00312 /* Complex_4 */ {FALSE, Complex_4 }, 00313 /* Complex_8 */ {FALSE, Complex_8 }, 00314 /* Complex_16 */ {FALSE, Complex_16 }, 00315 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00316 /* Logical_1 */ {FALSE, Err_Res }, 00317 /* Logical_2 */ {FALSE, Err_Res }, 00318 /* Logical_4 */ {FALSE, Err_Res }, 00319 /* Logical_8 */ {FALSE, Err_Res }, 00320 /* Character_1 */ {FALSE, Err_Res }, 00321 /* Character_2 */ {FALSE, Err_Res }, 00322 /* Character_4 */ {FALSE, Err_Res }, 00323 /* CRI_Ch_Ptr_8 */ {TRUE , CRI_Ch_Ptr_8 }, 00324 /* Structure_Type */ {FALSE, Err_Res }, 00325 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00326 }, 00327 /* Integer_2 */ { 00328 /* Err_Res */ {FALSE, Err_Res }, 00329 /* Short_Char_Const */ {TRUE , Integer_2 }, 00330 /* Short_Typeless_Const */ {TRUE , Integer_2 }, 00331 /* Typeless_1 */ {TRUE , Integer_2 }, 00332 /* Typeless_2 */ {TRUE , Integer_2 }, 00333 /* Typeless_4 */ {TRUE , Integer_2 }, 00334 /* Typeless_8 */ {TRUE , Integer_2 }, 00335 /* Long_Typeless */ {FALSE, Err_Res }, 00336 /* Integer_1 */ {FALSE, Integer_2 }, 00337 /* Integer_2 */ {FALSE, Integer_2 }, 00338 /* Integer_4 */ {FALSE, Integer_4 }, 00339 /* Integer_8 */ {FALSE, Integer_8 }, 00340 /* Real_4 */ {FALSE, Real_4 }, 00341 /* Real_8 */ {FALSE, Real_8 }, 00342 /* Real_16 */ {FALSE, Real_16 }, 00343 /* Complex_4 */ {FALSE, Complex_4 }, 00344 /* Complex_8 */ {FALSE, Complex_8 }, 00345 /* Complex_16 */ {FALSE, Complex_16 }, 00346 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00347 /* Logical_1 */ {FALSE, Err_Res }, 00348 /* Logical_2 */ {FALSE, Err_Res }, 00349 /* Logical_4 */ {FALSE, Err_Res }, 00350 /* Logical_8 */ {FALSE, Err_Res }, 00351 /* Character_1 */ {FALSE, Err_Res }, 00352 /* Character_2 */ {FALSE, Err_Res }, 00353 /* Character_4 */ {FALSE, Err_Res }, 00354 /* CRI_Ch_Ptr_8 */ {TRUE , CRI_Ch_Ptr_8 }, 00355 /* Structure_Type */ {FALSE, Err_Res }, 00356 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00357 }, 00358 /* Integer_4 */ { 00359 /* Err_Res */ {FALSE, Err_Res }, 00360 /* Short_Char_Const */ {TRUE , Integer_4 }, 00361 /* Short_Typeless_Const */ {TRUE , Integer_4 }, 00362 /* Typeless_1 */ {TRUE , Integer_4 }, 00363 /* Typeless_2 */ {TRUE , Integer_4 }, 00364 /* Typeless_4 */ {TRUE , Integer_4 }, 00365 /* Typeless_8 */ {TRUE , Integer_4 }, 00366 /* Long_Typeless */ {FALSE, Err_Res }, 00367 /* Integer_1 */ {FALSE, Integer_4 }, 00368 /* Integer_2 */ {FALSE, Integer_4 }, 00369 /* Integer_4 */ {FALSE, Integer_4 }, 00370 /* Integer_8 */ {FALSE, Integer_8 }, 00371 /* Real_4 */ {FALSE, Real_4 }, 00372 /* Real_8 */ {FALSE, Real_8 }, 00373 /* Real_16 */ {FALSE, Real_16 }, 00374 /* Complex_4 */ {FALSE, Complex_4 }, 00375 /* Complex_8 */ {FALSE, Complex_8 }, 00376 /* Complex_16 */ {FALSE, Complex_16 }, 00377 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00378 /* Logical_1 */ {FALSE, Err_Res }, 00379 /* Logical_2 */ {FALSE, Err_Res }, 00380 /* Logical_4 */ {FALSE, Err_Res }, 00381 /* Logical_8 */ {FALSE, Err_Res }, 00382 /* Character_1 */ {FALSE, Err_Res }, 00383 /* Character_2 */ {FALSE, Err_Res }, 00384 /* Character_4 */ {FALSE, Err_Res }, 00385 /* CRI_Ch_Ptr_8 */ {TRUE , CRI_Ch_Ptr_8 }, 00386 /* Structure_Type */ {FALSE, Err_Res }, 00387 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00388 }, 00389 /* Integer_8 */ { 00390 /* Err_Res */ {FALSE, Err_Res }, 00391 /* Short_Char_Const */ {TRUE , Integer_8 }, 00392 /* Short_Typeless_Const */ {TRUE , Integer_8 }, 00393 /* Typeless_1 */ {TRUE , Integer_8 }, 00394 /* Typeless_2 */ {TRUE , Integer_8 }, 00395 /* Typeless_4 */ {TRUE , Integer_8 }, 00396 /* Typeless_8 */ {TRUE , Integer_8 }, 00397 /* Long_Typeless */ {FALSE, Err_Res }, 00398 /* Integer_1 */ {FALSE, Integer_8 }, 00399 /* Integer_2 */ {FALSE, Integer_8 }, 00400 /* Integer_4 */ {FALSE, Integer_8 }, 00401 /* Integer_8 */ {FALSE, Integer_8 }, 00402 /* Real_4 */ {FALSE, Real_4 }, 00403 /* Real_8 */ {FALSE, Real_8 }, 00404 /* Real_16 */ {FALSE, Real_16 }, 00405 /* Complex_4 */ {FALSE, Complex_4 }, 00406 /* Complex_8 */ {FALSE, Complex_8 }, 00407 /* Complex_16 */ {FALSE, Complex_16 }, 00408 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00409 /* Logical_1 */ {FALSE, Err_Res }, 00410 /* Logical_2 */ {FALSE, Err_Res }, 00411 /* Logical_4 */ {FALSE, Err_Res }, 00412 /* Logical_8 */ {FALSE, Err_Res }, 00413 /* Character_1 */ {FALSE, Err_Res }, 00414 /* Character_2 */ {FALSE, Err_Res }, 00415 /* Character_4 */ {FALSE, Err_Res }, 00416 /* CRI_Ch_Ptr_8 */ {TRUE , CRI_Ch_Ptr_8 }, 00417 /* Structure_Type */ {FALSE, Err_Res }, 00418 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00419 }, 00420 /* Real_4 */ { 00421 /* Err_Res */ {FALSE, Err_Res }, 00422 /* Short_Char_Const */ {TRUE , Real_4 }, 00423 /* Short_Typeless_Const */ {TRUE , Real_4 }, 00424 /* Typeless_1 */ {FALSE, Err_Res }, 00425 /* Typeless_2 */ {FALSE, Err_Res }, 00426 /* Typeless_4 */ {TRUE , Real_4 }, 00427 /* Typeless_8 */ {TRUE , Real_4 }, 00428 /* Long_Typeless */ {FALSE, Err_Res }, 00429 /* Integer_1 */ {FALSE, Real_4 }, 00430 /* Integer_2 */ {FALSE, Real_4 }, 00431 /* Integer_4 */ {FALSE, Real_4 }, 00432 /* Integer_8 */ {FALSE, Real_4 }, 00433 /* Real_4 */ {FALSE, Real_4 }, 00434 /* Real_8 */ {FALSE, Real_8 }, 00435 /* Real_16 */ {FALSE, Real_16 }, 00436 /* Complex_4 */ {FALSE, Complex_4 }, 00437 /* Complex_8 */ {FALSE, Complex_8 }, 00438 /* Complex_16 */ {FALSE, Complex_16 }, 00439 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00440 /* Logical_1 */ {FALSE, Err_Res }, 00441 /* Logical_2 */ {FALSE, Err_Res }, 00442 /* Logical_4 */ {FALSE, Err_Res }, 00443 /* Logical_8 */ {FALSE, Err_Res }, 00444 /* Character_1 */ {FALSE, Err_Res }, 00445 /* Character_2 */ {FALSE, Err_Res }, 00446 /* Character_4 */ {FALSE, Err_Res }, 00447 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00448 /* Structure_Type */ {FALSE, Err_Res }, 00449 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00450 }, 00451 /* Real_8 */ { 00452 /* Err_Res */ {FALSE, Err_Res }, 00453 /* Short_Char_Const */ {TRUE , Real_8 }, 00454 /* Short_Typeless_Const */ {TRUE , Real_8 }, 00455 /* Typeless_1 */ {FALSE, Err_Res }, 00456 /* Typeless_2 */ {FALSE, Err_Res }, 00457 /* Typeless_4 */ {FALSE, Err_Res }, 00458 /* Typeless_8 */ {TRUE , Real_8 }, 00459 /* Long_Typeless */ {FALSE, Err_Res }, 00460 /* Integer_1 */ {FALSE, Real_8 }, 00461 /* Integer_2 */ {FALSE, Real_8 }, 00462 /* Integer_4 */ {FALSE, Real_8 }, 00463 /* Integer_8 */ {FALSE, Real_8 }, 00464 /* Real_4 */ {FALSE, Real_8 }, 00465 /* Real_8 */ {FALSE, Real_8 }, 00466 /* Real_16 */ {FALSE, Real_16 }, 00467 /* Complex_4 */ {FALSE, Complex_8 }, 00468 /* Complex_8 */ {FALSE, Complex_8 }, 00469 /* Complex_16 */ {FALSE, Complex_16 }, 00470 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00471 /* Logical_1 */ {FALSE, Err_Res }, 00472 /* Logical_2 */ {FALSE, Err_Res }, 00473 /* Logical_4 */ {FALSE, Err_Res }, 00474 /* Logical_8 */ {FALSE, Err_Res }, 00475 /* Character_1 */ {FALSE, Err_Res }, 00476 /* Character_2 */ {FALSE, Err_Res }, 00477 /* Character_4 */ {FALSE, Err_Res }, 00478 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00479 /* Structure_Type */ {FALSE, Err_Res }, 00480 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00481 }, 00482 /* Real_16 */ { 00483 /* Err_Res */ {FALSE, Err_Res }, 00484 /* Short_Char_Const */ {TRUE , Real_16 }, 00485 /* Short_Typeless_Const */ {TRUE , Real_16 }, 00486 /* Typeless_1 */ {FALSE, Err_Res }, 00487 /* Typeless_2 */ {FALSE, Err_Res }, 00488 /* Typeless_4 */ {FALSE, Err_Res }, 00489 /* Typeless_8 */ {FALSE, Err_Res }, 00490 /* Long_Typeless */ {FALSE, Err_Res }, 00491 /* Integer_1 */ {FALSE, Real_16 }, 00492 /* Integer_2 */ {FALSE, Real_16 }, 00493 /* Integer_4 */ {FALSE, Real_16 }, 00494 /* Integer_8 */ {FALSE, Real_16 }, 00495 /* Real_4 */ {FALSE, Real_16 }, 00496 /* Real_8 */ {FALSE, Real_16 }, 00497 /* Real_16 */ {FALSE, Real_16 }, 00498 /* Complex_4 */ {FALSE, Complex_16 }, 00499 /* Complex_8 */ {FALSE, Complex_16 }, 00500 /* Complex_16 */ {FALSE, Complex_16 }, 00501 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00502 /* Logical_1 */ {FALSE, Err_Res }, 00503 /* Logical_2 */ {FALSE, Err_Res }, 00504 /* Logical_4 */ {FALSE, Err_Res }, 00505 /* Logical_8 */ {FALSE, Err_Res }, 00506 /* Character_1 */ {FALSE, Err_Res }, 00507 /* Character_2 */ {FALSE, Err_Res }, 00508 /* Character_4 */ {FALSE, Err_Res }, 00509 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00510 /* Structure_Type */ {FALSE, Err_Res }, 00511 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00512 }, 00513 /* Complex_4 */ { 00514 /* Err_Res */ {FALSE, Err_Res }, 00515 /* Short_Char_Const */ {TRUE , Complex_4 }, 00516 /* Short_Typeless_Const */ {TRUE , Complex_4 }, 00517 /* Typeless_1 */ {FALSE, Err_Res }, 00518 /* Typeless_2 */ {FALSE, Err_Res }, 00519 /* Typeless_4 */ {FALSE, Err_Res }, 00520 /* Typeless_8 */ {FALSE, Err_Res }, 00521 /* Long_Typeless */ {FALSE, Err_Res }, 00522 /* Integer_1 */ {FALSE, Complex_4 }, 00523 /* Integer_2 */ {FALSE, Complex_4 }, 00524 /* Integer_4 */ {FALSE, Complex_4 }, 00525 /* Integer_8 */ {FALSE, Complex_4 }, 00526 /* Real_4 */ {FALSE, Complex_4 }, 00527 /* Real_8 */ {FALSE, Complex_8 }, 00528 /* Real_16 */ {FALSE, Complex_16 }, 00529 /* Complex_4 */ {FALSE, Complex_4 }, 00530 /* Complex_8 */ {FALSE, Complex_8 }, 00531 /* Complex_16 */ {FALSE, Complex_16 }, 00532 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00533 /* Logical_1 */ {FALSE, Err_Res }, 00534 /* Logical_2 */ {FALSE, Err_Res }, 00535 /* Logical_4 */ {FALSE, Err_Res }, 00536 /* Logical_8 */ {FALSE, Err_Res }, 00537 /* Character_1 */ {FALSE, Err_Res }, 00538 /* Character_2 */ {FALSE, Err_Res }, 00539 /* Character_4 */ {FALSE, Err_Res }, 00540 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00541 /* Structure_Type */ {FALSE, Err_Res }, 00542 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00543 }, 00544 /* Complex_8 */ { 00545 /* Err_Res */ {FALSE, Err_Res }, 00546 /* Short_Char_Const */ {TRUE , Complex_8 }, 00547 /* Short_Typeless_Const */ {TRUE , Complex_8 }, 00548 /* Typeless_1 */ {FALSE, Err_Res }, 00549 /* Typeless_2 */ {FALSE, Err_Res }, 00550 /* Typeless_4 */ {FALSE, Err_Res }, 00551 /* Typeless_8 */ {FALSE, Err_Res }, 00552 /* Long_Typeless */ {FALSE, Err_Res }, 00553 /* Integer_1 */ {FALSE, Complex_8 }, 00554 /* Integer_2 */ {FALSE, Complex_8 }, 00555 /* Integer_4 */ {FALSE, Complex_8 }, 00556 /* Integer_8 */ {FALSE, Complex_8 }, 00557 /* Real_4 */ {FALSE, Complex_8 }, 00558 /* Real_8 */ {FALSE, Complex_8 }, 00559 /* Real_16 */ {FALSE, Complex_16 }, 00560 /* Complex_4 */ {FALSE, Complex_8 }, 00561 /* Complex_8 */ {FALSE, Complex_8 }, 00562 /* Complex_16 */ {FALSE, Complex_16 }, 00563 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00564 /* Logical_1 */ {FALSE, Err_Res }, 00565 /* Logical_2 */ {FALSE, Err_Res }, 00566 /* Logical_4 */ {FALSE, Err_Res }, 00567 /* Logical_8 */ {FALSE, Err_Res }, 00568 /* Character_1 */ {FALSE, Err_Res }, 00569 /* Character_2 */ {FALSE, Err_Res }, 00570 /* Character_4 */ {FALSE, Err_Res }, 00571 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00572 /* Structure_Type */ {FALSE, Err_Res }, 00573 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00574 }, 00575 /* Complex_16 */ { 00576 /* Err_Res */ {FALSE, Err_Res }, 00577 /* Short_Char_Const */ {TRUE , Complex_16 }, 00578 /* Short_Typeless_Const */ {TRUE , Complex_16 }, 00579 /* Typeless_1 */ {FALSE, Err_Res }, 00580 /* Typeless_2 */ {FALSE, Err_Res }, 00581 /* Typeless_4 */ {FALSE, Err_Res }, 00582 /* Typeless_8 */ {FALSE, Err_Res }, 00583 /* Long_Typeless */ {FALSE, Err_Res }, 00584 /* Integer_1 */ {FALSE, Complex_16 }, 00585 /* Integer_2 */ {FALSE, Complex_16 }, 00586 /* Integer_4 */ {FALSE, Complex_16 }, 00587 /* Integer_8 */ {FALSE, Complex_16 }, 00588 /* Real_4 */ {FALSE, Complex_16 }, 00589 /* Real_8 */ {FALSE, Complex_16 }, 00590 /* Real_16 */ {FALSE, Complex_16 }, 00591 /* Complex_4 */ {FALSE, Complex_16 }, 00592 /* Complex_8 */ {FALSE, Complex_16 }, 00593 /* Complex_16 */ {FALSE, Complex_16 }, 00594 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00595 /* Logical_1 */ {FALSE, Err_Res }, 00596 /* Logical_2 */ {FALSE, Err_Res }, 00597 /* Logical_4 */ {FALSE, Err_Res }, 00598 /* Logical_8 */ {FALSE, Err_Res }, 00599 /* Character_1 */ {FALSE, Err_Res }, 00600 /* Character_2 */ {FALSE, Err_Res }, 00601 /* Character_4 */ {FALSE, Err_Res }, 00602 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00603 /* Structure_Type */ {FALSE, Err_Res }, 00604 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00605 }, 00606 /* CRI_Ptr_8 */ { 00607 /* Err_Res */ {FALSE, Err_Res }, 00608 /* Short_Char_Const */ {TRUE , CRI_Ptr_8 }, 00609 /* Short_Typeless_Const */ {TRUE , CRI_Ptr_8 }, 00610 /* Typeless_1 */ {TRUE , CRI_Ptr_8 }, 00611 /* Typeless_2 */ {TRUE , CRI_Ptr_8 }, 00612 /* Typeless_4 */ {TRUE , CRI_Ptr_8 }, 00613 /* Typeless_8 */ {TRUE , CRI_Ptr_8 }, 00614 /* Long_Typeless */ {FALSE, Err_Res }, 00615 /* Integer_1 */ {TRUE , CRI_Ptr_8 }, 00616 /* Integer_2 */ {TRUE , CRI_Ptr_8 }, 00617 /* Integer_4 */ {TRUE , CRI_Ptr_8 }, 00618 /* Integer_8 */ {TRUE , CRI_Ptr_8 }, 00619 /* Real_4 */ {FALSE, Err_Res }, 00620 /* Real_8 */ {FALSE, Err_Res }, 00621 /* Real_16 */ {FALSE, Err_Res }, 00622 /* Complex_4 */ {FALSE, Err_Res }, 00623 /* Complex_8 */ {FALSE, Err_Res }, 00624 /* Complex_16 */ {FALSE, Err_Res }, 00625 /* CRI_Ptr_8 */ {TRUE , INT_WORD }, 00626 /* Logical_1 */ {FALSE, Err_Res }, 00627 /* Logical_2 */ {FALSE, Err_Res }, 00628 /* Logical_4 */ {FALSE, Err_Res }, 00629 /* Logical_8 */ {FALSE, Err_Res }, 00630 /* Character_1 */ {FALSE, Err_Res }, 00631 /* Character_2 */ {FALSE, Err_Res }, 00632 /* Character_4 */ {FALSE, Err_Res }, 00633 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00634 /* Structure_Type */ {FALSE, Err_Res }, 00635 /* CRI_Parcel_Ptr_8 */ {TRUE , CRI_Ptr_8 } 00636 }, 00637 /* Logical_1 */ { 00638 /* Err_Res */ {FALSE, Err_Res }, 00639 /* Short_Char_Const */ {FALSE, Err_Res }, 00640 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00641 /* Typeless_1 */ {FALSE, Err_Res }, 00642 /* Typeless_2 */ {FALSE, Err_Res }, 00643 /* Typeless_4 */ {FALSE, Err_Res }, 00644 /* Typeless_8 */ {FALSE, Err_Res }, 00645 /* Long_Typeless */ {FALSE, Err_Res }, 00646 /* Integer_1 */ {FALSE, Err_Res }, 00647 /* Integer_2 */ {FALSE, Err_Res }, 00648 /* Integer_4 */ {FALSE, Err_Res }, 00649 /* Integer_8 */ {FALSE, Err_Res }, 00650 /* Real_4 */ {FALSE, Err_Res }, 00651 /* Real_8 */ {FALSE, Err_Res }, 00652 /* Real_16 */ {FALSE, Err_Res }, 00653 /* Complex_4 */ {FALSE, Err_Res }, 00654 /* Complex_8 */ {FALSE, Err_Res }, 00655 /* Complex_16 */ {FALSE, Err_Res }, 00656 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00657 /* Logical_1 */ {FALSE, Err_Res }, 00658 /* Logical_2 */ {FALSE, Err_Res }, 00659 /* Logical_4 */ {FALSE, Err_Res }, 00660 /* Logical_8 */ {FALSE, Err_Res }, 00661 /* Character_1 */ {FALSE, Err_Res }, 00662 /* Character_2 */ {FALSE, Err_Res }, 00663 /* Character_4 */ {FALSE, Err_Res }, 00664 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00665 /* Structure_Type */ {FALSE, Err_Res }, 00666 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00667 }, 00668 /* Logical_2 */ { 00669 /* Err_Res */ {FALSE, Err_Res }, 00670 /* Short_Char_Const */ {FALSE, Err_Res }, 00671 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00672 /* Typeless_1 */ {FALSE, Err_Res }, 00673 /* Typeless_2 */ {FALSE, Err_Res }, 00674 /* Typeless_4 */ {FALSE, Err_Res }, 00675 /* Typeless_8 */ {FALSE, Err_Res }, 00676 /* Long_Typeless */ {FALSE, Err_Res }, 00677 /* Integer_1 */ {FALSE, Err_Res }, 00678 /* Integer_2 */ {FALSE, Err_Res }, 00679 /* Integer_4 */ {FALSE, Err_Res }, 00680 /* Integer_8 */ {FALSE, Err_Res }, 00681 /* Real_4 */ {FALSE, Err_Res }, 00682 /* Real_8 */ {FALSE, Err_Res }, 00683 /* Real_16 */ {FALSE, Err_Res }, 00684 /* Complex_4 */ {FALSE, Err_Res }, 00685 /* Complex_8 */ {FALSE, Err_Res }, 00686 /* Complex_16 */ {FALSE, Err_Res }, 00687 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00688 /* Logical_1 */ {FALSE, Err_Res }, 00689 /* Logical_2 */ {FALSE, Err_Res }, 00690 /* Logical_4 */ {FALSE, Err_Res }, 00691 /* Logical_8 */ {FALSE, Err_Res }, 00692 /* Character_1 */ {FALSE, Err_Res }, 00693 /* Character_2 */ {FALSE, Err_Res }, 00694 /* Character_4 */ {FALSE, Err_Res }, 00695 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00696 /* Structure_Type */ {FALSE, Err_Res }, 00697 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00698 }, 00699 /* Logical_4 */ { 00700 /* Err_Res */ {FALSE, Err_Res }, 00701 /* Short_Char_Const */ {FALSE, Err_Res }, 00702 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00703 /* Typeless_1 */ {FALSE, Err_Res }, 00704 /* Typeless_2 */ {FALSE, Err_Res }, 00705 /* Typeless_4 */ {FALSE, Err_Res }, 00706 /* Typeless_8 */ {FALSE, Err_Res }, 00707 /* Long_Typeless */ {FALSE, Err_Res }, 00708 /* Integer_1 */ {FALSE, Err_Res }, 00709 /* Integer_2 */ {FALSE, Err_Res }, 00710 /* Integer_4 */ {FALSE, Err_Res }, 00711 /* Integer_8 */ {FALSE, Err_Res }, 00712 /* Real_4 */ {FALSE, Err_Res }, 00713 /* Real_8 */ {FALSE, Err_Res }, 00714 /* Real_16 */ {FALSE, Err_Res }, 00715 /* Complex_4 */ {FALSE, Err_Res }, 00716 /* Complex_8 */ {FALSE, Err_Res }, 00717 /* Complex_16 */ {FALSE, Err_Res }, 00718 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00719 /* Logical_1 */ {FALSE, Err_Res }, 00720 /* Logical_2 */ {FALSE, Err_Res }, 00721 /* Logical_4 */ {FALSE, Err_Res }, 00722 /* Logical_8 */ {FALSE, Err_Res }, 00723 /* Character_1 */ {FALSE, Err_Res }, 00724 /* Character_2 */ {FALSE, Err_Res }, 00725 /* Character_4 */ {FALSE, Err_Res }, 00726 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00727 /* Structure_Type */ {FALSE, Err_Res }, 00728 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00729 }, 00730 /* Logical_8 */ { 00731 /* Err_Res */ {FALSE, Err_Res }, 00732 /* Short_Char_Const */ {FALSE, Err_Res }, 00733 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00734 /* Typeless_1 */ {FALSE, Err_Res }, 00735 /* Typeless_2 */ {FALSE, Err_Res }, 00736 /* Typeless_4 */ {FALSE, Err_Res }, 00737 /* Typeless_8 */ {FALSE, Err_Res }, 00738 /* Long_Typeless */ {FALSE, Err_Res }, 00739 /* Integer_1 */ {FALSE, Err_Res }, 00740 /* Integer_2 */ {FALSE, Err_Res }, 00741 /* Integer_4 */ {FALSE, Err_Res }, 00742 /* Integer_8 */ {FALSE, Err_Res }, 00743 /* Real_4 */ {FALSE, Err_Res }, 00744 /* Real_8 */ {FALSE, Err_Res }, 00745 /* Real_16 */ {FALSE, Err_Res }, 00746 /* Complex_4 */ {FALSE, Err_Res }, 00747 /* Complex_8 */ {FALSE, Err_Res }, 00748 /* Complex_16 */ {FALSE, Err_Res }, 00749 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00750 /* Logical_1 */ {FALSE, Err_Res }, 00751 /* Logical_2 */ {FALSE, Err_Res }, 00752 /* Logical_4 */ {FALSE, Err_Res }, 00753 /* Logical_8 */ {FALSE, Err_Res }, 00754 /* Character_1 */ {FALSE, Err_Res }, 00755 /* Character_2 */ {FALSE, Err_Res }, 00756 /* Character_4 */ {FALSE, Err_Res }, 00757 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00758 /* Structure_Type */ {FALSE, Err_Res }, 00759 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00760 }, 00761 /* Character_1 */ { 00762 /* Err_Res */ {FALSE, Err_Res }, 00763 /* Short_Char_Const */ {FALSE, Err_Res }, 00764 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00765 /* Typeless_1 */ {FALSE, Err_Res }, 00766 /* Typeless_2 */ {FALSE, Err_Res }, 00767 /* Typeless_4 */ {FALSE, Err_Res }, 00768 /* Typeless_8 */ {FALSE, Err_Res }, 00769 /* Long_Typeless */ {FALSE, Err_Res }, 00770 /* Integer_1 */ {FALSE, Err_Res }, 00771 /* Integer_2 */ {FALSE, Err_Res }, 00772 /* Integer_4 */ {FALSE, Err_Res }, 00773 /* Integer_8 */ {FALSE, Err_Res }, 00774 /* Real_4 */ {FALSE, Err_Res }, 00775 /* Real_8 */ {FALSE, Err_Res }, 00776 /* Real_16 */ {FALSE, Err_Res }, 00777 /* Complex_4 */ {FALSE, Err_Res }, 00778 /* Complex_8 */ {FALSE, Err_Res }, 00779 /* Complex_16 */ {FALSE, Err_Res }, 00780 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00781 /* Logical_1 */ {FALSE, Err_Res }, 00782 /* Logical_2 */ {FALSE, Err_Res }, 00783 /* Logical_4 */ {FALSE, Err_Res }, 00784 /* Logical_8 */ {FALSE, Err_Res }, 00785 /* Character_1 */ {FALSE, Err_Res }, 00786 /* Character_2 */ {FALSE, Err_Res }, 00787 /* Character_4 */ {FALSE, Err_Res }, 00788 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00789 /* Structure_Type */ {FALSE, Err_Res }, 00790 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00791 }, 00792 /* Character_2 */ { 00793 /* Err_Res */ {FALSE, Err_Res }, 00794 /* Short_Char_Const */ {FALSE, Err_Res }, 00795 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00796 /* Typeless_1 */ {FALSE, Err_Res }, 00797 /* Typeless_2 */ {FALSE, Err_Res }, 00798 /* Typeless_4 */ {FALSE, Err_Res }, 00799 /* Typeless_8 */ {FALSE, Err_Res }, 00800 /* Long_Typeless */ {FALSE, Err_Res }, 00801 /* Integer_1 */ {FALSE, Err_Res }, 00802 /* Integer_2 */ {FALSE, Err_Res }, 00803 /* Integer_4 */ {FALSE, Err_Res }, 00804 /* Integer_8 */ {FALSE, Err_Res }, 00805 /* Real_4 */ {FALSE, Err_Res }, 00806 /* Real_8 */ {FALSE, Err_Res }, 00807 /* Real_16 */ {FALSE, Err_Res }, 00808 /* Complex_4 */ {FALSE, Err_Res }, 00809 /* Complex_8 */ {FALSE, Err_Res }, 00810 /* Complex_16 */ {FALSE, Err_Res }, 00811 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00812 /* Logical_1 */ {FALSE, Err_Res }, 00813 /* Logical_2 */ {FALSE, Err_Res }, 00814 /* Logical_4 */ {FALSE, Err_Res }, 00815 /* Logical_8 */ {FALSE, Err_Res }, 00816 /* Character_1 */ {FALSE, Err_Res }, 00817 /* Character_2 */ {FALSE, Err_Res }, 00818 /* Character_4 */ {FALSE, Err_Res }, 00819 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00820 /* Structure_Type */ {FALSE, Err_Res }, 00821 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00822 }, 00823 /* Character_4 */ { 00824 /* Err_Res */ {FALSE, Err_Res }, 00825 /* Short_Char_Const */ {FALSE, Err_Res }, 00826 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00827 /* Typeless_1 */ {FALSE, Err_Res }, 00828 /* Typeless_2 */ {FALSE, Err_Res }, 00829 /* Typeless_4 */ {FALSE, Err_Res }, 00830 /* Typeless_8 */ {FALSE, Err_Res }, 00831 /* Long_Typeless */ {FALSE, Err_Res }, 00832 /* Integer_1 */ {FALSE, Err_Res }, 00833 /* Integer_2 */ {FALSE, Err_Res }, 00834 /* Integer_4 */ {FALSE, Err_Res }, 00835 /* Integer_8 */ {FALSE, Err_Res }, 00836 /* Real_4 */ {FALSE, Err_Res }, 00837 /* Real_8 */ {FALSE, Err_Res }, 00838 /* Real_16 */ {FALSE, Err_Res }, 00839 /* Complex_4 */ {FALSE, Err_Res }, 00840 /* Complex_8 */ {FALSE, Err_Res }, 00841 /* Complex_16 */ {FALSE, Err_Res }, 00842 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00843 /* Logical_1 */ {FALSE, Err_Res }, 00844 /* Logical_2 */ {FALSE, Err_Res }, 00845 /* Logical_4 */ {FALSE, Err_Res }, 00846 /* Logical_8 */ {FALSE, Err_Res }, 00847 /* Character_1 */ {FALSE, Err_Res }, 00848 /* Character_2 */ {FALSE, Err_Res }, 00849 /* Character_4 */ {FALSE, Err_Res }, 00850 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00851 /* Structure_Type */ {FALSE, Err_Res }, 00852 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00853 }, 00854 /* CRI_Ch_Ptr_8 */ { 00855 /* Err_Res */ {FALSE, Err_Res }, 00856 /* Short_Char_Const */ {FALSE, Err_Res }, 00857 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00858 /* Typeless_1 */ {FALSE, Err_Res }, 00859 /* Typeless_2 */ {FALSE, Err_Res }, 00860 /* Typeless_4 */ {FALSE, Err_Res }, 00861 /* Typeless_8 */ {FALSE, Err_Res }, 00862 /* Long_Typeless */ {FALSE, Err_Res }, 00863 /* Integer_1 */ {TRUE , CRI_Ch_Ptr_8 }, 00864 /* Integer_2 */ {TRUE , CRI_Ch_Ptr_8 }, 00865 /* Integer_4 */ {TRUE , CRI_Ch_Ptr_8 }, 00866 /* Integer_8 */ {TRUE , CRI_Ch_Ptr_8 }, 00867 /* Real_4 */ {FALSE, Err_Res }, 00868 /* Real_8 */ {FALSE, Err_Res }, 00869 /* Real_16 */ {FALSE, Err_Res }, 00870 /* Complex_4 */ {FALSE, Err_Res }, 00871 /* Complex_8 */ {FALSE, Err_Res }, 00872 /* Complex_16 */ {FALSE, Err_Res }, 00873 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00874 /* Logical_1 */ {FALSE, Err_Res }, 00875 /* Logical_2 */ {FALSE, Err_Res }, 00876 /* Logical_4 */ {FALSE, Err_Res }, 00877 /* Logical_8 */ {FALSE, Err_Res }, 00878 /* Character_1 */ {FALSE, Err_Res }, 00879 /* Character_2 */ {FALSE, Err_Res }, 00880 /* Character_4 */ {FALSE, Err_Res }, 00881 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00882 /* Structure_Type */ {FALSE, Err_Res }, 00883 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00884 }, 00885 /* Structure_Type */ { 00886 /* Err_Res */ {FALSE, Err_Res }, 00887 /* Short_Char_Const */ {FALSE, Err_Res }, 00888 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00889 /* Typeless_1 */ {FALSE, Err_Res }, 00890 /* Typeless_2 */ {FALSE, Err_Res }, 00891 /* Typeless_4 */ {FALSE, Err_Res }, 00892 /* Typeless_8 */ {FALSE, Err_Res }, 00893 /* Long_Typeless */ {FALSE, Err_Res }, 00894 /* Integer_1 */ {FALSE, Err_Res }, 00895 /* Integer_2 */ {FALSE, Err_Res }, 00896 /* Integer_4 */ {FALSE, Err_Res }, 00897 /* Integer_8 */ {FALSE, Err_Res }, 00898 /* Real_4 */ {FALSE, Err_Res }, 00899 /* Real_8 */ {FALSE, Err_Res }, 00900 /* Real_16 */ {FALSE, Err_Res }, 00901 /* Complex_4 */ {FALSE, Err_Res }, 00902 /* Complex_8 */ {FALSE, Err_Res }, 00903 /* Complex_16 */ {FALSE, Err_Res }, 00904 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00905 /* Logical_1 */ {FALSE, Err_Res }, 00906 /* Logical_2 */ {FALSE, Err_Res }, 00907 /* Logical_4 */ {FALSE, Err_Res }, 00908 /* Logical_8 */ {FALSE, Err_Res }, 00909 /* Character_1 */ {FALSE, Err_Res }, 00910 /* Character_2 */ {FALSE, Err_Res }, 00911 /* Character_4 */ {FALSE, Err_Res }, 00912 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00913 /* Structure_Type */ {FALSE, Err_Res }, 00914 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00915 }, 00916 /* CRI_Parcel_Ptr_8 */ { 00917 /* Err_Res */ {FALSE, Err_Res }, 00918 /* Short_Char_Const */ {TRUE , INT_WORD }, 00919 /* Short_Typeless_Const */ {TRUE , INT_WORD }, 00920 /* Typeless_1 */ {TRUE , INT_WORD }, 00921 /* Typeless_2 */ {TRUE , INT_WORD }, 00922 /* Typeless_4 */ {TRUE , INT_WORD }, 00923 /* Typeless_8 */ {TRUE , INT_WORD }, 00924 /* Long_Typeless */ {FALSE, Err_Res }, 00925 /* Integer_1 */ {TRUE , INT_WORD }, 00926 /* Integer_2 */ {TRUE , INT_WORD }, 00927 /* Integer_4 */ {TRUE , INT_WORD }, 00928 /* Integer_8 */ {TRUE , INT_WORD }, 00929 /* Real_4 */ {FALSE, Err_Res }, 00930 /* Real_8 */ {FALSE, Err_Res }, 00931 /* Real_16 */ {FALSE, Err_Res }, 00932 /* Complex_4 */ {FALSE, Err_Res }, 00933 /* Complex_8 */ {FALSE, Err_Res }, 00934 /* Complex_16 */ {FALSE, Err_Res }, 00935 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 00936 /* Logical_1 */ {FALSE, Err_Res }, 00937 /* Logical_2 */ {FALSE, Err_Res }, 00938 /* Logical_4 */ {FALSE, Err_Res }, 00939 /* Logical_8 */ {FALSE, Err_Res }, 00940 /* Character_1 */ {FALSE, Err_Res }, 00941 /* Character_2 */ {FALSE, Err_Res }, 00942 /* Character_4 */ {FALSE, Err_Res }, 00943 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00944 /* Structure_Type */ {FALSE, Err_Res }, 00945 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 00946 } 00947 }; 00948 00949 00950 exp_tbl_type bin_sub_tbl[Num_Linear_Types][Num_Linear_Types] = { 00951 /* Err_Res */ { 00952 /* Err_Res */ {FALSE, Err_Res }, 00953 /* Short_Char_Const */ {FALSE, Err_Res }, 00954 /* Short_Typeless_Const */ {FALSE, Err_Res }, 00955 /* Typeless_1 */ {FALSE, Err_Res }, 00956 /* Typeless_2 */ {FALSE, Err_Res }, 00957 /* Typeless_4 */ {FALSE, Err_Res }, 00958 /* Typeless_8 */ {FALSE, Err_Res }, 00959 /* Long_Typeless */ {FALSE, Err_Res }, 00960 /* Integer_1 */ {FALSE, Err_Res }, 00961 /* Integer_2 */ {FALSE, Err_Res }, 00962 /* Integer_4 */ {FALSE, Err_Res }, 00963 /* Integer_8 */ {FALSE, Err_Res }, 00964 /* Real_4 */ {FALSE, Err_Res }, 00965 /* Real_8 */ {FALSE, Err_Res }, 00966 /* Real_16 */ {FALSE, Err_Res }, 00967 /* Complex_4 */ {FALSE, Err_Res }, 00968 /* Complex_8 */ {FALSE, Err_Res }, 00969 /* Complex_16 */ {FALSE, Err_Res }, 00970 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 00971 /* Logical_1 */ {FALSE, Err_Res }, 00972 /* Logical_2 */ {FALSE, Err_Res }, 00973 /* Logical_4 */ {FALSE, Err_Res }, 00974 /* Logical_8 */ {FALSE, Err_Res }, 00975 /* Character_1 */ {FALSE, Err_Res }, 00976 /* Character_2 */ {FALSE, Err_Res }, 00977 /* Character_4 */ {FALSE, Err_Res }, 00978 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 00979 /* Structure_Type */ {FALSE, Err_Res }, 00980 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 00981 }, 00982 /* Short_Char_Const */ { 00983 /* Err_Res */ {FALSE, Err_Res }, 00984 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 00985 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 00986 /* Typeless_1 */ {TRUE , Typeless_1 }, 00987 /* Typeless_2 */ {TRUE , Typeless_2 }, 00988 /* Typeless_4 */ {TRUE , Typeless_4 }, 00989 /* Typeless_8 */ {TRUE , Typeless_8 }, 00990 /* Long_Typeless */ {FALSE, Err_Res }, 00991 /* Integer_1 */ {TRUE , Integer_1 }, 00992 /* Integer_2 */ {TRUE , Integer_2 }, 00993 /* Integer_4 */ {TRUE , Integer_4 }, 00994 /* Integer_8 */ {TRUE , Integer_8 }, 00995 /* Real_4 */ {TRUE , Real_4 }, 00996 /* Real_8 */ {TRUE , Real_8 }, 00997 /* Real_16 */ {TRUE , Real_16 }, 00998 /* Complex_4 */ {TRUE , Complex_4 }, 00999 /* Complex_8 */ {TRUE , Complex_8 }, 01000 /* Complex_16 */ {TRUE , Complex_16 }, 01001 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01002 /* Logical_1 */ {FALSE, Err_Res }, 01003 /* Logical_2 */ {FALSE, Err_Res }, 01004 /* Logical_4 */ {FALSE, Err_Res }, 01005 /* Logical_8 */ {FALSE, Err_Res }, 01006 /* Character_1 */ {FALSE, Err_Res }, 01007 /* Character_2 */ {FALSE, Err_Res }, 01008 /* Character_4 */ {FALSE, Err_Res }, 01009 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01010 /* Structure_Type */ {FALSE, Err_Res }, 01011 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01012 }, 01013 /* Short_Typeless_Const */ { 01014 /* Err_Res */ {FALSE, Err_Res }, 01015 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 01016 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 01017 /* Typeless_1 */ {TRUE , Typeless_1 }, 01018 /* Typeless_2 */ {TRUE , Typeless_2 }, 01019 /* Typeless_4 */ {TRUE , Typeless_4 }, 01020 /* Typeless_8 */ {TRUE , Typeless_8 }, 01021 /* Long_Typeless */ {FALSE, Err_Res }, 01022 /* Integer_1 */ {TRUE , Integer_1 }, 01023 /* Integer_2 */ {TRUE , Integer_2 }, 01024 /* Integer_4 */ {TRUE , Integer_4 }, 01025 /* Integer_8 */ {TRUE , Integer_8 }, 01026 /* Real_4 */ {TRUE , Real_4 }, 01027 /* Real_8 */ {TRUE , Real_8 }, 01028 /* Real_16 */ {TRUE , Real_16 }, 01029 /* Complex_4 */ {TRUE , Complex_4 }, 01030 /* Complex_8 */ {TRUE , Complex_8 }, 01031 /* Complex_16 */ {TRUE , Complex_16 }, 01032 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01033 /* Logical_1 */ {FALSE, Err_Res }, 01034 /* Logical_2 */ {FALSE, Err_Res }, 01035 /* Logical_4 */ {FALSE, Err_Res }, 01036 /* Logical_8 */ {FALSE, Err_Res }, 01037 /* Character_1 */ {FALSE, Err_Res }, 01038 /* Character_2 */ {FALSE, Err_Res }, 01039 /* Character_4 */ {FALSE, Err_Res }, 01040 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01041 /* Structure_Type */ {FALSE, Err_Res }, 01042 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01043 }, 01044 /* Typeless_1 */ { 01045 /* Err_Res */ {FALSE, Err_Res }, 01046 /* Short_Char_Const */ {TRUE , Typeless_1 }, 01047 /* Short_Typeless_Const */ {TRUE , Typeless_1 }, 01048 /* Typeless_1 */ {TRUE , Typeless_1 }, 01049 /* Typeless_2 */ {TRUE , Typeless_2 }, 01050 /* Typeless_4 */ {TRUE , Typeless_4 }, 01051 /* Typeless_8 */ {TRUE , Typeless_8 }, 01052 /* Long_Typeless */ {FALSE, Err_Res }, 01053 /* Integer_1 */ {TRUE , Integer_1 }, 01054 /* Integer_2 */ {TRUE , Integer_2 }, 01055 /* Integer_4 */ {TRUE , Integer_4 }, 01056 /* Integer_8 */ {TRUE , Integer_8 }, 01057 /* Real_4 */ {FALSE, Err_Res }, 01058 /* Real_8 */ {FALSE, Err_Res }, 01059 /* Real_16 */ {FALSE, Err_Res }, 01060 /* Complex_4 */ {FALSE, Err_Res }, 01061 /* Complex_8 */ {FALSE, Err_Res }, 01062 /* Complex_16 */ {FALSE, Err_Res }, 01063 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01064 /* Logical_1 */ {FALSE, Err_Res }, 01065 /* Logical_2 */ {FALSE, Err_Res }, 01066 /* Logical_4 */ {FALSE, Err_Res }, 01067 /* Logical_8 */ {FALSE, Err_Res }, 01068 /* Character_1 */ {FALSE, Err_Res }, 01069 /* Character_2 */ {FALSE, Err_Res }, 01070 /* Character_4 */ {FALSE, Err_Res }, 01071 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01072 /* Structure_Type */ {FALSE, Err_Res }, 01073 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01074 }, 01075 /* Typeless_2 */ { 01076 /* Err_Res */ {FALSE, Err_Res }, 01077 /* Short_Char_Const */ {TRUE , Typeless_2 }, 01078 /* Short_Typeless_Const */ {TRUE , Typeless_2 }, 01079 /* Typeless_1 */ {TRUE , Typeless_2 }, 01080 /* Typeless_2 */ {TRUE , Typeless_2 }, 01081 /* Typeless_4 */ {TRUE , Typeless_4 }, 01082 /* Typeless_8 */ {TRUE , Typeless_8 }, 01083 /* Long_Typeless */ {FALSE, Err_Res }, 01084 /* Integer_1 */ {TRUE , Integer_1 }, 01085 /* Integer_2 */ {TRUE , Integer_2 }, 01086 /* Integer_4 */ {TRUE , Integer_4 }, 01087 /* Integer_8 */ {TRUE , Integer_8 }, 01088 /* Real_4 */ {FALSE, Err_Res }, 01089 /* Real_8 */ {FALSE, Err_Res }, 01090 /* Real_16 */ {FALSE, Err_Res }, 01091 /* Complex_4 */ {FALSE, Err_Res }, 01092 /* Complex_8 */ {FALSE, Err_Res }, 01093 /* Complex_16 */ {FALSE, Err_Res }, 01094 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01095 /* Logical_1 */ {FALSE, Err_Res }, 01096 /* Logical_2 */ {FALSE, Err_Res }, 01097 /* Logical_4 */ {FALSE, Err_Res }, 01098 /* Logical_8 */ {FALSE, Err_Res }, 01099 /* Character_1 */ {FALSE, Err_Res }, 01100 /* Character_2 */ {FALSE, Err_Res }, 01101 /* Character_4 */ {FALSE, Err_Res }, 01102 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01103 /* Structure_Type */ {FALSE, Err_Res }, 01104 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01105 }, 01106 /* Typeless_4 */ { 01107 /* Err_Res */ {FALSE, Err_Res }, 01108 /* Short_Char_Const */ {TRUE , Typeless_4 }, 01109 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 01110 /* Typeless_1 */ {TRUE , Typeless_4 }, 01111 /* Typeless_2 */ {TRUE , Typeless_4 }, 01112 /* Typeless_4 */ {TRUE , Typeless_4 }, 01113 /* Typeless_8 */ {TRUE , Typeless_8 }, 01114 /* Long_Typeless */ {FALSE, Err_Res }, 01115 /* Integer_1 */ {TRUE , Integer_1 }, 01116 /* Integer_2 */ {TRUE , Integer_2 }, 01117 /* Integer_4 */ {TRUE , Integer_4 }, 01118 /* Integer_8 */ {TRUE , Integer_8 }, 01119 /* Real_4 */ {TRUE , Real_4 }, 01120 /* Real_8 */ {FALSE, Err_Res }, 01121 /* Real_16 */ {FALSE, Err_Res }, 01122 /* Complex_4 */ {FALSE, Err_Res }, 01123 /* Complex_8 */ {FALSE, Err_Res }, 01124 /* Complex_16 */ {FALSE, Err_Res }, 01125 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01126 /* Logical_1 */ {FALSE, Err_Res }, 01127 /* Logical_2 */ {FALSE, Err_Res }, 01128 /* Logical_4 */ {FALSE, Err_Res }, 01129 /* Logical_8 */ {FALSE, Err_Res }, 01130 /* Character_1 */ {FALSE, Err_Res }, 01131 /* Character_2 */ {FALSE, Err_Res }, 01132 /* Character_4 */ {FALSE, Err_Res }, 01133 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01134 /* Structure_Type */ {FALSE, Err_Res }, 01135 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01136 }, 01137 /* Typeless_8 */ { 01138 /* Err_Res */ {FALSE, Err_Res }, 01139 /* Short_Char_Const */ {TRUE , Typeless_8 }, 01140 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 01141 /* Typeless_1 */ {TRUE , Typeless_8 }, 01142 /* Typeless_2 */ {TRUE , Typeless_8 }, 01143 /* Typeless_4 */ {TRUE , Typeless_8 }, 01144 /* Typeless_8 */ {TRUE , Typeless_8 }, 01145 /* Long_Typeless */ {FALSE, Err_Res }, 01146 /* Integer_1 */ {TRUE , Integer_1 }, 01147 /* Integer_2 */ {TRUE , Integer_2 }, 01148 /* Integer_4 */ {TRUE , Integer_4 }, 01149 /* Integer_8 */ {TRUE , Integer_8 }, 01150 /* Real_4 */ {TRUE , Real_4 }, 01151 /* Real_8 */ {TRUE , Real_8 }, 01152 /* Real_16 */ {FALSE, Err_Res }, 01153 /* Complex_4 */ {FALSE, Err_Res }, 01154 /* Complex_8 */ {FALSE, Err_Res }, 01155 /* Complex_16 */ {FALSE, Err_Res }, 01156 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01157 /* Logical_1 */ {FALSE, Err_Res }, 01158 /* Logical_2 */ {FALSE, Err_Res }, 01159 /* Logical_4 */ {FALSE, Err_Res }, 01160 /* Logical_8 */ {FALSE, Err_Res }, 01161 /* Character_1 */ {FALSE, Err_Res }, 01162 /* Character_2 */ {FALSE, Err_Res }, 01163 /* Character_4 */ {FALSE, Err_Res }, 01164 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01165 /* Structure_Type */ {FALSE, Err_Res }, 01166 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01167 }, 01168 /* Long_Typeless */ { 01169 /* Err_Res */ {FALSE, Err_Res }, 01170 /* Short_Char_Const */ {FALSE, Err_Res }, 01171 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01172 /* Typeless_1 */ {FALSE, Err_Res }, 01173 /* Typeless_2 */ {FALSE, Err_Res }, 01174 /* Typeless_4 */ {FALSE, Err_Res }, 01175 /* Typeless_8 */ {FALSE, Err_Res }, 01176 /* Long_Typeless */ {FALSE, Err_Res }, 01177 /* Integer_1 */ {FALSE, Err_Res }, 01178 /* Integer_2 */ {FALSE, Err_Res }, 01179 /* Integer_4 */ {FALSE, Err_Res }, 01180 /* Integer_8 */ {FALSE, Err_Res }, 01181 /* Real_4 */ {FALSE, Err_Res }, 01182 /* Real_8 */ {FALSE, Err_Res }, 01183 /* Real_16 */ {FALSE, Err_Res }, 01184 /* Complex_4 */ {FALSE, Err_Res }, 01185 /* Complex_8 */ {FALSE, Err_Res }, 01186 /* Complex_16 */ {FALSE, Err_Res }, 01187 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01188 /* Logical_1 */ {FALSE, Err_Res }, 01189 /* Logical_2 */ {FALSE, Err_Res }, 01190 /* Logical_4 */ {FALSE, Err_Res }, 01191 /* Logical_8 */ {FALSE, Err_Res }, 01192 /* Character_1 */ {FALSE, Err_Res }, 01193 /* Character_2 */ {FALSE, Err_Res }, 01194 /* Character_4 */ {FALSE, Err_Res }, 01195 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01196 /* Structure_Type */ {FALSE, Err_Res }, 01197 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01198 }, 01199 /* Integer_1 */ { 01200 /* Err_Res */ {FALSE, Err_Res }, 01201 /* Short_Char_Const */ {TRUE , Integer_1 }, 01202 /* Short_Typeless_Const */ {TRUE , Integer_1 }, 01203 /* Typeless_1 */ {TRUE , Integer_1 }, 01204 /* Typeless_2 */ {TRUE , Integer_1 }, 01205 /* Typeless_4 */ {TRUE , Integer_1 }, 01206 /* Typeless_8 */ {TRUE , Integer_1 }, 01207 /* Long_Typeless */ {FALSE, Err_Res }, 01208 /* Integer_1 */ {FALSE, Integer_1 }, 01209 /* Integer_2 */ {FALSE, Integer_2 }, 01210 /* Integer_4 */ {FALSE, Integer_4 }, 01211 /* Integer_8 */ {FALSE, Integer_8 }, 01212 /* Real_4 */ {FALSE, Real_4 }, 01213 /* Real_8 */ {FALSE, Real_8 }, 01214 /* Real_16 */ {FALSE, Real_16 }, 01215 /* Complex_4 */ {FALSE, Complex_4 }, 01216 /* Complex_8 */ {FALSE, Complex_8 }, 01217 /* Complex_16 */ {FALSE, Complex_16 }, 01218 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01219 /* Logical_1 */ {FALSE, Err_Res }, 01220 /* Logical_2 */ {FALSE, Err_Res }, 01221 /* Logical_4 */ {FALSE, Err_Res }, 01222 /* Logical_8 */ {FALSE, Err_Res }, 01223 /* Character_1 */ {FALSE, Err_Res }, 01224 /* Character_2 */ {FALSE, Err_Res }, 01225 /* Character_4 */ {FALSE, Err_Res }, 01226 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01227 /* Structure_Type */ {FALSE, Err_Res }, 01228 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01229 }, 01230 /* Integer_2 */ { 01231 /* Err_Res */ {FALSE, Err_Res }, 01232 /* Short_Char_Const */ {TRUE , Integer_2 }, 01233 /* Short_Typeless_Const */ {TRUE , Integer_2 }, 01234 /* Typeless_1 */ {TRUE , Integer_2 }, 01235 /* Typeless_2 */ {TRUE , Integer_2 }, 01236 /* Typeless_4 */ {TRUE , Integer_2 }, 01237 /* Typeless_8 */ {TRUE , Integer_2 }, 01238 /* Long_Typeless */ {FALSE, Err_Res }, 01239 /* Integer_1 */ {FALSE, Integer_2 }, 01240 /* Integer_2 */ {FALSE, Integer_2 }, 01241 /* Integer_4 */ {FALSE, Integer_4 }, 01242 /* Integer_8 */ {FALSE, Integer_8 }, 01243 /* Real_4 */ {FALSE, Real_4 }, 01244 /* Real_8 */ {FALSE, Real_8 }, 01245 /* Real_16 */ {FALSE, Real_16 }, 01246 /* Complex_4 */ {FALSE, Complex_4 }, 01247 /* Complex_8 */ {FALSE, Complex_8 }, 01248 /* Complex_16 */ {FALSE, Complex_16 }, 01249 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01250 /* Logical_1 */ {FALSE, Err_Res }, 01251 /* Logical_2 */ {FALSE, Err_Res }, 01252 /* Logical_4 */ {FALSE, Err_Res }, 01253 /* Logical_8 */ {FALSE, Err_Res }, 01254 /* Character_1 */ {FALSE, Err_Res }, 01255 /* Character_2 */ {FALSE, Err_Res }, 01256 /* Character_4 */ {FALSE, Err_Res }, 01257 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01258 /* Structure_Type */ {FALSE, Err_Res }, 01259 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01260 }, 01261 /* Integer_4 */ { 01262 /* Err_Res */ {FALSE, Err_Res }, 01263 /* Short_Char_Const */ {TRUE , Integer_4 }, 01264 /* Short_Typeless_Const */ {TRUE , Integer_4 }, 01265 /* Typeless_1 */ {TRUE , Integer_4 }, 01266 /* Typeless_2 */ {TRUE , Integer_4 }, 01267 /* Typeless_4 */ {TRUE , Integer_4 }, 01268 /* Typeless_8 */ {TRUE , Integer_4 }, 01269 /* Long_Typeless */ {FALSE, Err_Res }, 01270 /* Integer_1 */ {FALSE, Integer_4 }, 01271 /* Integer_2 */ {FALSE, Integer_4 }, 01272 /* Integer_4 */ {FALSE, Integer_4 }, 01273 /* Integer_8 */ {FALSE, Integer_8 }, 01274 /* Real_4 */ {FALSE, Real_4 }, 01275 /* Real_8 */ {FALSE, Real_8 }, 01276 /* Real_16 */ {FALSE, Real_16 }, 01277 /* Complex_4 */ {FALSE, Complex_4 }, 01278 /* Complex_8 */ {FALSE, Complex_8 }, 01279 /* Complex_16 */ {FALSE, Complex_16 }, 01280 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01281 /* Logical_1 */ {FALSE, Err_Res }, 01282 /* Logical_2 */ {FALSE, Err_Res }, 01283 /* Logical_4 */ {FALSE, Err_Res }, 01284 /* Logical_8 */ {FALSE, Err_Res }, 01285 /* Character_1 */ {FALSE, Err_Res }, 01286 /* Character_2 */ {FALSE, Err_Res }, 01287 /* Character_4 */ {FALSE, Err_Res }, 01288 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01289 /* Structure_Type */ {FALSE, Err_Res }, 01290 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01291 }, 01292 /* Integer_8 */ { 01293 /* Err_Res */ {FALSE, Err_Res }, 01294 /* Short_Char_Const */ {TRUE , Integer_8 }, 01295 /* Short_Typeless_Const */ {TRUE , Integer_8 }, 01296 /* Typeless_1 */ {TRUE , Integer_8 }, 01297 /* Typeless_2 */ {TRUE , Integer_8 }, 01298 /* Typeless_4 */ {TRUE , Integer_8 }, 01299 /* Typeless_8 */ {TRUE , Integer_8 }, 01300 /* Long_Typeless */ {FALSE, Err_Res }, 01301 /* Integer_1 */ {FALSE, Integer_8 }, 01302 /* Integer_2 */ {FALSE, Integer_8 }, 01303 /* Integer_4 */ {FALSE, Integer_8 }, 01304 /* Integer_8 */ {FALSE, Integer_8 }, 01305 /* Real_4 */ {FALSE, Real_4 }, 01306 /* Real_8 */ {FALSE, Real_8 }, 01307 /* Real_16 */ {FALSE, Real_16 }, 01308 /* Complex_4 */ {FALSE, Complex_4 }, 01309 /* Complex_8 */ {FALSE, Complex_8 }, 01310 /* Complex_16 */ {FALSE, Complex_16 }, 01311 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01312 /* Logical_1 */ {FALSE, Err_Res }, 01313 /* Logical_2 */ {FALSE, Err_Res }, 01314 /* Logical_4 */ {FALSE, Err_Res }, 01315 /* Logical_8 */ {FALSE, Err_Res }, 01316 /* Character_1 */ {FALSE, Err_Res }, 01317 /* Character_2 */ {FALSE, Err_Res }, 01318 /* Character_4 */ {FALSE, Err_Res }, 01319 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01320 /* Structure_Type */ {FALSE, Err_Res }, 01321 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01322 }, 01323 /* Real_4 */ { 01324 /* Err_Res */ {FALSE, Err_Res }, 01325 /* Short_Char_Const */ {TRUE , Real_4 }, 01326 /* Short_Typeless_Const */ {TRUE , Real_4 }, 01327 /* Typeless_1 */ {TRUE , Err_Res }, 01328 /* Typeless_2 */ {TRUE , Err_Res }, 01329 /* Typeless_4 */ {TRUE , Real_4 }, 01330 /* Typeless_8 */ {TRUE , Real_4 }, 01331 /* Long_Typeless */ {FALSE, Err_Res }, 01332 /* Integer_1 */ {FALSE, Real_4 }, 01333 /* Integer_2 */ {FALSE, Real_4 }, 01334 /* Integer_4 */ {FALSE, Real_4 }, 01335 /* Integer_8 */ {FALSE, Real_4 }, 01336 /* Real_4 */ {FALSE, Real_4 }, 01337 /* Real_8 */ {FALSE, Real_8 }, 01338 /* Real_16 */ {FALSE, Real_16 }, 01339 /* Complex_4 */ {FALSE, Complex_4 }, 01340 /* Complex_8 */ {FALSE, Complex_8 }, 01341 /* Complex_16 */ {FALSE, Complex_16 }, 01342 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01343 /* Logical_1 */ {FALSE, Err_Res }, 01344 /* Logical_2 */ {FALSE, Err_Res }, 01345 /* Logical_4 */ {FALSE, Err_Res }, 01346 /* Logical_8 */ {FALSE, Err_Res }, 01347 /* Character_1 */ {FALSE, Err_Res }, 01348 /* Character_2 */ {FALSE, Err_Res }, 01349 /* Character_4 */ {FALSE, Err_Res }, 01350 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01351 /* Structure_Type */ {FALSE, Err_Res }, 01352 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01353 }, 01354 /* Real_8 */ { 01355 /* Err_Res */ {FALSE, Err_Res }, 01356 /* Short_Char_Const */ {TRUE , Real_8 }, 01357 /* Short_Typeless_Const */ {TRUE , Real_8 }, 01358 /* Typeless_1 */ {FALSE, Err_Res }, 01359 /* Typeless_2 */ {FALSE, Err_Res }, 01360 /* Typeless_4 */ {FALSE, Err_Res }, 01361 /* Typeless_8 */ {TRUE , Real_8 }, 01362 /* Long_Typeless */ {FALSE, Err_Res }, 01363 /* Integer_1 */ {FALSE, Real_8 }, 01364 /* Integer_2 */ {FALSE, Real_8 }, 01365 /* Integer_4 */ {FALSE, Real_8 }, 01366 /* Integer_8 */ {FALSE, Real_8 }, 01367 /* Real_4 */ {FALSE, Real_8 }, 01368 /* Real_8 */ {FALSE, Real_8 }, 01369 /* Real_16 */ {FALSE, Real_16 }, 01370 /* Complex_4 */ {FALSE, Complex_8 }, 01371 /* Complex_8 */ {FALSE, Complex_8 }, 01372 /* Complex_16 */ {FALSE, Complex_16 }, 01373 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01374 /* Logical_1 */ {FALSE, Err_Res }, 01375 /* Logical_2 */ {FALSE, Err_Res }, 01376 /* Logical_4 */ {FALSE, Err_Res }, 01377 /* Logical_8 */ {FALSE, Err_Res }, 01378 /* Character_1 */ {FALSE, Err_Res }, 01379 /* Character_2 */ {FALSE, Err_Res }, 01380 /* Character_4 */ {FALSE, Err_Res }, 01381 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01382 /* Structure_Type */ {FALSE, Err_Res }, 01383 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01384 }, 01385 /* Real_16 */ { 01386 /* Err_Res */ {FALSE, Err_Res }, 01387 /* Short_Char_Const */ {TRUE , Real_16 }, 01388 /* Short_Typeless_Const */ {TRUE , Real_16 }, 01389 /* Typeless_1 */ {FALSE, Err_Res }, 01390 /* Typeless_2 */ {FALSE, Err_Res }, 01391 /* Typeless_4 */ {FALSE, Err_Res }, 01392 /* Typeless_8 */ {FALSE, Err_Res }, 01393 /* Long_Typeless */ {FALSE, Err_Res }, 01394 /* Integer_1 */ {FALSE, Real_16 }, 01395 /* Integer_2 */ {FALSE, Real_16 }, 01396 /* Integer_4 */ {FALSE, Real_16 }, 01397 /* Integer_8 */ {FALSE, Real_16 }, 01398 /* Real_4 */ {FALSE, Real_16 }, 01399 /* Real_8 */ {FALSE, Real_16 }, 01400 /* Real_16 */ {FALSE, Real_16 }, 01401 /* Complex_4 */ {FALSE, Complex_16 }, 01402 /* Complex_8 */ {FALSE, Complex_16 }, 01403 /* Complex_16 */ {FALSE, Complex_16 }, 01404 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01405 /* Logical_1 */ {FALSE, Err_Res }, 01406 /* Logical_2 */ {FALSE, Err_Res }, 01407 /* Logical_4 */ {FALSE, Err_Res }, 01408 /* Logical_8 */ {FALSE, Err_Res }, 01409 /* Character_1 */ {FALSE, Err_Res }, 01410 /* Character_2 */ {FALSE, Err_Res }, 01411 /* Character_4 */ {FALSE, Err_Res }, 01412 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01413 /* Structure_Type */ {FALSE, Err_Res }, 01414 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01415 }, 01416 /* Complex_4 */ { 01417 /* Err_Res */ {FALSE, Err_Res }, 01418 /* Short_Char_Const */ {TRUE , Complex_4 }, 01419 /* Short_Typeless_Const */ {TRUE , Complex_4 }, 01420 /* Typeless_1 */ {FALSE, Err_Res }, 01421 /* Typeless_2 */ {FALSE, Err_Res }, 01422 /* Typeless_4 */ {FALSE, Err_Res }, 01423 /* Typeless_8 */ {FALSE, Err_Res }, 01424 /* Long_Typeless */ {FALSE, Err_Res }, 01425 /* Integer_1 */ {FALSE, Complex_4 }, 01426 /* Integer_2 */ {FALSE, Complex_4 }, 01427 /* Integer_4 */ {FALSE, Complex_4 }, 01428 /* Integer_8 */ {FALSE, Complex_4 }, 01429 /* Real_4 */ {FALSE, Complex_4 }, 01430 /* Real_8 */ {FALSE, Complex_8 }, 01431 /* Real_16 */ {FALSE, Complex_16 }, 01432 /* Complex_4 */ {FALSE, Complex_4 }, 01433 /* Complex_8 */ {FALSE, Complex_8 }, 01434 /* Complex_16 */ {FALSE, Complex_16 }, 01435 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01436 /* Logical_1 */ {FALSE, Err_Res }, 01437 /* Logical_2 */ {FALSE, Err_Res }, 01438 /* Logical_4 */ {FALSE, Err_Res }, 01439 /* Logical_8 */ {FALSE, Err_Res }, 01440 /* Character_1 */ {FALSE, Err_Res }, 01441 /* Character_2 */ {FALSE, Err_Res }, 01442 /* Character_4 */ {FALSE, Err_Res }, 01443 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01444 /* Structure_Type */ {FALSE, Err_Res }, 01445 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01446 }, 01447 /* Complex_8 */ { 01448 /* Err_Res */ {FALSE, Err_Res }, 01449 /* Short_Char_Const */ {TRUE , Complex_8 }, 01450 /* Short_Typeless_Const */ {TRUE , Complex_8 }, 01451 /* Typeless_1 */ {FALSE, Err_Res }, 01452 /* Typeless_2 */ {FALSE, Err_Res }, 01453 /* Typeless_4 */ {FALSE, Err_Res }, 01454 /* Typeless_8 */ {FALSE, Err_Res }, 01455 /* Long_Typeless */ {FALSE, Err_Res }, 01456 /* Integer_1 */ {FALSE, Complex_8 }, 01457 /* Integer_2 */ {FALSE, Complex_8 }, 01458 /* Integer_4 */ {FALSE, Complex_8 }, 01459 /* Integer_8 */ {FALSE, Complex_8 }, 01460 /* Real_4 */ {FALSE, Complex_8 }, 01461 /* Real_8 */ {FALSE, Complex_8 }, 01462 /* Real_16 */ {FALSE, Complex_16 }, 01463 /* Complex_4 */ {FALSE, Complex_8 }, 01464 /* Complex_8 */ {FALSE, Complex_8 }, 01465 /* Complex_16 */ {FALSE, Complex_16 }, 01466 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01467 /* Logical_1 */ {FALSE, Err_Res }, 01468 /* Logical_2 */ {FALSE, Err_Res }, 01469 /* Logical_4 */ {FALSE, Err_Res }, 01470 /* Logical_8 */ {FALSE, Err_Res }, 01471 /* Character_1 */ {FALSE, Err_Res }, 01472 /* Character_2 */ {FALSE, Err_Res }, 01473 /* Character_4 */ {FALSE, Err_Res }, 01474 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01475 /* Structure_Type */ {FALSE, Err_Res }, 01476 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01477 }, 01478 /* Complex_16 */ { 01479 /* Err_Res */ {FALSE, Err_Res }, 01480 /* Short_Char_Const */ {TRUE , Complex_16 }, 01481 /* Short_Typeless_Const */ {TRUE , Complex_16 }, 01482 /* Typeless_1 */ {FALSE, Err_Res }, 01483 /* Typeless_2 */ {FALSE, Err_Res }, 01484 /* Typeless_4 */ {FALSE, Err_Res }, 01485 /* Typeless_8 */ {FALSE, Err_Res }, 01486 /* Long_Typeless */ {FALSE, Err_Res }, 01487 /* Integer_1 */ {FALSE, Complex_16 }, 01488 /* Integer_2 */ {FALSE, Complex_16 }, 01489 /* Integer_4 */ {FALSE, Complex_16 }, 01490 /* Integer_8 */ {FALSE, Complex_16 }, 01491 /* Real_4 */ {FALSE, Complex_16 }, 01492 /* Real_8 */ {FALSE, Complex_16 }, 01493 /* Real_16 */ {FALSE, Complex_16 }, 01494 /* Complex_4 */ {FALSE, Complex_16 }, 01495 /* Complex_8 */ {FALSE, Complex_16 }, 01496 /* Complex_16 */ {FALSE, Complex_16 }, 01497 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01498 /* Logical_1 */ {FALSE, Err_Res }, 01499 /* Logical_2 */ {FALSE, Err_Res }, 01500 /* Logical_4 */ {FALSE, Err_Res }, 01501 /* Logical_8 */ {FALSE, Err_Res }, 01502 /* Character_1 */ {FALSE, Err_Res }, 01503 /* Character_2 */ {FALSE, Err_Res }, 01504 /* Character_4 */ {FALSE, Err_Res }, 01505 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01506 /* Structure_Type */ {FALSE, Err_Res }, 01507 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01508 }, 01509 /* CRI_Ptr_8 */ { 01510 /* Err_Res */ {FALSE, Err_Res }, 01511 /* Short_Char_Const */ {TRUE , CRI_Ptr_8 }, 01512 /* Short_Typeless_Const */ {TRUE , CRI_Ptr_8 }, 01513 /* Typeless_1 */ {TRUE , CRI_Ptr_8 }, 01514 /* Typeless_2 */ {TRUE , CRI_Ptr_8 }, 01515 /* Typeless_4 */ {TRUE , CRI_Ptr_8 }, 01516 /* Typeless_8 */ {TRUE , CRI_Ptr_8 }, 01517 /* Long_Typeless */ {FALSE, Err_Res }, 01518 /* Integer_1 */ {TRUE , CRI_Ptr_8 }, 01519 /* Integer_2 */ {TRUE , CRI_Ptr_8 }, 01520 /* Integer_4 */ {TRUE , CRI_Ptr_8 }, 01521 /* Integer_8 */ {TRUE , CRI_Ptr_8 }, 01522 /* Real_4 */ {FALSE, Err_Res }, 01523 /* Real_8 */ {FALSE, Err_Res }, 01524 /* Real_16 */ {FALSE, Err_Res }, 01525 /* Complex_4 */ {FALSE, Err_Res }, 01526 /* Complex_8 */ {FALSE, Err_Res }, 01527 /* Complex_16 */ {FALSE, Err_Res }, 01528 /* CRI_Ptr_8 */ {TRUE , INT_WORD }, 01529 /* Logical_1 */ {FALSE, Err_Res }, 01530 /* Logical_2 */ {FALSE, Err_Res }, 01531 /* Logical_4 */ {FALSE, Err_Res }, 01532 /* Logical_8 */ {FALSE, Err_Res }, 01533 /* Character_1 */ {FALSE, Err_Res }, 01534 /* Character_2 */ {FALSE, Err_Res }, 01535 /* Character_4 */ {FALSE, Err_Res }, 01536 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01537 /* Structure_Type */ {FALSE, Err_Res }, 01538 /* CRI_Parcel_Ptr_8 */ {TRUE , CRI_Ptr_8 } 01539 }, 01540 /* Logical_1 */ { 01541 /* Err_Res */ {FALSE, Err_Res }, 01542 /* Short_Char_Const */ {FALSE, Err_Res }, 01543 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01544 /* Typeless_1 */ {FALSE, Err_Res }, 01545 /* Typeless_2 */ {FALSE, Err_Res }, 01546 /* Typeless_4 */ {FALSE, Err_Res }, 01547 /* Typeless_8 */ {FALSE, Err_Res }, 01548 /* Long_Typeless */ {FALSE, Err_Res }, 01549 /* Integer_1 */ {FALSE, Err_Res }, 01550 /* Integer_2 */ {FALSE, Err_Res }, 01551 /* Integer_4 */ {FALSE, Err_Res }, 01552 /* Integer_8 */ {FALSE, Err_Res }, 01553 /* Real_4 */ {FALSE, Err_Res }, 01554 /* Real_8 */ {FALSE, Err_Res }, 01555 /* Real_16 */ {FALSE, Err_Res }, 01556 /* Complex_4 */ {FALSE, Err_Res }, 01557 /* Complex_8 */ {FALSE, Err_Res }, 01558 /* Complex_16 */ {FALSE, Err_Res }, 01559 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01560 /* Logical_1 */ {FALSE, Err_Res }, 01561 /* Logical_2 */ {FALSE, Err_Res }, 01562 /* Logical_4 */ {FALSE, Err_Res }, 01563 /* Logical_8 */ {FALSE, Err_Res }, 01564 /* Character_1 */ {FALSE, Err_Res }, 01565 /* Character_2 */ {FALSE, Err_Res }, 01566 /* Character_4 */ {FALSE, Err_Res }, 01567 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01568 /* Structure_Type */ {FALSE, Err_Res }, 01569 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01570 }, 01571 /* Logical_2 */ { 01572 /* Err_Res */ {FALSE, Err_Res }, 01573 /* Short_Char_Const */ {FALSE, Err_Res }, 01574 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01575 /* Typeless_1 */ {FALSE, Err_Res }, 01576 /* Typeless_2 */ {FALSE, Err_Res }, 01577 /* Typeless_4 */ {FALSE, Err_Res }, 01578 /* Typeless_8 */ {FALSE, Err_Res }, 01579 /* Long_Typeless */ {FALSE, Err_Res }, 01580 /* Integer_1 */ {FALSE, Err_Res }, 01581 /* Integer_2 */ {FALSE, Err_Res }, 01582 /* Integer_4 */ {FALSE, Err_Res }, 01583 /* Integer_8 */ {FALSE, Err_Res }, 01584 /* Real_4 */ {FALSE, Err_Res }, 01585 /* Real_8 */ {FALSE, Err_Res }, 01586 /* Real_16 */ {FALSE, Err_Res }, 01587 /* Complex_4 */ {FALSE, Err_Res }, 01588 /* Complex_8 */ {FALSE, Err_Res }, 01589 /* Complex_16 */ {FALSE, Err_Res }, 01590 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01591 /* Logical_1 */ {FALSE, Err_Res }, 01592 /* Logical_2 */ {FALSE, Err_Res }, 01593 /* Logical_4 */ {FALSE, Err_Res }, 01594 /* Logical_8 */ {FALSE, Err_Res }, 01595 /* Character_1 */ {FALSE, Err_Res }, 01596 /* Character_2 */ {FALSE, Err_Res }, 01597 /* Character_4 */ {FALSE, Err_Res }, 01598 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01599 /* Structure_Type */ {FALSE, Err_Res }, 01600 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01601 }, 01602 /* Logical_4 */ { 01603 /* Err_Res */ {FALSE, Err_Res }, 01604 /* Short_Char_Const */ {FALSE, Err_Res }, 01605 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01606 /* Typeless_1 */ {FALSE, Err_Res }, 01607 /* Typeless_2 */ {FALSE, Err_Res }, 01608 /* Typeless_4 */ {FALSE, Err_Res }, 01609 /* Typeless_8 */ {FALSE, Err_Res }, 01610 /* Long_Typeless */ {FALSE, Err_Res }, 01611 /* Integer_1 */ {FALSE, Err_Res }, 01612 /* Integer_2 */ {FALSE, Err_Res }, 01613 /* Integer_4 */ {FALSE, Err_Res }, 01614 /* Integer_8 */ {FALSE, Err_Res }, 01615 /* Real_4 */ {FALSE, Err_Res }, 01616 /* Real_8 */ {FALSE, Err_Res }, 01617 /* Real_16 */ {FALSE, Err_Res }, 01618 /* Complex_4 */ {FALSE, Err_Res }, 01619 /* Complex_8 */ {FALSE, Err_Res }, 01620 /* Complex_16 */ {FALSE, Err_Res }, 01621 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01622 /* Logical_1 */ {FALSE, Err_Res }, 01623 /* Logical_2 */ {FALSE, Err_Res }, 01624 /* Logical_4 */ {FALSE, Err_Res }, 01625 /* Logical_8 */ {FALSE, Err_Res }, 01626 /* Character_1 */ {FALSE, Err_Res }, 01627 /* Character_2 */ {FALSE, Err_Res }, 01628 /* Character_4 */ {FALSE, Err_Res }, 01629 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01630 /* Structure_Type */ {FALSE, Err_Res }, 01631 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01632 }, 01633 /* Logical_8 */ { 01634 /* Err_Res */ {FALSE, Err_Res }, 01635 /* Short_Char_Const */ {FALSE, Err_Res }, 01636 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01637 /* Typeless_1 */ {FALSE, Err_Res }, 01638 /* Typeless_2 */ {FALSE, Err_Res }, 01639 /* Typeless_4 */ {FALSE, Err_Res }, 01640 /* Typeless_8 */ {FALSE, Err_Res }, 01641 /* Long_Typeless */ {FALSE, Err_Res }, 01642 /* Integer_1 */ {FALSE, Err_Res }, 01643 /* Integer_2 */ {FALSE, Err_Res }, 01644 /* Integer_4 */ {FALSE, Err_Res }, 01645 /* Integer_8 */ {FALSE, Err_Res }, 01646 /* Real_4 */ {FALSE, Err_Res }, 01647 /* Real_8 */ {FALSE, Err_Res }, 01648 /* Real_16 */ {FALSE, Err_Res }, 01649 /* Complex_4 */ {FALSE, Err_Res }, 01650 /* Complex_8 */ {FALSE, Err_Res }, 01651 /* Complex_16 */ {FALSE, Err_Res }, 01652 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01653 /* Logical_1 */ {FALSE, Err_Res }, 01654 /* Logical_2 */ {FALSE, Err_Res }, 01655 /* Logical_4 */ {FALSE, Err_Res }, 01656 /* Logical_8 */ {FALSE, Err_Res }, 01657 /* Character_1 */ {FALSE, Err_Res }, 01658 /* Character_2 */ {FALSE, Err_Res }, 01659 /* Character_4 */ {FALSE, Err_Res }, 01660 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01661 /* Structure_Type */ {FALSE, Err_Res }, 01662 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01663 }, 01664 /* Character_1 */ { 01665 /* Err_Res */ {FALSE, Err_Res }, 01666 /* Short_Char_Const */ {FALSE, Err_Res }, 01667 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01668 /* Typeless_1 */ {FALSE, Err_Res }, 01669 /* Typeless_2 */ {FALSE, Err_Res }, 01670 /* Typeless_4 */ {FALSE, Err_Res }, 01671 /* Typeless_8 */ {FALSE, Err_Res }, 01672 /* Long_Typeless */ {FALSE, Err_Res }, 01673 /* Integer_1 */ {FALSE, Err_Res }, 01674 /* Integer_2 */ {FALSE, Err_Res }, 01675 /* Integer_4 */ {FALSE, Err_Res }, 01676 /* Integer_8 */ {FALSE, Err_Res }, 01677 /* Real_4 */ {FALSE, Err_Res }, 01678 /* Real_8 */ {FALSE, Err_Res }, 01679 /* Real_16 */ {FALSE, Err_Res }, 01680 /* Complex_4 */ {FALSE, Err_Res }, 01681 /* Complex_8 */ {FALSE, Err_Res }, 01682 /* Complex_16 */ {FALSE, Err_Res }, 01683 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01684 /* Logical_1 */ {FALSE, Err_Res }, 01685 /* Logical_2 */ {FALSE, Err_Res }, 01686 /* Logical_4 */ {FALSE, Err_Res }, 01687 /* Logical_8 */ {FALSE, Err_Res }, 01688 /* Character_1 */ {FALSE, Err_Res }, 01689 /* Character_2 */ {FALSE, Err_Res }, 01690 /* Character_4 */ {FALSE, Err_Res }, 01691 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01692 /* Structure_Type */ {FALSE, Err_Res }, 01693 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01694 }, 01695 /* Character_2 */ { 01696 /* Err_Res */ {FALSE, Err_Res }, 01697 /* Short_Char_Const */ {FALSE, Err_Res }, 01698 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01699 /* Typeless_1 */ {FALSE, Err_Res }, 01700 /* Typeless_2 */ {FALSE, Err_Res }, 01701 /* Typeless_4 */ {FALSE, Err_Res }, 01702 /* Typeless_8 */ {FALSE, Err_Res }, 01703 /* Long_Typeless */ {FALSE, Err_Res }, 01704 /* Integer_1 */ {FALSE, Err_Res }, 01705 /* Integer_2 */ {FALSE, Err_Res }, 01706 /* Integer_4 */ {FALSE, Err_Res }, 01707 /* Integer_8 */ {FALSE, Err_Res }, 01708 /* Real_4 */ {FALSE, Err_Res }, 01709 /* Real_8 */ {FALSE, Err_Res }, 01710 /* Real_16 */ {FALSE, Err_Res }, 01711 /* Complex_4 */ {FALSE, Err_Res }, 01712 /* Complex_8 */ {FALSE, Err_Res }, 01713 /* Complex_16 */ {FALSE, Err_Res }, 01714 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01715 /* Logical_1 */ {FALSE, Err_Res }, 01716 /* Logical_2 */ {FALSE, Err_Res }, 01717 /* Logical_4 */ {FALSE, Err_Res }, 01718 /* Logical_8 */ {FALSE, Err_Res }, 01719 /* Character_1 */ {FALSE, Err_Res }, 01720 /* Character_2 */ {FALSE, Err_Res }, 01721 /* Character_4 */ {FALSE, Err_Res }, 01722 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01723 /* Structure_Type */ {FALSE, Err_Res }, 01724 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01725 }, 01726 /* Character_4 */ { 01727 /* Err_Res */ {FALSE, Err_Res }, 01728 /* Short_Char_Const */ {FALSE, Err_Res }, 01729 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01730 /* Typeless_1 */ {FALSE, Err_Res }, 01731 /* Typeless_2 */ {FALSE, Err_Res }, 01732 /* Typeless_4 */ {FALSE, Err_Res }, 01733 /* Typeless_8 */ {FALSE, Err_Res }, 01734 /* Long_Typeless */ {FALSE, Err_Res }, 01735 /* Integer_1 */ {FALSE, Err_Res }, 01736 /* Integer_2 */ {FALSE, Err_Res }, 01737 /* Integer_4 */ {FALSE, Err_Res }, 01738 /* Integer_8 */ {FALSE, Err_Res }, 01739 /* Real_4 */ {FALSE, Err_Res }, 01740 /* Real_8 */ {FALSE, Err_Res }, 01741 /* Real_16 */ {FALSE, Err_Res }, 01742 /* Complex_4 */ {FALSE, Err_Res }, 01743 /* Complex_8 */ {FALSE, Err_Res }, 01744 /* Complex_16 */ {FALSE, Err_Res }, 01745 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01746 /* Logical_1 */ {FALSE, Err_Res }, 01747 /* Logical_2 */ {FALSE, Err_Res }, 01748 /* Logical_4 */ {FALSE, Err_Res }, 01749 /* Logical_8 */ {FALSE, Err_Res }, 01750 /* Character_1 */ {FALSE, Err_Res }, 01751 /* Character_2 */ {FALSE, Err_Res }, 01752 /* Character_4 */ {FALSE, Err_Res }, 01753 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01754 /* Structure_Type */ {FALSE, Err_Res }, 01755 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01756 }, 01757 /* CRI_Ch_Ptr_8 */ { 01758 /* Err_Res */ {FALSE, Err_Res }, 01759 /* Short_Char_Const */ {FALSE, Err_Res }, 01760 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01761 /* Typeless_1 */ {FALSE, Err_Res }, 01762 /* Typeless_2 */ {FALSE, Err_Res }, 01763 /* Typeless_4 */ {FALSE, Err_Res }, 01764 /* Typeless_8 */ {FALSE, Err_Res }, 01765 /* Long_Typeless */ {FALSE, Err_Res }, 01766 /* Integer_1 */ {TRUE , CRI_Ch_Ptr_8 }, 01767 /* Integer_2 */ {TRUE , CRI_Ch_Ptr_8 }, 01768 /* Integer_4 */ {TRUE , CRI_Ch_Ptr_8 }, 01769 /* Integer_8 */ {TRUE , CRI_Ch_Ptr_8 }, 01770 /* Real_4 */ {FALSE, Err_Res }, 01771 /* Real_8 */ {FALSE, Err_Res }, 01772 /* Real_16 */ {FALSE, Err_Res }, 01773 /* Complex_4 */ {FALSE, Err_Res }, 01774 /* Complex_8 */ {FALSE, Err_Res }, 01775 /* Complex_16 */ {FALSE, Err_Res }, 01776 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01777 /* Logical_1 */ {FALSE, Err_Res }, 01778 /* Logical_2 */ {FALSE, Err_Res }, 01779 /* Logical_4 */ {FALSE, Err_Res }, 01780 /* Logical_8 */ {FALSE, Err_Res }, 01781 /* Character_1 */ {FALSE, Err_Res }, 01782 /* Character_2 */ {FALSE, Err_Res }, 01783 /* Character_4 */ {FALSE, Err_Res }, 01784 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01785 /* Structure_Type */ {FALSE, Err_Res }, 01786 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01787 }, 01788 /* Structure_Type */ { 01789 /* Err_Res */ {FALSE, Err_Res }, 01790 /* Short_Char_Const */ {FALSE, Err_Res }, 01791 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01792 /* Typeless_1 */ {FALSE, Err_Res }, 01793 /* Typeless_2 */ {FALSE, Err_Res }, 01794 /* Typeless_4 */ {FALSE, Err_Res }, 01795 /* Typeless_8 */ {FALSE, Err_Res }, 01796 /* Long_Typeless */ {FALSE, Err_Res }, 01797 /* Integer_1 */ {FALSE, Err_Res }, 01798 /* Integer_2 */ {FALSE, Err_Res }, 01799 /* Integer_4 */ {FALSE, Err_Res }, 01800 /* Integer_8 */ {FALSE, Err_Res }, 01801 /* Real_4 */ {FALSE, Err_Res }, 01802 /* Real_8 */ {FALSE, Err_Res }, 01803 /* Real_16 */ {FALSE, Err_Res }, 01804 /* Complex_4 */ {FALSE, Err_Res }, 01805 /* Complex_8 */ {FALSE, Err_Res }, 01806 /* Complex_16 */ {FALSE, Err_Res }, 01807 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01808 /* Logical_1 */ {FALSE, Err_Res }, 01809 /* Logical_2 */ {FALSE, Err_Res }, 01810 /* Logical_4 */ {FALSE, Err_Res }, 01811 /* Logical_8 */ {FALSE, Err_Res }, 01812 /* Character_1 */ {FALSE, Err_Res }, 01813 /* Character_2 */ {FALSE, Err_Res }, 01814 /* Character_4 */ {FALSE, Err_Res }, 01815 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01816 /* Structure_Type */ {FALSE, Err_Res }, 01817 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01818 }, 01819 /* CRI_Parcel_Ptr_8 */ { 01820 /* Err_Res */ {FALSE, Err_Res }, 01821 /* Short_Char_Const */ {TRUE , INT_WORD }, 01822 /* Short_Typeless_Const */ {TRUE , INT_WORD }, 01823 /* Typeless_1 */ {TRUE , INT_WORD }, 01824 /* Typeless_2 */ {TRUE , INT_WORD }, 01825 /* Typeless_4 */ {TRUE , INT_WORD }, 01826 /* Typeless_8 */ {TRUE , INT_WORD }, 01827 /* Long_Typeless */ {FALSE, Err_Res }, 01828 /* Integer_1 */ {TRUE , INT_WORD }, 01829 /* Integer_2 */ {TRUE , INT_WORD }, 01830 /* Integer_4 */ {TRUE , INT_WORD }, 01831 /* Integer_8 */ {TRUE , INT_WORD }, 01832 /* Real_4 */ {FALSE, Err_Res }, 01833 /* Real_8 */ {FALSE, Err_Res }, 01834 /* Real_16 */ {FALSE, Err_Res }, 01835 /* Complex_4 */ {FALSE, Err_Res }, 01836 /* Complex_8 */ {FALSE, Err_Res }, 01837 /* Complex_16 */ {FALSE, Err_Res }, 01838 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 01839 /* Logical_1 */ {FALSE, Err_Res }, 01840 /* Logical_2 */ {FALSE, Err_Res }, 01841 /* Logical_4 */ {FALSE, Err_Res }, 01842 /* Logical_8 */ {FALSE, Err_Res }, 01843 /* Character_1 */ {FALSE, Err_Res }, 01844 /* Character_2 */ {FALSE, Err_Res }, 01845 /* Character_4 */ {FALSE, Err_Res }, 01846 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01847 /* Structure_Type */ {FALSE, Err_Res }, 01848 /* CRI_Parcel_Ptr_8 */ {TRUE , INT_WORD } 01849 } 01850 }; 01851 01852 01853 exp_tbl_type mult_div_tbl[Num_Linear_Types][Num_Linear_Types] = { 01854 /* Err_Res */ { 01855 /* Err_Res */ {FALSE, Err_Res }, 01856 /* Short_Char_Const */ {FALSE, Err_Res }, 01857 /* Short_Typeless_Const */ {FALSE, Err_Res }, 01858 /* Typeless_1 */ {FALSE, Err_Res }, 01859 /* Typeless_2 */ {FALSE, Err_Res }, 01860 /* Typeless_4 */ {FALSE, Err_Res }, 01861 /* Typeless_8 */ {FALSE, Err_Res }, 01862 /* Long_Typeless */ {FALSE, Err_Res }, 01863 /* Integer_1 */ {FALSE, Err_Res }, 01864 /* Integer_2 */ {FALSE, Err_Res }, 01865 /* Integer_4 */ {FALSE, Err_Res }, 01866 /* Integer_8 */ {FALSE, Err_Res }, 01867 /* Real_4 */ {FALSE, Err_Res }, 01868 /* Real_8 */ {FALSE, Err_Res }, 01869 /* Real_16 */ {FALSE, Err_Res }, 01870 /* Complex_4 */ {FALSE, Err_Res }, 01871 /* Complex_8 */ {FALSE, Err_Res }, 01872 /* Complex_16 */ {FALSE, Err_Res }, 01873 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01874 /* Logical_1 */ {FALSE, Err_Res }, 01875 /* Logical_2 */ {FALSE, Err_Res }, 01876 /* Logical_4 */ {FALSE, Err_Res }, 01877 /* Logical_8 */ {FALSE, Err_Res }, 01878 /* Character_1 */ {FALSE, Err_Res }, 01879 /* Character_2 */ {FALSE, Err_Res }, 01880 /* Character_4 */ {FALSE, Err_Res }, 01881 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01882 /* Structure_Type */ {FALSE, Err_Res }, 01883 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01884 }, 01885 /* Short_Char_Const */ { 01886 /* Err_Res */ {FALSE, Err_Res }, 01887 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 01888 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 01889 /* Typeless_1 */ {TRUE , Typeless_1 }, 01890 /* Typeless_2 */ {TRUE , Typeless_2 }, 01891 /* Typeless_4 */ {TRUE , Typeless_4 }, 01892 /* Typeless_8 */ {TRUE , Typeless_8 }, 01893 /* Long_Typeless */ {FALSE, Err_Res }, 01894 /* Integer_1 */ {TRUE , Integer_1 }, 01895 /* Integer_2 */ {TRUE , Integer_2 }, 01896 /* Integer_4 */ {TRUE , Integer_4 }, 01897 /* Integer_8 */ {TRUE , Integer_8 }, 01898 /* Real_4 */ {TRUE , Real_4 }, 01899 /* Real_8 */ {TRUE , Real_8 }, 01900 /* Real_16 */ {TRUE , Real_16 }, 01901 /* Complex_4 */ {TRUE , Complex_4 }, 01902 /* Complex_8 */ {TRUE , Complex_8 }, 01903 /* Complex_16 */ {TRUE , Complex_16 }, 01904 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01905 /* Logical_1 */ {FALSE, Err_Res }, 01906 /* Logical_2 */ {FALSE, Err_Res }, 01907 /* Logical_4 */ {FALSE, Err_Res }, 01908 /* Logical_8 */ {FALSE, Err_Res }, 01909 /* Character_1 */ {FALSE, Err_Res }, 01910 /* Character_2 */ {FALSE, Err_Res }, 01911 /* Character_4 */ {FALSE, Err_Res }, 01912 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01913 /* Structure_Type */ {FALSE, Err_Res }, 01914 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01915 }, 01916 /* Short_Typeless_Const */ { 01917 /* Err_Res */ {FALSE, Err_Res }, 01918 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 01919 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 01920 /* Typeless_1 */ {TRUE , Typeless_1 }, 01921 /* Typeless_2 */ {TRUE , Typeless_2 }, 01922 /* Typeless_4 */ {TRUE , Typeless_4 }, 01923 /* Typeless_8 */ {TRUE , Typeless_8 }, 01924 /* Long_Typeless */ {FALSE, Err_Res }, 01925 /* Integer_1 */ {TRUE , Integer_1 }, 01926 /* Integer_2 */ {TRUE , Integer_2 }, 01927 /* Integer_4 */ {TRUE , Integer_4 }, 01928 /* Integer_8 */ {TRUE , Integer_8 }, 01929 /* Real_4 */ {TRUE , Real_4 }, 01930 /* Real_8 */ {TRUE , Real_8 }, 01931 /* Real_16 */ {TRUE , Real_16 }, 01932 /* Complex_4 */ {TRUE , Complex_4 }, 01933 /* Complex_8 */ {TRUE , Complex_8 }, 01934 /* Complex_16 */ {TRUE , Complex_16 }, 01935 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01936 /* Logical_1 */ {FALSE, Err_Res }, 01937 /* Logical_2 */ {FALSE, Err_Res }, 01938 /* Logical_4 */ {FALSE, Err_Res }, 01939 /* Logical_8 */ {FALSE, Err_Res }, 01940 /* Character_1 */ {FALSE, Err_Res }, 01941 /* Character_2 */ {FALSE, Err_Res }, 01942 /* Character_4 */ {FALSE, Err_Res }, 01943 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01944 /* Structure_Type */ {FALSE, Err_Res }, 01945 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01946 }, 01947 /* Typeless_1 */ { 01948 /* Err_Res */ {FALSE, Err_Res }, 01949 /* Short_Char_Const */ {TRUE , Typeless_1 }, 01950 /* Short_Typeless_Const */ {TRUE , Typeless_1 }, 01951 /* Typeless_1 */ {TRUE , Typeless_1 }, 01952 /* Typeless_2 */ {TRUE , Typeless_2 }, 01953 /* Typeless_4 */ {TRUE , Typeless_4 }, 01954 /* Typeless_8 */ {TRUE , Typeless_8 }, 01955 /* Long_Typeless */ {FALSE, Err_Res }, 01956 /* Integer_1 */ {TRUE , Integer_1 }, 01957 /* Integer_2 */ {TRUE , Integer_2 }, 01958 /* Integer_4 */ {TRUE , Integer_4 }, 01959 /* Integer_8 */ {TRUE , Integer_8 }, 01960 /* Real_4 */ {FALSE, Err_Res }, 01961 /* Real_8 */ {FALSE, Err_Res }, 01962 /* Real_16 */ {FALSE, Err_Res }, 01963 /* Complex_4 */ {FALSE, Err_Res }, 01964 /* Complex_8 */ {FALSE, Err_Res }, 01965 /* Complex_16 */ {FALSE, Err_Res }, 01966 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01967 /* Logical_1 */ {FALSE, Err_Res }, 01968 /* Logical_2 */ {FALSE, Err_Res }, 01969 /* Logical_4 */ {FALSE, Err_Res }, 01970 /* Logical_8 */ {FALSE, Err_Res }, 01971 /* Character_1 */ {FALSE, Err_Res }, 01972 /* Character_2 */ {FALSE, Err_Res }, 01973 /* Character_4 */ {FALSE, Err_Res }, 01974 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 01975 /* Structure_Type */ {FALSE, Err_Res }, 01976 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 01977 }, 01978 /* Typeless_2 */ { 01979 /* Err_Res */ {FALSE, Err_Res }, 01980 /* Short_Char_Const */ {TRUE , Typeless_2 }, 01981 /* Short_Typeless_Const */ {TRUE , Typeless_2 }, 01982 /* Typeless_1 */ {TRUE , Typeless_2 }, 01983 /* Typeless_2 */ {TRUE , Typeless_2 }, 01984 /* Typeless_4 */ {TRUE , Typeless_4 }, 01985 /* Typeless_8 */ {TRUE , Typeless_8 }, 01986 /* Long_Typeless */ {FALSE, Err_Res }, 01987 /* Integer_1 */ {TRUE , Integer_1 }, 01988 /* Integer_2 */ {TRUE , Integer_2 }, 01989 /* Integer_4 */ {TRUE , Integer_4 }, 01990 /* Integer_8 */ {TRUE , Integer_8 }, 01991 /* Real_4 */ {FALSE, Err_Res }, 01992 /* Real_8 */ {FALSE, Err_Res }, 01993 /* Real_16 */ {FALSE, Err_Res }, 01994 /* Complex_4 */ {FALSE, Err_Res }, 01995 /* Complex_8 */ {FALSE, Err_Res }, 01996 /* Complex_16 */ {FALSE, Err_Res }, 01997 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 01998 /* Logical_1 */ {FALSE, Err_Res }, 01999 /* Logical_2 */ {FALSE, Err_Res }, 02000 /* Logical_4 */ {FALSE, Err_Res }, 02001 /* Logical_8 */ {FALSE, Err_Res }, 02002 /* Character_1 */ {FALSE, Err_Res }, 02003 /* Character_2 */ {FALSE, Err_Res }, 02004 /* Character_4 */ {FALSE, Err_Res }, 02005 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02006 /* Structure_Type */ {FALSE, Err_Res }, 02007 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02008 }, 02009 /* Typeless_4 */ { 02010 /* Err_Res */ {FALSE, Err_Res }, 02011 /* Short_Char_Const */ {TRUE , Typeless_4 }, 02012 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 02013 /* Typeless_1 */ {TRUE , Typeless_4 }, 02014 /* Typeless_2 */ {TRUE , Typeless_4 }, 02015 /* Typeless_4 */ {TRUE , Typeless_4 }, 02016 /* Typeless_8 */ {TRUE , Typeless_8 }, 02017 /* Long_Typeless */ {FALSE, Err_Res }, 02018 /* Integer_1 */ {TRUE , Integer_1 }, 02019 /* Integer_2 */ {TRUE , Integer_2 }, 02020 /* Integer_4 */ {TRUE , Integer_4 }, 02021 /* Integer_8 */ {TRUE , Integer_8 }, 02022 /* Real_4 */ {TRUE , Real_4 }, 02023 /* Real_8 */ {FALSE, Err_Res }, 02024 /* Real_16 */ {FALSE, Err_Res }, 02025 /* Complex_4 */ {FALSE, Err_Res }, 02026 /* Complex_8 */ {FALSE, Err_Res }, 02027 /* Complex_16 */ {FALSE, Err_Res }, 02028 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02029 /* Logical_1 */ {FALSE, Err_Res }, 02030 /* Logical_2 */ {FALSE, Err_Res }, 02031 /* Logical_4 */ {FALSE, Err_Res }, 02032 /* Logical_8 */ {FALSE, Err_Res }, 02033 /* Character_1 */ {FALSE, Err_Res }, 02034 /* Character_2 */ {FALSE, Err_Res }, 02035 /* Character_4 */ {FALSE, Err_Res }, 02036 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02037 /* Structure_Type */ {FALSE, Err_Res }, 02038 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02039 }, 02040 /* Typeless_8 */ { 02041 /* Err_Res */ {FALSE, Err_Res }, 02042 /* Short_Char_Const */ {TRUE , Typeless_8 }, 02043 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 02044 /* Typeless_1 */ {TRUE , Typeless_8 }, 02045 /* Typeless_2 */ {TRUE , Typeless_8 }, 02046 /* Typeless_4 */ {TRUE , Typeless_8 }, 02047 /* Typeless_8 */ {TRUE , Typeless_8 }, 02048 /* Long_Typeless */ {FALSE, Err_Res }, 02049 /* Integer_1 */ {TRUE , Integer_1 }, 02050 /* Integer_2 */ {TRUE , Integer_2 }, 02051 /* Integer_4 */ {TRUE , Integer_4 }, 02052 /* Integer_8 */ {TRUE , Integer_8 }, 02053 /* Real_4 */ {TRUE , Real_4 }, 02054 /* Real_8 */ {TRUE , Real_8 }, 02055 /* Real_16 */ {FALSE, Err_Res }, 02056 /* Complex_4 */ {FALSE, Err_Res }, 02057 /* Complex_8 */ {FALSE, Err_Res }, 02058 /* Complex_16 */ {FALSE, Err_Res }, 02059 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02060 /* Logical_1 */ {FALSE, Err_Res }, 02061 /* Logical_2 */ {FALSE, Err_Res }, 02062 /* Logical_4 */ {FALSE, Err_Res }, 02063 /* Logical_8 */ {FALSE, Err_Res }, 02064 /* Character_1 */ {FALSE, Err_Res }, 02065 /* Character_2 */ {FALSE, Err_Res }, 02066 /* Character_4 */ {FALSE, Err_Res }, 02067 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02068 /* Structure_Type */ {FALSE, Err_Res }, 02069 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02070 }, 02071 /* Long_Typeless */ { 02072 /* Err_Res */ {FALSE, Err_Res }, 02073 /* Short_Char_Const */ {FALSE, Err_Res }, 02074 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02075 /* Typeless_1 */ {FALSE, Err_Res }, 02076 /* Typeless_2 */ {FALSE, Err_Res }, 02077 /* Typeless_4 */ {FALSE, Err_Res }, 02078 /* Typeless_8 */ {FALSE, Err_Res }, 02079 /* Long_Typeless */ {FALSE, Err_Res }, 02080 /* Integer_1 */ {FALSE, Err_Res }, 02081 /* Integer_2 */ {FALSE, Err_Res }, 02082 /* Integer_4 */ {FALSE, Err_Res }, 02083 /* Integer_8 */ {FALSE, Err_Res }, 02084 /* Real_4 */ {FALSE, Err_Res }, 02085 /* Real_8 */ {FALSE, Err_Res }, 02086 /* Real_16 */ {FALSE, Err_Res }, 02087 /* Complex_4 */ {FALSE, Err_Res }, 02088 /* Complex_8 */ {FALSE, Err_Res }, 02089 /* Complex_16 */ {FALSE, Err_Res }, 02090 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02091 /* Logical_1 */ {FALSE, Err_Res }, 02092 /* Logical_2 */ {FALSE, Err_Res }, 02093 /* Logical_4 */ {FALSE, Err_Res }, 02094 /* Logical_8 */ {FALSE, Err_Res }, 02095 /* Character_1 */ {FALSE, Err_Res }, 02096 /* Character_2 */ {FALSE, Err_Res }, 02097 /* Character_4 */ {FALSE, Err_Res }, 02098 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02099 /* Structure_Type */ {FALSE, Err_Res }, 02100 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02101 }, 02102 /* Integer_1 */ { 02103 /* Err_Res */ {FALSE, Err_Res }, 02104 /* Short_Char_Const */ {TRUE , Integer_1 }, 02105 /* Short_Typeless_Const */ {TRUE , Integer_1 }, 02106 /* Typeless_1 */ {TRUE , Integer_1 }, 02107 /* Typeless_2 */ {TRUE , Integer_1 }, 02108 /* Typeless_4 */ {TRUE , Integer_1 }, 02109 /* Typeless_8 */ {TRUE , Integer_1 }, 02110 /* Long_Typeless */ {FALSE, Err_Res }, 02111 /* Integer_1 */ {FALSE, Integer_1 }, 02112 /* Integer_2 */ {FALSE, Integer_2 }, 02113 /* Integer_4 */ {FALSE, Integer_4 }, 02114 /* Integer_8 */ {FALSE, Integer_8 }, 02115 /* Real_4 */ {FALSE, Real_4 }, 02116 /* Real_8 */ {FALSE, Real_8 }, 02117 /* Real_16 */ {FALSE, Real_16 }, 02118 /* Complex_4 */ {FALSE, Complex_4 }, 02119 /* Complex_8 */ {FALSE, Complex_8 }, 02120 /* Complex_16 */ {FALSE, Complex_16 }, 02121 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02122 /* Logical_1 */ {FALSE, Err_Res }, 02123 /* Logical_2 */ {FALSE, Err_Res }, 02124 /* Logical_4 */ {FALSE, Err_Res }, 02125 /* Logical_8 */ {FALSE, Err_Res }, 02126 /* Character_1 */ {FALSE, Err_Res }, 02127 /* Character_2 */ {FALSE, Err_Res }, 02128 /* Character_4 */ {FALSE, Err_Res }, 02129 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02130 /* Structure_Type */ {FALSE, Err_Res }, 02131 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02132 }, 02133 /* Integer_2 */ { 02134 /* Err_Res */ {FALSE, Err_Res }, 02135 /* Short_Char_Const */ {TRUE , Integer_2 }, 02136 /* Short_Typeless_Const */ {TRUE , Integer_2 }, 02137 /* Typeless_1 */ {TRUE , Integer_2 }, 02138 /* Typeless_2 */ {TRUE , Integer_2 }, 02139 /* Typeless_4 */ {TRUE , Integer_2 }, 02140 /* Typeless_8 */ {TRUE , Integer_2 }, 02141 /* Long_Typeless */ {FALSE, Err_Res }, 02142 /* Integer_1 */ {FALSE, Integer_2 }, 02143 /* Integer_2 */ {FALSE, Integer_2 }, 02144 /* Integer_4 */ {FALSE, Integer_4 }, 02145 /* Integer_8 */ {FALSE, Integer_8 }, 02146 /* Real_4 */ {FALSE, Real_4 }, 02147 /* Real_8 */ {FALSE, Real_8 }, 02148 /* Real_16 */ {FALSE, Real_16 }, 02149 /* Complex_4 */ {FALSE, Complex_4 }, 02150 /* Complex_8 */ {FALSE, Complex_8 }, 02151 /* Complex_16 */ {FALSE, Complex_16 }, 02152 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02153 /* Logical_1 */ {FALSE, Err_Res }, 02154 /* Logical_2 */ {FALSE, Err_Res }, 02155 /* Logical_4 */ {FALSE, Err_Res }, 02156 /* Logical_8 */ {FALSE, Err_Res }, 02157 /* Character_1 */ {FALSE, Err_Res }, 02158 /* Character_2 */ {FALSE, Err_Res }, 02159 /* Character_4 */ {FALSE, Err_Res }, 02160 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02161 /* Structure_Type */ {FALSE, Err_Res }, 02162 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02163 }, 02164 /* Integer_4 */ { 02165 /* Err_Res */ {FALSE, Err_Res }, 02166 /* Short_Char_Const */ {TRUE , Integer_4 }, 02167 /* Short_Typeless_Const */ {TRUE , Integer_4 }, 02168 /* Typeless_1 */ {TRUE , Integer_4 }, 02169 /* Typeless_2 */ {TRUE , Integer_4 }, 02170 /* Typeless_4 */ {TRUE , Integer_4 }, 02171 /* Typeless_8 */ {TRUE , Integer_4 }, 02172 /* Long_Typeless */ {FALSE, Err_Res }, 02173 /* Integer_1 */ {FALSE, Integer_4 }, 02174 /* Integer_2 */ {FALSE, Integer_4 }, 02175 /* Integer_4 */ {FALSE, Integer_4 }, 02176 /* Integer_8 */ {FALSE, Integer_8 }, 02177 /* Real_4 */ {FALSE, Real_4 }, 02178 /* Real_8 */ {FALSE, Real_8 }, 02179 /* Real_16 */ {FALSE, Real_16 }, 02180 /* Complex_4 */ {FALSE, Complex_4 }, 02181 /* Complex_8 */ {FALSE, Complex_8 }, 02182 /* Complex_16 */ {FALSE, Complex_16 }, 02183 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02184 /* Logical_1 */ {FALSE, Err_Res }, 02185 /* Logical_2 */ {FALSE, Err_Res }, 02186 /* Logical_4 */ {FALSE, Err_Res }, 02187 /* Logical_8 */ {FALSE, Err_Res }, 02188 /* Character_1 */ {FALSE, Err_Res }, 02189 /* Character_2 */ {FALSE, Err_Res }, 02190 /* Character_4 */ {FALSE, Err_Res }, 02191 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02192 /* Structure_Type */ {FALSE, Err_Res }, 02193 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02194 }, 02195 /* Integer_8 */ { 02196 /* Err_Res */ {FALSE, Err_Res }, 02197 /* Short_Char_Const */ {TRUE , Integer_8 }, 02198 /* Short_Typeless_Const */ {TRUE , Integer_8 }, 02199 /* Typeless_1 */ {TRUE , Integer_8 }, 02200 /* Typeless_2 */ {TRUE , Integer_8 }, 02201 /* Typeless_4 */ {TRUE , Integer_8 }, 02202 /* Typeless_8 */ {TRUE , Integer_8 }, 02203 /* Long_Typeless */ {FALSE, Err_Res }, 02204 /* Integer_1 */ {FALSE, Integer_8 }, 02205 /* Integer_2 */ {FALSE, Integer_8 }, 02206 /* Integer_4 */ {FALSE, Integer_8 }, 02207 /* Integer_8 */ {FALSE, Integer_8 }, 02208 /* Real_4 */ {FALSE, Real_4 }, 02209 /* Real_8 */ {FALSE, Real_8 }, 02210 /* Real_16 */ {FALSE, Real_16 }, 02211 /* Complex_4 */ {FALSE, Complex_4 }, 02212 /* Complex_8 */ {FALSE, Complex_8 }, 02213 /* Complex_16 */ {FALSE, Complex_16 }, 02214 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02215 /* Logical_1 */ {FALSE, Err_Res }, 02216 /* Logical_2 */ {FALSE, Err_Res }, 02217 /* Logical_4 */ {FALSE, Err_Res }, 02218 /* Logical_8 */ {FALSE, Err_Res }, 02219 /* Character_1 */ {FALSE, Err_Res }, 02220 /* Character_2 */ {FALSE, Err_Res }, 02221 /* Character_4 */ {FALSE, Err_Res }, 02222 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02223 /* Structure_Type */ {FALSE, Err_Res }, 02224 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02225 }, 02226 /* Real_4 */ { 02227 /* Err_Res */ {FALSE, Err_Res }, 02228 /* Short_Char_Const */ {TRUE , Real_4 }, 02229 /* Short_Typeless_Const */ {TRUE , Real_4 }, 02230 /* Typeless_1 */ {FALSE, Err_Res }, 02231 /* Typeless_2 */ {FALSE, Err_Res }, 02232 /* Typeless_4 */ {TRUE , Real_4 }, 02233 /* Typeless_8 */ {TRUE , Real_4 }, 02234 /* Long_Typeless */ {FALSE, Err_Res }, 02235 /* Integer_1 */ {FALSE, Real_4 }, 02236 /* Integer_2 */ {FALSE, Real_4 }, 02237 /* Integer_4 */ {FALSE, Real_4 }, 02238 /* Integer_8 */ {FALSE, Real_4 }, 02239 /* Real_4 */ {FALSE, Real_4 }, 02240 /* Real_8 */ {FALSE, Real_8 }, 02241 /* Real_16 */ {FALSE, Real_16 }, 02242 /* Complex_4 */ {FALSE, Complex_4 }, 02243 /* Complex_8 */ {FALSE, Complex_8 }, 02244 /* Complex_16 */ {FALSE, Complex_16 }, 02245 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02246 /* Logical_1 */ {FALSE, Err_Res }, 02247 /* Logical_2 */ {FALSE, Err_Res }, 02248 /* Logical_4 */ {FALSE, Err_Res }, 02249 /* Logical_8 */ {FALSE, Err_Res }, 02250 /* Character_1 */ {FALSE, Err_Res }, 02251 /* Character_2 */ {FALSE, Err_Res }, 02252 /* Character_4 */ {FALSE, Err_Res }, 02253 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02254 /* Structure_Type */ {FALSE, Err_Res }, 02255 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02256 }, 02257 /* Real_8 */ { 02258 /* Err_Res */ {FALSE, Err_Res }, 02259 /* Short_Char_Const */ {TRUE , Real_8 }, 02260 /* Short_Typeless_Const */ {TRUE , Real_8 }, 02261 /* Typeless_1 */ {FALSE, Err_Res }, 02262 /* Typeless_2 */ {FALSE, Err_Res }, 02263 /* Typeless_4 */ {FALSE, Err_Res }, 02264 /* Typeless_8 */ {TRUE , Real_8 }, 02265 /* Long_Typeless */ {FALSE, Err_Res }, 02266 /* Integer_1 */ {FALSE, Real_8 }, 02267 /* Integer_2 */ {FALSE, Real_8 }, 02268 /* Integer_4 */ {FALSE, Real_8 }, 02269 /* Integer_8 */ {FALSE, Real_8 }, 02270 /* Real_4 */ {FALSE, Real_8 }, 02271 /* Real_8 */ {FALSE, Real_8 }, 02272 /* Real_16 */ {FALSE, Real_16 }, 02273 /* Complex_4 */ {FALSE, Complex_8 }, 02274 /* Complex_8 */ {FALSE, Complex_8 }, 02275 /* Complex_16 */ {FALSE, Complex_16 }, 02276 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02277 /* Logical_1 */ {FALSE, Err_Res }, 02278 /* Logical_2 */ {FALSE, Err_Res }, 02279 /* Logical_4 */ {FALSE, Err_Res }, 02280 /* Logical_8 */ {FALSE, Err_Res }, 02281 /* Character_1 */ {FALSE, Err_Res }, 02282 /* Character_2 */ {FALSE, Err_Res }, 02283 /* Character_4 */ {FALSE, Err_Res }, 02284 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02285 /* Structure_Type */ {FALSE, Err_Res }, 02286 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02287 }, 02288 /* Real_16 */ { 02289 /* Err_Res */ {FALSE, Err_Res }, 02290 /* Short_Char_Const */ {TRUE , Real_16 }, 02291 /* Short_Typeless_Const */ {TRUE , Real_16 }, 02292 /* Typeless_1 */ {FALSE, Err_Res }, 02293 /* Typeless_2 */ {FALSE, Err_Res }, 02294 /* Typeless_4 */ {FALSE, Err_Res }, 02295 /* Typeless_8 */ {FALSE, Err_Res }, 02296 /* Long_Typeless */ {FALSE, Err_Res }, 02297 /* Integer_1 */ {FALSE, Real_16 }, 02298 /* Integer_2 */ {FALSE, Real_16 }, 02299 /* Integer_4 */ {FALSE, Real_16 }, 02300 /* Integer_8 */ {FALSE, Real_16 }, 02301 /* Real_4 */ {FALSE, Real_16 }, 02302 /* Real_8 */ {FALSE, Real_16 }, 02303 /* Real_16 */ {FALSE, Real_16 }, 02304 /* Complex_4 */ {FALSE, Complex_16 }, 02305 /* Complex_8 */ {FALSE, Complex_16 }, 02306 /* Complex_16 */ {FALSE, Complex_16 }, 02307 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02308 /* Logical_1 */ {FALSE, Err_Res }, 02309 /* Logical_2 */ {FALSE, Err_Res }, 02310 /* Logical_4 */ {FALSE, Err_Res }, 02311 /* Logical_8 */ {FALSE, Err_Res }, 02312 /* Character_1 */ {FALSE, Err_Res }, 02313 /* Character_2 */ {FALSE, Err_Res }, 02314 /* Character_4 */ {FALSE, Err_Res }, 02315 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02316 /* Structure_Type */ {FALSE, Err_Res }, 02317 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02318 }, 02319 /* Complex_4 */ { 02320 /* Err_Res */ {FALSE, Err_Res }, 02321 /* Short_Char_Const */ {TRUE , Complex_4 }, 02322 /* Short_Typeless_Const */ {TRUE , Complex_4 }, 02323 /* Typeless_1 */ {FALSE, Err_Res }, 02324 /* Typeless_2 */ {FALSE, Err_Res }, 02325 /* Typeless_4 */ {FALSE, Err_Res }, 02326 /* Typeless_8 */ {FALSE, Err_Res }, 02327 /* Long_Typeless */ {FALSE, Err_Res }, 02328 /* Integer_1 */ {FALSE, Complex_4 }, 02329 /* Integer_2 */ {FALSE, Complex_4 }, 02330 /* Integer_4 */ {FALSE, Complex_4 }, 02331 /* Integer_8 */ {FALSE, Complex_4 }, 02332 /* Real_4 */ {FALSE, Complex_4 }, 02333 /* Real_8 */ {FALSE, Complex_8 }, 02334 /* Real_16 */ {FALSE, Complex_16 }, 02335 /* Complex_4 */ {FALSE, Complex_4 }, 02336 /* Complex_8 */ {FALSE, Complex_8 }, 02337 /* Complex_16 */ {FALSE, Complex_16 }, 02338 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02339 /* Logical_1 */ {FALSE, Err_Res }, 02340 /* Logical_2 */ {FALSE, Err_Res }, 02341 /* Logical_4 */ {FALSE, Err_Res }, 02342 /* Logical_8 */ {FALSE, Err_Res }, 02343 /* Character_1 */ {FALSE, Err_Res }, 02344 /* Character_2 */ {FALSE, Err_Res }, 02345 /* Character_4 */ {FALSE, Err_Res }, 02346 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02347 /* Structure_Type */ {FALSE, Err_Res }, 02348 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02349 }, 02350 /* Complex_8 */ { 02351 /* Err_Res */ {FALSE, Err_Res }, 02352 /* Short_Char_Const */ {TRUE , Complex_8 }, 02353 /* Short_Typeless_Const */ {TRUE , Complex_8 }, 02354 /* Typeless_1 */ {FALSE, Err_Res }, 02355 /* Typeless_2 */ {FALSE, Err_Res }, 02356 /* Typeless_4 */ {FALSE, Err_Res }, 02357 /* Typeless_8 */ {FALSE, Err_Res }, 02358 /* Long_Typeless */ {FALSE, Err_Res }, 02359 /* Integer_1 */ {FALSE, Complex_8 }, 02360 /* Integer_2 */ {FALSE, Complex_8 }, 02361 /* Integer_4 */ {FALSE, Complex_8 }, 02362 /* Integer_8 */ {FALSE, Complex_8 }, 02363 /* Real_4 */ {FALSE, Complex_8 }, 02364 /* Real_8 */ {FALSE, Complex_8 }, 02365 /* Real_16 */ {FALSE, Complex_16 }, 02366 /* Complex_4 */ {FALSE, Complex_8 }, 02367 /* Complex_8 */ {FALSE, Complex_8 }, 02368 /* Complex_16 */ {FALSE, Complex_16 }, 02369 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02370 /* Logical_1 */ {FALSE, Err_Res }, 02371 /* Logical_2 */ {FALSE, Err_Res }, 02372 /* Logical_4 */ {FALSE, Err_Res }, 02373 /* Logical_8 */ {FALSE, Err_Res }, 02374 /* Character_1 */ {FALSE, Err_Res }, 02375 /* Character_2 */ {FALSE, Err_Res }, 02376 /* Character_4 */ {FALSE, Err_Res }, 02377 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02378 /* Structure_Type */ {FALSE, Err_Res }, 02379 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02380 }, 02381 /* Complex_16 */ { 02382 /* Err_Res */ {FALSE, Err_Res }, 02383 /* Short_Char_Const */ {TRUE , Complex_16 }, 02384 /* Short_Typeless_Const */ {TRUE , Complex_16 }, 02385 /* Typeless_1 */ {FALSE, Err_Res }, 02386 /* Typeless_2 */ {FALSE, Err_Res }, 02387 /* Typeless_4 */ {FALSE, Err_Res }, 02388 /* Typeless_8 */ {FALSE, Err_Res }, 02389 /* Long_Typeless */ {FALSE, Err_Res }, 02390 /* Integer_1 */ {FALSE, Complex_16 }, 02391 /* Integer_2 */ {FALSE, Complex_16 }, 02392 /* Integer_4 */ {FALSE, Complex_16 }, 02393 /* Integer_8 */ {FALSE, Complex_16 }, 02394 /* Real_4 */ {FALSE, Complex_16 }, 02395 /* Real_8 */ {FALSE, Complex_16 }, 02396 /* Real_16 */ {FALSE, Complex_16 }, 02397 /* Complex_4 */ {FALSE, Complex_16 }, 02398 /* Complex_8 */ {FALSE, Complex_16 }, 02399 /* Complex_16 */ {FALSE, Complex_16 }, 02400 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02401 /* Logical_1 */ {FALSE, Err_Res }, 02402 /* Logical_2 */ {FALSE, Err_Res }, 02403 /* Logical_4 */ {FALSE, Err_Res }, 02404 /* Logical_8 */ {FALSE, Err_Res }, 02405 /* Character_1 */ {FALSE, Err_Res }, 02406 /* Character_2 */ {FALSE, Err_Res }, 02407 /* Character_4 */ {FALSE, Err_Res }, 02408 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02409 /* Structure_Type */ {FALSE, Err_Res }, 02410 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02411 }, 02412 /* CRI_Ptr_8 */ { 02413 /* Err_Res */ {FALSE, Err_Res }, 02414 /* Short_Char_Const */ {FALSE, Err_Res }, 02415 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02416 /* Typeless_1 */ {FALSE, Err_Res }, 02417 /* Typeless_2 */ {FALSE, Err_Res }, 02418 /* Typeless_4 */ {FALSE, Err_Res }, 02419 /* Typeless_8 */ {FALSE, Err_Res }, 02420 /* Long_Typeless */ {FALSE, Err_Res }, 02421 /* Integer_1 */ {FALSE, Err_Res }, 02422 /* Integer_2 */ {FALSE, Err_Res }, 02423 /* Integer_4 */ {FALSE, Err_Res }, 02424 /* Integer_8 */ {FALSE, Err_Res }, 02425 /* Real_4 */ {FALSE, Err_Res }, 02426 /* Real_8 */ {FALSE, Err_Res }, 02427 /* Real_16 */ {FALSE, Err_Res }, 02428 /* Complex_4 */ {FALSE, Err_Res }, 02429 /* Complex_8 */ {FALSE, Err_Res }, 02430 /* Complex_16 */ {FALSE, Err_Res }, 02431 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02432 /* Logical_1 */ {FALSE, Err_Res }, 02433 /* Logical_2 */ {FALSE, Err_Res }, 02434 /* Logical_4 */ {FALSE, Err_Res }, 02435 /* Logical_8 */ {FALSE, Err_Res }, 02436 /* Character_1 */ {FALSE, Err_Res }, 02437 /* Character_2 */ {FALSE, Err_Res }, 02438 /* Character_4 */ {FALSE, Err_Res }, 02439 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02440 /* Structure_Type */ {FALSE, Err_Res }, 02441 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02442 }, 02443 /* Logical_1 */ { 02444 /* Err_Res */ {FALSE, Err_Res }, 02445 /* Short_Char_Const */ {FALSE, Err_Res }, 02446 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02447 /* Typeless_1 */ {FALSE, Err_Res }, 02448 /* Typeless_2 */ {FALSE, Err_Res }, 02449 /* Typeless_4 */ {FALSE, Err_Res }, 02450 /* Typeless_8 */ {FALSE, Err_Res }, 02451 /* Long_Typeless */ {FALSE, Err_Res }, 02452 /* Integer_1 */ {FALSE, Err_Res }, 02453 /* Integer_2 */ {FALSE, Err_Res }, 02454 /* Integer_4 */ {FALSE, Err_Res }, 02455 /* Integer_8 */ {FALSE, Err_Res }, 02456 /* Real_4 */ {FALSE, Err_Res }, 02457 /* Real_8 */ {FALSE, Err_Res }, 02458 /* Real_16 */ {FALSE, Err_Res }, 02459 /* Complex_4 */ {FALSE, Err_Res }, 02460 /* Complex_8 */ {FALSE, Err_Res }, 02461 /* Complex_16 */ {FALSE, Err_Res }, 02462 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02463 /* Logical_1 */ {FALSE, Err_Res }, 02464 /* Logical_2 */ {FALSE, Err_Res }, 02465 /* Logical_4 */ {FALSE, Err_Res }, 02466 /* Logical_8 */ {FALSE, Err_Res }, 02467 /* Character_1 */ {FALSE, Err_Res }, 02468 /* Character_2 */ {FALSE, Err_Res }, 02469 /* Character_4 */ {FALSE, Err_Res }, 02470 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02471 /* Structure_Type */ {FALSE, Err_Res }, 02472 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02473 }, 02474 /* Logical_2 */ { 02475 /* Err_Res */ {FALSE, Err_Res }, 02476 /* Short_Char_Const */ {FALSE, Err_Res }, 02477 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02478 /* Typeless_1 */ {FALSE, Err_Res }, 02479 /* Typeless_2 */ {FALSE, Err_Res }, 02480 /* Typeless_4 */ {FALSE, Err_Res }, 02481 /* Typeless_8 */ {FALSE, Err_Res }, 02482 /* Long_Typeless */ {FALSE, Err_Res }, 02483 /* Integer_1 */ {FALSE, Err_Res }, 02484 /* Integer_2 */ {FALSE, Err_Res }, 02485 /* Integer_4 */ {FALSE, Err_Res }, 02486 /* Integer_8 */ {FALSE, Err_Res }, 02487 /* Real_4 */ {FALSE, Err_Res }, 02488 /* Real_8 */ {FALSE, Err_Res }, 02489 /* Real_16 */ {FALSE, Err_Res }, 02490 /* Complex_4 */ {FALSE, Err_Res }, 02491 /* Complex_8 */ {FALSE, Err_Res }, 02492 /* Complex_16 */ {FALSE, Err_Res }, 02493 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02494 /* Logical_1 */ {FALSE, Err_Res }, 02495 /* Logical_2 */ {FALSE, Err_Res }, 02496 /* Logical_4 */ {FALSE, Err_Res }, 02497 /* Logical_8 */ {FALSE, Err_Res }, 02498 /* Character_1 */ {FALSE, Err_Res }, 02499 /* Character_2 */ {FALSE, Err_Res }, 02500 /* Character_4 */ {FALSE, Err_Res }, 02501 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02502 /* Structure_Type */ {FALSE, Err_Res }, 02503 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02504 }, 02505 /* Logical_4 */ { 02506 /* Err_Res */ {FALSE, Err_Res }, 02507 /* Short_Char_Const */ {FALSE, Err_Res }, 02508 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02509 /* Typeless_1 */ {FALSE, Err_Res }, 02510 /* Typeless_2 */ {FALSE, Err_Res }, 02511 /* Typeless_4 */ {FALSE, Err_Res }, 02512 /* Typeless_8 */ {FALSE, Err_Res }, 02513 /* Long_Typeless */ {FALSE, Err_Res }, 02514 /* Integer_1 */ {FALSE, Err_Res }, 02515 /* Integer_2 */ {FALSE, Err_Res }, 02516 /* Integer_4 */ {FALSE, Err_Res }, 02517 /* Integer_8 */ {FALSE, Err_Res }, 02518 /* Real_4 */ {FALSE, Err_Res }, 02519 /* Real_8 */ {FALSE, Err_Res }, 02520 /* Real_16 */ {FALSE, Err_Res }, 02521 /* Complex_4 */ {FALSE, Err_Res }, 02522 /* Complex_8 */ {FALSE, Err_Res }, 02523 /* Complex_16 */ {FALSE, Err_Res }, 02524 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02525 /* Logical_1 */ {FALSE, Err_Res }, 02526 /* Logical_2 */ {FALSE, Err_Res }, 02527 /* Logical_4 */ {FALSE, Err_Res }, 02528 /* Logical_8 */ {FALSE, Err_Res }, 02529 /* Character_1 */ {FALSE, Err_Res }, 02530 /* Character_2 */ {FALSE, Err_Res }, 02531 /* Character_4 */ {FALSE, Err_Res }, 02532 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02533 /* Structure_Type */ {FALSE, Err_Res }, 02534 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02535 }, 02536 /* Logical_8 */ { 02537 /* Err_Res */ {FALSE, Err_Res }, 02538 /* Short_Char_Const */ {FALSE, Err_Res }, 02539 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02540 /* Typeless_1 */ {FALSE, Err_Res }, 02541 /* Typeless_2 */ {FALSE, Err_Res }, 02542 /* Typeless_4 */ {FALSE, Err_Res }, 02543 /* Typeless_8 */ {FALSE, Err_Res }, 02544 /* Long_Typeless */ {FALSE, Err_Res }, 02545 /* Integer_1 */ {FALSE, Err_Res }, 02546 /* Integer_2 */ {FALSE, Err_Res }, 02547 /* Integer_4 */ {FALSE, Err_Res }, 02548 /* Integer_8 */ {FALSE, Err_Res }, 02549 /* Real_4 */ {FALSE, Err_Res }, 02550 /* Real_8 */ {FALSE, Err_Res }, 02551 /* Real_16 */ {FALSE, Err_Res }, 02552 /* Complex_4 */ {FALSE, Err_Res }, 02553 /* Complex_8 */ {FALSE, Err_Res }, 02554 /* Complex_16 */ {FALSE, Err_Res }, 02555 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02556 /* Logical_1 */ {FALSE, Err_Res }, 02557 /* Logical_2 */ {FALSE, Err_Res }, 02558 /* Logical_4 */ {FALSE, Err_Res }, 02559 /* Logical_8 */ {FALSE, Err_Res }, 02560 /* Character_1 */ {FALSE, Err_Res }, 02561 /* Character_2 */ {FALSE, Err_Res }, 02562 /* Character_4 */ {FALSE, Err_Res }, 02563 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02564 /* Structure_Type */ {FALSE, Err_Res }, 02565 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02566 }, 02567 /* Character_1 */ { 02568 /* Err_Res */ {FALSE, Err_Res }, 02569 /* Short_Char_Const */ {FALSE, Err_Res }, 02570 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02571 /* Typeless_1 */ {FALSE, Err_Res }, 02572 /* Typeless_2 */ {FALSE, Err_Res }, 02573 /* Typeless_4 */ {FALSE, Err_Res }, 02574 /* Typeless_8 */ {FALSE, Err_Res }, 02575 /* Long_Typeless */ {FALSE, Err_Res }, 02576 /* Integer_1 */ {FALSE, Err_Res }, 02577 /* Integer_2 */ {FALSE, Err_Res }, 02578 /* Integer_4 */ {FALSE, Err_Res }, 02579 /* Integer_8 */ {FALSE, Err_Res }, 02580 /* Real_4 */ {FALSE, Err_Res }, 02581 /* Real_8 */ {FALSE, Err_Res }, 02582 /* Real_16 */ {FALSE, Err_Res }, 02583 /* Complex_4 */ {FALSE, Err_Res }, 02584 /* Complex_8 */ {FALSE, Err_Res }, 02585 /* Complex_16 */ {FALSE, Err_Res }, 02586 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02587 /* Logical_1 */ {FALSE, Err_Res }, 02588 /* Logical_2 */ {FALSE, Err_Res }, 02589 /* Logical_4 */ {FALSE, Err_Res }, 02590 /* Logical_8 */ {FALSE, Err_Res }, 02591 /* Character_1 */ {FALSE, Err_Res }, 02592 /* Character_2 */ {FALSE, Err_Res }, 02593 /* Character_4 */ {FALSE, Err_Res }, 02594 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02595 /* Structure_Type */ {FALSE, Err_Res }, 02596 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02597 }, 02598 /* Character_2 */ { 02599 /* Err_Res */ {FALSE, Err_Res }, 02600 /* Short_Char_Const */ {FALSE, Err_Res }, 02601 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02602 /* Typeless_1 */ {FALSE, Err_Res }, 02603 /* Typeless_2 */ {FALSE, Err_Res }, 02604 /* Typeless_4 */ {FALSE, Err_Res }, 02605 /* Typeless_8 */ {FALSE, Err_Res }, 02606 /* Long_Typeless */ {FALSE, Err_Res }, 02607 /* Integer_1 */ {FALSE, Err_Res }, 02608 /* Integer_2 */ {FALSE, Err_Res }, 02609 /* Integer_4 */ {FALSE, Err_Res }, 02610 /* Integer_8 */ {FALSE, Err_Res }, 02611 /* Real_4 */ {FALSE, Err_Res }, 02612 /* Real_8 */ {FALSE, Err_Res }, 02613 /* Real_16 */ {FALSE, Err_Res }, 02614 /* Complex_4 */ {FALSE, Err_Res }, 02615 /* Complex_8 */ {FALSE, Err_Res }, 02616 /* Complex_16 */ {FALSE, Err_Res }, 02617 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02618 /* Logical_1 */ {FALSE, Err_Res }, 02619 /* Logical_2 */ {FALSE, Err_Res }, 02620 /* Logical_4 */ {FALSE, Err_Res }, 02621 /* Logical_8 */ {FALSE, Err_Res }, 02622 /* Character_1 */ {FALSE, Err_Res }, 02623 /* Character_2 */ {FALSE, Err_Res }, 02624 /* Character_4 */ {FALSE, Err_Res }, 02625 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02626 /* Structure_Type */ {FALSE, Err_Res }, 02627 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02628 }, 02629 /* Character_4 */ { 02630 /* Err_Res */ {FALSE, Err_Res }, 02631 /* Short_Char_Const */ {FALSE, Err_Res }, 02632 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02633 /* Typeless_1 */ {FALSE, Err_Res }, 02634 /* Typeless_2 */ {FALSE, Err_Res }, 02635 /* Typeless_4 */ {FALSE, Err_Res }, 02636 /* Typeless_8 */ {FALSE, Err_Res }, 02637 /* Long_Typeless */ {FALSE, Err_Res }, 02638 /* Integer_1 */ {FALSE, Err_Res }, 02639 /* Integer_2 */ {FALSE, Err_Res }, 02640 /* Integer_4 */ {FALSE, Err_Res }, 02641 /* Integer_8 */ {FALSE, Err_Res }, 02642 /* Real_4 */ {FALSE, Err_Res }, 02643 /* Real_8 */ {FALSE, Err_Res }, 02644 /* Real_16 */ {FALSE, Err_Res }, 02645 /* Complex_4 */ {FALSE, Err_Res }, 02646 /* Complex_8 */ {FALSE, Err_Res }, 02647 /* Complex_16 */ {FALSE, Err_Res }, 02648 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02649 /* Logical_1 */ {FALSE, Err_Res }, 02650 /* Logical_2 */ {FALSE, Err_Res }, 02651 /* Logical_4 */ {FALSE, Err_Res }, 02652 /* Logical_8 */ {FALSE, Err_Res }, 02653 /* Character_1 */ {FALSE, Err_Res }, 02654 /* Character_2 */ {FALSE, Err_Res }, 02655 /* Character_4 */ {FALSE, Err_Res }, 02656 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02657 /* Structure_Type */ {FALSE, Err_Res }, 02658 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02659 }, 02660 /* CRI_Ch_Ptr_8 */ { 02661 /* Err_Res */ {FALSE, Err_Res }, 02662 /* Short_Char_Const */ {FALSE, Err_Res }, 02663 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02664 /* Typeless_1 */ {FALSE, Err_Res }, 02665 /* Typeless_2 */ {FALSE, Err_Res }, 02666 /* Typeless_4 */ {FALSE, Err_Res }, 02667 /* Typeless_8 */ {FALSE, Err_Res }, 02668 /* Long_Typeless */ {FALSE, Err_Res }, 02669 /* Integer_1 */ {FALSE, Err_Res }, 02670 /* Integer_2 */ {FALSE, Err_Res }, 02671 /* Integer_4 */ {FALSE, Err_Res }, 02672 /* Integer_8 */ {FALSE, Err_Res }, 02673 /* Real_4 */ {FALSE, Err_Res }, 02674 /* Real_8 */ {FALSE, Err_Res }, 02675 /* Real_16 */ {FALSE, Err_Res }, 02676 /* Complex_4 */ {FALSE, Err_Res }, 02677 /* Complex_8 */ {FALSE, Err_Res }, 02678 /* Complex_16 */ {FALSE, Err_Res }, 02679 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02680 /* Logical_1 */ {FALSE, Err_Res }, 02681 /* Logical_2 */ {FALSE, Err_Res }, 02682 /* Logical_4 */ {FALSE, Err_Res }, 02683 /* Logical_8 */ {FALSE, Err_Res }, 02684 /* Character_1 */ {FALSE, Err_Res }, 02685 /* Character_2 */ {FALSE, Err_Res }, 02686 /* Character_4 */ {FALSE, Err_Res }, 02687 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02688 /* Structure_Type */ {FALSE, Err_Res }, 02689 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02690 }, 02691 /* Structure_Type */ { 02692 /* Err_Res */ {FALSE, Err_Res }, 02693 /* Short_Char_Const */ {FALSE, Err_Res }, 02694 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02695 /* Typeless_1 */ {FALSE, Err_Res }, 02696 /* Typeless_2 */ {FALSE, Err_Res }, 02697 /* Typeless_4 */ {FALSE, Err_Res }, 02698 /* Typeless_8 */ {FALSE, Err_Res }, 02699 /* Long_Typeless */ {FALSE, Err_Res }, 02700 /* Integer_1 */ {FALSE, Err_Res }, 02701 /* Integer_2 */ {FALSE, Err_Res }, 02702 /* Integer_4 */ {FALSE, Err_Res }, 02703 /* Integer_8 */ {FALSE, Err_Res }, 02704 /* Real_4 */ {FALSE, Err_Res }, 02705 /* Real_8 */ {FALSE, Err_Res }, 02706 /* Real_16 */ {FALSE, Err_Res }, 02707 /* Complex_4 */ {FALSE, Err_Res }, 02708 /* Complex_8 */ {FALSE, Err_Res }, 02709 /* Complex_16 */ {FALSE, Err_Res }, 02710 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02711 /* Logical_1 */ {FALSE, Err_Res }, 02712 /* Logical_2 */ {FALSE, Err_Res }, 02713 /* Logical_4 */ {FALSE, Err_Res }, 02714 /* Logical_8 */ {FALSE, Err_Res }, 02715 /* Character_1 */ {FALSE, Err_Res }, 02716 /* Character_2 */ {FALSE, Err_Res }, 02717 /* Character_4 */ {FALSE, Err_Res }, 02718 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02719 /* Structure_Type */ {FALSE, Err_Res }, 02720 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02721 }, 02722 /* CRI_Parcel_Ptr_8 */ { 02723 /* Err_Res */ {FALSE, Err_Res }, 02724 /* Short_Char_Const */ {FALSE, Err_Res }, 02725 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02726 /* Typeless_1 */ {FALSE, Err_Res }, 02727 /* Typeless_2 */ {FALSE, Err_Res }, 02728 /* Typeless_4 */ {FALSE, Err_Res }, 02729 /* Typeless_8 */ {FALSE, Err_Res }, 02730 /* Long_Typeless */ {FALSE, Err_Res }, 02731 /* Integer_1 */ {FALSE, Err_Res }, 02732 /* Integer_2 */ {FALSE, Err_Res }, 02733 /* Integer_4 */ {FALSE, Err_Res }, 02734 /* Integer_8 */ {FALSE, Err_Res }, 02735 /* Real_4 */ {FALSE, Err_Res }, 02736 /* Real_8 */ {FALSE, Err_Res }, 02737 /* Real_16 */ {FALSE, Err_Res }, 02738 /* Complex_4 */ {FALSE, Err_Res }, 02739 /* Complex_8 */ {FALSE, Err_Res }, 02740 /* Complex_16 */ {FALSE, Err_Res }, 02741 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02742 /* Logical_1 */ {FALSE, Err_Res }, 02743 /* Logical_2 */ {FALSE, Err_Res }, 02744 /* Logical_4 */ {FALSE, Err_Res }, 02745 /* Logical_8 */ {FALSE, Err_Res }, 02746 /* Character_1 */ {FALSE, Err_Res }, 02747 /* Character_2 */ {FALSE, Err_Res }, 02748 /* Character_4 */ {FALSE, Err_Res }, 02749 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02750 /* Structure_Type */ {FALSE, Err_Res }, 02751 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02752 } 02753 }; 02754 02755 exp_tbl_type power_tbl[Num_Linear_Types][Num_Linear_Types] = { 02756 /* Err_Res */ { 02757 /* Err_Res */ {FALSE, Err_Res }, 02758 /* Short_Char_Const */ {FALSE, Err_Res }, 02759 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02760 /* Typeless_1 */ {FALSE, Err_Res }, 02761 /* Typeless_2 */ {FALSE, Err_Res }, 02762 /* Typeless_4 */ {FALSE, Err_Res }, 02763 /* Typeless_8 */ {FALSE, Err_Res }, 02764 /* Long_Typeless */ {FALSE, Err_Res }, 02765 /* Integer_1 */ {FALSE, Err_Res }, 02766 /* Integer_2 */ {FALSE, Err_Res }, 02767 /* Integer_4 */ {FALSE, Err_Res }, 02768 /* Integer_8 */ {FALSE, Err_Res }, 02769 /* Real_4 */ {FALSE, Err_Res }, 02770 /* Real_8 */ {FALSE, Err_Res }, 02771 /* Real_16 */ {FALSE, Err_Res }, 02772 /* Complex_4 */ {FALSE, Err_Res }, 02773 /* Complex_8 */ {FALSE, Err_Res }, 02774 /* Complex_16 */ {FALSE, Err_Res }, 02775 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02776 /* Logical_1 */ {FALSE, Err_Res }, 02777 /* Logical_2 */ {FALSE, Err_Res }, 02778 /* Logical_4 */ {FALSE, Err_Res }, 02779 /* Logical_8 */ {FALSE, Err_Res }, 02780 /* Character_1 */ {FALSE, Err_Res }, 02781 /* Character_2 */ {FALSE, Err_Res }, 02782 /* Character_4 */ {FALSE, Err_Res }, 02783 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02784 /* Structure_Type */ {FALSE, Err_Res }, 02785 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02786 }, 02787 /* Short_Char_Const */ { 02788 /* Err_Res */ {FALSE, Err_Res }, 02789 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 02790 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 02791 /* Typeless_1 */ {TRUE , Typeless_1 }, 02792 /* Typeless_2 */ {TRUE , Typeless_2 }, 02793 /* Typeless_4 */ {TRUE , Typeless_4 }, 02794 /* Typeless_8 */ {TRUE , Typeless_8 }, 02795 /* Long_Typeless */ {FALSE, Err_Res }, 02796 /* Integer_1 */ {TRUE , Integer_1 }, 02797 /* Integer_2 */ {TRUE , Integer_2 }, 02798 /* Integer_4 */ {TRUE , Integer_4 }, 02799 /* Integer_8 */ {TRUE , Integer_8 }, 02800 /* Real_4 */ {TRUE , Real_4 }, 02801 /* Real_8 */ {TRUE , Real_8 }, 02802 /* Real_16 */ {TRUE , Real_16 }, 02803 /* Complex_4 */ {TRUE , Complex_4 }, 02804 /* Complex_8 */ {TRUE , Complex_8 }, 02805 /* Complex_16 */ {TRUE , Complex_16 }, 02806 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02807 /* Logical_1 */ {FALSE, Err_Res }, 02808 /* Logical_2 */ {FALSE, Err_Res }, 02809 /* Logical_4 */ {FALSE, Err_Res }, 02810 /* Logical_8 */ {FALSE, Err_Res }, 02811 /* Character_1 */ {FALSE, Err_Res }, 02812 /* Character_2 */ {FALSE, Err_Res }, 02813 /* Character_4 */ {FALSE, Err_Res }, 02814 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02815 /* Structure_Type */ {FALSE, Err_Res }, 02816 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02817 }, 02818 /* Short_Typeless_Const */ { 02819 /* Err_Res */ {FALSE, Err_Res }, 02820 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 02821 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 02822 /* Typeless_1 */ {TRUE , Typeless_1 }, 02823 /* Typeless_2 */ {TRUE , Typeless_2 }, 02824 /* Typeless_4 */ {TRUE , Typeless_4 }, 02825 /* Typeless_8 */ {TRUE , Typeless_8 }, 02826 /* Long_Typeless */ {FALSE, Err_Res }, 02827 /* Integer_1 */ {TRUE , Integer_1 }, 02828 /* Integer_2 */ {TRUE , Integer_2 }, 02829 /* Integer_4 */ {TRUE , Integer_4 }, 02830 /* Integer_8 */ {TRUE , Integer_8 }, 02831 /* Real_4 */ {TRUE , Real_4 }, 02832 /* Real_8 */ {TRUE , Real_8 }, 02833 /* Real_16 */ {TRUE , Real_16 }, 02834 /* Complex_4 */ {TRUE , Complex_4 }, 02835 /* Complex_8 */ {TRUE , Complex_8 }, 02836 /* Complex_16 */ {TRUE , Complex_16 }, 02837 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02838 /* Logical_1 */ {FALSE, Err_Res }, 02839 /* Logical_2 */ {FALSE, Err_Res }, 02840 /* Logical_4 */ {FALSE, Err_Res }, 02841 /* Logical_8 */ {FALSE, Err_Res }, 02842 /* Character_1 */ {FALSE, Err_Res }, 02843 /* Character_2 */ {FALSE, Err_Res }, 02844 /* Character_4 */ {FALSE, Err_Res }, 02845 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02846 /* Structure_Type */ {FALSE, Err_Res }, 02847 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02848 }, 02849 /* Typeless_1 */ { 02850 /* Err_Res */ {FALSE, Err_Res }, 02851 /* Short_Char_Const */ {FALSE, Err_Res }, 02852 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02853 /* Typeless_1 */ {FALSE, Err_Res }, 02854 /* Typeless_2 */ {FALSE, Err_Res }, 02855 /* Typeless_4 */ {FALSE, Err_Res }, 02856 /* Typeless_8 */ {FALSE, Err_Res }, 02857 /* Long_Typeless */ {FALSE, Err_Res }, 02858 /* Integer_1 */ {FALSE, Err_Res }, 02859 /* Integer_2 */ {FALSE, Err_Res }, 02860 /* Integer_4 */ {FALSE, Err_Res }, 02861 /* Integer_8 */ {FALSE, Err_Res }, 02862 /* Real_4 */ {FALSE, Err_Res }, 02863 /* Real_8 */ {FALSE, Err_Res }, 02864 /* Real_16 */ {FALSE, Err_Res }, 02865 /* Complex_4 */ {FALSE, Err_Res }, 02866 /* Complex_8 */ {FALSE, Err_Res }, 02867 /* Complex_16 */ {FALSE, Err_Res }, 02868 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02869 /* Logical_1 */ {FALSE, Err_Res }, 02870 /* Logical_2 */ {FALSE, Err_Res }, 02871 /* Logical_4 */ {FALSE, Err_Res }, 02872 /* Logical_8 */ {FALSE, Err_Res }, 02873 /* Character_1 */ {FALSE, Err_Res }, 02874 /* Character_2 */ {FALSE, Err_Res }, 02875 /* Character_4 */ {FALSE, Err_Res }, 02876 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02877 /* Structure_Type */ {FALSE, Err_Res }, 02878 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02879 }, 02880 /* Typeless_2 */ { 02881 /* Err_Res */ {FALSE, Err_Res }, 02882 /* Short_Char_Const */ {FALSE, Err_Res }, 02883 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02884 /* Typeless_1 */ {FALSE, Err_Res }, 02885 /* Typeless_2 */ {FALSE, Err_Res }, 02886 /* Typeless_4 */ {FALSE, Err_Res }, 02887 /* Typeless_8 */ {FALSE, Err_Res }, 02888 /* Long_Typeless */ {FALSE, Err_Res }, 02889 /* Integer_1 */ {FALSE, Err_Res }, 02890 /* Integer_2 */ {FALSE, Err_Res }, 02891 /* Integer_4 */ {FALSE, Err_Res }, 02892 /* Integer_8 */ {FALSE, Err_Res }, 02893 /* Real_4 */ {FALSE, Err_Res }, 02894 /* Real_8 */ {FALSE, Err_Res }, 02895 /* Real_16 */ {FALSE, Err_Res }, 02896 /* Complex_4 */ {FALSE, Err_Res }, 02897 /* Complex_8 */ {FALSE, Err_Res }, 02898 /* Complex_16 */ {FALSE, Err_Res }, 02899 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02900 /* Logical_1 */ {FALSE, Err_Res }, 02901 /* Logical_2 */ {FALSE, Err_Res }, 02902 /* Logical_4 */ {FALSE, Err_Res }, 02903 /* Logical_8 */ {FALSE, Err_Res }, 02904 /* Character_1 */ {FALSE, Err_Res }, 02905 /* Character_2 */ {FALSE, Err_Res }, 02906 /* Character_4 */ {FALSE, Err_Res }, 02907 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02908 /* Structure_Type */ {FALSE, Err_Res }, 02909 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02910 }, 02911 /* Typeless_4 */ { 02912 /* Err_Res */ {FALSE, Err_Res }, 02913 /* Short_Char_Const */ {FALSE, Err_Res }, 02914 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02915 /* Typeless_1 */ {FALSE, Err_Res }, 02916 /* Typeless_2 */ {FALSE, Err_Res }, 02917 /* Typeless_4 */ {FALSE, Err_Res }, 02918 /* Typeless_8 */ {FALSE, Err_Res }, 02919 /* Long_Typeless */ {FALSE, Err_Res }, 02920 /* Integer_1 */ {FALSE, Err_Res }, 02921 /* Integer_2 */ {FALSE, Err_Res }, 02922 /* Integer_4 */ {FALSE, Err_Res }, 02923 /* Integer_8 */ {FALSE, Err_Res }, 02924 /* Real_4 */ {FALSE, Err_Res }, 02925 /* Real_8 */ {FALSE, Err_Res }, 02926 /* Real_16 */ {FALSE, Err_Res }, 02927 /* Complex_4 */ {FALSE, Err_Res }, 02928 /* Complex_8 */ {FALSE, Err_Res }, 02929 /* Complex_16 */ {FALSE, Err_Res }, 02930 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02931 /* Logical_1 */ {FALSE, Err_Res }, 02932 /* Logical_2 */ {FALSE, Err_Res }, 02933 /* Logical_4 */ {FALSE, Err_Res }, 02934 /* Logical_8 */ {FALSE, Err_Res }, 02935 /* Character_1 */ {FALSE, Err_Res }, 02936 /* Character_2 */ {FALSE, Err_Res }, 02937 /* Character_4 */ {FALSE, Err_Res }, 02938 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02939 /* Structure_Type */ {FALSE, Err_Res }, 02940 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02941 }, 02942 /* Typeless_8 */ { 02943 /* Err_Res */ {FALSE, Err_Res }, 02944 /* Short_Char_Const */ {FALSE, Err_Res }, 02945 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02946 /* Typeless_1 */ {FALSE, Err_Res }, 02947 /* Typeless_2 */ {FALSE, Err_Res }, 02948 /* Typeless_4 */ {FALSE, Err_Res }, 02949 /* Typeless_8 */ {FALSE, Err_Res }, 02950 /* Long_Typeless */ {FALSE, Err_Res }, 02951 /* Integer_1 */ {FALSE, Err_Res }, 02952 /* Integer_2 */ {FALSE, Err_Res }, 02953 /* Integer_4 */ {FALSE, Err_Res }, 02954 /* Integer_8 */ {FALSE, Err_Res }, 02955 /* Real_4 */ {FALSE, Err_Res }, 02956 /* Real_8 */ {FALSE, Err_Res }, 02957 /* Real_16 */ {FALSE, Err_Res }, 02958 /* Complex_4 */ {FALSE, Err_Res }, 02959 /* Complex_8 */ {FALSE, Err_Res }, 02960 /* Complex_16 */ {FALSE, Err_Res }, 02961 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02962 /* Logical_1 */ {FALSE, Err_Res }, 02963 /* Logical_2 */ {FALSE, Err_Res }, 02964 /* Logical_4 */ {FALSE, Err_Res }, 02965 /* Logical_8 */ {FALSE, Err_Res }, 02966 /* Character_1 */ {FALSE, Err_Res }, 02967 /* Character_2 */ {FALSE, Err_Res }, 02968 /* Character_4 */ {FALSE, Err_Res }, 02969 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 02970 /* Structure_Type */ {FALSE, Err_Res }, 02971 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 02972 }, 02973 /* Long_Typeless */ { 02974 /* Err_Res */ {FALSE, Err_Res }, 02975 /* Short_Char_Const */ {FALSE, Err_Res }, 02976 /* Short_Typeless_Const */ {FALSE, Err_Res }, 02977 /* Typeless_1 */ {FALSE, Err_Res }, 02978 /* Typeless_2 */ {FALSE, Err_Res }, 02979 /* Typeless_4 */ {FALSE, Err_Res }, 02980 /* Typeless_8 */ {FALSE, Err_Res }, 02981 /* Long_Typeless */ {FALSE, Err_Res }, 02982 /* Integer_1 */ {FALSE, Err_Res }, 02983 /* Integer_2 */ {FALSE, Err_Res }, 02984 /* Integer_4 */ {FALSE, Err_Res }, 02985 /* Integer_8 */ {FALSE, Err_Res }, 02986 /* Real_4 */ {FALSE, Err_Res }, 02987 /* Real_8 */ {FALSE, Err_Res }, 02988 /* Real_16 */ {FALSE, Err_Res }, 02989 /* Complex_4 */ {FALSE, Err_Res }, 02990 /* Complex_8 */ {FALSE, Err_Res }, 02991 /* Complex_16 */ {FALSE, Err_Res }, 02992 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 02993 /* Logical_1 */ {FALSE, Err_Res }, 02994 /* Logical_2 */ {FALSE, Err_Res }, 02995 /* Logical_4 */ {FALSE, Err_Res }, 02996 /* Logical_8 */ {FALSE, Err_Res }, 02997 /* Character_1 */ {FALSE, Err_Res }, 02998 /* Character_2 */ {FALSE, Err_Res }, 02999 /* Character_4 */ {FALSE, Err_Res }, 03000 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03001 /* Structure_Type */ {FALSE, Err_Res }, 03002 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03003 }, 03004 /* Integer_1 */ { 03005 /* Err_Res */ {FALSE, Err_Res }, 03006 /* Short_Char_Const */ {TRUE , Integer_1 }, 03007 /* Short_Typeless_Const */ {TRUE , Integer_1 }, 03008 /* Typeless_1 */ {FALSE, Err_Res }, 03009 /* Typeless_2 */ {FALSE, Err_Res }, 03010 /* Typeless_4 */ {FALSE, Err_Res }, 03011 /* Typeless_8 */ {FALSE, Err_Res }, 03012 /* Long_Typeless */ {FALSE, Err_Res }, 03013 /* Integer_1 */ {FALSE, Integer_1 }, 03014 /* Integer_2 */ {FALSE, Integer_2 }, 03015 /* Integer_4 */ {FALSE, Integer_4 }, 03016 /* Integer_8 */ {FALSE, Integer_8 }, 03017 /* Real_4 */ {FALSE, Real_4 }, 03018 /* Real_8 */ {FALSE, Real_8 }, 03019 /* Real_16 */ {FALSE, Real_16 }, 03020 /* Complex_4 */ {FALSE, Complex_4 }, 03021 /* Complex_8 */ {FALSE, Complex_8 }, 03022 /* Complex_16 */ {FALSE, Complex_16 }, 03023 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03024 /* Logical_1 */ {FALSE, Err_Res }, 03025 /* Logical_2 */ {FALSE, Err_Res }, 03026 /* Logical_4 */ {FALSE, Err_Res }, 03027 /* Logical_8 */ {FALSE, Err_Res }, 03028 /* Character_1 */ {FALSE, Err_Res }, 03029 /* Character_2 */ {FALSE, Err_Res }, 03030 /* Character_4 */ {FALSE, Err_Res }, 03031 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03032 /* Structure_Type */ {FALSE, Err_Res }, 03033 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03034 }, 03035 /* Integer_2 */ { 03036 /* Err_Res */ {FALSE, Err_Res }, 03037 /* Short_Char_Const */ {TRUE , Integer_2 }, 03038 /* Short_Typeless_Const */ {TRUE , Integer_2 }, 03039 /* Typeless_1 */ {FALSE, Err_Res }, 03040 /* Typeless_2 */ {FALSE, Err_Res }, 03041 /* Typeless_4 */ {FALSE, Err_Res }, 03042 /* Typeless_8 */ {FALSE, Err_Res }, 03043 /* Long_Typeless */ {FALSE, Err_Res }, 03044 /* Integer_1 */ {FALSE, Integer_2 }, 03045 /* Integer_2 */ {FALSE, Integer_2 }, 03046 /* Integer_4 */ {FALSE, Integer_4 }, 03047 /* Integer_8 */ {FALSE, Integer_8 }, 03048 /* Real_4 */ {FALSE, Real_4 }, 03049 /* Real_8 */ {FALSE, Real_8 }, 03050 /* Real_16 */ {FALSE, Real_16 }, 03051 /* Complex_4 */ {FALSE, Complex_4 }, 03052 /* Complex_8 */ {FALSE, Complex_8 }, 03053 /* Complex_16 */ {FALSE, Complex_16 }, 03054 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03055 /* Logical_1 */ {FALSE, Err_Res }, 03056 /* Logical_2 */ {FALSE, Err_Res }, 03057 /* Logical_4 */ {FALSE, Err_Res }, 03058 /* Logical_8 */ {FALSE, Err_Res }, 03059 /* Character_1 */ {FALSE, Err_Res }, 03060 /* Character_2 */ {FALSE, Err_Res }, 03061 /* Character_4 */ {FALSE, Err_Res }, 03062 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03063 /* Structure_Type */ {FALSE, Err_Res }, 03064 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03065 }, 03066 /* Integer_4 */ { 03067 /* Err_Res */ {FALSE, Err_Res }, 03068 /* Short_Char_Const */ {TRUE , Integer_4 }, 03069 /* Short_Typeless_Const */ {TRUE , Integer_4 }, 03070 /* Typeless_1 */ {FALSE, Err_Res }, 03071 /* Typeless_2 */ {FALSE, Err_Res }, 03072 /* Typeless_4 */ {FALSE, Err_Res }, 03073 /* Typeless_8 */ {FALSE, Err_Res }, 03074 /* Long_Typeless */ {FALSE, Err_Res }, 03075 /* Integer_1 */ {FALSE, Integer_4 }, 03076 /* Integer_2 */ {FALSE, Integer_4 }, 03077 /* Integer_4 */ {FALSE, Integer_4 }, 03078 /* Integer_8 */ {FALSE, Integer_8 }, 03079 /* Real_4 */ {FALSE, Real_4 }, 03080 /* Real_8 */ {FALSE, Real_8 }, 03081 /* Real_16 */ {FALSE, Real_16 }, 03082 /* Complex_4 */ {FALSE, Complex_4 }, 03083 /* Complex_8 */ {FALSE, Complex_8 }, 03084 /* Complex_16 */ {FALSE, Complex_16 }, 03085 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03086 /* Logical_1 */ {FALSE, Err_Res }, 03087 /* Logical_2 */ {FALSE, Err_Res }, 03088 /* Logical_4 */ {FALSE, Err_Res }, 03089 /* Logical_8 */ {FALSE, Err_Res }, 03090 /* Character_1 */ {FALSE, Err_Res }, 03091 /* Character_2 */ {FALSE, Err_Res }, 03092 /* Character_4 */ {FALSE, Err_Res }, 03093 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03094 /* Structure_Type */ {FALSE, Err_Res }, 03095 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03096 }, 03097 /* Integer_8 */ { 03098 /* Err_Res */ {FALSE, Err_Res }, 03099 /* Short_Char_Const */ {TRUE , Integer_8 }, 03100 /* Short_Typeless_Const */ {TRUE , Integer_8 }, 03101 /* Typeless_1 */ {FALSE, Err_Res }, 03102 /* Typeless_2 */ {FALSE, Err_Res }, 03103 /* Typeless_4 */ {FALSE, Err_Res }, 03104 /* Typeless_8 */ {FALSE, Err_Res }, 03105 /* Long_Typeless */ {FALSE, Err_Res }, 03106 /* Integer_1 */ {FALSE, Integer_8 }, 03107 /* Integer_2 */ {FALSE, Integer_8 }, 03108 /* Integer_4 */ {FALSE, Integer_8 }, 03109 /* Integer_8 */ {FALSE, Integer_8 }, 03110 /* Real_4 */ {FALSE, Real_4 }, 03111 /* Real_8 */ {FALSE, Real_8 }, 03112 /* Real_16 */ {FALSE, Real_16 }, 03113 /* Complex_4 */ {FALSE, Complex_4 }, 03114 /* Complex_8 */ {FALSE, Complex_8 }, 03115 /* Complex_16 */ {FALSE, Complex_16 }, 03116 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03117 /* Logical_1 */ {FALSE, Err_Res }, 03118 /* Logical_2 */ {FALSE, Err_Res }, 03119 /* Logical_4 */ {FALSE, Err_Res }, 03120 /* Logical_8 */ {FALSE, Err_Res }, 03121 /* Character_1 */ {FALSE, Err_Res }, 03122 /* Character_2 */ {FALSE, Err_Res }, 03123 /* Character_4 */ {FALSE, Err_Res }, 03124 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03125 /* Structure_Type */ {FALSE, Err_Res }, 03126 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03127 }, 03128 /* Real_4 */ { 03129 /* Err_Res */ {FALSE, Err_Res }, 03130 /* Short_Char_Const */ {TRUE , Real_4 }, 03131 /* Short_Typeless_Const */ {TRUE , Real_4 }, 03132 /* Typeless_1 */ {FALSE, Err_Res }, 03133 /* Typeless_2 */ {FALSE, Err_Res }, 03134 /* Typeless_4 */ {FALSE, Err_Res }, 03135 /* Typeless_8 */ {FALSE, Err_Res }, 03136 /* Long_Typeless */ {FALSE, Err_Res }, 03137 /* Integer_1 */ {FALSE, Real_4 }, 03138 /* Integer_2 */ {FALSE, Real_4 }, 03139 /* Integer_4 */ {FALSE, Real_4 }, 03140 /* Integer_8 */ {FALSE, Real_4 }, 03141 /* Real_4 */ {FALSE, Real_4 }, 03142 /* Real_8 */ {FALSE, Real_8 }, 03143 /* Real_16 */ {FALSE, Real_16 }, 03144 /* Complex_4 */ {FALSE, Complex_4 }, 03145 /* Complex_8 */ {FALSE, Complex_8 }, 03146 /* Complex_16 */ {FALSE, Complex_16 }, 03147 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03148 /* Logical_1 */ {FALSE, Err_Res }, 03149 /* Logical_2 */ {FALSE, Err_Res }, 03150 /* Logical_4 */ {FALSE, Err_Res }, 03151 /* Logical_8 */ {FALSE, Err_Res }, 03152 /* Character_1 */ {FALSE, Err_Res }, 03153 /* Character_2 */ {FALSE, Err_Res }, 03154 /* Character_4 */ {FALSE, Err_Res }, 03155 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03156 /* Structure_Type */ {FALSE, Err_Res }, 03157 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03158 }, 03159 /* Real_8 */ { 03160 /* Err_Res */ {FALSE, Err_Res }, 03161 /* Short_Char_Const */ {TRUE , Real_8 }, 03162 /* Short_Typeless_Const */ {TRUE , Real_8 }, 03163 /* Typeless_1 */ {FALSE, Err_Res }, 03164 /* Typeless_2 */ {FALSE, Err_Res }, 03165 /* Typeless_4 */ {FALSE, Err_Res }, 03166 /* Typeless_8 */ {FALSE, Err_Res }, 03167 /* Long_Typeless */ {FALSE, Err_Res }, 03168 /* Integer_1 */ {FALSE, Real_8 }, 03169 /* Integer_2 */ {FALSE, Real_8 }, 03170 /* Integer_4 */ {FALSE, Real_8 }, 03171 /* Integer_8 */ {FALSE, Real_8 }, 03172 /* Real_4 */ {FALSE, Real_8 }, 03173 /* Real_8 */ {FALSE, Real_8 }, 03174 /* Real_16 */ {FALSE, Real_16 }, 03175 /* Complex_4 */ {FALSE, Complex_8 }, 03176 /* Complex_8 */ {FALSE, Complex_8 }, 03177 /* Complex_16 */ {FALSE, Complex_16 }, 03178 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03179 /* Logical_1 */ {FALSE, Err_Res }, 03180 /* Logical_2 */ {FALSE, Err_Res }, 03181 /* Logical_4 */ {FALSE, Err_Res }, 03182 /* Logical_8 */ {FALSE, Err_Res }, 03183 /* Character_1 */ {FALSE, Err_Res }, 03184 /* Character_2 */ {FALSE, Err_Res }, 03185 /* Character_4 */ {FALSE, Err_Res }, 03186 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03187 /* Structure_Type */ {FALSE, Err_Res }, 03188 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03189 }, 03190 /* Real_16 */ { 03191 /* Err_Res */ {FALSE, Err_Res }, 03192 /* Short_Char_Const */ {TRUE , Real_16 }, 03193 /* Short_Typeless_Const */ {TRUE , Real_16 }, 03194 /* Typeless_1 */ {FALSE, Err_Res }, 03195 /* Typeless_2 */ {FALSE, Err_Res }, 03196 /* Typeless_4 */ {FALSE, Err_Res }, 03197 /* Typeless_8 */ {FALSE, Err_Res }, 03198 /* Long_Typeless */ {FALSE, Err_Res }, 03199 /* Integer_1 */ {FALSE, Real_16 }, 03200 /* Integer_2 */ {FALSE, Real_16 }, 03201 /* Integer_4 */ {FALSE, Real_16 }, 03202 /* Integer_8 */ {FALSE, Real_16 }, 03203 /* Real_4 */ {FALSE, Real_16 }, 03204 /* Real_8 */ {FALSE, Real_16 }, 03205 /* Real_16 */ {FALSE, Real_16 }, 03206 /* Complex_4 */ {FALSE, Complex_16 }, 03207 /* Complex_8 */ {FALSE, Complex_16 }, 03208 /* Complex_16 */ {FALSE, Complex_16 }, 03209 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03210 /* Logical_1 */ {FALSE, Err_Res }, 03211 /* Logical_2 */ {FALSE, Err_Res }, 03212 /* Logical_4 */ {FALSE, Err_Res }, 03213 /* Logical_8 */ {FALSE, Err_Res }, 03214 /* Character_1 */ {FALSE, Err_Res }, 03215 /* Character_2 */ {FALSE, Err_Res }, 03216 /* Character_4 */ {FALSE, Err_Res }, 03217 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03218 /* Structure_Type */ {FALSE, Err_Res }, 03219 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03220 }, 03221 /* Complex_4 */ { 03222 /* Err_Res */ {FALSE, Err_Res }, 03223 /* Short_Char_Const */ {TRUE , Complex_4 }, 03224 /* Short_Typeless_Const */ {TRUE , Complex_4 }, 03225 /* Typeless_1 */ {FALSE, Err_Res }, 03226 /* Typeless_2 */ {FALSE, Err_Res }, 03227 /* Typeless_4 */ {FALSE, Err_Res }, 03228 /* Typeless_8 */ {FALSE, Err_Res }, 03229 /* Long_Typeless */ {FALSE, Err_Res }, 03230 /* Integer_1 */ {FALSE, Complex_4 }, 03231 /* Integer_2 */ {FALSE, Complex_4 }, 03232 /* Integer_4 */ {FALSE, Complex_4 }, 03233 /* Integer_8 */ {FALSE, Complex_4 }, 03234 /* Real_4 */ {FALSE, Complex_4 }, 03235 /* Real_8 */ {FALSE, Complex_8 }, 03236 /* Real_16 */ {FALSE, Complex_16 }, 03237 /* Complex_4 */ {FALSE, Complex_4 }, 03238 /* Complex_8 */ {FALSE, Complex_8 }, 03239 /* Complex_16 */ {FALSE, Complex_16 }, 03240 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03241 /* Logical_1 */ {FALSE, Err_Res }, 03242 /* Logical_2 */ {FALSE, Err_Res }, 03243 /* Logical_4 */ {FALSE, Err_Res }, 03244 /* Logical_8 */ {FALSE, Err_Res }, 03245 /* Character_1 */ {FALSE, Err_Res }, 03246 /* Character_2 */ {FALSE, Err_Res }, 03247 /* Character_4 */ {FALSE, Err_Res }, 03248 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03249 /* Structure_Type */ {FALSE, Err_Res }, 03250 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03251 }, 03252 /* Complex_8 */ { 03253 /* Err_Res */ {FALSE, Err_Res }, 03254 /* Short_Char_Const */ {TRUE , Complex_8 }, 03255 /* Short_Typeless_Const */ {TRUE , Complex_8 }, 03256 /* Typeless_1 */ {FALSE, Err_Res }, 03257 /* Typeless_2 */ {FALSE, Err_Res }, 03258 /* Typeless_4 */ {FALSE, Err_Res }, 03259 /* Typeless_8 */ {FALSE, Err_Res }, 03260 /* Long_Typeless */ {FALSE, Err_Res }, 03261 /* Integer_1 */ {FALSE, Complex_8 }, 03262 /* Integer_2 */ {FALSE, Complex_8 }, 03263 /* Integer_4 */ {FALSE, Complex_8 }, 03264 /* Integer_8 */ {FALSE, Complex_8 }, 03265 /* Real_4 */ {FALSE, Complex_8 }, 03266 /* Real_8 */ {FALSE, Complex_8 }, 03267 /* Real_16 */ {FALSE, Complex_16 }, 03268 /* Complex_4 */ {FALSE, Complex_8 }, 03269 /* Complex_8 */ {FALSE, Complex_8 }, 03270 /* Complex_16 */ {FALSE, Complex_16 }, 03271 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03272 /* Logical_1 */ {FALSE, Err_Res }, 03273 /* Logical_2 */ {FALSE, Err_Res }, 03274 /* Logical_4 */ {FALSE, Err_Res }, 03275 /* Logical_8 */ {FALSE, Err_Res }, 03276 /* Character_1 */ {FALSE, Err_Res }, 03277 /* Character_2 */ {FALSE, Err_Res }, 03278 /* Character_4 */ {FALSE, Err_Res }, 03279 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03280 /* Structure_Type */ {FALSE, Err_Res }, 03281 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03282 }, 03283 /* Complex_16 */ { 03284 /* Err_Res */ {FALSE, Err_Res }, 03285 /* Short_Char_Const */ {TRUE , Complex_16 }, 03286 /* Short_Typeless_Const */ {TRUE , Complex_16 }, 03287 /* Typeless_1 */ {FALSE, Err_Res }, 03288 /* Typeless_2 */ {FALSE, Err_Res }, 03289 /* Typeless_4 */ {FALSE, Err_Res }, 03290 /* Typeless_8 */ {FALSE, Err_Res }, 03291 /* Long_Typeless */ {FALSE, Err_Res }, 03292 /* Integer_1 */ {FALSE, Complex_16 }, 03293 /* Integer_2 */ {FALSE, Complex_16 }, 03294 /* Integer_4 */ {FALSE, Complex_16 }, 03295 /* Integer_8 */ {FALSE, Complex_16 }, 03296 /* Real_4 */ {FALSE, Complex_16 }, 03297 /* Real_8 */ {FALSE, Complex_16 }, 03298 /* Real_16 */ {FALSE, Complex_16 }, 03299 /* Complex_4 */ {FALSE, Complex_16 }, 03300 /* Complex_8 */ {FALSE, Complex_16 }, 03301 /* Complex_16 */ {FALSE, Complex_16 }, 03302 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03303 /* Logical_1 */ {FALSE, Err_Res }, 03304 /* Logical_2 */ {FALSE, Err_Res }, 03305 /* Logical_4 */ {FALSE, Err_Res }, 03306 /* Logical_8 */ {FALSE, Err_Res }, 03307 /* Character_1 */ {FALSE, Err_Res }, 03308 /* Character_2 */ {FALSE, Err_Res }, 03309 /* Character_4 */ {FALSE, Err_Res }, 03310 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03311 /* Structure_Type */ {FALSE, Err_Res }, 03312 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03313 }, 03314 /* CRI_Ptr_8 */ { 03315 /* Err_Res */ {FALSE, Err_Res }, 03316 /* Short_Char_Const */ {FALSE, Err_Res }, 03317 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03318 /* Typeless_1 */ {FALSE, Err_Res }, 03319 /* Typeless_2 */ {FALSE, Err_Res }, 03320 /* Typeless_4 */ {FALSE, Err_Res }, 03321 /* Typeless_8 */ {FALSE, Err_Res }, 03322 /* Long_Typeless */ {FALSE, Err_Res }, 03323 /* Integer_1 */ {FALSE, Err_Res }, 03324 /* Integer_2 */ {FALSE, Err_Res }, 03325 /* Integer_4 */ {FALSE, Err_Res }, 03326 /* Integer_8 */ {FALSE, Err_Res }, 03327 /* Real_4 */ {FALSE, Err_Res }, 03328 /* Real_8 */ {FALSE, Err_Res }, 03329 /* Real_16 */ {FALSE, Err_Res }, 03330 /* Complex_4 */ {FALSE, Err_Res }, 03331 /* Complex_8 */ {FALSE, Err_Res }, 03332 /* Complex_16 */ {FALSE, Err_Res }, 03333 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03334 /* Logical_1 */ {FALSE, Err_Res }, 03335 /* Logical_2 */ {FALSE, Err_Res }, 03336 /* Logical_4 */ {FALSE, Err_Res }, 03337 /* Logical_8 */ {FALSE, Err_Res }, 03338 /* Character_1 */ {FALSE, Err_Res }, 03339 /* Character_2 */ {FALSE, Err_Res }, 03340 /* Character_4 */ {FALSE, Err_Res }, 03341 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03342 /* Structure_Type */ {FALSE, Err_Res }, 03343 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03344 }, 03345 /* Logical_1 */ { 03346 /* Err_Res */ {FALSE, Err_Res }, 03347 /* Short_Char_Const */ {FALSE, Err_Res }, 03348 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03349 /* Typeless_1 */ {FALSE, Err_Res }, 03350 /* Typeless_2 */ {FALSE, Err_Res }, 03351 /* Typeless_4 */ {FALSE, Err_Res }, 03352 /* Typeless_8 */ {FALSE, Err_Res }, 03353 /* Long_Typeless */ {FALSE, Err_Res }, 03354 /* Integer_1 */ {FALSE, Err_Res }, 03355 /* Integer_2 */ {FALSE, Err_Res }, 03356 /* Integer_4 */ {FALSE, Err_Res }, 03357 /* Integer_8 */ {FALSE, Err_Res }, 03358 /* Real_4 */ {FALSE, Err_Res }, 03359 /* Real_8 */ {FALSE, Err_Res }, 03360 /* Real_16 */ {FALSE, Err_Res }, 03361 /* Complex_4 */ {FALSE, Err_Res }, 03362 /* Complex_8 */ {FALSE, Err_Res }, 03363 /* Complex_16 */ {FALSE, Err_Res }, 03364 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03365 /* Logical_1 */ {FALSE, Err_Res }, 03366 /* Logical_2 */ {FALSE, Err_Res }, 03367 /* Logical_4 */ {FALSE, Err_Res }, 03368 /* Logical_8 */ {FALSE, Err_Res }, 03369 /* Character_1 */ {FALSE, Err_Res }, 03370 /* Character_2 */ {FALSE, Err_Res }, 03371 /* Character_4 */ {FALSE, Err_Res }, 03372 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03373 /* Structure_Type */ {FALSE, Err_Res }, 03374 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03375 }, 03376 /* Logical_2 */ { 03377 /* Err_Res */ {FALSE, Err_Res }, 03378 /* Short_Char_Const */ {FALSE, Err_Res }, 03379 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03380 /* Typeless_1 */ {FALSE, Err_Res }, 03381 /* Typeless_2 */ {FALSE, Err_Res }, 03382 /* Typeless_4 */ {FALSE, Err_Res }, 03383 /* Typeless_8 */ {FALSE, Err_Res }, 03384 /* Long_Typeless */ {FALSE, Err_Res }, 03385 /* Integer_1 */ {FALSE, Err_Res }, 03386 /* Integer_2 */ {FALSE, Err_Res }, 03387 /* Integer_4 */ {FALSE, Err_Res }, 03388 /* Integer_8 */ {FALSE, Err_Res }, 03389 /* Real_4 */ {FALSE, Err_Res }, 03390 /* Real_8 */ {FALSE, Err_Res }, 03391 /* Real_16 */ {FALSE, Err_Res }, 03392 /* Complex_4 */ {FALSE, Err_Res }, 03393 /* Complex_8 */ {FALSE, Err_Res }, 03394 /* Complex_16 */ {FALSE, Err_Res }, 03395 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03396 /* Logical_1 */ {FALSE, Err_Res }, 03397 /* Logical_2 */ {FALSE, Err_Res }, 03398 /* Logical_4 */ {FALSE, Err_Res }, 03399 /* Logical_8 */ {FALSE, Err_Res }, 03400 /* Character_1 */ {FALSE, Err_Res }, 03401 /* Character_2 */ {FALSE, Err_Res }, 03402 /* Character_4 */ {FALSE, Err_Res }, 03403 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03404 /* Structure_Type */ {FALSE, Err_Res }, 03405 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03406 }, 03407 /* Logical_4 */ { 03408 /* Err_Res */ {FALSE, Err_Res }, 03409 /* Short_Char_Const */ {FALSE, Err_Res }, 03410 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03411 /* Typeless_1 */ {FALSE, Err_Res }, 03412 /* Typeless_2 */ {FALSE, Err_Res }, 03413 /* Typeless_4 */ {FALSE, Err_Res }, 03414 /* Typeless_8 */ {FALSE, Err_Res }, 03415 /* Long_Typeless */ {FALSE, Err_Res }, 03416 /* Integer_1 */ {FALSE, Err_Res }, 03417 /* Integer_2 */ {FALSE, Err_Res }, 03418 /* Integer_4 */ {FALSE, Err_Res }, 03419 /* Integer_8 */ {FALSE, Err_Res }, 03420 /* Real_4 */ {FALSE, Err_Res }, 03421 /* Real_8 */ {FALSE, Err_Res }, 03422 /* Real_16 */ {FALSE, Err_Res }, 03423 /* Complex_4 */ {FALSE, Err_Res }, 03424 /* Complex_8 */ {FALSE, Err_Res }, 03425 /* Complex_16 */ {FALSE, Err_Res }, 03426 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03427 /* Logical_1 */ {FALSE, Err_Res }, 03428 /* Logical_2 */ {FALSE, Err_Res }, 03429 /* Logical_4 */ {FALSE, Err_Res }, 03430 /* Logical_8 */ {FALSE, Err_Res }, 03431 /* Character_1 */ {FALSE, Err_Res }, 03432 /* Character_2 */ {FALSE, Err_Res }, 03433 /* Character_4 */ {FALSE, Err_Res }, 03434 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03435 /* Structure_Type */ {FALSE, Err_Res }, 03436 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03437 }, 03438 /* Logical_8 */ { 03439 /* Err_Res */ {FALSE, Err_Res }, 03440 /* Short_Char_Const */ {FALSE, Err_Res }, 03441 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03442 /* Typeless_1 */ {FALSE, Err_Res }, 03443 /* Typeless_2 */ {FALSE, Err_Res }, 03444 /* Typeless_4 */ {FALSE, Err_Res }, 03445 /* Typeless_8 */ {FALSE, Err_Res }, 03446 /* Long_Typeless */ {FALSE, Err_Res }, 03447 /* Integer_1 */ {FALSE, Err_Res }, 03448 /* Integer_2 */ {FALSE, Err_Res }, 03449 /* Integer_4 */ {FALSE, Err_Res }, 03450 /* Integer_8 */ {FALSE, Err_Res }, 03451 /* Real_4 */ {FALSE, Err_Res }, 03452 /* Real_8 */ {FALSE, Err_Res }, 03453 /* Real_16 */ {FALSE, Err_Res }, 03454 /* Complex_4 */ {FALSE, Err_Res }, 03455 /* Complex_8 */ {FALSE, Err_Res }, 03456 /* Complex_16 */ {FALSE, Err_Res }, 03457 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03458 /* Logical_1 */ {FALSE, Err_Res }, 03459 /* Logical_2 */ {FALSE, Err_Res }, 03460 /* Logical_4 */ {FALSE, Err_Res }, 03461 /* Logical_8 */ {FALSE, Err_Res }, 03462 /* Character_1 */ {FALSE, Err_Res }, 03463 /* Character_2 */ {FALSE, Err_Res }, 03464 /* Character_4 */ {FALSE, Err_Res }, 03465 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03466 /* Structure_Type */ {FALSE, Err_Res }, 03467 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03468 }, 03469 /* Character_1 */ { 03470 /* Err_Res */ {FALSE, Err_Res }, 03471 /* Short_Char_Const */ {FALSE, Err_Res }, 03472 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03473 /* Typeless_1 */ {FALSE, Err_Res }, 03474 /* Typeless_2 */ {FALSE, Err_Res }, 03475 /* Typeless_4 */ {FALSE, Err_Res }, 03476 /* Typeless_8 */ {FALSE, Err_Res }, 03477 /* Long_Typeless */ {FALSE, Err_Res }, 03478 /* Integer_1 */ {FALSE, Err_Res }, 03479 /* Integer_2 */ {FALSE, Err_Res }, 03480 /* Integer_4 */ {FALSE, Err_Res }, 03481 /* Integer_8 */ {FALSE, Err_Res }, 03482 /* Real_4 */ {FALSE, Err_Res }, 03483 /* Real_8 */ {FALSE, Err_Res }, 03484 /* Real_16 */ {FALSE, Err_Res }, 03485 /* Complex_4 */ {FALSE, Err_Res }, 03486 /* Complex_8 */ {FALSE, Err_Res }, 03487 /* Complex_16 */ {FALSE, Err_Res }, 03488 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03489 /* Logical_1 */ {FALSE, Err_Res }, 03490 /* Logical_2 */ {FALSE, Err_Res }, 03491 /* Logical_4 */ {FALSE, Err_Res }, 03492 /* Logical_8 */ {FALSE, Err_Res }, 03493 /* Character_1 */ {FALSE, Err_Res }, 03494 /* Character_2 */ {FALSE, Err_Res }, 03495 /* Character_4 */ {FALSE, Err_Res }, 03496 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03497 /* Structure_Type */ {FALSE, Err_Res }, 03498 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03499 }, 03500 /* Character_2 */ { 03501 /* Err_Res */ {FALSE, Err_Res }, 03502 /* Short_Char_Const */ {FALSE, Err_Res }, 03503 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03504 /* Typeless_1 */ {FALSE, Err_Res }, 03505 /* Typeless_2 */ {FALSE, Err_Res }, 03506 /* Typeless_4 */ {FALSE, Err_Res }, 03507 /* Typeless_8 */ {FALSE, Err_Res }, 03508 /* Long_Typeless */ {FALSE, Err_Res }, 03509 /* Integer_1 */ {FALSE, Err_Res }, 03510 /* Integer_2 */ {FALSE, Err_Res }, 03511 /* Integer_4 */ {FALSE, Err_Res }, 03512 /* Integer_8 */ {FALSE, Err_Res }, 03513 /* Real_4 */ {FALSE, Err_Res }, 03514 /* Real_8 */ {FALSE, Err_Res }, 03515 /* Real_16 */ {FALSE, Err_Res }, 03516 /* Complex_4 */ {FALSE, Err_Res }, 03517 /* Complex_8 */ {FALSE, Err_Res }, 03518 /* Complex_16 */ {FALSE, Err_Res }, 03519 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03520 /* Logical_1 */ {FALSE, Err_Res }, 03521 /* Logical_2 */ {FALSE, Err_Res }, 03522 /* Logical_4 */ {FALSE, Err_Res }, 03523 /* Logical_8 */ {FALSE, Err_Res }, 03524 /* Character_1 */ {FALSE, Err_Res }, 03525 /* Character_2 */ {FALSE, Err_Res }, 03526 /* Character_4 */ {FALSE, Err_Res }, 03527 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03528 /* Structure_Type */ {FALSE, Err_Res }, 03529 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03530 }, 03531 /* Character_4 */ { 03532 /* Err_Res */ {FALSE, Err_Res }, 03533 /* Short_Char_Const */ {FALSE, Err_Res }, 03534 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03535 /* Typeless_1 */ {FALSE, Err_Res }, 03536 /* Typeless_2 */ {FALSE, Err_Res }, 03537 /* Typeless_4 */ {FALSE, Err_Res }, 03538 /* Typeless_8 */ {FALSE, Err_Res }, 03539 /* Long_Typeless */ {FALSE, Err_Res }, 03540 /* Integer_1 */ {FALSE, Err_Res }, 03541 /* Integer_2 */ {FALSE, Err_Res }, 03542 /* Integer_4 */ {FALSE, Err_Res }, 03543 /* Integer_8 */ {FALSE, Err_Res }, 03544 /* Real_4 */ {FALSE, Err_Res }, 03545 /* Real_8 */ {FALSE, Err_Res }, 03546 /* Real_16 */ {FALSE, Err_Res }, 03547 /* Complex_4 */ {FALSE, Err_Res }, 03548 /* Complex_8 */ {FALSE, Err_Res }, 03549 /* Complex_16 */ {FALSE, Err_Res }, 03550 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03551 /* Logical_1 */ {FALSE, Err_Res }, 03552 /* Logical_2 */ {FALSE, Err_Res }, 03553 /* Logical_4 */ {FALSE, Err_Res }, 03554 /* Logical_8 */ {FALSE, Err_Res }, 03555 /* Character_1 */ {FALSE, Err_Res }, 03556 /* Character_2 */ {FALSE, Err_Res }, 03557 /* Character_4 */ {FALSE, Err_Res }, 03558 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03559 /* Structure_Type */ {FALSE, Err_Res }, 03560 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03561 }, 03562 /* CRI_Ch_Ptr_8 */ { 03563 /* Err_Res */ {FALSE, Err_Res }, 03564 /* Short_Char_Const */ {FALSE, Err_Res }, 03565 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03566 /* Typeless_1 */ {FALSE, Err_Res }, 03567 /* Typeless_2 */ {FALSE, Err_Res }, 03568 /* Typeless_4 */ {FALSE, Err_Res }, 03569 /* Typeless_8 */ {FALSE, Err_Res }, 03570 /* Long_Typeless */ {FALSE, Err_Res }, 03571 /* Integer_1 */ {FALSE, Err_Res }, 03572 /* Integer_2 */ {FALSE, Err_Res }, 03573 /* Integer_4 */ {FALSE, Err_Res }, 03574 /* Integer_8 */ {FALSE, Err_Res }, 03575 /* Real_4 */ {FALSE, Err_Res }, 03576 /* Real_8 */ {FALSE, Err_Res }, 03577 /* Real_16 */ {FALSE, Err_Res }, 03578 /* Complex_4 */ {FALSE, Err_Res }, 03579 /* Complex_8 */ {FALSE, Err_Res }, 03580 /* Complex_16 */ {FALSE, Err_Res }, 03581 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03582 /* Logical_1 */ {FALSE, Err_Res }, 03583 /* Logical_2 */ {FALSE, Err_Res }, 03584 /* Logical_4 */ {FALSE, Err_Res }, 03585 /* Logical_8 */ {FALSE, Err_Res }, 03586 /* Character_1 */ {FALSE, Err_Res }, 03587 /* Character_2 */ {FALSE, Err_Res }, 03588 /* Character_4 */ {FALSE, Err_Res }, 03589 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03590 /* Structure_Type */ {FALSE, Err_Res }, 03591 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03592 }, 03593 /* Structure_Type */ { 03594 /* Err_Res */ {FALSE, Err_Res }, 03595 /* Short_Char_Const */ {FALSE, Err_Res }, 03596 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03597 /* Typeless_1 */ {FALSE, Err_Res }, 03598 /* Typeless_2 */ {FALSE, Err_Res }, 03599 /* Typeless_4 */ {FALSE, Err_Res }, 03600 /* Typeless_8 */ {FALSE, Err_Res }, 03601 /* Long_Typeless */ {FALSE, Err_Res }, 03602 /* Integer_1 */ {FALSE, Err_Res }, 03603 /* Integer_2 */ {FALSE, Err_Res }, 03604 /* Integer_4 */ {FALSE, Err_Res }, 03605 /* Integer_8 */ {FALSE, Err_Res }, 03606 /* Real_4 */ {FALSE, Err_Res }, 03607 /* Real_8 */ {FALSE, Err_Res }, 03608 /* Real_16 */ {FALSE, Err_Res }, 03609 /* Complex_4 */ {FALSE, Err_Res }, 03610 /* Complex_8 */ {FALSE, Err_Res }, 03611 /* Complex_16 */ {FALSE, Err_Res }, 03612 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03613 /* Logical_1 */ {FALSE, Err_Res }, 03614 /* Logical_2 */ {FALSE, Err_Res }, 03615 /* Logical_4 */ {FALSE, Err_Res }, 03616 /* Logical_8 */ {FALSE, Err_Res }, 03617 /* Character_1 */ {FALSE, Err_Res }, 03618 /* Character_2 */ {FALSE, Err_Res }, 03619 /* Character_4 */ {FALSE, Err_Res }, 03620 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03621 /* Structure_Type */ {FALSE, Err_Res }, 03622 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03623 }, 03624 /* CRI_Parcel_Ptr_8 */ { 03625 /* Err_Res */ {FALSE, Err_Res }, 03626 /* Short_Char_Const */ {FALSE, Err_Res }, 03627 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03628 /* Typeless_1 */ {FALSE, Err_Res }, 03629 /* Typeless_2 */ {FALSE, Err_Res }, 03630 /* Typeless_4 */ {FALSE, Err_Res }, 03631 /* Typeless_8 */ {FALSE, Err_Res }, 03632 /* Long_Typeless */ {FALSE, Err_Res }, 03633 /* Integer_1 */ {FALSE, Err_Res }, 03634 /* Integer_2 */ {FALSE, Err_Res }, 03635 /* Integer_4 */ {FALSE, Err_Res }, 03636 /* Integer_8 */ {FALSE, Err_Res }, 03637 /* Real_4 */ {FALSE, Err_Res }, 03638 /* Real_8 */ {FALSE, Err_Res }, 03639 /* Real_16 */ {FALSE, Err_Res }, 03640 /* Complex_4 */ {FALSE, Err_Res }, 03641 /* Complex_8 */ {FALSE, Err_Res }, 03642 /* Complex_16 */ {FALSE, Err_Res }, 03643 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03644 /* Logical_1 */ {FALSE, Err_Res }, 03645 /* Logical_2 */ {FALSE, Err_Res }, 03646 /* Logical_4 */ {FALSE, Err_Res }, 03647 /* Logical_8 */ {FALSE, Err_Res }, 03648 /* Character_1 */ {FALSE, Err_Res }, 03649 /* Character_2 */ {FALSE, Err_Res }, 03650 /* Character_4 */ {FALSE, Err_Res }, 03651 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03652 /* Structure_Type */ {FALSE, Err_Res }, 03653 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03654 } 03655 }; 03656 03657 03658 exp_tbl_type eq_ne_tbl[Num_Linear_Types][Num_Linear_Types] = { 03659 /* Err_Res */ { 03660 /* Err_Res */ {FALSE, Err_Res }, 03661 /* Short_Char_Const */ {FALSE, Err_Res }, 03662 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03663 /* Typeless_1 */ {FALSE, Err_Res }, 03664 /* Typeless_2 */ {FALSE, Err_Res }, 03665 /* Typeless_4 */ {FALSE, Err_Res }, 03666 /* Typeless_8 */ {FALSE, Err_Res }, 03667 /* Long_Typeless */ {FALSE, Err_Res }, 03668 /* Integer_1 */ {FALSE, Err_Res }, 03669 /* Integer_2 */ {FALSE, Err_Res }, 03670 /* Integer_4 */ {FALSE, Err_Res }, 03671 /* Integer_8 */ {FALSE, Err_Res }, 03672 /* Real_4 */ {FALSE, Err_Res }, 03673 /* Real_8 */ {FALSE, Err_Res }, 03674 /* Real_16 */ {FALSE, Err_Res }, 03675 /* Complex_4 */ {FALSE, Err_Res }, 03676 /* Complex_8 */ {FALSE, Err_Res }, 03677 /* Complex_16 */ {FALSE, Err_Res }, 03678 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03679 /* Logical_1 */ {FALSE, Err_Res }, 03680 /* Logical_2 */ {FALSE, Err_Res }, 03681 /* Logical_4 */ {FALSE, Err_Res }, 03682 /* Logical_8 */ {FALSE, Err_Res }, 03683 /* Character_1 */ {FALSE, Err_Res }, 03684 /* Character_2 */ {FALSE, Err_Res }, 03685 /* Character_4 */ {FALSE, Err_Res }, 03686 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03687 /* Structure_Type */ {FALSE, Err_Res }, 03688 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03689 }, 03690 /* Short_Char_Const */ { 03691 /* Err_Res */ {FALSE, Err_Res }, 03692 /* Short_Char_Const */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03693 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03694 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03695 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03696 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03697 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03698 /* Long_Typeless */ {FALSE, Err_Res }, 03699 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03700 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03701 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03702 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03703 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03704 /* Real_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03705 /* Real_16 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03706 /* Complex_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03707 /* Complex_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03708 /* Complex_16 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03709 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03710 /* Logical_1 */ {FALSE, Err_Res }, 03711 /* Logical_2 */ {FALSE, Err_Res }, 03712 /* Logical_4 */ {FALSE, Err_Res }, 03713 /* Logical_8 */ {FALSE, Err_Res }, 03714 /* Character_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03715 /* Character_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03716 /* Character_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03717 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03718 /* Structure_Type */ {FALSE, Err_Res }, 03719 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03720 }, 03721 /* Short_Typeless_Const */ { 03722 /* Err_Res */ {FALSE, Err_Res }, 03723 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03724 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03725 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03726 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03727 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03728 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03729 /* Long_Typeless */ {FALSE, Err_Res }, 03730 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03731 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03732 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03733 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03734 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03735 /* Real_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03736 /* Real_16 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03737 /* Complex_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03738 /* Complex_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03739 /* Complex_16 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03740 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03741 /* Logical_1 */ {FALSE, Err_Res }, 03742 /* Logical_2 */ {FALSE, Err_Res }, 03743 /* Logical_4 */ {FALSE, Err_Res }, 03744 /* Logical_8 */ {FALSE, Err_Res }, 03745 /* Character_1 */ {FALSE, Err_Res }, 03746 /* Character_2 */ {FALSE, Err_Res }, 03747 /* Character_4 */ {FALSE, Err_Res }, 03748 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03749 /* Structure_Type */ {FALSE, Err_Res }, 03750 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 03751 }, 03752 /* Typeless_1 */ { 03753 /* Err_Res */ {FALSE, Err_Res }, 03754 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03755 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03756 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03757 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03758 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03759 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03760 /* Long_Typeless */ {FALSE, Err_Res }, 03761 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03762 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03763 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03764 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03765 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03766 /* Real_8 */ {FALSE, Err_Res }, 03767 /* Real_16 */ {FALSE, Err_Res }, 03768 /* Complex_4 */ {FALSE, Err_Res }, 03769 /* Complex_8 */ {FALSE, Err_Res }, 03770 /* Complex_16 */ {FALSE, Err_Res }, 03771 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03772 /* Logical_1 */ {FALSE, Err_Res }, 03773 /* Logical_2 */ {FALSE, Err_Res }, 03774 /* Logical_4 */ {FALSE, Err_Res }, 03775 /* Logical_8 */ {FALSE, Err_Res }, 03776 /* Character_1 */ {FALSE, Err_Res }, 03777 /* Character_2 */ {FALSE, Err_Res }, 03778 /* Character_4 */ {FALSE, Err_Res }, 03779 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03780 /* Structure_Type */ {FALSE, Err_Res }, 03781 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 03782 }, 03783 /* Typeless_2 */ { 03784 /* Err_Res */ {FALSE, Err_Res }, 03785 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03786 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03787 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03788 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03789 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03790 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03791 /* Long_Typeless */ {FALSE, Err_Res }, 03792 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03793 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03794 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03795 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03796 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03797 /* Real_8 */ {FALSE, Err_Res }, 03798 /* Real_16 */ {FALSE, Err_Res }, 03799 /* Complex_4 */ {FALSE, Err_Res }, 03800 /* Complex_8 */ {FALSE, Err_Res }, 03801 /* Complex_16 */ {FALSE, Err_Res }, 03802 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03803 /* Logical_1 */ {FALSE, Err_Res }, 03804 /* Logical_2 */ {FALSE, Err_Res }, 03805 /* Logical_4 */ {FALSE, Err_Res }, 03806 /* Logical_8 */ {FALSE, Err_Res }, 03807 /* Character_1 */ {FALSE, Err_Res }, 03808 /* Character_2 */ {FALSE, Err_Res }, 03809 /* Character_4 */ {FALSE, Err_Res }, 03810 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03811 /* Structure_Type */ {FALSE, Err_Res }, 03812 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 03813 }, 03814 /* Typeless_4 */ { 03815 /* Err_Res */ {FALSE, Err_Res }, 03816 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03817 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03818 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03819 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03820 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03821 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03822 /* Long_Typeless */ {FALSE, Err_Res }, 03823 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03824 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03825 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03826 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03827 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03828 /* Real_8 */ {FALSE, Err_Res }, 03829 /* Real_16 */ {FALSE, Err_Res }, 03830 /* Complex_4 */ {FALSE, Err_Res }, 03831 /* Complex_8 */ {FALSE, Err_Res }, 03832 /* Complex_16 */ {FALSE, Err_Res }, 03833 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03834 /* Logical_1 */ {FALSE, Err_Res }, 03835 /* Logical_2 */ {FALSE, Err_Res }, 03836 /* Logical_4 */ {FALSE, Err_Res }, 03837 /* Logical_8 */ {FALSE, Err_Res }, 03838 /* Character_1 */ {FALSE, Err_Res }, 03839 /* Character_2 */ {FALSE, Err_Res }, 03840 /* Character_4 */ {FALSE, Err_Res }, 03841 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03842 /* Structure_Type */ {FALSE, Err_Res }, 03843 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 03844 }, 03845 /* Typeless_8 */ { 03846 /* Err_Res */ {FALSE, Err_Res }, 03847 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03848 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03849 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03850 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03851 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03852 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03853 /* Long_Typeless */ {FALSE, Err_Res }, 03854 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03855 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03856 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03857 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03858 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03859 /* Real_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03860 /* Real_16 */ {FALSE, Err_Res }, 03861 /* Complex_4 */ {FALSE, Err_Res }, 03862 /* Complex_8 */ {FALSE, Err_Res }, 03863 /* Complex_16 */ {FALSE, Err_Res }, 03864 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03865 /* Logical_1 */ {FALSE, Err_Res }, 03866 /* Logical_2 */ {FALSE, Err_Res }, 03867 /* Logical_4 */ {FALSE, Err_Res }, 03868 /* Logical_8 */ {FALSE, Err_Res }, 03869 /* Character_1 */ {FALSE, Err_Res }, 03870 /* Character_2 */ {FALSE, Err_Res }, 03871 /* Character_4 */ {FALSE, Err_Res }, 03872 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03873 /* Structure_Type */ {FALSE, Err_Res }, 03874 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 03875 }, 03876 /* Long_Typeless */ { 03877 /* Err_Res */ {FALSE, Err_Res }, 03878 /* Short_Char_Const */ {FALSE, Err_Res }, 03879 /* Short_Typeless_Const */ {FALSE, Err_Res }, 03880 /* Typeless_1 */ {FALSE, Err_Res }, 03881 /* Typeless_2 */ {FALSE, Err_Res }, 03882 /* Typeless_4 */ {FALSE, Err_Res }, 03883 /* Typeless_8 */ {FALSE, Err_Res }, 03884 /* Long_Typeless */ {FALSE, Err_Res }, 03885 /* Integer_1 */ {FALSE, Err_Res }, 03886 /* Integer_2 */ {FALSE, Err_Res }, 03887 /* Integer_4 */ {FALSE, Err_Res }, 03888 /* Integer_8 */ {FALSE, Err_Res }, 03889 /* Real_4 */ {FALSE, Err_Res }, 03890 /* Real_8 */ {FALSE, Err_Res }, 03891 /* Real_16 */ {FALSE, Err_Res }, 03892 /* Complex_4 */ {FALSE, Err_Res }, 03893 /* Complex_8 */ {FALSE, Err_Res }, 03894 /* Complex_16 */ {FALSE, Err_Res }, 03895 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 03896 /* Logical_1 */ {FALSE, Err_Res }, 03897 /* Logical_2 */ {FALSE, Err_Res }, 03898 /* Logical_4 */ {FALSE, Err_Res }, 03899 /* Logical_8 */ {FALSE, Err_Res }, 03900 /* Character_1 */ {FALSE, Err_Res }, 03901 /* Character_2 */ {FALSE, Err_Res }, 03902 /* Character_4 */ {FALSE, Err_Res }, 03903 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03904 /* Structure_Type */ {FALSE, Err_Res }, 03905 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 03906 }, 03907 /* Integer_1 */ { 03908 /* Err_Res */ {FALSE, Err_Res }, 03909 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03910 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03911 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03912 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03913 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03914 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03915 /* Long_Typeless */ {FALSE, Err_Res }, 03916 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03917 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03918 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03919 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03920 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03921 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03922 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03923 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03924 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03925 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03926 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03927 /* Logical_1 */ {FALSE, Err_Res }, 03928 /* Logical_2 */ {FALSE, Err_Res }, 03929 /* Logical_4 */ {FALSE, Err_Res }, 03930 /* Logical_8 */ {FALSE, Err_Res }, 03931 /* Character_1 */ {FALSE, Err_Res }, 03932 /* Character_2 */ {FALSE, Err_Res }, 03933 /* Character_4 */ {FALSE, Err_Res }, 03934 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03935 /* Structure_Type */ {FALSE, Err_Res }, 03936 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 03937 }, 03938 /* Integer_2 */ { 03939 /* Err_Res */ {FALSE, Err_Res }, 03940 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03941 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03942 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03943 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03944 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03945 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03946 /* Long_Typeless */ {FALSE, Err_Res }, 03947 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03948 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03949 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03950 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03951 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03952 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03953 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03954 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03955 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03956 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03957 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03958 /* Logical_1 */ {FALSE, Err_Res }, 03959 /* Logical_2 */ {FALSE, Err_Res }, 03960 /* Logical_4 */ {FALSE, Err_Res }, 03961 /* Logical_8 */ {FALSE, Err_Res }, 03962 /* Character_1 */ {FALSE, Err_Res }, 03963 /* Character_2 */ {FALSE, Err_Res }, 03964 /* Character_4 */ {FALSE, Err_Res }, 03965 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03966 /* Structure_Type */ {FALSE, Err_Res }, 03967 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 03968 }, 03969 /* Integer_4 */ { 03970 /* Err_Res */ {FALSE, Err_Res }, 03971 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03972 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03973 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03974 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03975 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03976 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03977 /* Long_Typeless */ {FALSE, Err_Res }, 03978 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03979 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03980 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03981 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03982 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03983 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03984 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03985 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03986 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03987 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 03988 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 03989 /* Logical_1 */ {FALSE, Err_Res }, 03990 /* Logical_2 */ {FALSE, Err_Res }, 03991 /* Logical_4 */ {FALSE, Err_Res }, 03992 /* Logical_8 */ {FALSE, Err_Res }, 03993 /* Character_1 */ {FALSE, Err_Res }, 03994 /* Character_2 */ {FALSE, Err_Res }, 03995 /* Character_4 */ {FALSE, Err_Res }, 03996 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 03997 /* Structure_Type */ {FALSE, Err_Res }, 03998 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 03999 }, 04000 /* Integer_8 */ { 04001 /* Err_Res */ {FALSE, Err_Res }, 04002 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04003 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04004 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04005 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04006 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04007 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04008 /* Long_Typeless */ {FALSE, Err_Res }, 04009 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04010 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04011 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04012 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04013 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04014 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04015 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04016 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04017 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04018 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04019 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04020 /* Logical_1 */ {FALSE, Err_Res }, 04021 /* Logical_2 */ {FALSE, Err_Res }, 04022 /* Logical_4 */ {FALSE, Err_Res }, 04023 /* Logical_8 */ {FALSE, Err_Res }, 04024 /* Character_1 */ {FALSE, Err_Res }, 04025 /* Character_2 */ {FALSE, Err_Res }, 04026 /* Character_4 */ {FALSE, Err_Res }, 04027 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04028 /* Structure_Type */ {FALSE, Err_Res }, 04029 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 04030 }, 04031 /* Real_4 */ { 04032 /* Err_Res */ {FALSE, Err_Res }, 04033 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04034 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04035 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04036 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04037 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04038 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04039 /* Long_Typeless */ {FALSE, Err_Res }, 04040 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04041 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04042 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04043 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04044 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04045 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04046 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04047 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04048 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04049 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04050 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04051 /* Logical_1 */ {FALSE, Err_Res }, 04052 /* Logical_2 */ {FALSE, Err_Res }, 04053 /* Logical_4 */ {FALSE, Err_Res }, 04054 /* Logical_8 */ {FALSE, Err_Res }, 04055 /* Character_1 */ {FALSE, Err_Res }, 04056 /* Character_2 */ {FALSE, Err_Res }, 04057 /* Character_4 */ {FALSE, Err_Res }, 04058 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04059 /* Structure_Type */ {FALSE, Err_Res }, 04060 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04061 }, 04062 /* Real_8 */ { 04063 /* Err_Res */ {FALSE, Err_Res }, 04064 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04065 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04066 /* Typeless_1 */ {FALSE, Err_Res }, 04067 /* Typeless_2 */ {FALSE, Err_Res }, 04068 /* Typeless_4 */ {FALSE, Err_Res }, 04069 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04070 /* Long_Typeless */ {FALSE, Err_Res }, 04071 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04072 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04073 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04074 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04075 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04076 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04077 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04078 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04079 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04080 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04081 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04082 /* Logical_1 */ {FALSE, Err_Res }, 04083 /* Logical_2 */ {FALSE, Err_Res }, 04084 /* Logical_4 */ {FALSE, Err_Res }, 04085 /* Logical_8 */ {FALSE, Err_Res }, 04086 /* Character_1 */ {FALSE, Err_Res }, 04087 /* Character_2 */ {FALSE, Err_Res }, 04088 /* Character_4 */ {FALSE, Err_Res }, 04089 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04090 /* Structure_Type */ {FALSE, Err_Res }, 04091 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04092 }, 04093 /* Real_16 */ { 04094 /* Err_Res */ {FALSE, Err_Res }, 04095 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04096 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04097 /* Typeless_1 */ {FALSE, Err_Res }, 04098 /* Typeless_2 */ {FALSE, Err_Res }, 04099 /* Typeless_4 */ {FALSE, Err_Res }, 04100 /* Typeless_8 */ {FALSE, Err_Res }, 04101 /* Long_Typeless */ {FALSE, Err_Res }, 04102 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04103 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04104 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04105 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04106 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04107 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04108 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04109 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04110 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04111 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04112 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04113 /* Logical_1 */ {FALSE, Err_Res }, 04114 /* Logical_2 */ {FALSE, Err_Res }, 04115 /* Logical_4 */ {FALSE, Err_Res }, 04116 /* Logical_8 */ {FALSE, Err_Res }, 04117 /* Character_1 */ {FALSE, Err_Res }, 04118 /* Character_2 */ {FALSE, Err_Res }, 04119 /* Character_4 */ {FALSE, Err_Res }, 04120 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04121 /* Structure_Type */ {FALSE, Err_Res }, 04122 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04123 }, 04124 /* Complex_4 */ { 04125 /* Err_Res */ {FALSE, Err_Res }, 04126 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04127 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04128 /* Typeless_1 */ {FALSE, Err_Res }, 04129 /* Typeless_2 */ {FALSE, Err_Res }, 04130 /* Typeless_4 */ {FALSE, Err_Res }, 04131 /* Typeless_8 */ {FALSE, Err_Res }, 04132 /* Long_Typeless */ {FALSE, Err_Res }, 04133 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04134 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04135 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04136 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04137 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04138 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04139 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04140 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04141 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04142 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04143 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04144 /* Logical_1 */ {FALSE, Err_Res }, 04145 /* Logical_2 */ {FALSE, Err_Res }, 04146 /* Logical_4 */ {FALSE, Err_Res }, 04147 /* Logical_8 */ {FALSE, Err_Res }, 04148 /* Character_1 */ {FALSE, Err_Res }, 04149 /* Character_2 */ {FALSE, Err_Res }, 04150 /* Character_4 */ {FALSE, Err_Res }, 04151 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04152 /* Structure_Type */ {FALSE, Err_Res }, 04153 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04154 }, 04155 /* Complex_8 */ { 04156 /* Err_Res */ {FALSE, Err_Res }, 04157 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04158 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04159 /* Typeless_1 */ {FALSE, Err_Res }, 04160 /* Typeless_2 */ {FALSE, Err_Res }, 04161 /* Typeless_4 */ {FALSE, Err_Res }, 04162 /* Typeless_8 */ {FALSE, Err_Res }, 04163 /* Long_Typeless */ {FALSE, Err_Res }, 04164 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04165 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04166 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04167 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04168 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04169 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04170 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04171 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04172 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04173 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04174 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04175 /* Logical_1 */ {FALSE, Err_Res }, 04176 /* Logical_2 */ {FALSE, Err_Res }, 04177 /* Logical_4 */ {FALSE, Err_Res }, 04178 /* Logical_8 */ {FALSE, Err_Res }, 04179 /* Character_1 */ {FALSE, Err_Res }, 04180 /* Character_2 */ {FALSE, Err_Res }, 04181 /* Character_4 */ {FALSE, Err_Res }, 04182 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04183 /* Structure_Type */ {FALSE, Err_Res }, 04184 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04185 }, 04186 /* Complex_16 */ { 04187 /* Err_Res */ {FALSE, Err_Res }, 04188 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04189 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04190 /* Typeless_1 */ {FALSE, Err_Res }, 04191 /* Typeless_2 */ {FALSE, Err_Res }, 04192 /* Typeless_4 */ {FALSE, Err_Res }, 04193 /* Typeless_8 */ {FALSE, Err_Res }, 04194 /* Long_Typeless */ {FALSE, Err_Res }, 04195 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04196 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04197 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04198 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04199 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04200 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04201 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04202 /* Complex_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04203 /* Complex_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04204 /* Complex_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04205 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04206 /* Logical_1 */ {FALSE, Err_Res }, 04207 /* Logical_2 */ {FALSE, Err_Res }, 04208 /* Logical_4 */ {FALSE, Err_Res }, 04209 /* Logical_8 */ {FALSE, Err_Res }, 04210 /* Character_1 */ {FALSE, Err_Res }, 04211 /* Character_2 */ {FALSE, Err_Res }, 04212 /* Character_4 */ {FALSE, Err_Res }, 04213 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04214 /* Structure_Type */ {FALSE, Err_Res }, 04215 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04216 }, 04217 /* CRI_Ptr_8 */ { 04218 /* Err_Res */ {FALSE, Err_Res }, 04219 /* Short_Char_Const */ {FALSE, Err_Res }, 04220 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04221 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04222 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04223 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04224 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04225 /* Long_Typeless */ {FALSE, Err_Res }, 04226 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04227 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04228 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04229 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04230 /* Real_4 */ {FALSE, Err_Res }, 04231 /* Real_8 */ {FALSE, Err_Res }, 04232 /* Real_16 */ {FALSE, Err_Res }, 04233 /* Complex_4 */ {FALSE, Err_Res }, 04234 /* Complex_8 */ {FALSE, Err_Res }, 04235 /* Complex_16 */ {FALSE, Err_Res }, 04236 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04237 /* Logical_1 */ {FALSE, Err_Res }, 04238 /* Logical_2 */ {FALSE, Err_Res }, 04239 /* Logical_4 */ {FALSE, Err_Res }, 04240 /* Logical_8 */ {FALSE, Err_Res }, 04241 /* Character_1 */ {FALSE, Err_Res }, 04242 /* Character_2 */ {FALSE, Err_Res }, 04243 /* Character_4 */ {FALSE, Err_Res }, 04244 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04245 /* Structure_Type */ {FALSE, Err_Res }, 04246 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 04247 }, 04248 /* Logical_1 */ { 04249 /* Err_Res */ {FALSE, Err_Res }, 04250 /* Short_Char_Const */ {FALSE, Err_Res }, 04251 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04252 /* Typeless_1 */ {FALSE, Err_Res }, 04253 /* Typeless_2 */ {FALSE, Err_Res }, 04254 /* Typeless_4 */ {FALSE, Err_Res }, 04255 /* Typeless_8 */ {FALSE, Err_Res }, 04256 /* Long_Typeless */ {FALSE, Err_Res }, 04257 /* Integer_1 */ {FALSE, Err_Res }, 04258 /* Integer_2 */ {FALSE, Err_Res }, 04259 /* Integer_4 */ {FALSE, Err_Res }, 04260 /* Integer_8 */ {FALSE, Err_Res }, 04261 /* Real_4 */ {FALSE, Err_Res }, 04262 /* Real_8 */ {FALSE, Err_Res }, 04263 /* Real_16 */ {FALSE, Err_Res }, 04264 /* Complex_4 */ {FALSE, Err_Res }, 04265 /* Complex_8 */ {FALSE, Err_Res }, 04266 /* Complex_16 */ {FALSE, Err_Res }, 04267 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04268 /* Logical_1 */ {FALSE, Err_Res }, 04269 /* Logical_2 */ {FALSE, Err_Res }, 04270 /* Logical_4 */ {FALSE, Err_Res }, 04271 /* Logical_8 */ {FALSE, Err_Res }, 04272 /* Character_1 */ {FALSE, Err_Res }, 04273 /* Character_2 */ {FALSE, Err_Res }, 04274 /* Character_4 */ {FALSE, Err_Res }, 04275 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04276 /* Structure_Type */ {FALSE, Err_Res }, 04277 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04278 }, 04279 /* Logical_2 */ { 04280 /* Err_Res */ {FALSE, Err_Res }, 04281 /* Short_Char_Const */ {FALSE, Err_Res }, 04282 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04283 /* Typeless_1 */ {FALSE, Err_Res }, 04284 /* Typeless_2 */ {FALSE, Err_Res }, 04285 /* Typeless_4 */ {FALSE, Err_Res }, 04286 /* Typeless_8 */ {FALSE, Err_Res }, 04287 /* Long_Typeless */ {FALSE, Err_Res }, 04288 /* Integer_1 */ {FALSE, Err_Res }, 04289 /* Integer_2 */ {FALSE, Err_Res }, 04290 /* Integer_4 */ {FALSE, Err_Res }, 04291 /* Integer_8 */ {FALSE, Err_Res }, 04292 /* Real_4 */ {FALSE, Err_Res }, 04293 /* Real_8 */ {FALSE, Err_Res }, 04294 /* Real_16 */ {FALSE, Err_Res }, 04295 /* Complex_4 */ {FALSE, Err_Res }, 04296 /* Complex_8 */ {FALSE, Err_Res }, 04297 /* Complex_16 */ {FALSE, Err_Res }, 04298 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04299 /* Logical_1 */ {FALSE, Err_Res }, 04300 /* Logical_2 */ {FALSE, Err_Res }, 04301 /* Logical_4 */ {FALSE, Err_Res }, 04302 /* Logical_8 */ {FALSE, Err_Res }, 04303 /* Character_1 */ {FALSE, Err_Res }, 04304 /* Character_2 */ {FALSE, Err_Res }, 04305 /* Character_4 */ {FALSE, Err_Res }, 04306 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04307 /* Structure_Type */ {FALSE, Err_Res }, 04308 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04309 }, 04310 /* Logical_4 */ { 04311 /* Err_Res */ {FALSE, Err_Res }, 04312 /* Short_Char_Const */ {FALSE, Err_Res }, 04313 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04314 /* Typeless_1 */ {FALSE, Err_Res }, 04315 /* Typeless_2 */ {FALSE, Err_Res }, 04316 /* Typeless_4 */ {FALSE, Err_Res }, 04317 /* Typeless_8 */ {FALSE, Err_Res }, 04318 /* Long_Typeless */ {FALSE, Err_Res }, 04319 /* Integer_1 */ {FALSE, Err_Res }, 04320 /* Integer_2 */ {FALSE, Err_Res }, 04321 /* Integer_4 */ {FALSE, Err_Res }, 04322 /* Integer_8 */ {FALSE, Err_Res }, 04323 /* Real_4 */ {FALSE, Err_Res }, 04324 /* Real_8 */ {FALSE, Err_Res }, 04325 /* Real_16 */ {FALSE, Err_Res }, 04326 /* Complex_4 */ {FALSE, Err_Res }, 04327 /* Complex_8 */ {FALSE, Err_Res }, 04328 /* Complex_16 */ {FALSE, Err_Res }, 04329 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04330 /* Logical_1 */ {FALSE, Err_Res }, 04331 /* Logical_2 */ {FALSE, Err_Res }, 04332 /* Logical_4 */ {FALSE, Err_Res }, 04333 /* Logical_8 */ {FALSE, Err_Res }, 04334 /* Character_1 */ {FALSE, Err_Res }, 04335 /* Character_2 */ {FALSE, Err_Res }, 04336 /* Character_4 */ {FALSE, Err_Res }, 04337 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04338 /* Structure_Type */ {FALSE, Err_Res }, 04339 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04340 }, 04341 /* Logical_8 */ { 04342 /* Err_Res */ {FALSE, Err_Res }, 04343 /* Short_Char_Const */ {FALSE, Err_Res }, 04344 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04345 /* Typeless_1 */ {FALSE, Err_Res }, 04346 /* Typeless_2 */ {FALSE, Err_Res }, 04347 /* Typeless_4 */ {FALSE, Err_Res }, 04348 /* Typeless_8 */ {FALSE, Err_Res }, 04349 /* Long_Typeless */ {FALSE, Err_Res }, 04350 /* Integer_1 */ {FALSE, Err_Res }, 04351 /* Integer_2 */ {FALSE, Err_Res }, 04352 /* Integer_4 */ {FALSE, Err_Res }, 04353 /* Integer_8 */ {FALSE, Err_Res }, 04354 /* Real_4 */ {FALSE, Err_Res }, 04355 /* Real_8 */ {FALSE, Err_Res }, 04356 /* Real_16 */ {FALSE, Err_Res }, 04357 /* Complex_4 */ {FALSE, Err_Res }, 04358 /* Complex_8 */ {FALSE, Err_Res }, 04359 /* Complex_16 */ {FALSE, Err_Res }, 04360 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04361 /* Logical_1 */ {FALSE, Err_Res }, 04362 /* Logical_2 */ {FALSE, Err_Res }, 04363 /* Logical_4 */ {FALSE, Err_Res }, 04364 /* Logical_8 */ {FALSE, Err_Res }, 04365 /* Character_1 */ {FALSE, Err_Res }, 04366 /* Character_2 */ {FALSE, Err_Res }, 04367 /* Character_4 */ {FALSE, Err_Res }, 04368 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04369 /* Structure_Type */ {FALSE, Err_Res }, 04370 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04371 }, 04372 /* Character_1 */ { 04373 /* Err_Res */ {FALSE, Err_Res }, 04374 /* Short_Char_Const */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04375 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04376 /* Typeless_1 */ {FALSE, Err_Res }, 04377 /* Typeless_2 */ {FALSE, Err_Res }, 04378 /* Typeless_4 */ {FALSE, Err_Res }, 04379 /* Typeless_8 */ {FALSE, Err_Res }, 04380 /* Long_Typeless */ {FALSE, Err_Res }, 04381 /* Integer_1 */ {FALSE, Err_Res }, 04382 /* Integer_2 */ {FALSE, Err_Res }, 04383 /* Integer_4 */ {FALSE, Err_Res }, 04384 /* Integer_8 */ {FALSE, Err_Res }, 04385 /* Real_4 */ {FALSE, Err_Res }, 04386 /* Real_8 */ {FALSE, Err_Res }, 04387 /* Real_16 */ {FALSE, Err_Res }, 04388 /* Complex_4 */ {FALSE, Err_Res }, 04389 /* Complex_8 */ {FALSE, Err_Res }, 04390 /* Complex_16 */ {FALSE, Err_Res }, 04391 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04392 /* Logical_1 */ {FALSE, Err_Res }, 04393 /* Logical_2 */ {FALSE, Err_Res }, 04394 /* Logical_4 */ {FALSE, Err_Res }, 04395 /* Logical_8 */ {FALSE, Err_Res }, 04396 /* Character_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04397 /* Character_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04398 /* Character_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04399 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04400 /* Structure_Type */ {FALSE, Err_Res }, 04401 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04402 }, 04403 /* Character_2 */ { 04404 /* Err_Res */ {FALSE, Err_Res }, 04405 /* Short_Char_Const */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04406 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04407 /* Typeless_1 */ {FALSE, Err_Res }, 04408 /* Typeless_2 */ {FALSE, Err_Res }, 04409 /* Typeless_4 */ {FALSE, Err_Res }, 04410 /* Typeless_8 */ {FALSE, Err_Res }, 04411 /* Long_Typeless */ {FALSE, Err_Res }, 04412 /* Integer_1 */ {FALSE, Err_Res }, 04413 /* Integer_2 */ {FALSE, Err_Res }, 04414 /* Integer_4 */ {FALSE, Err_Res }, 04415 /* Integer_8 */ {FALSE, Err_Res }, 04416 /* Real_4 */ {FALSE, Err_Res }, 04417 /* Real_8 */ {FALSE, Err_Res }, 04418 /* Real_16 */ {FALSE, Err_Res }, 04419 /* Complex_4 */ {FALSE, Err_Res }, 04420 /* Complex_8 */ {FALSE, Err_Res }, 04421 /* Complex_16 */ {FALSE, Err_Res }, 04422 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04423 /* Logical_1 */ {FALSE, Err_Res }, 04424 /* Logical_2 */ {FALSE, Err_Res }, 04425 /* Logical_4 */ {FALSE, Err_Res }, 04426 /* Logical_8 */ {FALSE, Err_Res }, 04427 /* Character_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04428 /* Character_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04429 /* Character_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04430 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04431 /* Structure_Type */ {FALSE, Err_Res }, 04432 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04433 }, 04434 /* Character_4 */ { 04435 /* Err_Res */ {FALSE, Err_Res }, 04436 /* Short_Char_Const */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04437 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04438 /* Typeless_1 */ {FALSE, Err_Res }, 04439 /* Typeless_2 */ {FALSE, Err_Res }, 04440 /* Typeless_4 */ {FALSE, Err_Res }, 04441 /* Typeless_8 */ {FALSE, Err_Res }, 04442 /* Long_Typeless */ {FALSE, Err_Res }, 04443 /* Integer_1 */ {FALSE, Err_Res }, 04444 /* Integer_2 */ {FALSE, Err_Res }, 04445 /* Integer_4 */ {FALSE, Err_Res }, 04446 /* Integer_8 */ {FALSE, Err_Res }, 04447 /* Real_4 */ {FALSE, Err_Res }, 04448 /* Real_8 */ {FALSE, Err_Res }, 04449 /* Real_16 */ {FALSE, Err_Res }, 04450 /* Complex_4 */ {FALSE, Err_Res }, 04451 /* Complex_8 */ {FALSE, Err_Res }, 04452 /* Complex_16 */ {FALSE, Err_Res }, 04453 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04454 /* Logical_1 */ {FALSE, Err_Res }, 04455 /* Logical_2 */ {FALSE, Err_Res }, 04456 /* Logical_4 */ {FALSE, Err_Res }, 04457 /* Logical_8 */ {FALSE, Err_Res }, 04458 /* Character_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04459 /* Character_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04460 /* Character_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04461 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04462 /* Structure_Type */ {FALSE, Err_Res }, 04463 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04464 }, 04465 /* CRI_Ch_Ptr_8 */ { 04466 /* Err_Res */ {FALSE, Err_Res }, 04467 /* Short_Char_Const */ {FALSE, Err_Res }, 04468 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04469 /* Typeless_1 */ {FALSE, Err_Res }, 04470 /* Typeless_2 */ {FALSE, Err_Res }, 04471 /* Typeless_4 */ {FALSE, Err_Res }, 04472 /* Typeless_8 */ {FALSE, Err_Res }, 04473 /* Long_Typeless */ {FALSE, Err_Res }, 04474 /* Integer_1 */ {FALSE, Err_Res }, 04475 /* Integer_2 */ {FALSE, Err_Res }, 04476 /* Integer_4 */ {FALSE, Err_Res }, 04477 /* Integer_8 */ {FALSE, Err_Res }, 04478 /* Real_4 */ {FALSE, Err_Res }, 04479 /* Real_8 */ {FALSE, Err_Res }, 04480 /* Real_16 */ {FALSE, Err_Res }, 04481 /* Complex_4 */ {FALSE, Err_Res }, 04482 /* Complex_8 */ {FALSE, Err_Res }, 04483 /* Complex_16 */ {FALSE, Err_Res }, 04484 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04485 /* Logical_1 */ {FALSE, Err_Res }, 04486 /* Logical_2 */ {FALSE, Err_Res }, 04487 /* Logical_4 */ {FALSE, Err_Res }, 04488 /* Logical_8 */ {FALSE, Err_Res }, 04489 /* Character_1 */ {FALSE, Err_Res }, 04490 /* Character_2 */ {FALSE, Err_Res }, 04491 /* Character_4 */ {FALSE, Err_Res }, 04492 /* CRI_Ch_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04493 /* Structure_Type */ {FALSE, Err_Res }, 04494 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04495 }, 04496 /* Structure_Type */ { 04497 /* Err_Res */ {FALSE, Err_Res }, 04498 /* Short_Char_Const */ {FALSE, Err_Res }, 04499 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04500 /* Typeless_1 */ {FALSE, Err_Res }, 04501 /* Typeless_2 */ {FALSE, Err_Res }, 04502 /* Typeless_4 */ {FALSE, Err_Res }, 04503 /* Typeless_8 */ {FALSE, Err_Res }, 04504 /* Long_Typeless */ {FALSE, Err_Res }, 04505 /* Integer_1 */ {FALSE, Err_Res }, 04506 /* Integer_2 */ {FALSE, Err_Res }, 04507 /* Integer_4 */ {FALSE, Err_Res }, 04508 /* Integer_8 */ {FALSE, Err_Res }, 04509 /* Real_4 */ {FALSE, Err_Res }, 04510 /* Real_8 */ {FALSE, Err_Res }, 04511 /* Real_16 */ {FALSE, Err_Res }, 04512 /* Complex_4 */ {FALSE, Err_Res }, 04513 /* Complex_8 */ {FALSE, Err_Res }, 04514 /* Complex_16 */ {FALSE, Err_Res }, 04515 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04516 /* Logical_1 */ {FALSE, Err_Res }, 04517 /* Logical_2 */ {FALSE, Err_Res }, 04518 /* Logical_4 */ {FALSE, Err_Res }, 04519 /* Logical_8 */ {FALSE, Err_Res }, 04520 /* Character_1 */ {FALSE, Err_Res }, 04521 /* Character_2 */ {FALSE, Err_Res }, 04522 /* Character_4 */ {FALSE, Err_Res }, 04523 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04524 /* Structure_Type */ {FALSE, Err_Res }, 04525 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04526 }, 04527 /* CRI_Parcel_Ptr_8 */ { 04528 /* Err_Res */ {FALSE, Err_Res }, 04529 /* Short_Char_Const */ {FALSE, Err_Res }, 04530 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04531 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04532 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04533 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04534 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04535 /* Long_Typeless */ {FALSE, Err_Res }, 04536 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04537 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04538 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04539 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04540 /* Real_4 */ {FALSE, Err_Res }, 04541 /* Real_8 */ {FALSE, Err_Res }, 04542 /* Real_16 */ {FALSE, Err_Res }, 04543 /* Complex_4 */ {FALSE, Err_Res }, 04544 /* Complex_8 */ {FALSE, Err_Res }, 04545 /* Complex_16 */ {FALSE, Err_Res }, 04546 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 04547 /* Logical_1 */ {FALSE, Err_Res }, 04548 /* Logical_2 */ {FALSE, Err_Res }, 04549 /* Logical_4 */ {FALSE, Err_Res }, 04550 /* Logical_8 */ {FALSE, Err_Res }, 04551 /* Character_1 */ {FALSE, Err_Res }, 04552 /* Character_2 */ {FALSE, Err_Res }, 04553 /* Character_4 */ {FALSE, Err_Res }, 04554 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04555 /* Structure_Type */ {FALSE, Err_Res }, 04556 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 04557 } 04558 }; 04559 04560 exp_tbl_type lg_tbl[Num_Linear_Types][Num_Linear_Types] = { 04561 /* Err_Res */ { 04562 /* Err_Res */ {FALSE, Err_Res }, 04563 /* Short_Char_Const */ {FALSE, Err_Res }, 04564 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04565 /* Typeless_1 */ {FALSE, Err_Res }, 04566 /* Typeless_2 */ {FALSE, Err_Res }, 04567 /* Typeless_4 */ {FALSE, Err_Res }, 04568 /* Typeless_8 */ {FALSE, Err_Res }, 04569 /* Long_Typeless */ {FALSE, Err_Res }, 04570 /* Integer_1 */ {FALSE, Err_Res }, 04571 /* Integer_2 */ {FALSE, Err_Res }, 04572 /* Integer_4 */ {FALSE, Err_Res }, 04573 /* Integer_8 */ {FALSE, Err_Res }, 04574 /* Real_4 */ {FALSE, Err_Res }, 04575 /* Real_8 */ {FALSE, Err_Res }, 04576 /* Real_16 */ {FALSE, Err_Res }, 04577 /* Complex_4 */ {FALSE, Err_Res }, 04578 /* Complex_8 */ {FALSE, Err_Res }, 04579 /* Complex_16 */ {FALSE, Err_Res }, 04580 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04581 /* Logical_1 */ {FALSE, Err_Res }, 04582 /* Logical_2 */ {FALSE, Err_Res }, 04583 /* Logical_4 */ {FALSE, Err_Res }, 04584 /* Logical_8 */ {FALSE, Err_Res }, 04585 /* Character_1 */ {FALSE, Err_Res }, 04586 /* Character_2 */ {FALSE, Err_Res }, 04587 /* Character_4 */ {FALSE, Err_Res }, 04588 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04589 /* Structure_Type */ {FALSE, Err_Res }, 04590 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04591 }, 04592 /* Short_Char_Const */ { 04593 /* Err_Res */ {FALSE, Err_Res }, 04594 /* Short_Char_Const */ {FALSE, Err_Res }, 04595 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04596 /* Typeless_1 */ {FALSE, Err_Res }, 04597 /* Typeless_2 */ {FALSE, Err_Res }, 04598 /* Typeless_4 */ {FALSE, Err_Res }, 04599 /* Typeless_8 */ {FALSE, Err_Res }, 04600 /* Long_Typeless */ {FALSE, Err_Res }, 04601 /* Integer_1 */ {FALSE, Err_Res }, 04602 /* Integer_2 */ {FALSE, Err_Res }, 04603 /* Integer_4 */ {FALSE, Err_Res }, 04604 /* Integer_8 */ {FALSE, Err_Res }, 04605 /* Real_4 */ {FALSE, Err_Res }, 04606 /* Real_8 */ {FALSE, Err_Res }, 04607 /* Real_16 */ {FALSE, Err_Res }, 04608 /* Complex_4 */ {FALSE, Err_Res }, 04609 /* Complex_8 */ {FALSE, Err_Res }, 04610 /* Complex_16 */ {FALSE, Err_Res }, 04611 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04612 /* Logical_1 */ {FALSE, Err_Res }, 04613 /* Logical_2 */ {FALSE, Err_Res }, 04614 /* Logical_4 */ {FALSE, Err_Res }, 04615 /* Logical_8 */ {FALSE, Err_Res }, 04616 /* Character_1 */ {FALSE, Err_Res }, 04617 /* Character_2 */ {FALSE, Err_Res }, 04618 /* Character_4 */ {FALSE, Err_Res }, 04619 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04620 /* Structure_Type */ {FALSE, Err_Res }, 04621 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04622 }, 04623 /* Short_Typeless_Const */ { 04624 /* Err_Res */ {FALSE, Err_Res }, 04625 /* Short_Char_Const */ {FALSE, Err_Res }, 04626 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04627 /* Typeless_1 */ {FALSE, Err_Res }, 04628 /* Typeless_2 */ {FALSE, Err_Res }, 04629 /* Typeless_4 */ {FALSE, Err_Res }, 04630 /* Typeless_8 */ {FALSE, Err_Res }, 04631 /* Long_Typeless */ {FALSE, Err_Res }, 04632 /* Integer_1 */ {FALSE, Err_Res }, 04633 /* Integer_2 */ {FALSE, Err_Res }, 04634 /* Integer_4 */ {FALSE, Err_Res }, 04635 /* Integer_8 */ {FALSE, Err_Res }, 04636 /* Real_4 */ {FALSE, Err_Res }, 04637 /* Real_8 */ {FALSE, Err_Res }, 04638 /* Real_16 */ {FALSE, Err_Res }, 04639 /* Complex_4 */ {FALSE, Err_Res }, 04640 /* Complex_8 */ {FALSE, Err_Res }, 04641 /* Complex_16 */ {FALSE, Err_Res }, 04642 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04643 /* Logical_1 */ {FALSE, Err_Res }, 04644 /* Logical_2 */ {FALSE, Err_Res }, 04645 /* Logical_4 */ {FALSE, Err_Res }, 04646 /* Logical_8 */ {FALSE, Err_Res }, 04647 /* Character_1 */ {FALSE, Err_Res }, 04648 /* Character_2 */ {FALSE, Err_Res }, 04649 /* Character_4 */ {FALSE, Err_Res }, 04650 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04651 /* Structure_Type */ {FALSE, Err_Res }, 04652 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04653 }, 04654 /* Typeless_1 */ { 04655 /* Err_Res */ {FALSE, Err_Res }, 04656 /* Short_Char_Const */ {FALSE, Err_Res }, 04657 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04658 /* Typeless_1 */ {FALSE, Err_Res }, 04659 /* Typeless_2 */ {FALSE, Err_Res }, 04660 /* Typeless_4 */ {FALSE, Err_Res }, 04661 /* Typeless_8 */ {FALSE, Err_Res }, 04662 /* Long_Typeless */ {FALSE, Err_Res }, 04663 /* Integer_1 */ {FALSE, Err_Res }, 04664 /* Integer_2 */ {FALSE, Err_Res }, 04665 /* Integer_4 */ {FALSE, Err_Res }, 04666 /* Integer_8 */ {FALSE, Err_Res }, 04667 /* Real_4 */ {FALSE, Err_Res }, 04668 /* Real_8 */ {FALSE, Err_Res }, 04669 /* Real_16 */ {FALSE, Err_Res }, 04670 /* Complex_4 */ {FALSE, Err_Res }, 04671 /* Complex_8 */ {FALSE, Err_Res }, 04672 /* Complex_16 */ {FALSE, Err_Res }, 04673 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04674 /* Logical_1 */ {FALSE, Err_Res }, 04675 /* Logical_2 */ {FALSE, Err_Res }, 04676 /* Logical_4 */ {FALSE, Err_Res }, 04677 /* Logical_8 */ {FALSE, Err_Res }, 04678 /* Character_1 */ {FALSE, Err_Res }, 04679 /* Character_2 */ {FALSE, Err_Res }, 04680 /* Character_4 */ {FALSE, Err_Res }, 04681 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04682 /* Structure_Type */ {FALSE, Err_Res }, 04683 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04684 }, 04685 /* Typeless_2 */ { 04686 /* Err_Res */ {FALSE, Err_Res }, 04687 /* Short_Char_Const */ {FALSE, Err_Res }, 04688 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04689 /* Typeless_1 */ {FALSE, Err_Res }, 04690 /* Typeless_2 */ {FALSE, Err_Res }, 04691 /* Typeless_4 */ {FALSE, Err_Res }, 04692 /* Typeless_8 */ {FALSE, Err_Res }, 04693 /* Long_Typeless */ {FALSE, Err_Res }, 04694 /* Integer_1 */ {FALSE, Err_Res }, 04695 /* Integer_2 */ {FALSE, Err_Res }, 04696 /* Integer_4 */ {FALSE, Err_Res }, 04697 /* Integer_8 */ {FALSE, Err_Res }, 04698 /* Real_4 */ {FALSE, Err_Res }, 04699 /* Real_8 */ {FALSE, Err_Res }, 04700 /* Real_16 */ {FALSE, Err_Res }, 04701 /* Complex_4 */ {FALSE, Err_Res }, 04702 /* Complex_8 */ {FALSE, Err_Res }, 04703 /* Complex_16 */ {FALSE, Err_Res }, 04704 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04705 /* Logical_1 */ {FALSE, Err_Res }, 04706 /* Logical_2 */ {FALSE, Err_Res }, 04707 /* Logical_4 */ {FALSE, Err_Res }, 04708 /* Logical_8 */ {FALSE, Err_Res }, 04709 /* Character_1 */ {FALSE, Err_Res }, 04710 /* Character_2 */ {FALSE, Err_Res }, 04711 /* Character_4 */ {FALSE, Err_Res }, 04712 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04713 /* Structure_Type */ {FALSE, Err_Res }, 04714 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04715 }, 04716 /* Typeless_4 */ { 04717 /* Err_Res */ {FALSE, Err_Res }, 04718 /* Short_Char_Const */ {FALSE, Err_Res }, 04719 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04720 /* Typeless_1 */ {FALSE, Err_Res }, 04721 /* Typeless_2 */ {FALSE, Err_Res }, 04722 /* Typeless_4 */ {FALSE, Err_Res }, 04723 /* Typeless_8 */ {FALSE, Err_Res }, 04724 /* Long_Typeless */ {FALSE, Err_Res }, 04725 /* Integer_1 */ {FALSE, Err_Res }, 04726 /* Integer_2 */ {FALSE, Err_Res }, 04727 /* Integer_4 */ {FALSE, Err_Res }, 04728 /* Integer_8 */ {FALSE, Err_Res }, 04729 /* Real_4 */ {FALSE, Err_Res }, 04730 /* Real_8 */ {FALSE, Err_Res }, 04731 /* Real_16 */ {FALSE, Err_Res }, 04732 /* Complex_4 */ {FALSE, Err_Res }, 04733 /* Complex_8 */ {FALSE, Err_Res }, 04734 /* Complex_16 */ {FALSE, Err_Res }, 04735 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04736 /* Logical_1 */ {FALSE, Err_Res }, 04737 /* Logical_2 */ {FALSE, Err_Res }, 04738 /* Logical_4 */ {FALSE, Err_Res }, 04739 /* Logical_8 */ {FALSE, Err_Res }, 04740 /* Character_1 */ {FALSE, Err_Res }, 04741 /* Character_2 */ {FALSE, Err_Res }, 04742 /* Character_4 */ {FALSE, Err_Res }, 04743 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04744 /* Structure_Type */ {FALSE, Err_Res }, 04745 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04746 }, 04747 /* Typeless_8 */ { 04748 /* Err_Res */ {FALSE, Err_Res }, 04749 /* Short_Char_Const */ {FALSE, Err_Res }, 04750 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04751 /* Typeless_1 */ {FALSE, Err_Res }, 04752 /* Typeless_2 */ {FALSE, Err_Res }, 04753 /* Typeless_4 */ {FALSE, Err_Res }, 04754 /* Typeless_8 */ {FALSE, Err_Res }, 04755 /* Long_Typeless */ {FALSE, Err_Res }, 04756 /* Integer_1 */ {FALSE, Err_Res }, 04757 /* Integer_2 */ {FALSE, Err_Res }, 04758 /* Integer_4 */ {FALSE, Err_Res }, 04759 /* Integer_8 */ {FALSE, Err_Res }, 04760 /* Real_4 */ {FALSE, Err_Res }, 04761 /* Real_8 */ {FALSE, Err_Res }, 04762 /* Real_16 */ {FALSE, Err_Res }, 04763 /* Complex_4 */ {FALSE, Err_Res }, 04764 /* Complex_8 */ {FALSE, Err_Res }, 04765 /* Complex_16 */ {FALSE, Err_Res }, 04766 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04767 /* Logical_1 */ {FALSE, Err_Res }, 04768 /* Logical_2 */ {FALSE, Err_Res }, 04769 /* Logical_4 */ {FALSE, Err_Res }, 04770 /* Logical_8 */ {FALSE, Err_Res }, 04771 /* Character_1 */ {FALSE, Err_Res }, 04772 /* Character_2 */ {FALSE, Err_Res }, 04773 /* Character_4 */ {FALSE, Err_Res }, 04774 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04775 /* Structure_Type */ {FALSE, Err_Res }, 04776 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04777 }, 04778 /* Long_Typeless */ { 04779 /* Err_Res */ {FALSE, Err_Res }, 04780 /* Short_Char_Const */ {FALSE, Err_Res }, 04781 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04782 /* Typeless_1 */ {FALSE, Err_Res }, 04783 /* Typeless_2 */ {FALSE, Err_Res }, 04784 /* Typeless_4 */ {FALSE, Err_Res }, 04785 /* Typeless_8 */ {FALSE, Err_Res }, 04786 /* Long_Typeless */ {FALSE, Err_Res }, 04787 /* Integer_1 */ {FALSE, Err_Res }, 04788 /* Integer_2 */ {FALSE, Err_Res }, 04789 /* Integer_4 */ {FALSE, Err_Res }, 04790 /* Integer_8 */ {FALSE, Err_Res }, 04791 /* Real_4 */ {FALSE, Err_Res }, 04792 /* Real_8 */ {FALSE, Err_Res }, 04793 /* Real_16 */ {FALSE, Err_Res }, 04794 /* Complex_4 */ {FALSE, Err_Res }, 04795 /* Complex_8 */ {FALSE, Err_Res }, 04796 /* Complex_16 */ {FALSE, Err_Res }, 04797 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04798 /* Logical_1 */ {FALSE, Err_Res }, 04799 /* Logical_2 */ {FALSE, Err_Res }, 04800 /* Logical_4 */ {FALSE, Err_Res }, 04801 /* Logical_8 */ {FALSE, Err_Res }, 04802 /* Character_1 */ {FALSE, Err_Res }, 04803 /* Character_2 */ {FALSE, Err_Res }, 04804 /* Character_4 */ {FALSE, Err_Res }, 04805 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04806 /* Structure_Type */ {FALSE, Err_Res }, 04807 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04808 }, 04809 /* Integer_1 */ { 04810 /* Err_Res */ {FALSE, Err_Res }, 04811 /* Short_Char_Const */ {FALSE, Err_Res }, 04812 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04813 /* Typeless_1 */ {FALSE, Err_Res }, 04814 /* Typeless_2 */ {FALSE, Err_Res }, 04815 /* Typeless_4 */ {FALSE, Err_Res }, 04816 /* Typeless_8 */ {FALSE, Err_Res }, 04817 /* Long_Typeless */ {FALSE, Err_Res }, 04818 /* Integer_1 */ {FALSE, Err_Res }, 04819 /* Integer_2 */ {FALSE, Err_Res }, 04820 /* Integer_4 */ {FALSE, Err_Res }, 04821 /* Integer_8 */ {FALSE, Err_Res }, 04822 /* Real_4 */ {FALSE, Err_Res }, 04823 /* Real_8 */ {FALSE, Err_Res }, 04824 /* Real_16 */ {FALSE, Err_Res }, 04825 /* Complex_4 */ {FALSE, Err_Res }, 04826 /* Complex_8 */ {FALSE, Err_Res }, 04827 /* Complex_16 */ {FALSE, Err_Res }, 04828 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04829 /* Logical_1 */ {FALSE, Err_Res }, 04830 /* Logical_2 */ {FALSE, Err_Res }, 04831 /* Logical_4 */ {FALSE, Err_Res }, 04832 /* Logical_8 */ {FALSE, Err_Res }, 04833 /* Character_1 */ {FALSE, Err_Res }, 04834 /* Character_2 */ {FALSE, Err_Res }, 04835 /* Character_4 */ {FALSE, Err_Res }, 04836 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04837 /* Structure_Type */ {FALSE, Err_Res }, 04838 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04839 }, 04840 /* Integer_2 */ { 04841 /* Err_Res */ {FALSE, Err_Res }, 04842 /* Short_Char_Const */ {FALSE, Err_Res }, 04843 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04844 /* Typeless_1 */ {FALSE, Err_Res }, 04845 /* Typeless_2 */ {FALSE, Err_Res }, 04846 /* Typeless_4 */ {FALSE, Err_Res }, 04847 /* Typeless_8 */ {FALSE, Err_Res }, 04848 /* Long_Typeless */ {FALSE, Err_Res }, 04849 /* Integer_1 */ {FALSE, Err_Res }, 04850 /* Integer_2 */ {FALSE, Err_Res }, 04851 /* Integer_4 */ {FALSE, Err_Res }, 04852 /* Integer_8 */ {FALSE, Err_Res }, 04853 /* Real_4 */ {FALSE, Err_Res }, 04854 /* Real_8 */ {FALSE, Err_Res }, 04855 /* Real_16 */ {FALSE, Err_Res }, 04856 /* Complex_4 */ {FALSE, Err_Res }, 04857 /* Complex_8 */ {FALSE, Err_Res }, 04858 /* Complex_16 */ {FALSE, Err_Res }, 04859 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04860 /* Logical_1 */ {FALSE, Err_Res }, 04861 /* Logical_2 */ {FALSE, Err_Res }, 04862 /* Logical_4 */ {FALSE, Err_Res }, 04863 /* Logical_8 */ {FALSE, Err_Res }, 04864 /* Character_1 */ {FALSE, Err_Res }, 04865 /* Character_2 */ {FALSE, Err_Res }, 04866 /* Character_4 */ {FALSE, Err_Res }, 04867 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04868 /* Structure_Type */ {FALSE, Err_Res }, 04869 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04870 }, 04871 /* Integer_4 */ { 04872 /* Err_Res */ {FALSE, Err_Res }, 04873 /* Short_Char_Const */ {FALSE, Err_Res }, 04874 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04875 /* Typeless_1 */ {FALSE, Err_Res }, 04876 /* Typeless_2 */ {FALSE, Err_Res }, 04877 /* Typeless_4 */ {FALSE, Err_Res }, 04878 /* Typeless_8 */ {FALSE, Err_Res }, 04879 /* Long_Typeless */ {FALSE, Err_Res }, 04880 /* Integer_1 */ {FALSE, Err_Res }, 04881 /* Integer_2 */ {FALSE, Err_Res }, 04882 /* Integer_4 */ {FALSE, Err_Res }, 04883 /* Integer_8 */ {FALSE, Err_Res }, 04884 /* Real_4 */ {FALSE, Err_Res }, 04885 /* Real_8 */ {FALSE, Err_Res }, 04886 /* Real_16 */ {FALSE, Err_Res }, 04887 /* Complex_4 */ {FALSE, Err_Res }, 04888 /* Complex_8 */ {FALSE, Err_Res }, 04889 /* Complex_16 */ {FALSE, Err_Res }, 04890 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04891 /* Logical_1 */ {FALSE, Err_Res }, 04892 /* Logical_2 */ {FALSE, Err_Res }, 04893 /* Logical_4 */ {FALSE, Err_Res }, 04894 /* Logical_8 */ {FALSE, Err_Res }, 04895 /* Character_1 */ {FALSE, Err_Res }, 04896 /* Character_2 */ {FALSE, Err_Res }, 04897 /* Character_4 */ {FALSE, Err_Res }, 04898 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04899 /* Structure_Type */ {FALSE, Err_Res }, 04900 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04901 }, 04902 /* Integer_8 */ { 04903 /* Err_Res */ {FALSE, Err_Res }, 04904 /* Short_Char_Const */ {FALSE, Err_Res }, 04905 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04906 /* Typeless_1 */ {FALSE, Err_Res }, 04907 /* Typeless_2 */ {FALSE, Err_Res }, 04908 /* Typeless_4 */ {FALSE, Err_Res }, 04909 /* Typeless_8 */ {FALSE, Err_Res }, 04910 /* Long_Typeless */ {FALSE, Err_Res }, 04911 /* Integer_1 */ {FALSE, Err_Res }, 04912 /* Integer_2 */ {FALSE, Err_Res }, 04913 /* Integer_4 */ {FALSE, Err_Res }, 04914 /* Integer_8 */ {FALSE, Err_Res }, 04915 /* Real_4 */ {FALSE, Err_Res }, 04916 /* Real_8 */ {FALSE, Err_Res }, 04917 /* Real_16 */ {FALSE, Err_Res }, 04918 /* Complex_4 */ {FALSE, Err_Res }, 04919 /* Complex_8 */ {FALSE, Err_Res }, 04920 /* Complex_16 */ {FALSE, Err_Res }, 04921 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04922 /* Logical_1 */ {FALSE, Err_Res }, 04923 /* Logical_2 */ {FALSE, Err_Res }, 04924 /* Logical_4 */ {FALSE, Err_Res }, 04925 /* Logical_8 */ {FALSE, Err_Res }, 04926 /* Character_1 */ {FALSE, Err_Res }, 04927 /* Character_2 */ {FALSE, Err_Res }, 04928 /* Character_4 */ {FALSE, Err_Res }, 04929 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04930 /* Structure_Type */ {FALSE, Err_Res }, 04931 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04932 }, 04933 /* Real_4 */ { 04934 /* Err_Res */ {FALSE, Err_Res }, 04935 /* Short_Char_Const */ {FALSE, Err_Res }, 04936 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04937 /* Typeless_1 */ {FALSE, Err_Res }, 04938 /* Typeless_2 */ {FALSE, Err_Res }, 04939 /* Typeless_4 */ {FALSE, Err_Res }, 04940 /* Typeless_8 */ {FALSE, Err_Res }, 04941 /* Long_Typeless */ {FALSE, Err_Res }, 04942 /* Integer_1 */ {FALSE, Err_Res }, 04943 /* Integer_2 */ {FALSE, Err_Res }, 04944 /* Integer_4 */ {FALSE, Err_Res }, 04945 /* Integer_8 */ {FALSE, Err_Res }, 04946 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04947 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04948 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04949 /* Complex_4 */ {FALSE, Err_Res }, 04950 /* Complex_8 */ {FALSE, Err_Res }, 04951 /* Complex_16 */ {FALSE, Err_Res }, 04952 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04953 /* Logical_1 */ {FALSE, Err_Res }, 04954 /* Logical_2 */ {FALSE, Err_Res }, 04955 /* Logical_4 */ {FALSE, Err_Res }, 04956 /* Logical_8 */ {FALSE, Err_Res }, 04957 /* Character_1 */ {FALSE, Err_Res }, 04958 /* Character_2 */ {FALSE, Err_Res }, 04959 /* Character_4 */ {FALSE, Err_Res }, 04960 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04961 /* Structure_Type */ {FALSE, Err_Res }, 04962 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04963 }, 04964 /* Real_8 */ { 04965 /* Err_Res */ {FALSE, Err_Res }, 04966 /* Short_Char_Const */ {FALSE, Err_Res }, 04967 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04968 /* Typeless_1 */ {FALSE, Err_Res }, 04969 /* Typeless_2 */ {FALSE, Err_Res }, 04970 /* Typeless_4 */ {FALSE, Err_Res }, 04971 /* Typeless_8 */ {FALSE, Err_Res }, 04972 /* Long_Typeless */ {FALSE, Err_Res }, 04973 /* Integer_1 */ {FALSE, Err_Res }, 04974 /* Integer_2 */ {FALSE, Err_Res }, 04975 /* Integer_4 */ {FALSE, Err_Res }, 04976 /* Integer_8 */ {FALSE, Err_Res }, 04977 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04978 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04979 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 04980 /* Complex_4 */ {FALSE, Err_Res }, 04981 /* Complex_8 */ {FALSE, Err_Res }, 04982 /* Complex_16 */ {FALSE, Err_Res }, 04983 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 04984 /* Logical_1 */ {FALSE, Err_Res }, 04985 /* Logical_2 */ {FALSE, Err_Res }, 04986 /* Logical_4 */ {FALSE, Err_Res }, 04987 /* Logical_8 */ {FALSE, Err_Res }, 04988 /* Character_1 */ {FALSE, Err_Res }, 04989 /* Character_2 */ {FALSE, Err_Res }, 04990 /* Character_4 */ {FALSE, Err_Res }, 04991 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 04992 /* Structure_Type */ {FALSE, Err_Res }, 04993 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 04994 }, 04995 /* Real_16 */ { 04996 /* Err_Res */ {FALSE, Err_Res }, 04997 /* Short_Char_Const */ {FALSE, Err_Res }, 04998 /* Short_Typeless_Const */ {FALSE, Err_Res }, 04999 /* Typeless_1 */ {FALSE, Err_Res }, 05000 /* Typeless_2 */ {FALSE, Err_Res }, 05001 /* Typeless_4 */ {FALSE, Err_Res }, 05002 /* Typeless_8 */ {FALSE, Err_Res }, 05003 /* Long_Typeless */ {FALSE, Err_Res }, 05004 /* Integer_1 */ {FALSE, Err_Res }, 05005 /* Integer_2 */ {FALSE, Err_Res }, 05006 /* Integer_4 */ {FALSE, Err_Res }, 05007 /* Integer_8 */ {FALSE, Err_Res }, 05008 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05009 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05010 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05011 /* Complex_4 */ {FALSE, Err_Res }, 05012 /* Complex_8 */ {FALSE, Err_Res }, 05013 /* Complex_16 */ {FALSE, Err_Res }, 05014 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05015 /* Logical_1 */ {FALSE, Err_Res }, 05016 /* Logical_2 */ {FALSE, Err_Res }, 05017 /* Logical_4 */ {FALSE, Err_Res }, 05018 /* Logical_8 */ {FALSE, Err_Res }, 05019 /* Character_1 */ {FALSE, Err_Res }, 05020 /* Character_2 */ {FALSE, Err_Res }, 05021 /* Character_4 */ {FALSE, Err_Res }, 05022 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05023 /* Structure_Type */ {FALSE, Err_Res }, 05024 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05025 }, 05026 /* Complex_4 */ { 05027 /* Err_Res */ {FALSE, Err_Res }, 05028 /* Short_Char_Const */ {FALSE, Err_Res }, 05029 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05030 /* Typeless_1 */ {FALSE, Err_Res }, 05031 /* Typeless_2 */ {FALSE, Err_Res }, 05032 /* Typeless_4 */ {FALSE, Err_Res }, 05033 /* Typeless_8 */ {FALSE, Err_Res }, 05034 /* Long_Typeless */ {FALSE, Err_Res }, 05035 /* Integer_1 */ {FALSE, Err_Res }, 05036 /* Integer_2 */ {FALSE, Err_Res }, 05037 /* Integer_4 */ {FALSE, Err_Res }, 05038 /* Integer_8 */ {FALSE, Err_Res }, 05039 /* Real_4 */ {FALSE, Err_Res }, 05040 /* Real_8 */ {FALSE, Err_Res }, 05041 /* Real_16 */ {FALSE, Err_Res }, 05042 /* Complex_4 */ {FALSE, Err_Res }, 05043 /* Complex_8 */ {FALSE, Err_Res }, 05044 /* Complex_16 */ {FALSE, Err_Res }, 05045 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05046 /* Logical_1 */ {FALSE, Err_Res }, 05047 /* Logical_2 */ {FALSE, Err_Res }, 05048 /* Logical_4 */ {FALSE, Err_Res }, 05049 /* Logical_8 */ {FALSE, Err_Res }, 05050 /* Character_1 */ {FALSE, Err_Res }, 05051 /* Character_2 */ {FALSE, Err_Res }, 05052 /* Character_4 */ {FALSE, Err_Res }, 05053 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05054 /* Structure_Type */ {FALSE, Err_Res }, 05055 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05056 }, 05057 /* Complex_8 */ { 05058 /* Err_Res */ {FALSE, Err_Res }, 05059 /* Short_Char_Const */ {FALSE, Err_Res }, 05060 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05061 /* Typeless_1 */ {FALSE, Err_Res }, 05062 /* Typeless_2 */ {FALSE, Err_Res }, 05063 /* Typeless_4 */ {FALSE, Err_Res }, 05064 /* Typeless_8 */ {FALSE, Err_Res }, 05065 /* Long_Typeless */ {FALSE, Err_Res }, 05066 /* Integer_1 */ {FALSE, Err_Res }, 05067 /* Integer_2 */ {FALSE, Err_Res }, 05068 /* Integer_4 */ {FALSE, Err_Res }, 05069 /* Integer_8 */ {FALSE, Err_Res }, 05070 /* Real_4 */ {FALSE, Err_Res }, 05071 /* Real_8 */ {FALSE, Err_Res }, 05072 /* Real_16 */ {FALSE, Err_Res }, 05073 /* Complex_4 */ {FALSE, Err_Res }, 05074 /* Complex_8 */ {FALSE, Err_Res }, 05075 /* Complex_16 */ {FALSE, Err_Res }, 05076 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05077 /* Logical_1 */ {FALSE, Err_Res }, 05078 /* Logical_2 */ {FALSE, Err_Res }, 05079 /* Logical_4 */ {FALSE, Err_Res }, 05080 /* Logical_8 */ {FALSE, Err_Res }, 05081 /* Character_1 */ {FALSE, Err_Res }, 05082 /* Character_2 */ {FALSE, Err_Res }, 05083 /* Character_4 */ {FALSE, Err_Res }, 05084 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05085 /* Structure_Type */ {FALSE, Err_Res }, 05086 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05087 }, 05088 /* Complex_16 */ { 05089 /* Err_Res */ {FALSE, Err_Res }, 05090 /* Short_Char_Const */ {FALSE, Err_Res }, 05091 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05092 /* Typeless_1 */ {FALSE, Err_Res }, 05093 /* Typeless_2 */ {FALSE, Err_Res }, 05094 /* Typeless_4 */ {FALSE, Err_Res }, 05095 /* Typeless_8 */ {FALSE, Err_Res }, 05096 /* Long_Typeless */ {FALSE, Err_Res }, 05097 /* Integer_1 */ {FALSE, Err_Res }, 05098 /* Integer_2 */ {FALSE, Err_Res }, 05099 /* Integer_4 */ {FALSE, Err_Res }, 05100 /* Integer_8 */ {FALSE, Err_Res }, 05101 /* Real_4 */ {FALSE, Err_Res }, 05102 /* Real_8 */ {FALSE, Err_Res }, 05103 /* Real_16 */ {FALSE, Err_Res }, 05104 /* Complex_4 */ {FALSE, Err_Res }, 05105 /* Complex_8 */ {FALSE, Err_Res }, 05106 /* Complex_16 */ {FALSE, Err_Res }, 05107 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05108 /* Logical_1 */ {FALSE, Err_Res }, 05109 /* Logical_2 */ {FALSE, Err_Res }, 05110 /* Logical_4 */ {FALSE, Err_Res }, 05111 /* Logical_8 */ {FALSE, Err_Res }, 05112 /* Character_1 */ {FALSE, Err_Res }, 05113 /* Character_2 */ {FALSE, Err_Res }, 05114 /* Character_4 */ {FALSE, Err_Res }, 05115 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05116 /* Structure_Type */ {FALSE, Err_Res }, 05117 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05118 }, 05119 /* CRI_Ptr_8 */ { 05120 /* Err_Res */ {FALSE, Err_Res }, 05121 /* Short_Char_Const */ {FALSE, Err_Res }, 05122 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05123 /* Typeless_1 */ {FALSE, Err_Res }, 05124 /* Typeless_2 */ {FALSE, Err_Res }, 05125 /* Typeless_4 */ {FALSE, Err_Res }, 05126 /* Typeless_8 */ {FALSE, Err_Res }, 05127 /* Long_Typeless */ {FALSE, Err_Res }, 05128 /* Integer_1 */ {FALSE, Err_Res }, 05129 /* Integer_2 */ {FALSE, Err_Res }, 05130 /* Integer_4 */ {FALSE, Err_Res }, 05131 /* Integer_8 */ {FALSE, Err_Res }, 05132 /* Real_4 */ {FALSE, Err_Res }, 05133 /* Real_8 */ {FALSE, Err_Res }, 05134 /* Real_16 */ {FALSE, Err_Res }, 05135 /* Complex_4 */ {FALSE, Err_Res }, 05136 /* Complex_8 */ {FALSE, Err_Res }, 05137 /* Complex_16 */ {FALSE, Err_Res }, 05138 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05139 /* Logical_1 */ {FALSE, Err_Res }, 05140 /* Logical_2 */ {FALSE, Err_Res }, 05141 /* Logical_4 */ {FALSE, Err_Res }, 05142 /* Logical_8 */ {FALSE, Err_Res }, 05143 /* Character_1 */ {FALSE, Err_Res }, 05144 /* Character_2 */ {FALSE, Err_Res }, 05145 /* Character_4 */ {FALSE, Err_Res }, 05146 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05147 /* Structure_Type */ {FALSE, Err_Res }, 05148 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05149 }, 05150 /* Logical_1 */ { 05151 /* Err_Res */ {FALSE, Err_Res }, 05152 /* Short_Char_Const */ {FALSE, Err_Res }, 05153 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05154 /* Typeless_1 */ {FALSE, Err_Res }, 05155 /* Typeless_2 */ {FALSE, Err_Res }, 05156 /* Typeless_4 */ {FALSE, Err_Res }, 05157 /* Typeless_8 */ {FALSE, Err_Res }, 05158 /* Long_Typeless */ {FALSE, Err_Res }, 05159 /* Integer_1 */ {FALSE, Err_Res }, 05160 /* Integer_2 */ {FALSE, Err_Res }, 05161 /* Integer_4 */ {FALSE, Err_Res }, 05162 /* Integer_8 */ {FALSE, Err_Res }, 05163 /* Real_4 */ {FALSE, Err_Res }, 05164 /* Real_8 */ {FALSE, Err_Res }, 05165 /* Real_16 */ {FALSE, Err_Res }, 05166 /* Complex_4 */ {FALSE, Err_Res }, 05167 /* Complex_8 */ {FALSE, Err_Res }, 05168 /* Complex_16 */ {FALSE, Err_Res }, 05169 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05170 /* Logical_1 */ {FALSE, Err_Res }, 05171 /* Logical_2 */ {FALSE, Err_Res }, 05172 /* Logical_4 */ {FALSE, Err_Res }, 05173 /* Logical_8 */ {FALSE, Err_Res }, 05174 /* Character_1 */ {FALSE, Err_Res }, 05175 /* Character_2 */ {FALSE, Err_Res }, 05176 /* Character_4 */ {FALSE, Err_Res }, 05177 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05178 /* Structure_Type */ {FALSE, Err_Res }, 05179 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05180 }, 05181 /* Logical_2 */ { 05182 /* Err_Res */ {FALSE, Err_Res }, 05183 /* Short_Char_Const */ {FALSE, Err_Res }, 05184 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05185 /* Typeless_1 */ {FALSE, Err_Res }, 05186 /* Typeless_2 */ {FALSE, Err_Res }, 05187 /* Typeless_4 */ {FALSE, Err_Res }, 05188 /* Typeless_8 */ {FALSE, Err_Res }, 05189 /* Long_Typeless */ {FALSE, Err_Res }, 05190 /* Integer_1 */ {FALSE, Err_Res }, 05191 /* Integer_2 */ {FALSE, Err_Res }, 05192 /* Integer_4 */ {FALSE, Err_Res }, 05193 /* Integer_8 */ {FALSE, Err_Res }, 05194 /* Real_4 */ {FALSE, Err_Res }, 05195 /* Real_8 */ {FALSE, Err_Res }, 05196 /* Real_16 */ {FALSE, Err_Res }, 05197 /* Complex_4 */ {FALSE, Err_Res }, 05198 /* Complex_8 */ {FALSE, Err_Res }, 05199 /* Complex_16 */ {FALSE, Err_Res }, 05200 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05201 /* Logical_1 */ {FALSE, Err_Res }, 05202 /* Logical_2 */ {FALSE, Err_Res }, 05203 /* Logical_4 */ {FALSE, Err_Res }, 05204 /* Logical_8 */ {FALSE, Err_Res }, 05205 /* Character_1 */ {FALSE, Err_Res }, 05206 /* Character_2 */ {FALSE, Err_Res }, 05207 /* Character_4 */ {FALSE, Err_Res }, 05208 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05209 /* Structure_Type */ {FALSE, Err_Res }, 05210 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05211 }, 05212 /* Logical_4 */ { 05213 /* Err_Res */ {FALSE, Err_Res }, 05214 /* Short_Char_Const */ {FALSE, Err_Res }, 05215 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05216 /* Typeless_1 */ {FALSE, Err_Res }, 05217 /* Typeless_2 */ {FALSE, Err_Res }, 05218 /* Typeless_4 */ {FALSE, Err_Res }, 05219 /* Typeless_8 */ {FALSE, Err_Res }, 05220 /* Long_Typeless */ {FALSE, Err_Res }, 05221 /* Integer_1 */ {FALSE, Err_Res }, 05222 /* Integer_2 */ {FALSE, Err_Res }, 05223 /* Integer_4 */ {FALSE, Err_Res }, 05224 /* Integer_8 */ {FALSE, Err_Res }, 05225 /* Real_4 */ {FALSE, Err_Res }, 05226 /* Real_8 */ {FALSE, Err_Res }, 05227 /* Real_16 */ {FALSE, Err_Res }, 05228 /* Complex_4 */ {FALSE, Err_Res }, 05229 /* Complex_8 */ {FALSE, Err_Res }, 05230 /* Complex_16 */ {FALSE, Err_Res }, 05231 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05232 /* Logical_1 */ {FALSE, Err_Res }, 05233 /* Logical_2 */ {FALSE, Err_Res }, 05234 /* Logical_4 */ {FALSE, Err_Res }, 05235 /* Logical_8 */ {FALSE, Err_Res }, 05236 /* Character_1 */ {FALSE, Err_Res }, 05237 /* Character_2 */ {FALSE, Err_Res }, 05238 /* Character_4 */ {FALSE, Err_Res }, 05239 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05240 /* Structure_Type */ {FALSE, Err_Res }, 05241 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05242 }, 05243 /* Logical_8 */ { 05244 /* Err_Res */ {FALSE, Err_Res }, 05245 /* Short_Char_Const */ {FALSE, Err_Res }, 05246 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05247 /* Typeless_1 */ {FALSE, Err_Res }, 05248 /* Typeless_2 */ {FALSE, Err_Res }, 05249 /* Typeless_4 */ {FALSE, Err_Res }, 05250 /* Typeless_8 */ {FALSE, Err_Res }, 05251 /* Long_Typeless */ {FALSE, Err_Res }, 05252 /* Integer_1 */ {FALSE, Err_Res }, 05253 /* Integer_2 */ {FALSE, Err_Res }, 05254 /* Integer_4 */ {FALSE, Err_Res }, 05255 /* Integer_8 */ {FALSE, Err_Res }, 05256 /* Real_4 */ {FALSE, Err_Res }, 05257 /* Real_8 */ {FALSE, Err_Res }, 05258 /* Real_16 */ {FALSE, Err_Res }, 05259 /* Complex_4 */ {FALSE, Err_Res }, 05260 /* Complex_8 */ {FALSE, Err_Res }, 05261 /* Complex_16 */ {FALSE, Err_Res }, 05262 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05263 /* Logical_1 */ {FALSE, Err_Res }, 05264 /* Logical_2 */ {FALSE, Err_Res }, 05265 /* Logical_4 */ {FALSE, Err_Res }, 05266 /* Logical_8 */ {FALSE, Err_Res }, 05267 /* Character_1 */ {FALSE, Err_Res }, 05268 /* Character_2 */ {FALSE, Err_Res }, 05269 /* Character_4 */ {FALSE, Err_Res }, 05270 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05271 /* Structure_Type */ {FALSE, Err_Res }, 05272 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05273 }, 05274 /* Character_1 */ { 05275 /* Err_Res */ {FALSE, Err_Res }, 05276 /* Short_Char_Const */ {FALSE, Err_Res }, 05277 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05278 /* Typeless_1 */ {FALSE, Err_Res }, 05279 /* Typeless_2 */ {FALSE, Err_Res }, 05280 /* Typeless_4 */ {FALSE, Err_Res }, 05281 /* Typeless_8 */ {FALSE, Err_Res }, 05282 /* Long_Typeless */ {FALSE, Err_Res }, 05283 /* Integer_1 */ {FALSE, Err_Res }, 05284 /* Integer_2 */ {FALSE, Err_Res }, 05285 /* Integer_4 */ {FALSE, Err_Res }, 05286 /* Integer_8 */ {FALSE, Err_Res }, 05287 /* Real_4 */ {FALSE, Err_Res }, 05288 /* Real_8 */ {FALSE, Err_Res }, 05289 /* Real_16 */ {FALSE, Err_Res }, 05290 /* Complex_4 */ {FALSE, Err_Res }, 05291 /* Complex_8 */ {FALSE, Err_Res }, 05292 /* Complex_16 */ {FALSE, Err_Res }, 05293 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05294 /* Logical_1 */ {FALSE, Err_Res }, 05295 /* Logical_2 */ {FALSE, Err_Res }, 05296 /* Logical_4 */ {FALSE, Err_Res }, 05297 /* Logical_8 */ {FALSE, Err_Res }, 05298 /* Character_1 */ {FALSE, Err_Res }, 05299 /* Character_2 */ {FALSE, Err_Res }, 05300 /* Character_4 */ {FALSE, Err_Res }, 05301 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05302 /* Structure_Type */ {FALSE, Err_Res }, 05303 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05304 }, 05305 /* Character_2 */ { 05306 /* Err_Res */ {FALSE, Err_Res }, 05307 /* Short_Char_Const */ {FALSE, Err_Res }, 05308 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05309 /* Typeless_1 */ {FALSE, Err_Res }, 05310 /* Typeless_2 */ {FALSE, Err_Res }, 05311 /* Typeless_4 */ {FALSE, Err_Res }, 05312 /* Typeless_8 */ {FALSE, Err_Res }, 05313 /* Long_Typeless */ {FALSE, Err_Res }, 05314 /* Integer_1 */ {FALSE, Err_Res }, 05315 /* Integer_2 */ {FALSE, Err_Res }, 05316 /* Integer_4 */ {FALSE, Err_Res }, 05317 /* Integer_8 */ {FALSE, Err_Res }, 05318 /* Real_4 */ {FALSE, Err_Res }, 05319 /* Real_8 */ {FALSE, Err_Res }, 05320 /* Real_16 */ {FALSE, Err_Res }, 05321 /* Complex_4 */ {FALSE, Err_Res }, 05322 /* Complex_8 */ {FALSE, Err_Res }, 05323 /* Complex_16 */ {FALSE, Err_Res }, 05324 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05325 /* Logical_1 */ {FALSE, Err_Res }, 05326 /* Logical_2 */ {FALSE, Err_Res }, 05327 /* Logical_4 */ {FALSE, Err_Res }, 05328 /* Logical_8 */ {FALSE, Err_Res }, 05329 /* Character_1 */ {FALSE, Err_Res }, 05330 /* Character_2 */ {FALSE, Err_Res }, 05331 /* Character_4 */ {FALSE, Err_Res }, 05332 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05333 /* Structure_Type */ {FALSE, Err_Res }, 05334 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05335 }, 05336 /* Character_4 */ { 05337 /* Err_Res */ {FALSE, Err_Res }, 05338 /* Short_Char_Const */ {FALSE, Err_Res }, 05339 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05340 /* Typeless_1 */ {FALSE, Err_Res }, 05341 /* Typeless_2 */ {FALSE, Err_Res }, 05342 /* Typeless_4 */ {FALSE, Err_Res }, 05343 /* Typeless_8 */ {FALSE, Err_Res }, 05344 /* Long_Typeless */ {FALSE, Err_Res }, 05345 /* Integer_1 */ {FALSE, Err_Res }, 05346 /* Integer_2 */ {FALSE, Err_Res }, 05347 /* Integer_4 */ {FALSE, Err_Res }, 05348 /* Integer_8 */ {FALSE, Err_Res }, 05349 /* Real_4 */ {FALSE, Err_Res }, 05350 /* Real_8 */ {FALSE, Err_Res }, 05351 /* Real_16 */ {FALSE, Err_Res }, 05352 /* Complex_4 */ {FALSE, Err_Res }, 05353 /* Complex_8 */ {FALSE, Err_Res }, 05354 /* Complex_16 */ {FALSE, Err_Res }, 05355 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05356 /* Logical_1 */ {FALSE, Err_Res }, 05357 /* Logical_2 */ {FALSE, Err_Res }, 05358 /* Logical_4 */ {FALSE, Err_Res }, 05359 /* Logical_8 */ {FALSE, Err_Res }, 05360 /* Character_1 */ {FALSE, Err_Res }, 05361 /* Character_2 */ {FALSE, Err_Res }, 05362 /* Character_4 */ {FALSE, Err_Res }, 05363 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05364 /* Structure_Type */ {FALSE, Err_Res }, 05365 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05366 }, 05367 /* CRI_Ch_Ptr_8 */ { 05368 /* Err_Res */ {FALSE, Err_Res }, 05369 /* Short_Char_Const */ {FALSE, Err_Res }, 05370 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05371 /* Typeless_1 */ {FALSE, Err_Res }, 05372 /* Typeless_2 */ {FALSE, Err_Res }, 05373 /* Typeless_4 */ {FALSE, Err_Res }, 05374 /* Typeless_8 */ {FALSE, Err_Res }, 05375 /* Long_Typeless */ {FALSE, Err_Res }, 05376 /* Integer_1 */ {FALSE, Err_Res }, 05377 /* Integer_2 */ {FALSE, Err_Res }, 05378 /* Integer_4 */ {FALSE, Err_Res }, 05379 /* Integer_8 */ {FALSE, Err_Res }, 05380 /* Real_4 */ {FALSE, Err_Res }, 05381 /* Real_8 */ {FALSE, Err_Res }, 05382 /* Real_16 */ {FALSE, Err_Res }, 05383 /* Complex_4 */ {FALSE, Err_Res }, 05384 /* Complex_8 */ {FALSE, Err_Res }, 05385 /* Complex_16 */ {FALSE, Err_Res }, 05386 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05387 /* Logical_1 */ {FALSE, Err_Res }, 05388 /* Logical_2 */ {FALSE, Err_Res }, 05389 /* Logical_4 */ {FALSE, Err_Res }, 05390 /* Logical_8 */ {FALSE, Err_Res }, 05391 /* Character_1 */ {FALSE, Err_Res }, 05392 /* Character_2 */ {FALSE, Err_Res }, 05393 /* Character_4 */ {FALSE, Err_Res }, 05394 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05395 /* Structure_Type */ {FALSE, Err_Res }, 05396 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05397 }, 05398 /* Structure_Type */ { 05399 /* Err_Res */ {FALSE, Err_Res }, 05400 /* Short_Char_Const */ {FALSE, Err_Res }, 05401 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05402 /* Typeless_1 */ {FALSE, Err_Res }, 05403 /* Typeless_2 */ {FALSE, Err_Res }, 05404 /* Typeless_4 */ {FALSE, Err_Res }, 05405 /* Typeless_8 */ {FALSE, Err_Res }, 05406 /* Long_Typeless */ {FALSE, Err_Res }, 05407 /* Integer_1 */ {FALSE, Err_Res }, 05408 /* Integer_2 */ {FALSE, Err_Res }, 05409 /* Integer_4 */ {FALSE, Err_Res }, 05410 /* Integer_8 */ {FALSE, Err_Res }, 05411 /* Real_4 */ {FALSE, Err_Res }, 05412 /* Real_8 */ {FALSE, Err_Res }, 05413 /* Real_16 */ {FALSE, Err_Res }, 05414 /* Complex_4 */ {FALSE, Err_Res }, 05415 /* Complex_8 */ {FALSE, Err_Res }, 05416 /* Complex_16 */ {FALSE, Err_Res }, 05417 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05418 /* Logical_1 */ {FALSE, Err_Res }, 05419 /* Logical_2 */ {FALSE, Err_Res }, 05420 /* Logical_4 */ {FALSE, Err_Res }, 05421 /* Logical_8 */ {FALSE, Err_Res }, 05422 /* Character_1 */ {FALSE, Err_Res }, 05423 /* Character_2 */ {FALSE, Err_Res }, 05424 /* Character_4 */ {FALSE, Err_Res }, 05425 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05426 /* Structure_Type */ {FALSE, Err_Res }, 05427 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05428 }, 05429 /* CRI_Parcel_Ptr_8 */ { 05430 /* Err_Res */ {FALSE, Err_Res }, 05431 /* Short_Char_Const */ {FALSE, Err_Res }, 05432 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05433 /* Typeless_1 */ {FALSE, Err_Res }, 05434 /* Typeless_2 */ {FALSE, Err_Res }, 05435 /* Typeless_4 */ {FALSE, Err_Res }, 05436 /* Typeless_8 */ {FALSE, Err_Res }, 05437 /* Long_Typeless */ {FALSE, Err_Res }, 05438 /* Integer_1 */ {FALSE, Err_Res }, 05439 /* Integer_2 */ {FALSE, Err_Res }, 05440 /* Integer_4 */ {FALSE, Err_Res }, 05441 /* Integer_8 */ {FALSE, Err_Res }, 05442 /* Real_4 */ {FALSE, Err_Res }, 05443 /* Real_8 */ {FALSE, Err_Res }, 05444 /* Real_16 */ {FALSE, Err_Res }, 05445 /* Complex_4 */ {FALSE, Err_Res }, 05446 /* Complex_8 */ {FALSE, Err_Res }, 05447 /* Complex_16 */ {FALSE, Err_Res }, 05448 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05449 /* Logical_1 */ {FALSE, Err_Res }, 05450 /* Logical_2 */ {FALSE, Err_Res }, 05451 /* Logical_4 */ {FALSE, Err_Res }, 05452 /* Logical_8 */ {FALSE, Err_Res }, 05453 /* Character_1 */ {FALSE, Err_Res }, 05454 /* Character_2 */ {FALSE, Err_Res }, 05455 /* Character_4 */ {FALSE, Err_Res }, 05456 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05457 /* Structure_Type */ {FALSE, Err_Res }, 05458 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05459 } 05460 }; 05461 05462 05463 exp_tbl_type gt_lt_tbl[Num_Linear_Types][Num_Linear_Types] = { 05464 /* Err_Res */ { 05465 /* Err_Res */ {FALSE, Err_Res }, 05466 /* Short_Char_Const */ {FALSE, Err_Res }, 05467 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05468 /* Typeless_1 */ {FALSE, Err_Res }, 05469 /* Typeless_2 */ {FALSE, Err_Res }, 05470 /* Typeless_4 */ {FALSE, Err_Res }, 05471 /* Typeless_8 */ {FALSE, Err_Res }, 05472 /* Long_Typeless */ {FALSE, Err_Res }, 05473 /* Integer_1 */ {FALSE, Err_Res }, 05474 /* Integer_2 */ {FALSE, Err_Res }, 05475 /* Integer_4 */ {FALSE, Err_Res }, 05476 /* Integer_8 */ {FALSE, Err_Res }, 05477 /* Real_4 */ {FALSE, Err_Res }, 05478 /* Real_8 */ {FALSE, Err_Res }, 05479 /* Real_16 */ {FALSE, Err_Res }, 05480 /* Complex_4 */ {FALSE, Err_Res }, 05481 /* Complex_8 */ {FALSE, Err_Res }, 05482 /* Complex_16 */ {FALSE, Err_Res }, 05483 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05484 /* Logical_1 */ {FALSE, Err_Res }, 05485 /* Logical_2 */ {FALSE, Err_Res }, 05486 /* Logical_4 */ {FALSE, Err_Res }, 05487 /* Logical_8 */ {FALSE, Err_Res }, 05488 /* Character_1 */ {FALSE, Err_Res }, 05489 /* Character_2 */ {FALSE, Err_Res }, 05490 /* Character_4 */ {FALSE, Err_Res }, 05491 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05492 /* Structure_Type */ {FALSE, Err_Res }, 05493 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05494 }, 05495 /* Short_Char_Const */ { 05496 /* Err_Res */ {FALSE, Err_Res }, 05497 /* Short_Char_Const */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05498 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05499 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05500 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05501 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05502 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05503 /* Long_Typeless */ {FALSE, Err_Res }, 05504 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05505 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05506 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05507 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05508 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05509 /* Real_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05510 /* Real_16 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05511 /* Complex_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05512 /* Complex_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05513 /* Complex_16 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05514 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05515 /* Logical_1 */ {FALSE, Err_Res }, 05516 /* Logical_2 */ {FALSE, Err_Res }, 05517 /* Logical_4 */ {FALSE, Err_Res }, 05518 /* Logical_8 */ {FALSE, Err_Res }, 05519 /* Character_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05520 /* Character_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05521 /* Character_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05522 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05523 /* Structure_Type */ {FALSE, Err_Res }, 05524 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05525 }, 05526 /* Short_Typeless_Const */ { 05527 /* Err_Res */ {FALSE, Err_Res }, 05528 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05529 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05530 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05531 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05532 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05533 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05534 /* Long_Typeless */ {FALSE, Err_Res }, 05535 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05536 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05537 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05538 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05539 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05540 /* Real_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05541 /* Real_16 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05542 /* Complex_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05543 /* Complex_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05544 /* Complex_16 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05545 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05546 /* Logical_1 */ {FALSE, Err_Res }, 05547 /* Logical_2 */ {FALSE, Err_Res }, 05548 /* Logical_4 */ {FALSE, Err_Res }, 05549 /* Logical_8 */ {FALSE, Err_Res }, 05550 /* Character_1 */ {FALSE, Err_Res }, 05551 /* Character_2 */ {FALSE, Err_Res }, 05552 /* Character_4 */ {FALSE, Err_Res }, 05553 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05554 /* Structure_Type */ {FALSE, Err_Res }, 05555 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05556 }, 05557 /* Typeless_1 */ { 05558 /* Err_Res */ {FALSE, Err_Res }, 05559 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05560 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05561 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05562 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05563 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05564 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05565 /* Long_Typeless */ {FALSE, Err_Res }, 05566 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05567 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05568 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05569 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05570 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05571 /* Real_8 */ {FALSE, Err_Res }, 05572 /* Real_16 */ {FALSE, Err_Res }, 05573 /* Complex_4 */ {FALSE, Err_Res }, 05574 /* Complex_8 */ {FALSE, Err_Res }, 05575 /* Complex_16 */ {FALSE, Err_Res }, 05576 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05577 /* Logical_1 */ {FALSE, Err_Res }, 05578 /* Logical_2 */ {FALSE, Err_Res }, 05579 /* Logical_4 */ {FALSE, Err_Res }, 05580 /* Logical_8 */ {FALSE, Err_Res }, 05581 /* Character_1 */ {FALSE, Err_Res }, 05582 /* Character_2 */ {FALSE, Err_Res }, 05583 /* Character_4 */ {FALSE, Err_Res }, 05584 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05585 /* Structure_Type */ {FALSE, Err_Res }, 05586 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05587 }, 05588 /* Typeless_2 */ { 05589 /* Err_Res */ {FALSE, Err_Res }, 05590 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05591 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05592 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05593 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05594 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05595 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05596 /* Long_Typeless */ {FALSE, Err_Res }, 05597 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05598 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05599 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05600 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05601 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05602 /* Real_8 */ {FALSE, Err_Res }, 05603 /* Real_16 */ {FALSE, Err_Res }, 05604 /* Complex_4 */ {FALSE, Err_Res }, 05605 /* Complex_8 */ {FALSE, Err_Res }, 05606 /* Complex_16 */ {FALSE, Err_Res }, 05607 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05608 /* Logical_1 */ {FALSE, Err_Res }, 05609 /* Logical_2 */ {FALSE, Err_Res }, 05610 /* Logical_4 */ {FALSE, Err_Res }, 05611 /* Logical_8 */ {FALSE, Err_Res }, 05612 /* Character_1 */ {FALSE, Err_Res }, 05613 /* Character_2 */ {FALSE, Err_Res }, 05614 /* Character_4 */ {FALSE, Err_Res }, 05615 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05616 /* Structure_Type */ {FALSE, Err_Res }, 05617 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05618 }, 05619 /* Typeless_4 */ { 05620 /* Err_Res */ {FALSE, Err_Res }, 05621 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05622 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05623 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05624 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05625 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05626 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05627 /* Long_Typeless */ {FALSE, Err_Res }, 05628 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05629 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05630 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05631 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05632 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05633 /* Real_8 */ {FALSE, Err_Res }, 05634 /* Real_16 */ {FALSE, Err_Res }, 05635 /* Complex_4 */ {FALSE, Err_Res }, 05636 /* Complex_8 */ {FALSE, Err_Res }, 05637 /* Complex_16 */ {FALSE, Err_Res }, 05638 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05639 /* Logical_1 */ {FALSE, Err_Res }, 05640 /* Logical_2 */ {FALSE, Err_Res }, 05641 /* Logical_4 */ {FALSE, Err_Res }, 05642 /* Logical_8 */ {FALSE, Err_Res }, 05643 /* Character_1 */ {FALSE, Err_Res }, 05644 /* Character_2 */ {FALSE, Err_Res }, 05645 /* Character_4 */ {FALSE, Err_Res }, 05646 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05647 /* Structure_Type */ {FALSE, Err_Res }, 05648 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05649 }, 05650 /* Typeless_8 */ { 05651 /* Err_Res */ {FALSE, Err_Res }, 05652 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05653 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05654 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05655 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05656 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05657 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05658 /* Long_Typeless */ {FALSE, Err_Res }, 05659 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05660 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05661 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05662 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05663 /* Real_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05664 /* Real_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05665 /* Real_16 */ {FALSE, Err_Res }, 05666 /* Complex_4 */ {FALSE, Err_Res }, 05667 /* Complex_8 */ {FALSE, Err_Res }, 05668 /* Complex_16 */ {FALSE, Err_Res }, 05669 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05670 /* Logical_1 */ {FALSE, Err_Res }, 05671 /* Logical_2 */ {FALSE, Err_Res }, 05672 /* Logical_4 */ {FALSE, Err_Res }, 05673 /* Logical_8 */ {FALSE, Err_Res }, 05674 /* Character_1 */ {FALSE, Err_Res }, 05675 /* Character_2 */ {FALSE, Err_Res }, 05676 /* Character_4 */ {FALSE, Err_Res }, 05677 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05678 /* Structure_Type */ {FALSE, Err_Res }, 05679 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05680 }, 05681 /* Long_Typeless */ { 05682 /* Err_Res */ {FALSE, Err_Res }, 05683 /* Short_Char_Const */ {FALSE, Err_Res }, 05684 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05685 /* Typeless_1 */ {FALSE, Err_Res }, 05686 /* Typeless_2 */ {FALSE, Err_Res }, 05687 /* Typeless_4 */ {FALSE, Err_Res }, 05688 /* Typeless_8 */ {FALSE, Err_Res }, 05689 /* Long_Typeless */ {FALSE, Err_Res }, 05690 /* Integer_1 */ {FALSE, Err_Res }, 05691 /* Integer_2 */ {FALSE, Err_Res }, 05692 /* Integer_4 */ {FALSE, Err_Res }, 05693 /* Integer_8 */ {FALSE, Err_Res }, 05694 /* Real_4 */ {FALSE, Err_Res }, 05695 /* Real_8 */ {FALSE, Err_Res }, 05696 /* Real_16 */ {FALSE, Err_Res }, 05697 /* Complex_4 */ {FALSE, Err_Res }, 05698 /* Complex_8 */ {FALSE, Err_Res }, 05699 /* Complex_16 */ {FALSE, Err_Res }, 05700 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05701 /* Logical_1 */ {FALSE, Err_Res }, 05702 /* Logical_2 */ {FALSE, Err_Res }, 05703 /* Logical_4 */ {FALSE, Err_Res }, 05704 /* Logical_8 */ {FALSE, Err_Res }, 05705 /* Character_1 */ {FALSE, Err_Res }, 05706 /* Character_2 */ {FALSE, Err_Res }, 05707 /* Character_4 */ {FALSE, Err_Res }, 05708 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05709 /* Structure_Type */ {FALSE, Err_Res }, 05710 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05711 }, 05712 /* Integer_1 */ { 05713 /* Err_Res */ {FALSE, Err_Res }, 05714 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05715 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05716 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05717 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05718 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05719 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05720 /* Long_Typeless */ {FALSE, Err_Res }, 05721 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05722 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05723 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05724 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05725 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05726 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05727 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05728 /* Complex_4 */ {FALSE, Err_Res }, 05729 /* Complex_8 */ {FALSE, Err_Res }, 05730 /* Complex_16 */ {FALSE, Err_Res }, 05731 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05732 /* Logical_1 */ {FALSE, Err_Res }, 05733 /* Logical_2 */ {FALSE, Err_Res }, 05734 /* Logical_4 */ {FALSE, Err_Res }, 05735 /* Logical_8 */ {FALSE, Err_Res }, 05736 /* Character_1 */ {FALSE, Err_Res }, 05737 /* Character_2 */ {FALSE, Err_Res }, 05738 /* Character_4 */ {FALSE, Err_Res }, 05739 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05740 /* Structure_Type */ {FALSE, Err_Res }, 05741 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05742 }, 05743 /* Integer_2 */ { 05744 /* Err_Res */ {FALSE, Err_Res }, 05745 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05746 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05747 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05748 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05749 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05750 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05751 /* Long_Typeless */ {FALSE, Err_Res }, 05752 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05753 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05754 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05755 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05756 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05757 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05758 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05759 /* Complex_4 */ {FALSE, Err_Res }, 05760 /* Complex_8 */ {FALSE, Err_Res }, 05761 /* Complex_16 */ {FALSE, Err_Res }, 05762 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05763 /* Logical_1 */ {FALSE, Err_Res }, 05764 /* Logical_2 */ {FALSE, Err_Res }, 05765 /* Logical_4 */ {FALSE, Err_Res }, 05766 /* Logical_8 */ {FALSE, Err_Res }, 05767 /* Character_1 */ {FALSE, Err_Res }, 05768 /* Character_2 */ {FALSE, Err_Res }, 05769 /* Character_4 */ {FALSE, Err_Res }, 05770 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05771 /* Structure_Type */ {FALSE, Err_Res }, 05772 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05773 }, 05774 /* Integer_4 */ { 05775 /* Err_Res */ {FALSE, Err_Res }, 05776 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05777 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05778 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05779 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05780 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05781 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05782 /* Long_Typeless */ {FALSE, Err_Res }, 05783 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05784 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05785 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05786 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05787 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05788 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05789 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05790 /* Complex_4 */ {FALSE, Err_Res }, 05791 /* Complex_8 */ {FALSE, Err_Res }, 05792 /* Complex_16 */ {FALSE, Err_Res }, 05793 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05794 /* Logical_1 */ {FALSE, Err_Res }, 05795 /* Logical_2 */ {FALSE, Err_Res }, 05796 /* Logical_4 */ {FALSE, Err_Res }, 05797 /* Logical_8 */ {FALSE, Err_Res }, 05798 /* Character_1 */ {FALSE, Err_Res }, 05799 /* Character_2 */ {FALSE, Err_Res }, 05800 /* Character_4 */ {FALSE, Err_Res }, 05801 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05802 /* Structure_Type */ {FALSE, Err_Res }, 05803 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05804 }, 05805 /* Integer_8 */ { 05806 /* Err_Res */ {FALSE, Err_Res }, 05807 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05808 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05809 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05810 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05811 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05812 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05813 /* Long_Typeless */ {FALSE, Err_Res }, 05814 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05815 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05816 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05817 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05818 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05819 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05820 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05821 /* Complex_4 */ {FALSE, Err_Res }, 05822 /* Complex_8 */ {FALSE, Err_Res }, 05823 /* Complex_16 */ {FALSE, Err_Res }, 05824 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05825 /* Logical_1 */ {FALSE, Err_Res }, 05826 /* Logical_2 */ {FALSE, Err_Res }, 05827 /* Logical_4 */ {FALSE, Err_Res }, 05828 /* Logical_8 */ {FALSE, Err_Res }, 05829 /* Character_1 */ {FALSE, Err_Res }, 05830 /* Character_2 */ {FALSE, Err_Res }, 05831 /* Character_4 */ {FALSE, Err_Res }, 05832 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05833 /* Structure_Type */ {FALSE, Err_Res }, 05834 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 05835 }, 05836 /* Real_4 */ { 05837 /* Err_Res */ {FALSE, Err_Res }, 05838 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05839 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05840 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05841 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05842 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05843 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05844 /* Long_Typeless */ {FALSE, Err_Res }, 05845 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05846 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05847 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05848 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05849 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05850 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05851 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05852 /* Complex_4 */ {FALSE, Err_Res }, 05853 /* Complex_8 */ {FALSE, Err_Res }, 05854 /* Complex_16 */ {FALSE, Err_Res }, 05855 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05856 /* Logical_1 */ {FALSE, Err_Res }, 05857 /* Logical_2 */ {FALSE, Err_Res }, 05858 /* Logical_4 */ {FALSE, Err_Res }, 05859 /* Logical_8 */ {FALSE, Err_Res }, 05860 /* Character_1 */ {FALSE, Err_Res }, 05861 /* Character_2 */ {FALSE, Err_Res }, 05862 /* Character_4 */ {FALSE, Err_Res }, 05863 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05864 /* Structure_Type */ {FALSE, Err_Res }, 05865 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05866 }, 05867 /* Real_8 */ { 05868 /* Err_Res */ {FALSE, Err_Res }, 05869 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05870 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05871 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05872 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05873 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05874 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05875 /* Long_Typeless */ {FALSE, Err_Res }, 05876 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05877 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05878 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05879 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05880 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05881 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05882 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05883 /* Complex_4 */ {FALSE, Err_Res }, 05884 /* Complex_8 */ {FALSE, Err_Res }, 05885 /* Complex_16 */ {FALSE, Err_Res }, 05886 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05887 /* Logical_1 */ {FALSE, Err_Res }, 05888 /* Logical_2 */ {FALSE, Err_Res }, 05889 /* Logical_4 */ {FALSE, Err_Res }, 05890 /* Logical_8 */ {FALSE, Err_Res }, 05891 /* Character_1 */ {FALSE, Err_Res }, 05892 /* Character_2 */ {FALSE, Err_Res }, 05893 /* Character_4 */ {FALSE, Err_Res }, 05894 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05895 /* Structure_Type */ {FALSE, Err_Res }, 05896 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05897 }, 05898 /* Real_16 */ { 05899 /* Err_Res */ {FALSE, Err_Res }, 05900 /* Short_Char_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05901 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 05902 /* Typeless_1 */ {FALSE, Err_Res }, 05903 /* Typeless_2 */ {FALSE, Err_Res }, 05904 /* Typeless_4 */ {FALSE, Err_Res }, 05905 /* Typeless_8 */ {FALSE, Err_Res }, 05906 /* Long_Typeless */ {FALSE, Err_Res }, 05907 /* Integer_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05908 /* Integer_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05909 /* Integer_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05910 /* Integer_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05911 /* Real_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05912 /* Real_8 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05913 /* Real_16 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 05914 /* Complex_4 */ {FALSE, Err_Res }, 05915 /* Complex_8 */ {FALSE, Err_Res }, 05916 /* Complex_16 */ {FALSE, Err_Res }, 05917 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05918 /* Logical_1 */ {FALSE, Err_Res }, 05919 /* Logical_2 */ {FALSE, Err_Res }, 05920 /* Logical_4 */ {FALSE, Err_Res }, 05921 /* Logical_8 */ {FALSE, Err_Res }, 05922 /* Character_1 */ {FALSE, Err_Res }, 05923 /* Character_2 */ {FALSE, Err_Res }, 05924 /* Character_4 */ {FALSE, Err_Res }, 05925 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05926 /* Structure_Type */ {FALSE, Err_Res }, 05927 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05928 }, 05929 /* Complex_4 */ { 05930 /* Err_Res */ {FALSE, Err_Res }, 05931 /* Short_Char_Const */ {FALSE, Err_Res }, 05932 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05933 /* Typeless_1 */ {FALSE, Err_Res }, 05934 /* Typeless_2 */ {FALSE, Err_Res }, 05935 /* Typeless_4 */ {FALSE, Err_Res }, 05936 /* Typeless_8 */ {FALSE, Err_Res }, 05937 /* Long_Typeless */ {FALSE, Err_Res }, 05938 /* Integer_1 */ {FALSE, Err_Res }, 05939 /* Integer_2 */ {FALSE, Err_Res }, 05940 /* Integer_4 */ {FALSE, Err_Res }, 05941 /* Integer_8 */ {FALSE, Err_Res }, 05942 /* Real_4 */ {FALSE, Err_Res }, 05943 /* Real_8 */ {FALSE, Err_Res }, 05944 /* Real_16 */ {FALSE, Err_Res }, 05945 /* Complex_4 */ {FALSE, Err_Res }, 05946 /* Complex_8 */ {FALSE, Err_Res }, 05947 /* Complex_16 */ {FALSE, Err_Res }, 05948 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05949 /* Logical_1 */ {FALSE, Err_Res }, 05950 /* Logical_2 */ {FALSE, Err_Res }, 05951 /* Logical_4 */ {FALSE, Err_Res }, 05952 /* Logical_8 */ {FALSE, Err_Res }, 05953 /* Character_1 */ {FALSE, Err_Res }, 05954 /* Character_2 */ {FALSE, Err_Res }, 05955 /* Character_4 */ {FALSE, Err_Res }, 05956 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05957 /* Structure_Type */ {FALSE, Err_Res }, 05958 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05959 }, 05960 /* Complex_8 */ { 05961 /* Err_Res */ {FALSE, Err_Res }, 05962 /* Short_Char_Const */ {FALSE, Err_Res }, 05963 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05964 /* Typeless_1 */ {FALSE, Err_Res }, 05965 /* Typeless_2 */ {FALSE, Err_Res }, 05966 /* Typeless_4 */ {FALSE, Err_Res }, 05967 /* Typeless_8 */ {FALSE, Err_Res }, 05968 /* Long_Typeless */ {FALSE, Err_Res }, 05969 /* Integer_1 */ {FALSE, Err_Res }, 05970 /* Integer_2 */ {FALSE, Err_Res }, 05971 /* Integer_4 */ {FALSE, Err_Res }, 05972 /* Integer_8 */ {FALSE, Err_Res }, 05973 /* Real_4 */ {FALSE, Err_Res }, 05974 /* Real_8 */ {FALSE, Err_Res }, 05975 /* Real_16 */ {FALSE, Err_Res }, 05976 /* Complex_4 */ {FALSE, Err_Res }, 05977 /* Complex_8 */ {FALSE, Err_Res }, 05978 /* Complex_16 */ {FALSE, Err_Res }, 05979 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 05980 /* Logical_1 */ {FALSE, Err_Res }, 05981 /* Logical_2 */ {FALSE, Err_Res }, 05982 /* Logical_4 */ {FALSE, Err_Res }, 05983 /* Logical_8 */ {FALSE, Err_Res }, 05984 /* Character_1 */ {FALSE, Err_Res }, 05985 /* Character_2 */ {FALSE, Err_Res }, 05986 /* Character_4 */ {FALSE, Err_Res }, 05987 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 05988 /* Structure_Type */ {FALSE, Err_Res }, 05989 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 05990 }, 05991 /* Complex_16 */ { 05992 /* Err_Res */ {FALSE, Err_Res }, 05993 /* Short_Char_Const */ {FALSE, Err_Res }, 05994 /* Short_Typeless_Const */ {FALSE, Err_Res }, 05995 /* Typeless_1 */ {FALSE, Err_Res }, 05996 /* Typeless_2 */ {FALSE, Err_Res }, 05997 /* Typeless_4 */ {FALSE, Err_Res }, 05998 /* Typeless_8 */ {FALSE, Err_Res }, 05999 /* Long_Typeless */ {FALSE, Err_Res }, 06000 /* Integer_1 */ {FALSE, Err_Res }, 06001 /* Integer_2 */ {FALSE, Err_Res }, 06002 /* Integer_4 */ {FALSE, Err_Res }, 06003 /* Integer_8 */ {FALSE, Err_Res }, 06004 /* Real_4 */ {FALSE, Err_Res }, 06005 /* Real_8 */ {FALSE, Err_Res }, 06006 /* Real_16 */ {FALSE, Err_Res }, 06007 /* Complex_4 */ {FALSE, Err_Res }, 06008 /* Complex_8 */ {FALSE, Err_Res }, 06009 /* Complex_16 */ {FALSE, Err_Res }, 06010 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06011 /* Logical_1 */ {FALSE, Err_Res }, 06012 /* Logical_2 */ {FALSE, Err_Res }, 06013 /* Logical_4 */ {FALSE, Err_Res }, 06014 /* Logical_8 */ {FALSE, Err_Res }, 06015 /* Character_1 */ {FALSE, Err_Res }, 06016 /* Character_2 */ {FALSE, Err_Res }, 06017 /* Character_4 */ {FALSE, Err_Res }, 06018 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06019 /* Structure_Type */ {FALSE, Err_Res }, 06020 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06021 }, 06022 /* CRI_Ptr_8 */ { 06023 /* Err_Res */ {FALSE, Err_Res }, 06024 /* Short_Char_Const */ {FALSE, Err_Res }, 06025 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06026 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06027 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06028 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06029 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06030 /* Long_Typeless */ {FALSE, Err_Res }, 06031 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06032 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06033 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06034 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06035 /* Real_4 */ {FALSE, Err_Res }, 06036 /* Real_8 */ {FALSE, Err_Res }, 06037 /* Real_16 */ {FALSE, Err_Res }, 06038 /* Complex_4 */ {FALSE, Err_Res }, 06039 /* Complex_8 */ {FALSE, Err_Res }, 06040 /* Complex_16 */ {FALSE, Err_Res }, 06041 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06042 /* Logical_1 */ {FALSE, Err_Res }, 06043 /* Logical_2 */ {FALSE, Err_Res }, 06044 /* Logical_4 */ {FALSE, Err_Res }, 06045 /* Logical_8 */ {FALSE, Err_Res }, 06046 /* Character_1 */ {FALSE, Err_Res }, 06047 /* Character_2 */ {FALSE, Err_Res }, 06048 /* Character_4 */ {FALSE, Err_Res }, 06049 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06050 /* Structure_Type */ {FALSE, Err_Res }, 06051 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 06052 }, 06053 /* Logical_1 */ { 06054 /* Err_Res */ {FALSE, Err_Res }, 06055 /* Short_Char_Const */ {FALSE, Err_Res }, 06056 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06057 /* Typeless_1 */ {FALSE, Err_Res }, 06058 /* Typeless_2 */ {FALSE, Err_Res }, 06059 /* Typeless_4 */ {FALSE, Err_Res }, 06060 /* Typeless_8 */ {FALSE, Err_Res }, 06061 /* Long_Typeless */ {FALSE, Err_Res }, 06062 /* Integer_1 */ {FALSE, Err_Res }, 06063 /* Integer_2 */ {FALSE, Err_Res }, 06064 /* Integer_4 */ {FALSE, Err_Res }, 06065 /* Integer_8 */ {FALSE, Err_Res }, 06066 /* Real_4 */ {FALSE, Err_Res }, 06067 /* Real_8 */ {FALSE, Err_Res }, 06068 /* Real_16 */ {FALSE, Err_Res }, 06069 /* Complex_4 */ {FALSE, Err_Res }, 06070 /* Complex_8 */ {FALSE, Err_Res }, 06071 /* Complex_16 */ {FALSE, Err_Res }, 06072 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06073 /* Logical_1 */ {FALSE, Err_Res }, 06074 /* Logical_2 */ {FALSE, Err_Res }, 06075 /* Logical_4 */ {FALSE, Err_Res }, 06076 /* Logical_8 */ {FALSE, Err_Res }, 06077 /* Character_1 */ {FALSE, Err_Res }, 06078 /* Character_2 */ {FALSE, Err_Res }, 06079 /* Character_4 */ {FALSE, Err_Res }, 06080 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06081 /* Structure_Type */ {FALSE, Err_Res }, 06082 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06083 }, 06084 /* Logical_2 */ { 06085 /* Err_Res */ {FALSE, Err_Res }, 06086 /* Short_Char_Const */ {FALSE, Err_Res }, 06087 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06088 /* Typeless_1 */ {FALSE, Err_Res }, 06089 /* Typeless_2 */ {FALSE, Err_Res }, 06090 /* Typeless_4 */ {FALSE, Err_Res }, 06091 /* Typeless_8 */ {FALSE, Err_Res }, 06092 /* Long_Typeless */ {FALSE, Err_Res }, 06093 /* Integer_1 */ {FALSE, Err_Res }, 06094 /* Integer_2 */ {FALSE, Err_Res }, 06095 /* Integer_4 */ {FALSE, Err_Res }, 06096 /* Integer_8 */ {FALSE, Err_Res }, 06097 /* Real_4 */ {FALSE, Err_Res }, 06098 /* Real_8 */ {FALSE, Err_Res }, 06099 /* Real_16 */ {FALSE, Err_Res }, 06100 /* Complex_4 */ {FALSE, Err_Res }, 06101 /* Complex_8 */ {FALSE, Err_Res }, 06102 /* Complex_16 */ {FALSE, Err_Res }, 06103 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06104 /* Logical_1 */ {FALSE, Err_Res }, 06105 /* Logical_2 */ {FALSE, Err_Res }, 06106 /* Logical_4 */ {FALSE, Err_Res }, 06107 /* Logical_8 */ {FALSE, Err_Res }, 06108 /* Character_1 */ {FALSE, Err_Res }, 06109 /* Character_2 */ {FALSE, Err_Res }, 06110 /* Character_4 */ {FALSE, Err_Res }, 06111 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06112 /* Structure_Type */ {FALSE, Err_Res }, 06113 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06114 }, 06115 /* Logical_4 */ { 06116 /* Err_Res */ {FALSE, Err_Res }, 06117 /* Short_Char_Const */ {FALSE, Err_Res }, 06118 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06119 /* Typeless_1 */ {FALSE, Err_Res }, 06120 /* Typeless_2 */ {FALSE, Err_Res }, 06121 /* Typeless_4 */ {FALSE, Err_Res }, 06122 /* Typeless_8 */ {FALSE, Err_Res }, 06123 /* Long_Typeless */ {FALSE, Err_Res }, 06124 /* Integer_1 */ {FALSE, Err_Res }, 06125 /* Integer_2 */ {FALSE, Err_Res }, 06126 /* Integer_4 */ {FALSE, Err_Res }, 06127 /* Integer_8 */ {FALSE, Err_Res }, 06128 /* Real_4 */ {FALSE, Err_Res }, 06129 /* Real_8 */ {FALSE, Err_Res }, 06130 /* Real_16 */ {FALSE, Err_Res }, 06131 /* Complex_4 */ {FALSE, Err_Res }, 06132 /* Complex_8 */ {FALSE, Err_Res }, 06133 /* Complex_16 */ {FALSE, Err_Res }, 06134 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06135 /* Logical_1 */ {FALSE, Err_Res }, 06136 /* Logical_2 */ {FALSE, Err_Res }, 06137 /* Logical_4 */ {FALSE, Err_Res }, 06138 /* Logical_8 */ {FALSE, Err_Res }, 06139 /* Character_1 */ {FALSE, Err_Res }, 06140 /* Character_2 */ {FALSE, Err_Res }, 06141 /* Character_4 */ {FALSE, Err_Res }, 06142 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06143 /* Structure_Type */ {FALSE, Err_Res }, 06144 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06145 }, 06146 /* Logical_8 */ { 06147 /* Err_Res */ {FALSE, Err_Res }, 06148 /* Short_Char_Const */ {FALSE, Err_Res }, 06149 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06150 /* Typeless_1 */ {FALSE, Err_Res }, 06151 /* Typeless_2 */ {FALSE, Err_Res }, 06152 /* Typeless_4 */ {FALSE, Err_Res }, 06153 /* Typeless_8 */ {FALSE, Err_Res }, 06154 /* Long_Typeless */ {FALSE, Err_Res }, 06155 /* Integer_1 */ {FALSE, Err_Res }, 06156 /* Integer_2 */ {FALSE, Err_Res }, 06157 /* Integer_4 */ {FALSE, Err_Res }, 06158 /* Integer_8 */ {FALSE, Err_Res }, 06159 /* Real_4 */ {FALSE, Err_Res }, 06160 /* Real_8 */ {FALSE, Err_Res }, 06161 /* Real_16 */ {FALSE, Err_Res }, 06162 /* Complex_4 */ {FALSE, Err_Res }, 06163 /* Complex_8 */ {FALSE, Err_Res }, 06164 /* Complex_16 */ {FALSE, Err_Res }, 06165 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06166 /* Logical_1 */ {FALSE, Err_Res }, 06167 /* Logical_2 */ {FALSE, Err_Res }, 06168 /* Logical_4 */ {FALSE, Err_Res }, 06169 /* Logical_8 */ {FALSE, Err_Res }, 06170 /* Character_1 */ {FALSE, Err_Res }, 06171 /* Character_2 */ {FALSE, Err_Res }, 06172 /* Character_4 */ {FALSE, Err_Res }, 06173 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06174 /* Structure_Type */ {FALSE, Err_Res }, 06175 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06176 }, 06177 /* Character_1 */ { 06178 /* Err_Res */ {FALSE, Err_Res }, 06179 /* Short_Char_Const */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06180 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06181 /* Typeless_1 */ {FALSE, Err_Res }, 06182 /* Typeless_2 */ {FALSE, Err_Res }, 06183 /* Typeless_4 */ {FALSE, Err_Res }, 06184 /* Typeless_8 */ {FALSE, Err_Res }, 06185 /* Long_Typeless */ {FALSE, Err_Res }, 06186 /* Integer_1 */ {FALSE, Err_Res }, 06187 /* Integer_2 */ {FALSE, Err_Res }, 06188 /* Integer_4 */ {FALSE, Err_Res }, 06189 /* Integer_8 */ {FALSE, Err_Res }, 06190 /* Real_4 */ {FALSE, Err_Res }, 06191 /* Real_8 */ {FALSE, Err_Res }, 06192 /* Real_16 */ {FALSE, Err_Res }, 06193 /* Complex_4 */ {FALSE, Err_Res }, 06194 /* Complex_8 */ {FALSE, Err_Res }, 06195 /* Complex_16 */ {FALSE, Err_Res }, 06196 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06197 /* Logical_1 */ {FALSE, Err_Res }, 06198 /* Logical_2 */ {FALSE, Err_Res }, 06199 /* Logical_4 */ {FALSE, Err_Res }, 06200 /* Logical_8 */ {FALSE, Err_Res }, 06201 /* Character_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06202 /* Character_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06203 /* Character_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06204 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06205 /* Structure_Type */ {FALSE, Err_Res }, 06206 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06207 }, 06208 /* Character_2 */ { 06209 /* Err_Res */ {FALSE, Err_Res }, 06210 /* Short_Char_Const */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06211 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06212 /* Typeless_1 */ {FALSE, Err_Res }, 06213 /* Typeless_2 */ {FALSE, Err_Res }, 06214 /* Typeless_4 */ {FALSE, Err_Res }, 06215 /* Typeless_8 */ {FALSE, Err_Res }, 06216 /* Long_Typeless */ {FALSE, Err_Res }, 06217 /* Integer_1 */ {FALSE, Err_Res }, 06218 /* Integer_2 */ {FALSE, Err_Res }, 06219 /* Integer_4 */ {FALSE, Err_Res }, 06220 /* Integer_8 */ {FALSE, Err_Res }, 06221 /* Real_4 */ {FALSE, Err_Res }, 06222 /* Real_8 */ {FALSE, Err_Res }, 06223 /* Real_16 */ {FALSE, Err_Res }, 06224 /* Complex_4 */ {FALSE, Err_Res }, 06225 /* Complex_8 */ {FALSE, Err_Res }, 06226 /* Complex_16 */ {FALSE, Err_Res }, 06227 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06228 /* Logical_1 */ {FALSE, Err_Res }, 06229 /* Logical_2 */ {FALSE, Err_Res }, 06230 /* Logical_4 */ {FALSE, Err_Res }, 06231 /* Logical_8 */ {FALSE, Err_Res }, 06232 /* Character_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06233 /* Character_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06234 /* Character_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06235 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06236 /* Structure_Type */ {FALSE, Err_Res }, 06237 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06238 }, 06239 /* Character_4 */ { 06240 /* Err_Res */ {FALSE, Err_Res }, 06241 /* Short_Char_Const */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06242 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06243 /* Typeless_1 */ {FALSE, Err_Res }, 06244 /* Typeless_2 */ {FALSE, Err_Res }, 06245 /* Typeless_4 */ {FALSE, Err_Res }, 06246 /* Typeless_8 */ {FALSE, Err_Res }, 06247 /* Long_Typeless */ {FALSE, Err_Res }, 06248 /* Integer_1 */ {FALSE, Err_Res }, 06249 /* Integer_2 */ {FALSE, Err_Res }, 06250 /* Integer_4 */ {FALSE, Err_Res }, 06251 /* Integer_8 */ {FALSE, Err_Res }, 06252 /* Real_4 */ {FALSE, Err_Res }, 06253 /* Real_8 */ {FALSE, Err_Res }, 06254 /* Real_16 */ {FALSE, Err_Res }, 06255 /* Complex_4 */ {FALSE, Err_Res }, 06256 /* Complex_8 */ {FALSE, Err_Res }, 06257 /* Complex_16 */ {FALSE, Err_Res }, 06258 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06259 /* Logical_1 */ {FALSE, Err_Res }, 06260 /* Logical_2 */ {FALSE, Err_Res }, 06261 /* Logical_4 */ {FALSE, Err_Res }, 06262 /* Logical_8 */ {FALSE, Err_Res }, 06263 /* Character_1 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06264 /* Character_2 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06265 /* Character_4 */ {FALSE, CG_LOGICAL_DEFAULT_TYPE }, 06266 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06267 /* Structure_Type */ {FALSE, Err_Res }, 06268 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06269 }, 06270 /* CRI_Ch_Ptr_8 */ { 06271 /* Err_Res */ {FALSE, Err_Res }, 06272 /* Short_Char_Const */ {FALSE, Err_Res }, 06273 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06274 /* Typeless_1 */ {FALSE, Err_Res }, 06275 /* Typeless_2 */ {FALSE, Err_Res }, 06276 /* Typeless_4 */ {FALSE, Err_Res }, 06277 /* Typeless_8 */ {FALSE, Err_Res }, 06278 /* Long_Typeless */ {FALSE, Err_Res }, 06279 /* Integer_1 */ {FALSE, Err_Res }, 06280 /* Integer_2 */ {FALSE, Err_Res }, 06281 /* Integer_4 */ {FALSE, Err_Res }, 06282 /* Integer_8 */ {FALSE, Err_Res }, 06283 /* Real_4 */ {FALSE, Err_Res }, 06284 /* Real_8 */ {FALSE, Err_Res }, 06285 /* Real_16 */ {FALSE, Err_Res }, 06286 /* Complex_4 */ {FALSE, Err_Res }, 06287 /* Complex_8 */ {FALSE, Err_Res }, 06288 /* Complex_16 */ {FALSE, Err_Res }, 06289 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06290 /* Logical_1 */ {FALSE, Err_Res }, 06291 /* Logical_2 */ {FALSE, Err_Res }, 06292 /* Logical_4 */ {FALSE, Err_Res }, 06293 /* Logical_8 */ {FALSE, Err_Res }, 06294 /* Character_1 */ {FALSE, Err_Res }, 06295 /* Character_2 */ {FALSE, Err_Res }, 06296 /* Character_4 */ {FALSE, Err_Res }, 06297 /* CRI_Ch_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06298 /* Structure_Type */ {FALSE, Err_Res }, 06299 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06300 }, 06301 /* Structure_Type */ { 06302 /* Err_Res */ {FALSE, Err_Res }, 06303 /* Short_Char_Const */ {FALSE, Err_Res }, 06304 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06305 /* Typeless_1 */ {FALSE, Err_Res }, 06306 /* Typeless_2 */ {FALSE, Err_Res }, 06307 /* Typeless_4 */ {FALSE, Err_Res }, 06308 /* Typeless_8 */ {FALSE, Err_Res }, 06309 /* Long_Typeless */ {FALSE, Err_Res }, 06310 /* Integer_1 */ {FALSE, Err_Res }, 06311 /* Integer_2 */ {FALSE, Err_Res }, 06312 /* Integer_4 */ {FALSE, Err_Res }, 06313 /* Integer_8 */ {FALSE, Err_Res }, 06314 /* Real_4 */ {FALSE, Err_Res }, 06315 /* Real_8 */ {FALSE, Err_Res }, 06316 /* Real_16 */ {FALSE, Err_Res }, 06317 /* Complex_4 */ {FALSE, Err_Res }, 06318 /* Complex_8 */ {FALSE, Err_Res }, 06319 /* Complex_16 */ {FALSE, Err_Res }, 06320 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06321 /* Logical_1 */ {FALSE, Err_Res }, 06322 /* Logical_2 */ {FALSE, Err_Res }, 06323 /* Logical_4 */ {FALSE, Err_Res }, 06324 /* Logical_8 */ {FALSE, Err_Res }, 06325 /* Character_1 */ {FALSE, Err_Res }, 06326 /* Character_2 */ {FALSE, Err_Res }, 06327 /* Character_4 */ {FALSE, Err_Res }, 06328 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06329 /* Structure_Type */ {FALSE, Err_Res }, 06330 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06331 }, 06332 /* CRI_Parcel_Ptr_8 */ { 06333 /* Err_Res */ {FALSE, Err_Res }, 06334 /* Short_Char_Const */ {FALSE, Err_Res }, 06335 /* Short_Typeless_Const */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06336 /* Typeless_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06337 /* Typeless_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06338 /* Typeless_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06339 /* Typeless_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06340 /* Long_Typeless */ {FALSE, Err_Res }, 06341 /* Integer_1 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06342 /* Integer_2 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06343 /* Integer_4 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06344 /* Integer_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06345 /* Real_4 */ {FALSE, Err_Res }, 06346 /* Real_8 */ {FALSE, Err_Res }, 06347 /* Real_16 */ {FALSE, Err_Res }, 06348 /* Complex_4 */ {FALSE, Err_Res }, 06349 /* Complex_8 */ {FALSE, Err_Res }, 06350 /* Complex_16 */ {FALSE, Err_Res }, 06351 /* CRI_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE }, 06352 /* Logical_1 */ {FALSE, Err_Res }, 06353 /* Logical_2 */ {FALSE, Err_Res }, 06354 /* Logical_4 */ {FALSE, Err_Res }, 06355 /* Logical_8 */ {FALSE, Err_Res }, 06356 /* Character_1 */ {FALSE, Err_Res }, 06357 /* Character_2 */ {FALSE, Err_Res }, 06358 /* Character_4 */ {FALSE, Err_Res }, 06359 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06360 /* Structure_Type */ {FALSE, Err_Res }, 06361 /* CRI_Parcel_Ptr_8 */ {TRUE , CG_LOGICAL_DEFAULT_TYPE } 06362 } 06363 }; 06364 06365 # if defined(_TARGET_OS_MAX) 06366 exp_tbl_type and_or_tbl[Num_Linear_Types][Num_Linear_Types] = { 06367 /* Err_Res */ { 06368 /* Err_Res */ {FALSE, Err_Res }, 06369 /* Short_Char_Const */ {FALSE, Err_Res }, 06370 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06371 /* Typeless_1 */ {FALSE, Err_Res }, 06372 /* Typeless_2 */ {FALSE, Err_Res }, 06373 /* Typeless_4 */ {FALSE, Err_Res }, 06374 /* Typeless_8 */ {FALSE, Err_Res }, 06375 /* Long_Typeless */ {FALSE, Err_Res }, 06376 /* Integer_1 */ {FALSE, Err_Res }, 06377 /* Integer_2 */ {FALSE, Err_Res }, 06378 /* Integer_4 */ {FALSE, Err_Res }, 06379 /* Integer_8 */ {FALSE, Err_Res }, 06380 /* Real_4 */ {FALSE, Err_Res }, 06381 /* Real_8 */ {FALSE, Err_Res }, 06382 /* Real_16 */ {FALSE, Err_Res }, 06383 /* Complex_4 */ {FALSE, Err_Res }, 06384 /* Complex_8 */ {FALSE, Err_Res }, 06385 /* Complex_16 */ {FALSE, Err_Res }, 06386 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06387 /* Logical_1 */ {FALSE, Err_Res }, 06388 /* Logical_2 */ {FALSE, Err_Res }, 06389 /* Logical_4 */ {FALSE, Err_Res }, 06390 /* Logical_8 */ {FALSE, Err_Res }, 06391 /* Character_1 */ {FALSE, Err_Res }, 06392 /* Character_2 */ {FALSE, Err_Res }, 06393 /* Character_4 */ {FALSE, Err_Res }, 06394 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06395 /* Structure_Type */ {FALSE, Err_Res }, 06396 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06397 }, 06398 /* Short_Char_Const */ { 06399 /* Err_Res */ {FALSE, Err_Res }, 06400 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 06401 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 06402 /* Typeless_1 */ {TRUE , Typeless_1 }, 06403 /* Typeless_2 */ {TRUE , Typeless_2 }, 06404 /* Typeless_4 */ {TRUE , Typeless_4 }, 06405 /* Typeless_8 */ {TRUE , Typeless_8 }, 06406 /* Long_Typeless */ {FALSE, Err_Res }, 06407 /* Integer_1 */ {TRUE , Typeless_4 }, 06408 /* Integer_2 */ {TRUE , Typeless_4 }, 06409 /* Integer_4 */ {TRUE , Typeless_4 }, 06410 /* Integer_8 */ {TRUE , Typeless_8 }, 06411 /* Real_4 */ {TRUE , Typeless_4 }, 06412 /* Real_8 */ {TRUE , Typeless_8 }, 06413 /* Real_16 */ {FALSE, Err_Res }, 06414 /* Complex_4 */ {FALSE, Err_Res }, 06415 /* Complex_8 */ {FALSE, Err_Res }, 06416 /* Complex_16 */ {FALSE, Err_Res }, 06417 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06418 /* Logical_1 */ {FALSE, Err_Res }, 06419 /* Logical_2 */ {FALSE, Err_Res }, 06420 /* Logical_4 */ {FALSE, Err_Res }, 06421 /* Logical_8 */ {FALSE, Err_Res }, 06422 /* Character_1 */ {FALSE, Err_Res }, 06423 /* Character_2 */ {FALSE, Err_Res }, 06424 /* Character_4 */ {FALSE, Err_Res }, 06425 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06426 /* Structure_Type */ {FALSE, Err_Res }, 06427 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06428 }, 06429 /* Short_Typeless_Const */ { 06430 /* Err_Res */ {FALSE, Err_Res }, 06431 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 06432 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 06433 /* Typeless_1 */ {TRUE , Typeless_1 }, 06434 /* Typeless_2 */ {TRUE , Typeless_2 }, 06435 /* Typeless_4 */ {TRUE , Typeless_4 }, 06436 /* Typeless_8 */ {TRUE , Typeless_8 }, 06437 /* Long_Typeless */ {FALSE, Err_Res }, 06438 /* Integer_1 */ {TRUE , Typeless_4 }, 06439 /* Integer_2 */ {TRUE , Typeless_4 }, 06440 /* Integer_4 */ {TRUE , Typeless_4 }, 06441 /* Integer_8 */ {TRUE , Typeless_8 }, 06442 /* Real_4 */ {TRUE , Typeless_4 }, 06443 /* Real_8 */ {TRUE , Typeless_8 }, 06444 /* Real_16 */ {FALSE, Err_Res }, 06445 /* Complex_4 */ {FALSE, Err_Res }, 06446 /* Complex_8 */ {FALSE, Err_Res }, 06447 /* Complex_16 */ {FALSE, Err_Res }, 06448 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06449 /* Logical_1 */ {FALSE, Err_Res }, 06450 /* Logical_2 */ {FALSE, Err_Res }, 06451 /* Logical_4 */ {FALSE, Err_Res }, 06452 /* Logical_8 */ {FALSE, Err_Res }, 06453 /* Character_1 */ {FALSE, Err_Res }, 06454 /* Character_2 */ {FALSE, Err_Res }, 06455 /* Character_4 */ {FALSE, Err_Res }, 06456 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06457 /* Structure_Type */ {FALSE, Err_Res }, 06458 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06459 }, 06460 /* Typeless_1 */ { 06461 /* Err_Res */ {FALSE, Err_Res }, 06462 /* Short_Char_Const */ {TRUE , Typeless_1 }, 06463 /* Short_Typeless_Const */ {TRUE , Typeless_1 }, 06464 /* Typeless_1 */ {TRUE , Typeless_1 }, 06465 /* Typeless_2 */ {TRUE , Typeless_2 }, 06466 /* Typeless_4 */ {TRUE , Typeless_4 }, 06467 /* Typeless_8 */ {TRUE , Typeless_8 }, 06468 /* Long_Typeless */ {FALSE, Err_Res }, 06469 /* Integer_1 */ {TRUE , Typeless_1 }, 06470 /* Integer_2 */ {TRUE , Typeless_2 }, 06471 /* Integer_4 */ {TRUE , Typeless_4 }, 06472 /* Integer_8 */ {TRUE , Typeless_8 }, 06473 /* Real_4 */ {TRUE , Typeless_4 }, 06474 /* Real_8 */ {TRUE , Typeless_8 }, 06475 /* Real_16 */ {FALSE, Err_Res }, 06476 /* Complex_4 */ {FALSE, Err_Res }, 06477 /* Complex_8 */ {FALSE, Err_Res }, 06478 /* Complex_16 */ {FALSE, Err_Res }, 06479 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06480 /* Logical_1 */ {FALSE, Err_Res }, 06481 /* Logical_2 */ {FALSE, Err_Res }, 06482 /* Logical_4 */ {FALSE, Err_Res }, 06483 /* Logical_8 */ {FALSE, Err_Res }, 06484 /* Character_1 */ {FALSE, Err_Res }, 06485 /* Character_2 */ {FALSE, Err_Res }, 06486 /* Character_4 */ {FALSE, Err_Res }, 06487 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06488 /* Structure_Type */ {FALSE, Err_Res }, 06489 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06490 }, 06491 /* Typeless_2 */ { 06492 /* Err_Res */ {FALSE, Err_Res }, 06493 /* Short_Char_Const */ {TRUE , Typeless_2 }, 06494 /* Short_Typeless_Const */ {TRUE , Typeless_2 }, 06495 /* Typeless_1 */ {TRUE , Typeless_2 }, 06496 /* Typeless_2 */ {TRUE , Typeless_2 }, 06497 /* Typeless_4 */ {TRUE , Typeless_4 }, 06498 /* Typeless_8 */ {TRUE , Typeless_8 }, 06499 /* Long_Typeless */ {FALSE, Err_Res }, 06500 /* Integer_1 */ {TRUE , Typeless_2 }, 06501 /* Integer_2 */ {TRUE , Typeless_2 }, 06502 /* Integer_4 */ {TRUE , Typeless_4 }, 06503 /* Integer_8 */ {TRUE , Typeless_8 }, 06504 /* Real_4 */ {TRUE , Typeless_4 }, 06505 /* Real_8 */ {TRUE , Typeless_8 }, 06506 /* Real_16 */ {FALSE, Err_Res }, 06507 /* Complex_4 */ {FALSE, Err_Res }, 06508 /* Complex_8 */ {FALSE, Err_Res }, 06509 /* Complex_16 */ {FALSE, Err_Res }, 06510 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06511 /* Logical_1 */ {FALSE, Err_Res }, 06512 /* Logical_2 */ {FALSE, Err_Res }, 06513 /* Logical_4 */ {FALSE, Err_Res }, 06514 /* Logical_8 */ {FALSE, Err_Res }, 06515 /* Character_1 */ {FALSE, Err_Res }, 06516 /* Character_2 */ {FALSE, Err_Res }, 06517 /* Character_4 */ {FALSE, Err_Res }, 06518 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06519 /* Structure_Type */ {FALSE, Err_Res }, 06520 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06521 }, 06522 /* Typeless_4 */ { 06523 /* Err_Res */ {FALSE, Err_Res }, 06524 /* Short_Char_Const */ {TRUE , Typeless_4 }, 06525 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 06526 /* Typeless_1 */ {TRUE , Typeless_4 }, 06527 /* Typeless_2 */ {TRUE , Typeless_4 }, 06528 /* Typeless_4 */ {TRUE , Typeless_4 }, 06529 /* Typeless_8 */ {TRUE , Typeless_8 }, 06530 /* Long_Typeless */ {FALSE, Err_Res }, 06531 /* Integer_1 */ {TRUE , Typeless_4 }, 06532 /* Integer_2 */ {TRUE , Typeless_4 }, 06533 /* Integer_4 */ {TRUE , Typeless_4 }, 06534 /* Integer_8 */ {TRUE , Typeless_8 }, 06535 /* Real_4 */ {TRUE , Typeless_4 }, 06536 /* Real_8 */ {TRUE , Typeless_8 }, 06537 /* Real_16 */ {FALSE, Err_Res }, 06538 /* Complex_4 */ {FALSE, Err_Res }, 06539 /* Complex_8 */ {FALSE, Err_Res }, 06540 /* Complex_16 */ {FALSE, Err_Res }, 06541 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06542 /* Logical_1 */ {FALSE, Err_Res }, 06543 /* Logical_2 */ {FALSE, Err_Res }, 06544 /* Logical_4 */ {FALSE, Err_Res }, 06545 /* Logical_8 */ {FALSE, Err_Res }, 06546 /* Character_1 */ {FALSE, Err_Res }, 06547 /* Character_2 */ {FALSE, Err_Res }, 06548 /* Character_4 */ {FALSE, Err_Res }, 06549 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06550 /* Structure_Type */ {FALSE, Err_Res }, 06551 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06552 }, 06553 /* Typeless_8 */ { 06554 /* Err_Res */ {FALSE, Err_Res }, 06555 /* Short_Char_Const */ {TRUE , Typeless_8 }, 06556 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 06557 /* Typeless_1 */ {TRUE , Typeless_8 }, 06558 /* Typeless_2 */ {TRUE , Typeless_8 }, 06559 /* Typeless_4 */ {TRUE , Typeless_8 }, 06560 /* Typeless_8 */ {TRUE , Typeless_8 }, 06561 /* Long_Typeless */ {FALSE, Err_Res }, 06562 /* Integer_1 */ {TRUE , Typeless_4 }, 06563 /* Integer_2 */ {TRUE , Typeless_4 }, 06564 /* Integer_4 */ {TRUE , Typeless_4 }, 06565 /* Integer_8 */ {TRUE , Typeless_8 }, 06566 /* Real_4 */ {TRUE , Typeless_4 }, 06567 /* Real_8 */ {TRUE , Typeless_8 }, 06568 /* Real_16 */ {FALSE, Err_Res }, 06569 /* Complex_4 */ {FALSE, Err_Res }, 06570 /* Complex_8 */ {FALSE, Err_Res }, 06571 /* Complex_16 */ {FALSE, Err_Res }, 06572 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06573 /* Logical_1 */ {FALSE, Err_Res }, 06574 /* Logical_2 */ {FALSE, Err_Res }, 06575 /* Logical_4 */ {FALSE, Err_Res }, 06576 /* Logical_8 */ {FALSE, Err_Res }, 06577 /* Character_1 */ {FALSE, Err_Res }, 06578 /* Character_2 */ {FALSE, Err_Res }, 06579 /* Character_4 */ {FALSE, Err_Res }, 06580 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06581 /* Structure_Type */ {FALSE, Err_Res }, 06582 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06583 }, 06584 /* Long_Typeless */ { 06585 /* Err_Res */ {FALSE, Err_Res }, 06586 /* Short_Char_Const */ {FALSE, Err_Res }, 06587 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06588 /* Typeless_1 */ {FALSE, Err_Res }, 06589 /* Typeless_2 */ {FALSE, Err_Res }, 06590 /* Typeless_4 */ {FALSE, Err_Res }, 06591 /* Typeless_8 */ {FALSE, Err_Res }, 06592 /* Long_Typeless */ {FALSE, Err_Res }, 06593 /* Integer_1 */ {FALSE, Err_Res }, 06594 /* Integer_2 */ {FALSE, Err_Res }, 06595 /* Integer_4 */ {FALSE, Err_Res }, 06596 /* Integer_8 */ {FALSE, Err_Res }, 06597 /* Real_4 */ {FALSE, Err_Res }, 06598 /* Real_8 */ {FALSE, Err_Res }, 06599 /* Real_16 */ {FALSE, Err_Res }, 06600 /* Complex_4 */ {FALSE, Err_Res }, 06601 /* Complex_8 */ {FALSE, Err_Res }, 06602 /* Complex_16 */ {FALSE, Err_Res }, 06603 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06604 /* Logical_1 */ {FALSE, Err_Res }, 06605 /* Logical_2 */ {FALSE, Err_Res }, 06606 /* Logical_4 */ {FALSE, Err_Res }, 06607 /* Logical_8 */ {FALSE, Err_Res }, 06608 /* Character_1 */ {FALSE, Err_Res }, 06609 /* Character_2 */ {FALSE, Err_Res }, 06610 /* Character_4 */ {FALSE, Err_Res }, 06611 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06612 /* Structure_Type */ {FALSE, Err_Res }, 06613 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06614 }, 06615 /* Integer_1 */ { 06616 /* Err_Res */ {FALSE, Err_Res }, 06617 /* Short_Char_Const */ {TRUE , Typeless_4 }, 06618 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 06619 /* Typeless_1 */ {TRUE , Typeless_1 }, 06620 /* Typeless_2 */ {TRUE , Typeless_1 }, 06621 /* Typeless_4 */ {TRUE , Typeless_1 }, 06622 /* Typeless_8 */ {TRUE , Typeless_1 }, 06623 /* Long_Typeless */ {FALSE, Err_Res }, 06624 /* Integer_1 */ {TRUE , Typeless_4 }, 06625 /* Integer_2 */ {TRUE , Typeless_4 }, 06626 /* Integer_4 */ {TRUE , Typeless_4 }, 06627 /* Integer_8 */ {TRUE , Typeless_8 }, 06628 /* Real_4 */ {TRUE , Typeless_4 }, 06629 /* Real_8 */ {TRUE , Typeless_8 }, 06630 /* Real_16 */ {FALSE, Err_Res }, 06631 /* Complex_4 */ {FALSE, Err_Res }, 06632 /* Complex_8 */ {FALSE, Err_Res }, 06633 /* Complex_16 */ {FALSE, Err_Res }, 06634 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06635 /* Logical_1 */ {FALSE, Err_Res }, 06636 /* Logical_2 */ {FALSE, Err_Res }, 06637 /* Logical_4 */ {FALSE, Err_Res }, 06638 /* Logical_8 */ {FALSE, Err_Res }, 06639 /* Character_1 */ {FALSE, Err_Res }, 06640 /* Character_2 */ {FALSE, Err_Res }, 06641 /* Character_4 */ {FALSE, Err_Res }, 06642 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06643 /* Structure_Type */ {FALSE, Err_Res }, 06644 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06645 }, 06646 /* Integer_2 */ { 06647 /* Err_Res */ {FALSE, Err_Res }, 06648 /* Short_Char_Const */ {TRUE , Typeless_4 }, 06649 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 06650 /* Typeless_1 */ {TRUE , Typeless_2 }, 06651 /* Typeless_2 */ {TRUE , Typeless_2 }, 06652 /* Typeless_4 */ {TRUE , Typeless_2 }, 06653 /* Typeless_8 */ {TRUE , Typeless_2 }, 06654 /* Long_Typeless */ {FALSE, Err_Res }, 06655 /* Integer_1 */ {TRUE , Typeless_4 }, 06656 /* Integer_2 */ {TRUE , Typeless_4 }, 06657 /* Integer_4 */ {TRUE , Typeless_4 }, 06658 /* Integer_8 */ {TRUE , Typeless_8 }, 06659 /* Real_4 */ {TRUE , Typeless_4 }, 06660 /* Real_8 */ {TRUE , Typeless_8 }, 06661 /* Real_16 */ {FALSE, Err_Res }, 06662 /* Complex_4 */ {FALSE, Err_Res }, 06663 /* Complex_8 */ {FALSE, Err_Res }, 06664 /* Complex_16 */ {FALSE, Err_Res }, 06665 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06666 /* Logical_1 */ {FALSE, Err_Res }, 06667 /* Logical_2 */ {FALSE, Err_Res }, 06668 /* Logical_4 */ {FALSE, Err_Res }, 06669 /* Logical_8 */ {FALSE, Err_Res }, 06670 /* Character_1 */ {FALSE, Err_Res }, 06671 /* Character_2 */ {FALSE, Err_Res }, 06672 /* Character_4 */ {FALSE, Err_Res }, 06673 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06674 /* Structure_Type */ {FALSE, Err_Res }, 06675 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06676 }, 06677 /* Integer_4 */ { 06678 /* Err_Res */ {FALSE, Err_Res }, 06679 /* Short_Char_Const */ {TRUE , Typeless_4 }, 06680 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 06681 /* Typeless_1 */ {TRUE , Typeless_4 }, 06682 /* Typeless_2 */ {TRUE , Typeless_4 }, 06683 /* Typeless_4 */ {TRUE , Typeless_4 }, 06684 /* Typeless_8 */ {TRUE , Typeless_4 }, 06685 /* Long_Typeless */ {FALSE, Err_Res }, 06686 /* Integer_1 */ {TRUE , Typeless_4 }, 06687 /* Integer_2 */ {TRUE , Typeless_4 }, 06688 /* Integer_4 */ {TRUE , Typeless_4 }, 06689 /* Integer_8 */ {TRUE , Typeless_8 }, 06690 /* Real_4 */ {TRUE , Typeless_4 }, 06691 /* Real_8 */ {TRUE , Typeless_8 }, 06692 /* Real_16 */ {FALSE, Err_Res }, 06693 /* Complex_4 */ {FALSE, Err_Res }, 06694 /* Complex_8 */ {FALSE, Err_Res }, 06695 /* Complex_16 */ {FALSE, Err_Res }, 06696 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06697 /* Logical_1 */ {FALSE, Err_Res }, 06698 /* Logical_2 */ {FALSE, Err_Res }, 06699 /* Logical_4 */ {FALSE, Err_Res }, 06700 /* Logical_8 */ {FALSE, Err_Res }, 06701 /* Character_1 */ {FALSE, Err_Res }, 06702 /* Character_2 */ {FALSE, Err_Res }, 06703 /* Character_4 */ {FALSE, Err_Res }, 06704 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06705 /* Structure_Type */ {FALSE, Err_Res }, 06706 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06707 }, 06708 /* Integer_8 */ { 06709 /* Err_Res */ {FALSE, Err_Res }, 06710 /* Short_Char_Const */ {TRUE , Typeless_8 }, 06711 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 06712 /* Typeless_1 */ {TRUE , Typeless_8 }, 06713 /* Typeless_2 */ {TRUE , Typeless_8 }, 06714 /* Typeless_4 */ {TRUE , Typeless_8 }, 06715 /* Typeless_8 */ {TRUE , Typeless_8 }, 06716 /* Long_Typeless */ {FALSE, Err_Res }, 06717 /* Integer_1 */ {TRUE , Typeless_8 }, 06718 /* Integer_2 */ {TRUE , Typeless_8 }, 06719 /* Integer_4 */ {TRUE , Typeless_8 }, 06720 /* Integer_8 */ {TRUE , Typeless_8 }, 06721 /* Real_4 */ {TRUE , Typeless_8 }, 06722 /* Real_8 */ {TRUE , Typeless_8 }, 06723 /* Real_16 */ {FALSE, Err_Res }, 06724 /* Complex_4 */ {FALSE, Err_Res }, 06725 /* Complex_8 */ {FALSE, Err_Res }, 06726 /* Complex_16 */ {FALSE, Err_Res }, 06727 /* CRI_Ptr_8 */ {TRUE , Typeless_8 }, 06728 /* Logical_1 */ {FALSE, Err_Res }, 06729 /* Logical_2 */ {FALSE, Err_Res }, 06730 /* Logical_4 */ {FALSE, Err_Res }, 06731 /* Logical_8 */ {FALSE, Err_Res }, 06732 /* Character_1 */ {FALSE, Err_Res }, 06733 /* Character_2 */ {FALSE, Err_Res }, 06734 /* Character_4 */ {FALSE, Err_Res }, 06735 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06736 /* Structure_Type */ {FALSE, Err_Res }, 06737 /* CRI_Parcel_Ptr_8 */ {TRUE , Typeless_8 }, 06738 }, 06739 /* Real_4 */ { 06740 /* Err_Res */ {FALSE, Err_Res }, 06741 /* Short_Char_Const */ {TRUE , Typeless_4 }, 06742 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 06743 /* Typeless_1 */ {TRUE , Typeless_4 }, 06744 /* Typeless_2 */ {TRUE , Typeless_4 }, 06745 /* Typeless_4 */ {TRUE , Typeless_4 }, 06746 /* Typeless_8 */ {TRUE , Typeless_4 }, 06747 /* Long_Typeless */ {FALSE, Err_Res }, 06748 /* Integer_1 */ {TRUE , Typeless_4 }, 06749 /* Integer_2 */ {TRUE , Typeless_4 }, 06750 /* Integer_4 */ {TRUE , Typeless_4 }, 06751 /* Integer_8 */ {TRUE , Typeless_8 }, 06752 /* Real_4 */ {TRUE , Typeless_4 }, 06753 /* Real_8 */ {TRUE , Typeless_8 }, 06754 /* Real_16 */ {FALSE, Err_Res }, 06755 /* Complex_4 */ {FALSE, Err_Res }, 06756 /* Complex_8 */ {FALSE, Err_Res }, 06757 /* Complex_16 */ {FALSE, Err_Res }, 06758 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06759 /* Logical_1 */ {FALSE, Err_Res }, 06760 /* Logical_2 */ {FALSE, Err_Res }, 06761 /* Logical_4 */ {FALSE, Err_Res }, 06762 /* Logical_8 */ {FALSE, Err_Res }, 06763 /* Character_1 */ {FALSE, Err_Res }, 06764 /* Character_2 */ {FALSE, Err_Res }, 06765 /* Character_4 */ {FALSE, Err_Res }, 06766 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06767 /* Structure_Type */ {FALSE, Err_Res }, 06768 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06769 }, 06770 /* Real_8 */ { 06771 /* Err_Res */ {FALSE, Err_Res }, 06772 /* Short_Char_Const */ {TRUE , Typeless_8 }, 06773 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 06774 /* Typeless_1 */ {TRUE , Typeless_8 }, 06775 /* Typeless_2 */ {TRUE , Typeless_8 }, 06776 /* Typeless_4 */ {TRUE , Typeless_8 }, 06777 /* Typeless_8 */ {TRUE , Typeless_8 }, 06778 /* Long_Typeless */ {FALSE, Err_Res }, 06779 /* Integer_1 */ {TRUE , Typeless_8 }, 06780 /* Integer_2 */ {TRUE , Typeless_8 }, 06781 /* Integer_4 */ {TRUE , Typeless_8 }, 06782 /* Integer_8 */ {TRUE , Typeless_8 }, 06783 /* Real_4 */ {TRUE , Typeless_8 }, 06784 /* Real_8 */ {TRUE , Typeless_8 }, 06785 /* Real_16 */ {FALSE, Err_Res }, 06786 /* Complex_4 */ {FALSE, Err_Res }, 06787 /* Complex_8 */ {FALSE, Err_Res }, 06788 /* Complex_16 */ {FALSE, Err_Res }, 06789 /* CRI_Ptr_8 */ {TRUE , Typeless_8 }, 06790 /* Logical_1 */ {FALSE, Err_Res }, 06791 /* Logical_2 */ {FALSE, Err_Res }, 06792 /* Logical_4 */ {FALSE, Err_Res }, 06793 /* Logical_8 */ {FALSE, Err_Res }, 06794 /* Character_1 */ {FALSE, Err_Res }, 06795 /* Character_2 */ {FALSE, Err_Res }, 06796 /* Character_4 */ {FALSE, Err_Res }, 06797 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06798 /* Structure_Type */ {FALSE, Err_Res }, 06799 /* CRI_Parcel_Ptr_8 */ {TRUE , Typeless_8 }, 06800 }, 06801 /* Real_16 */ { 06802 /* Err_Res */ {FALSE, Err_Res }, 06803 /* Short_Char_Const */ {FALSE, Err_Res }, 06804 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06805 /* Typeless_1 */ {FALSE, Err_Res }, 06806 /* Typeless_2 */ {FALSE, Err_Res }, 06807 /* Typeless_4 */ {FALSE, Err_Res }, 06808 /* Typeless_8 */ {FALSE, Err_Res }, 06809 /* Long_Typeless */ {FALSE, Err_Res }, 06810 /* Integer_1 */ {FALSE, Err_Res }, 06811 /* Integer_2 */ {FALSE, Err_Res }, 06812 /* Integer_4 */ {FALSE, Err_Res }, 06813 /* Integer_8 */ {FALSE, Err_Res }, 06814 /* Real_4 */ {FALSE, Err_Res }, 06815 /* Real_8 */ {FALSE, Err_Res }, 06816 /* Real_16 */ {FALSE, Err_Res }, 06817 /* Complex_4 */ {FALSE, Err_Res }, 06818 /* Complex_8 */ {FALSE, Err_Res }, 06819 /* Complex_16 */ {FALSE, Err_Res }, 06820 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06821 /* Logical_1 */ {FALSE, Err_Res }, 06822 /* Logical_2 */ {FALSE, Err_Res }, 06823 /* Logical_4 */ {FALSE, Err_Res }, 06824 /* Logical_8 */ {FALSE, Err_Res }, 06825 /* Character_1 */ {FALSE, Err_Res }, 06826 /* Character_2 */ {FALSE, Err_Res }, 06827 /* Character_4 */ {FALSE, Err_Res }, 06828 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06829 /* Structure_Type */ {FALSE, Err_Res }, 06830 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06831 }, 06832 /* Complex_4 */ { 06833 /* Err_Res */ {FALSE, Err_Res }, 06834 /* Short_Char_Const */ {FALSE, Err_Res }, 06835 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06836 /* Typeless_1 */ {FALSE, Err_Res }, 06837 /* Typeless_2 */ {FALSE, Err_Res }, 06838 /* Typeless_4 */ {FALSE, Err_Res }, 06839 /* Typeless_8 */ {FALSE, Err_Res }, 06840 /* Long_Typeless */ {FALSE, Err_Res }, 06841 /* Integer_1 */ {FALSE, Err_Res }, 06842 /* Integer_2 */ {FALSE, Err_Res }, 06843 /* Integer_4 */ {FALSE, Err_Res }, 06844 /* Integer_8 */ {FALSE, Err_Res }, 06845 /* Real_4 */ {FALSE, Err_Res }, 06846 /* Real_8 */ {FALSE, Err_Res }, 06847 /* Real_16 */ {FALSE, Err_Res }, 06848 /* Complex_4 */ {FALSE, Err_Res }, 06849 /* Complex_8 */ {FALSE, Err_Res }, 06850 /* Complex_16 */ {FALSE, Err_Res }, 06851 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06852 /* Logical_1 */ {FALSE, Err_Res }, 06853 /* Logical_2 */ {FALSE, Err_Res }, 06854 /* Logical_4 */ {FALSE, Err_Res }, 06855 /* Logical_8 */ {FALSE, Err_Res }, 06856 /* Character_1 */ {FALSE, Err_Res }, 06857 /* Character_2 */ {FALSE, Err_Res }, 06858 /* Character_4 */ {FALSE, Err_Res }, 06859 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06860 /* Structure_Type */ {FALSE, Err_Res }, 06861 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06862 }, 06863 /* Complex_8 */ { 06864 /* Err_Res */ {FALSE, Err_Res }, 06865 /* Short_Char_Const */ {FALSE, Err_Res }, 06866 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06867 /* Typeless_1 */ {FALSE, Err_Res }, 06868 /* Typeless_2 */ {FALSE, Err_Res }, 06869 /* Typeless_4 */ {FALSE, Err_Res }, 06870 /* Typeless_8 */ {FALSE, Err_Res }, 06871 /* Long_Typeless */ {FALSE, Err_Res }, 06872 /* Integer_1 */ {FALSE, Err_Res }, 06873 /* Integer_2 */ {FALSE, Err_Res }, 06874 /* Integer_4 */ {FALSE, Err_Res }, 06875 /* Integer_8 */ {FALSE, Err_Res }, 06876 /* Real_4 */ {FALSE, Err_Res }, 06877 /* Real_8 */ {FALSE, Err_Res }, 06878 /* Real_16 */ {FALSE, Err_Res }, 06879 /* Complex_4 */ {FALSE, Err_Res }, 06880 /* Complex_8 */ {FALSE, Err_Res }, 06881 /* Complex_16 */ {FALSE, Err_Res }, 06882 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06883 /* Logical_1 */ {FALSE, Err_Res }, 06884 /* Logical_2 */ {FALSE, Err_Res }, 06885 /* Logical_4 */ {FALSE, Err_Res }, 06886 /* Logical_8 */ {FALSE, Err_Res }, 06887 /* Character_1 */ {FALSE, Err_Res }, 06888 /* Character_2 */ {FALSE, Err_Res }, 06889 /* Character_4 */ {FALSE, Err_Res }, 06890 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06891 /* Structure_Type */ {FALSE, Err_Res }, 06892 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06893 }, 06894 /* Complex_16 */ { 06895 /* Err_Res */ {FALSE, Err_Res }, 06896 /* Short_Char_Const */ {FALSE, Err_Res }, 06897 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06898 /* Typeless_1 */ {FALSE, Err_Res }, 06899 /* Typeless_2 */ {FALSE, Err_Res }, 06900 /* Typeless_4 */ {FALSE, Err_Res }, 06901 /* Typeless_8 */ {FALSE, Err_Res }, 06902 /* Long_Typeless */ {FALSE, Err_Res }, 06903 /* Integer_1 */ {FALSE, Err_Res }, 06904 /* Integer_2 */ {FALSE, Err_Res }, 06905 /* Integer_4 */ {FALSE, Err_Res }, 06906 /* Integer_8 */ {FALSE, Err_Res }, 06907 /* Real_4 */ {FALSE, Err_Res }, 06908 /* Real_8 */ {FALSE, Err_Res }, 06909 /* Real_16 */ {FALSE, Err_Res }, 06910 /* Complex_4 */ {FALSE, Err_Res }, 06911 /* Complex_8 */ {FALSE, Err_Res }, 06912 /* Complex_16 */ {FALSE, Err_Res }, 06913 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06914 /* Logical_1 */ {FALSE, Err_Res }, 06915 /* Logical_2 */ {FALSE, Err_Res }, 06916 /* Logical_4 */ {FALSE, Err_Res }, 06917 /* Logical_8 */ {FALSE, Err_Res }, 06918 /* Character_1 */ {FALSE, Err_Res }, 06919 /* Character_2 */ {FALSE, Err_Res }, 06920 /* Character_4 */ {FALSE, Err_Res }, 06921 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06922 /* Structure_Type */ {FALSE, Err_Res }, 06923 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06924 }, 06925 /* CRI_Ptr_8 */ { 06926 /* Err_Res */ {FALSE, Err_Res }, 06927 /* Short_Char_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06928 /* Short_Typeless_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06929 /* Typeless_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06930 /* Typeless_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06931 /* Typeless_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06932 /* Typeless_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06933 /* Long_Typeless */ {FALSE, Err_Res }, 06934 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06935 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06936 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06937 /* Integer_8 */ {TRUE , Typeless_8 }, 06938 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06939 /* Real_8 */ {TRUE , Typeless_8 }, 06940 /* Real_16 */ {FALSE, Err_Res }, 06941 /* Complex_4 */ {FALSE, Err_Res }, 06942 /* Complex_8 */ {FALSE, Err_Res }, 06943 /* Complex_16 */ {FALSE, Err_Res }, 06944 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 06945 /* Logical_1 */ {FALSE, Err_Res }, 06946 /* Logical_2 */ {FALSE, Err_Res }, 06947 /* Logical_4 */ {FALSE, Err_Res }, 06948 /* Logical_8 */ {FALSE, Err_Res }, 06949 /* Character_1 */ {FALSE, Err_Res }, 06950 /* Character_2 */ {FALSE, Err_Res }, 06951 /* Character_4 */ {FALSE, Err_Res }, 06952 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06953 /* Structure_Type */ {FALSE, Err_Res }, 06954 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 06955 }, 06956 /* Logical_1 */ { 06957 /* Err_Res */ {FALSE, Err_Res }, 06958 /* Short_Char_Const */ {FALSE, Err_Res }, 06959 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06960 /* Typeless_1 */ {FALSE, Err_Res }, 06961 /* Typeless_2 */ {FALSE, Err_Res }, 06962 /* Typeless_4 */ {FALSE, Err_Res }, 06963 /* Typeless_8 */ {FALSE, Err_Res }, 06964 /* Long_Typeless */ {FALSE, Err_Res }, 06965 /* Integer_1 */ {FALSE, Err_Res }, 06966 /* Integer_2 */ {FALSE, Err_Res }, 06967 /* Integer_4 */ {FALSE, Err_Res }, 06968 /* Integer_8 */ {FALSE, Err_Res }, 06969 /* Real_4 */ {FALSE, Err_Res }, 06970 /* Real_8 */ {FALSE, Err_Res }, 06971 /* Real_16 */ {FALSE, Err_Res }, 06972 /* Complex_4 */ {FALSE, Err_Res }, 06973 /* Complex_8 */ {FALSE, Err_Res }, 06974 /* Complex_16 */ {FALSE, Err_Res }, 06975 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 06976 /* Logical_1 */ {FALSE, Logical_1 }, 06977 /* Logical_2 */ {FALSE, Logical_2 }, 06978 /* Logical_4 */ {FALSE, Logical_4 }, 06979 /* Logical_8 */ {FALSE, Logical_8 }, 06980 /* Character_1 */ {FALSE, Err_Res }, 06981 /* Character_2 */ {FALSE, Err_Res }, 06982 /* Character_4 */ {FALSE, Err_Res }, 06983 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 06984 /* Structure_Type */ {FALSE, Err_Res }, 06985 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 06986 }, 06987 /* Logical_2 */ { 06988 /* Err_Res */ {FALSE, Err_Res }, 06989 /* Short_Char_Const */ {FALSE, Err_Res }, 06990 /* Short_Typeless_Const */ {FALSE, Err_Res }, 06991 /* Typeless_1 */ {FALSE, Err_Res }, 06992 /* Typeless_2 */ {FALSE, Err_Res }, 06993 /* Typeless_4 */ {FALSE, Err_Res }, 06994 /* Typeless_8 */ {FALSE, Err_Res }, 06995 /* Long_Typeless */ {FALSE, Err_Res }, 06996 /* Integer_1 */ {FALSE, Err_Res }, 06997 /* Integer_2 */ {FALSE, Err_Res }, 06998 /* Integer_4 */ {FALSE, Err_Res }, 06999 /* Integer_8 */ {FALSE, Err_Res }, 07000 /* Real_4 */ {FALSE, Err_Res }, 07001 /* Real_8 */ {FALSE, Err_Res }, 07002 /* Real_16 */ {FALSE, Err_Res }, 07003 /* Complex_4 */ {FALSE, Err_Res }, 07004 /* Complex_8 */ {FALSE, Err_Res }, 07005 /* Complex_16 */ {FALSE, Err_Res }, 07006 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07007 /* Logical_1 */ {FALSE, Logical_2 }, 07008 /* Logical_2 */ {FALSE, Logical_2 }, 07009 /* Logical_4 */ {FALSE, Logical_4 }, 07010 /* Logical_8 */ {FALSE, Logical_8 }, 07011 /* Character_1 */ {FALSE, Err_Res }, 07012 /* Character_2 */ {FALSE, Err_Res }, 07013 /* Character_4 */ {FALSE, Err_Res }, 07014 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07015 /* Structure_Type */ {FALSE, Err_Res }, 07016 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07017 }, 07018 /* Logical_4 */ { 07019 /* Err_Res */ {FALSE, Err_Res }, 07020 /* Short_Char_Const */ {FALSE, Err_Res }, 07021 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07022 /* Typeless_1 */ {FALSE, Err_Res }, 07023 /* Typeless_2 */ {FALSE, Err_Res }, 07024 /* Typeless_4 */ {FALSE, Err_Res }, 07025 /* Typeless_8 */ {FALSE, Err_Res }, 07026 /* Long_Typeless */ {FALSE, Err_Res }, 07027 /* Integer_1 */ {FALSE, Err_Res }, 07028 /* Integer_2 */ {FALSE, Err_Res }, 07029 /* Integer_4 */ {FALSE, Err_Res }, 07030 /* Integer_8 */ {FALSE, Err_Res }, 07031 /* Real_4 */ {FALSE, Err_Res }, 07032 /* Real_8 */ {FALSE, Err_Res }, 07033 /* Real_16 */ {FALSE, Err_Res }, 07034 /* Complex_4 */ {FALSE, Err_Res }, 07035 /* Complex_8 */ {FALSE, Err_Res }, 07036 /* Complex_16 */ {FALSE, Err_Res }, 07037 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07038 /* Logical_1 */ {FALSE, Logical_4 }, 07039 /* Logical_2 */ {FALSE, Logical_4 }, 07040 /* Logical_4 */ {FALSE, Logical_4 }, 07041 /* Logical_8 */ {FALSE, Logical_8 }, 07042 /* Character_1 */ {FALSE, Err_Res }, 07043 /* Character_2 */ {FALSE, Err_Res }, 07044 /* Character_4 */ {FALSE, Err_Res }, 07045 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07046 /* Structure_Type */ {FALSE, Err_Res }, 07047 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07048 }, 07049 /* Logical_8 */ { 07050 /* Err_Res */ {FALSE, Err_Res }, 07051 /* Short_Char_Const */ {FALSE, Err_Res }, 07052 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07053 /* Typeless_1 */ {FALSE, Err_Res }, 07054 /* Typeless_2 */ {FALSE, Err_Res }, 07055 /* Typeless_4 */ {FALSE, Err_Res }, 07056 /* Typeless_8 */ {FALSE, Err_Res }, 07057 /* Long_Typeless */ {FALSE, Err_Res }, 07058 /* Integer_1 */ {FALSE, Err_Res }, 07059 /* Integer_2 */ {FALSE, Err_Res }, 07060 /* Integer_4 */ {FALSE, Err_Res }, 07061 /* Integer_8 */ {FALSE, Err_Res }, 07062 /* Real_4 */ {FALSE, Err_Res }, 07063 /* Real_8 */ {FALSE, Err_Res }, 07064 /* Real_16 */ {FALSE, Err_Res }, 07065 /* Complex_4 */ {FALSE, Err_Res }, 07066 /* Complex_8 */ {FALSE, Err_Res }, 07067 /* Complex_16 */ {FALSE, Err_Res }, 07068 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07069 /* Logical_1 */ {FALSE, Logical_8 }, 07070 /* Logical_2 */ {FALSE, Logical_8 }, 07071 /* Logical_4 */ {FALSE, Logical_8 }, 07072 /* Logical_8 */ {FALSE, Logical_8 }, 07073 /* Character_1 */ {FALSE, Err_Res }, 07074 /* Character_2 */ {FALSE, Err_Res }, 07075 /* Character_4 */ {FALSE, Err_Res }, 07076 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07077 /* Structure_Type */ {FALSE, Err_Res }, 07078 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07079 }, 07080 /* Character_1 */ { 07081 /* Err_Res */ {FALSE, Err_Res }, 07082 /* Short_Char_Const */ {FALSE, Err_Res }, 07083 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07084 /* Typeless_1 */ {FALSE, Err_Res }, 07085 /* Typeless_2 */ {FALSE, Err_Res }, 07086 /* Typeless_4 */ {FALSE, Err_Res }, 07087 /* Typeless_8 */ {FALSE, Err_Res }, 07088 /* Long_Typeless */ {FALSE, Err_Res }, 07089 /* Integer_1 */ {FALSE, Err_Res }, 07090 /* Integer_2 */ {FALSE, Err_Res }, 07091 /* Integer_4 */ {FALSE, Err_Res }, 07092 /* Integer_8 */ {FALSE, Err_Res }, 07093 /* Real_4 */ {FALSE, Err_Res }, 07094 /* Real_8 */ {FALSE, Err_Res }, 07095 /* Real_16 */ {FALSE, Err_Res }, 07096 /* Complex_4 */ {FALSE, Err_Res }, 07097 /* Complex_8 */ {FALSE, Err_Res }, 07098 /* Complex_16 */ {FALSE, Err_Res }, 07099 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07100 /* Logical_1 */ {FALSE, Err_Res }, 07101 /* Logical_2 */ {FALSE, Err_Res }, 07102 /* Logical_4 */ {FALSE, Err_Res }, 07103 /* Logical_8 */ {FALSE, Err_Res }, 07104 /* Character_1 */ {FALSE, Err_Res }, 07105 /* Character_2 */ {FALSE, Err_Res }, 07106 /* Character_4 */ {FALSE, Err_Res }, 07107 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07108 /* Structure_Type */ {FALSE, Err_Res }, 07109 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07110 }, 07111 /* Character_2 */ { 07112 /* Err_Res */ {FALSE, Err_Res }, 07113 /* Short_Char_Const */ {FALSE, Err_Res }, 07114 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07115 /* Typeless_1 */ {FALSE, Err_Res }, 07116 /* Typeless_2 */ {FALSE, Err_Res }, 07117 /* Typeless_4 */ {FALSE, Err_Res }, 07118 /* Typeless_8 */ {FALSE, Err_Res }, 07119 /* Long_Typeless */ {FALSE, Err_Res }, 07120 /* Integer_1 */ {FALSE, Err_Res }, 07121 /* Integer_2 */ {FALSE, Err_Res }, 07122 /* Integer_4 */ {FALSE, Err_Res }, 07123 /* Integer_8 */ {FALSE, Err_Res }, 07124 /* Real_4 */ {FALSE, Err_Res }, 07125 /* Real_8 */ {FALSE, Err_Res }, 07126 /* Real_16 */ {FALSE, Err_Res }, 07127 /* Complex_4 */ {FALSE, Err_Res }, 07128 /* Complex_8 */ {FALSE, Err_Res }, 07129 /* Complex_16 */ {FALSE, Err_Res }, 07130 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07131 /* Logical_1 */ {FALSE, Err_Res }, 07132 /* Logical_2 */ {FALSE, Err_Res }, 07133 /* Logical_4 */ {FALSE, Err_Res }, 07134 /* Logical_8 */ {FALSE, Err_Res }, 07135 /* Character_1 */ {FALSE, Err_Res }, 07136 /* Character_2 */ {FALSE, Err_Res }, 07137 /* Character_4 */ {FALSE, Err_Res }, 07138 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07139 /* Structure_Type */ {FALSE, Err_Res }, 07140 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07141 }, 07142 /* Character_4 */ { 07143 /* Err_Res */ {FALSE, Err_Res }, 07144 /* Short_Char_Const */ {FALSE, Err_Res }, 07145 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07146 /* Typeless_1 */ {FALSE, Err_Res }, 07147 /* Typeless_2 */ {FALSE, Err_Res }, 07148 /* Typeless_4 */ {FALSE, Err_Res }, 07149 /* Typeless_8 */ {FALSE, Err_Res }, 07150 /* Long_Typeless */ {FALSE, Err_Res }, 07151 /* Integer_1 */ {FALSE, Err_Res }, 07152 /* Integer_2 */ {FALSE, Err_Res }, 07153 /* Integer_4 */ {FALSE, Err_Res }, 07154 /* Integer_8 */ {FALSE, Err_Res }, 07155 /* Real_4 */ {FALSE, Err_Res }, 07156 /* Real_8 */ {FALSE, Err_Res }, 07157 /* Real_16 */ {FALSE, Err_Res }, 07158 /* Complex_4 */ {FALSE, Err_Res }, 07159 /* Complex_8 */ {FALSE, Err_Res }, 07160 /* Complex_16 */ {FALSE, Err_Res }, 07161 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07162 /* Logical_1 */ {FALSE, Err_Res }, 07163 /* Logical_2 */ {FALSE, Err_Res }, 07164 /* Logical_4 */ {FALSE, Err_Res }, 07165 /* Logical_8 */ {FALSE, Err_Res }, 07166 /* Character_1 */ {FALSE, Err_Res }, 07167 /* Character_2 */ {FALSE, Err_Res }, 07168 /* Character_4 */ {FALSE, Err_Res }, 07169 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07170 /* Structure_Type */ {FALSE, Err_Res }, 07171 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07172 }, 07173 /* CRI_Ch_Ptr_8 */ { 07174 /* Err_Res */ {FALSE, Err_Res }, 07175 /* Short_Char_Const */ {FALSE, Err_Res }, 07176 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07177 /* Typeless_1 */ {FALSE, Err_Res }, 07178 /* Typeless_2 */ {FALSE, Err_Res }, 07179 /* Typeless_4 */ {FALSE, Err_Res }, 07180 /* Typeless_8 */ {FALSE, Err_Res }, 07181 /* Long_Typeless */ {FALSE, Err_Res }, 07182 /* Integer_1 */ {FALSE, Err_Res }, 07183 /* Integer_2 */ {FALSE, Err_Res }, 07184 /* Integer_4 */ {FALSE, Err_Res }, 07185 /* Integer_8 */ {FALSE, Err_Res }, 07186 /* Real_4 */ {FALSE, Err_Res }, 07187 /* Real_8 */ {FALSE, Err_Res }, 07188 /* Real_16 */ {FALSE, Err_Res }, 07189 /* Complex_4 */ {FALSE, Err_Res }, 07190 /* Complex_8 */ {FALSE, Err_Res }, 07191 /* Complex_16 */ {FALSE, Err_Res }, 07192 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07193 /* Logical_1 */ {FALSE, Err_Res }, 07194 /* Logical_2 */ {FALSE, Err_Res }, 07195 /* Logical_4 */ {FALSE, Err_Res }, 07196 /* Logical_8 */ {FALSE, Err_Res }, 07197 /* Character_1 */ {FALSE, Err_Res }, 07198 /* Character_2 */ {FALSE, Err_Res }, 07199 /* Character_4 */ {FALSE, Err_Res }, 07200 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07201 /* Structure_Type */ {FALSE, Err_Res }, 07202 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07203 }, 07204 /* Structure_Type */ { 07205 /* Err_Res */ {FALSE, Err_Res }, 07206 /* Short_Char_Const */ {FALSE, Err_Res }, 07207 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07208 /* Typeless_1 */ {FALSE, Err_Res }, 07209 /* Typeless_2 */ {FALSE, Err_Res }, 07210 /* Typeless_4 */ {FALSE, Err_Res }, 07211 /* Typeless_8 */ {FALSE, Err_Res }, 07212 /* Long_Typeless */ {FALSE, Err_Res }, 07213 /* Integer_1 */ {FALSE, Err_Res }, 07214 /* Integer_2 */ {FALSE, Err_Res }, 07215 /* Integer_4 */ {FALSE, Err_Res }, 07216 /* Integer_8 */ {FALSE, Err_Res }, 07217 /* Real_4 */ {FALSE, Err_Res }, 07218 /* Real_8 */ {FALSE, Err_Res }, 07219 /* Real_16 */ {FALSE, Err_Res }, 07220 /* Complex_4 */ {FALSE, Err_Res }, 07221 /* Complex_8 */ {FALSE, Err_Res }, 07222 /* Complex_16 */ {FALSE, Err_Res }, 07223 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07224 /* Logical_1 */ {FALSE, Err_Res }, 07225 /* Logical_2 */ {FALSE, Err_Res }, 07226 /* Logical_4 */ {FALSE, Err_Res }, 07227 /* Logical_8 */ {FALSE, Err_Res }, 07228 /* Character_1 */ {FALSE, Err_Res }, 07229 /* Character_2 */ {FALSE, Err_Res }, 07230 /* Character_4 */ {FALSE, Err_Res }, 07231 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07232 /* Structure_Type */ {FALSE, Err_Res }, 07233 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07234 }, 07235 /* CRI_Parcel_Ptr_8 */ { 07236 /* Err_Res */ {FALSE, Err_Res }, 07237 /* Short_Char_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07238 /* Short_Typeless_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07239 /* Typeless_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07240 /* Typeless_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07241 /* Typeless_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07242 /* Typeless_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07243 /* Long_Typeless */ {FALSE, Err_Res }, 07244 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07245 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07246 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07247 /* Integer_8 */ {TRUE , Typeless_8 }, 07248 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07249 /* Real_8 */ {TRUE , Typeless_8 }, 07250 /* Real_16 */ {FALSE, Err_Res }, 07251 /* Complex_4 */ {FALSE, Err_Res }, 07252 /* Complex_8 */ {FALSE, Err_Res }, 07253 /* Complex_16 */ {FALSE, Err_Res }, 07254 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07255 /* Logical_1 */ {FALSE, Err_Res }, 07256 /* Logical_2 */ {FALSE, Err_Res }, 07257 /* Logical_4 */ {FALSE, Err_Res }, 07258 /* Logical_8 */ {FALSE, Err_Res }, 07259 /* Character_1 */ {FALSE, Err_Res }, 07260 /* Character_2 */ {FALSE, Err_Res }, 07261 /* Character_4 */ {FALSE, Err_Res }, 07262 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07263 /* Structure_Type */ {FALSE, Err_Res }, 07264 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07265 } 07266 }; 07267 # else 07268 07269 exp_tbl_type and_or_tbl[Num_Linear_Types][Num_Linear_Types] = { 07270 /* Err_Res */ { 07271 /* Err_Res */ {FALSE, Err_Res }, 07272 /* Short_Char_Const */ {FALSE, Err_Res }, 07273 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07274 /* Typeless_1 */ {FALSE, Err_Res }, 07275 /* Typeless_2 */ {FALSE, Err_Res }, 07276 /* Typeless_4 */ {FALSE, Err_Res }, 07277 /* Typeless_8 */ {FALSE, Err_Res }, 07278 /* Long_Typeless */ {FALSE, Err_Res }, 07279 /* Integer_1 */ {FALSE, Err_Res }, 07280 /* Integer_2 */ {FALSE, Err_Res }, 07281 /* Integer_4 */ {FALSE, Err_Res }, 07282 /* Integer_8 */ {FALSE, Err_Res }, 07283 /* Real_4 */ {FALSE, Err_Res }, 07284 /* Real_8 */ {FALSE, Err_Res }, 07285 /* Real_16 */ {FALSE, Err_Res }, 07286 /* Complex_4 */ {FALSE, Err_Res }, 07287 /* Complex_8 */ {FALSE, Err_Res }, 07288 /* Complex_16 */ {FALSE, Err_Res }, 07289 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07290 /* Logical_1 */ {FALSE, Err_Res }, 07291 /* Logical_2 */ {FALSE, Err_Res }, 07292 /* Logical_4 */ {FALSE, Err_Res }, 07293 /* Logical_8 */ {FALSE, Err_Res }, 07294 /* Character_1 */ {FALSE, Err_Res }, 07295 /* Character_2 */ {FALSE, Err_Res }, 07296 /* Character_4 */ {FALSE, Err_Res }, 07297 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07298 /* Structure_Type */ {FALSE, Err_Res }, 07299 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07300 }, 07301 /* Short_Char_Const */ { 07302 /* Err_Res */ {FALSE, Err_Res }, 07303 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 07304 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 07305 /* Typeless_1 */ {TRUE , Typeless_1 }, 07306 /* Typeless_2 */ {TRUE , Typeless_2 }, 07307 /* Typeless_4 */ {TRUE , Typeless_4 }, 07308 /* Typeless_8 */ {TRUE , Typeless_8 }, 07309 /* Long_Typeless */ {FALSE, Err_Res }, 07310 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07311 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07312 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07313 /* Integer_8 */ {TRUE , Typeless_8 }, 07314 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07315 /* Real_8 */ {TRUE , Typeless_8 }, 07316 /* Real_16 */ {FALSE, Err_Res }, 07317 /* Complex_4 */ {FALSE, Err_Res }, 07318 /* Complex_8 */ {FALSE, Err_Res }, 07319 /* Complex_16 */ {FALSE, Err_Res }, 07320 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07321 /* Logical_1 */ {FALSE, Err_Res }, 07322 /* Logical_2 */ {FALSE, Err_Res }, 07323 /* Logical_4 */ {FALSE, Err_Res }, 07324 /* Logical_8 */ {FALSE, Err_Res }, 07325 /* Character_1 */ {FALSE, Err_Res }, 07326 /* Character_2 */ {FALSE, Err_Res }, 07327 /* Character_4 */ {FALSE, Err_Res }, 07328 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07329 /* Structure_Type */ {FALSE, Err_Res }, 07330 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07331 }, 07332 /* Short_Typeless_Const */ { 07333 /* Err_Res */ {FALSE, Err_Res }, 07334 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 07335 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 07336 /* Typeless_1 */ {TRUE , Typeless_1 }, 07337 /* Typeless_2 */ {TRUE , Typeless_2 }, 07338 /* Typeless_4 */ {TRUE , Typeless_4 }, 07339 /* Typeless_8 */ {TRUE , Typeless_8 }, 07340 /* Long_Typeless */ {FALSE, Err_Res }, 07341 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07342 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07343 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07344 /* Integer_8 */ {TRUE , Typeless_8 }, 07345 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07346 /* Real_8 */ {TRUE , Typeless_8 }, 07347 /* Real_16 */ {FALSE, Err_Res }, 07348 /* Complex_4 */ {FALSE, Err_Res }, 07349 /* Complex_8 */ {FALSE, Err_Res }, 07350 /* Complex_16 */ {FALSE, Err_Res }, 07351 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07352 /* Logical_1 */ {FALSE, Err_Res }, 07353 /* Logical_2 */ {FALSE, Err_Res }, 07354 /* Logical_4 */ {FALSE, Err_Res }, 07355 /* Logical_8 */ {FALSE, Err_Res }, 07356 /* Character_1 */ {FALSE, Err_Res }, 07357 /* Character_2 */ {FALSE, Err_Res }, 07358 /* Character_4 */ {FALSE, Err_Res }, 07359 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07360 /* Structure_Type */ {FALSE, Err_Res }, 07361 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07362 }, 07363 /* Typeless_1 */ { 07364 /* Err_Res */ {FALSE, Err_Res }, 07365 /* Short_Char_Const */ {TRUE , Typeless_1 }, 07366 /* Short_Typeless_Const */ {TRUE , Typeless_1 }, 07367 /* Typeless_1 */ {TRUE , Typeless_1 }, 07368 /* Typeless_2 */ {TRUE , Typeless_2 }, 07369 /* Typeless_4 */ {TRUE , Typeless_4 }, 07370 /* Typeless_8 */ {TRUE , Typeless_8 }, 07371 /* Long_Typeless */ {FALSE, Err_Res }, 07372 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07373 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07374 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07375 /* Integer_8 */ {TRUE , Typeless_8 }, 07376 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07377 /* Real_8 */ {TRUE , Typeless_8 }, 07378 /* Real_16 */ {FALSE, Err_Res }, 07379 /* Complex_4 */ {FALSE, Err_Res }, 07380 /* Complex_8 */ {FALSE, Err_Res }, 07381 /* Complex_16 */ {FALSE, Err_Res }, 07382 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07383 /* Logical_1 */ {FALSE, Err_Res }, 07384 /* Logical_2 */ {FALSE, Err_Res }, 07385 /* Logical_4 */ {FALSE, Err_Res }, 07386 /* Logical_8 */ {FALSE, Err_Res }, 07387 /* Character_1 */ {FALSE, Err_Res }, 07388 /* Character_2 */ {FALSE, Err_Res }, 07389 /* Character_4 */ {FALSE, Err_Res }, 07390 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07391 /* Structure_Type */ {FALSE, Err_Res }, 07392 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07393 }, 07394 /* Typeless_2 */ { 07395 /* Err_Res */ {FALSE, Err_Res }, 07396 /* Short_Char_Const */ {TRUE , Typeless_2 }, 07397 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 07398 /* Typeless_1 */ {TRUE , Typeless_2 }, 07399 /* Typeless_2 */ {TRUE , Typeless_2 }, 07400 /* Typeless_4 */ {TRUE , Typeless_4 }, 07401 /* Typeless_8 */ {TRUE , Typeless_8 }, 07402 /* Long_Typeless */ {FALSE, Err_Res }, 07403 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07404 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07405 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07406 /* Integer_8 */ {TRUE , Typeless_8 }, 07407 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07408 /* Real_8 */ {TRUE , Typeless_8 }, 07409 /* Real_16 */ {FALSE, Err_Res }, 07410 /* Complex_4 */ {FALSE, Err_Res }, 07411 /* Complex_8 */ {FALSE, Err_Res }, 07412 /* Complex_16 */ {FALSE, Err_Res }, 07413 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07414 /* Logical_1 */ {FALSE, Err_Res }, 07415 /* Logical_2 */ {FALSE, Err_Res }, 07416 /* Logical_4 */ {FALSE, Err_Res }, 07417 /* Logical_8 */ {FALSE, Err_Res }, 07418 /* Character_1 */ {FALSE, Err_Res }, 07419 /* Character_2 */ {FALSE, Err_Res }, 07420 /* Character_4 */ {FALSE, Err_Res }, 07421 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07422 /* Structure_Type */ {FALSE, Err_Res }, 07423 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07424 }, 07425 /* Typeless_4 */ { 07426 /* Err_Res */ {FALSE, Err_Res }, 07427 /* Short_Char_Const */ {TRUE , Typeless_4 }, 07428 /* Short_Typeless_Const */ {TRUE , Typeless_4 }, 07429 /* Typeless_1 */ {TRUE , Typeless_4 }, 07430 /* Typeless_2 */ {TRUE , Typeless_4 }, 07431 /* Typeless_4 */ {TRUE , Typeless_4 }, 07432 /* Typeless_8 */ {TRUE , Typeless_8 }, 07433 /* Long_Typeless */ {FALSE, Err_Res }, 07434 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07435 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07436 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07437 /* Integer_8 */ {TRUE , Typeless_8 }, 07438 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07439 /* Real_8 */ {TRUE , Typeless_8 }, 07440 /* Real_16 */ {FALSE, Err_Res }, 07441 /* Complex_4 */ {FALSE, Err_Res }, 07442 /* Complex_8 */ {FALSE, Err_Res }, 07443 /* Complex_16 */ {FALSE, Err_Res }, 07444 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07445 /* Logical_1 */ {FALSE, Err_Res }, 07446 /* Logical_2 */ {FALSE, Err_Res }, 07447 /* Logical_4 */ {FALSE, Err_Res }, 07448 /* Logical_8 */ {FALSE, Err_Res }, 07449 /* Character_1 */ {FALSE, Err_Res }, 07450 /* Character_2 */ {FALSE, Err_Res }, 07451 /* Character_4 */ {FALSE, Err_Res }, 07452 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07453 /* Structure_Type */ {FALSE, Err_Res }, 07454 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07455 }, 07456 /* Typeless_8 */ { 07457 /* Err_Res */ {FALSE, Err_Res }, 07458 /* Short_Char_Const */ {TRUE , Typeless_8 }, 07459 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 07460 /* Typeless_1 */ {TRUE , Typeless_8 }, 07461 /* Typeless_2 */ {TRUE , Typeless_8 }, 07462 /* Typeless_4 */ {TRUE , Typeless_8 }, 07463 /* Typeless_8 */ {TRUE , Typeless_8 }, 07464 /* Long_Typeless */ {FALSE, Err_Res }, 07465 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07466 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07467 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07468 /* Integer_8 */ {TRUE , Typeless_8 }, 07469 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07470 /* Real_8 */ {TRUE , Typeless_8 }, 07471 /* Real_16 */ {FALSE, Err_Res }, 07472 /* Complex_4 */ {FALSE, Err_Res }, 07473 /* Complex_8 */ {FALSE, Err_Res }, 07474 /* Complex_16 */ {FALSE, Err_Res }, 07475 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07476 /* Logical_1 */ {FALSE, Err_Res }, 07477 /* Logical_2 */ {FALSE, Err_Res }, 07478 /* Logical_4 */ {FALSE, Err_Res }, 07479 /* Logical_8 */ {FALSE, Err_Res }, 07480 /* Character_1 */ {FALSE, Err_Res }, 07481 /* Character_2 */ {FALSE, Err_Res }, 07482 /* Character_4 */ {FALSE, Err_Res }, 07483 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07484 /* Structure_Type */ {FALSE, Err_Res }, 07485 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07486 }, 07487 /* Long_Typeless */ { 07488 /* Err_Res */ {FALSE, Err_Res }, 07489 /* Short_Char_Const */ {FALSE, Err_Res }, 07490 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07491 /* Typeless_1 */ {FALSE, Err_Res }, 07492 /* Typeless_2 */ {FALSE, Err_Res }, 07493 /* Typeless_4 */ {FALSE, Err_Res }, 07494 /* Typeless_8 */ {FALSE, Err_Res }, 07495 /* Long_Typeless */ {FALSE, Err_Res }, 07496 /* Integer_1 */ {FALSE, Err_Res }, 07497 /* Integer_2 */ {FALSE, Err_Res }, 07498 /* Integer_4 */ {FALSE, Err_Res }, 07499 /* Integer_8 */ {FALSE, Err_Res }, 07500 /* Real_4 */ {FALSE, Err_Res }, 07501 /* Real_8 */ {FALSE, Err_Res }, 07502 /* Real_16 */ {FALSE, Err_Res }, 07503 /* Complex_4 */ {FALSE, Err_Res }, 07504 /* Complex_8 */ {FALSE, Err_Res }, 07505 /* Complex_16 */ {FALSE, Err_Res }, 07506 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07507 /* Logical_1 */ {FALSE, Err_Res }, 07508 /* Logical_2 */ {FALSE, Err_Res }, 07509 /* Logical_4 */ {FALSE, Err_Res }, 07510 /* Logical_8 */ {FALSE, Err_Res }, 07511 /* Character_1 */ {FALSE, Err_Res }, 07512 /* Character_2 */ {FALSE, Err_Res }, 07513 /* Character_4 */ {FALSE, Err_Res }, 07514 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07515 /* Structure_Type */ {FALSE, Err_Res }, 07516 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07517 }, 07518 /* Integer_1 */ { 07519 /* Err_Res */ {FALSE, Err_Res }, 07520 /* Short_Char_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07521 /* Short_Typeless_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07522 /* Typeless_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07523 /* Typeless_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07524 /* Typeless_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07525 /* Typeless_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07526 /* Long_Typeless */ {FALSE, Err_Res }, 07527 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07528 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07529 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07530 /* Integer_8 */ {TRUE , Typeless_8 }, 07531 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07532 /* Real_8 */ {TRUE , Typeless_8 }, 07533 /* Real_16 */ {FALSE, Err_Res }, 07534 /* Complex_4 */ {FALSE, Err_Res }, 07535 /* Complex_8 */ {FALSE, Err_Res }, 07536 /* Complex_16 */ {FALSE, Err_Res }, 07537 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07538 /* Logical_1 */ {FALSE, Err_Res }, 07539 /* Logical_2 */ {FALSE, Err_Res }, 07540 /* Logical_4 */ {FALSE, Err_Res }, 07541 /* Logical_8 */ {FALSE, Err_Res }, 07542 /* Character_1 */ {FALSE, Err_Res }, 07543 /* Character_2 */ {FALSE, Err_Res }, 07544 /* Character_4 */ {FALSE, Err_Res }, 07545 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07546 /* Structure_Type */ {FALSE, Err_Res }, 07547 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07548 }, 07549 /* Integer_2 */ { 07550 /* Err_Res */ {FALSE, Err_Res }, 07551 /* Short_Char_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07552 /* Short_Typeless_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07553 /* Typeless_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07554 /* Typeless_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07555 /* Typeless_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07556 /* Typeless_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07557 /* Long_Typeless */ {FALSE, Err_Res }, 07558 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07559 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07560 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07561 /* Integer_8 */ {TRUE , Typeless_8 }, 07562 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07563 /* Real_8 */ {TRUE , Typeless_8 }, 07564 /* Real_16 */ {FALSE, Err_Res }, 07565 /* Complex_4 */ {FALSE, Err_Res }, 07566 /* Complex_8 */ {FALSE, Err_Res }, 07567 /* Complex_16 */ {FALSE, Err_Res }, 07568 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07569 /* Logical_1 */ {FALSE, Err_Res }, 07570 /* Logical_2 */ {FALSE, Err_Res }, 07571 /* Logical_4 */ {FALSE, Err_Res }, 07572 /* Logical_8 */ {FALSE, Err_Res }, 07573 /* Character_1 */ {FALSE, Err_Res }, 07574 /* Character_2 */ {FALSE, Err_Res }, 07575 /* Character_4 */ {FALSE, Err_Res }, 07576 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07577 /* Structure_Type */ {FALSE, Err_Res }, 07578 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07579 }, 07580 /* Integer_4 */ { 07581 /* Err_Res */ {FALSE, Err_Res }, 07582 /* Short_Char_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07583 /* Short_Typeless_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07584 /* Typeless_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07585 /* Typeless_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07586 /* Typeless_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07587 /* Typeless_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07588 /* Long_Typeless */ {FALSE, Err_Res }, 07589 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07590 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07591 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07592 /* Integer_8 */ {TRUE , Typeless_8 }, 07593 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07594 /* Real_8 */ {TRUE , Typeless_8 }, 07595 /* Real_16 */ {FALSE, Err_Res }, 07596 /* Complex_4 */ {FALSE, Err_Res }, 07597 /* Complex_8 */ {FALSE, Err_Res }, 07598 /* Complex_16 */ {FALSE, Err_Res }, 07599 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07600 /* Logical_1 */ {FALSE, Err_Res }, 07601 /* Logical_2 */ {FALSE, Err_Res }, 07602 /* Logical_4 */ {FALSE, Err_Res }, 07603 /* Logical_8 */ {FALSE, Err_Res }, 07604 /* Character_1 */ {FALSE, Err_Res }, 07605 /* Character_2 */ {FALSE, Err_Res }, 07606 /* Character_4 */ {FALSE, Err_Res }, 07607 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07608 /* Structure_Type */ {FALSE, Err_Res }, 07609 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07610 }, 07611 /* Integer_8 */ { 07612 /* Err_Res */ {FALSE, Err_Res }, 07613 /* Short_Char_Const */ {TRUE , Typeless_8 }, 07614 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 07615 /* Typeless_1 */ {TRUE , Typeless_8 }, 07616 /* Typeless_2 */ {TRUE , Typeless_8 }, 07617 /* Typeless_4 */ {TRUE , Typeless_8 }, 07618 /* Typeless_8 */ {TRUE , Typeless_8 }, 07619 /* Long_Typeless */ {FALSE, Err_Res }, 07620 /* Integer_1 */ {TRUE , Typeless_8 }, 07621 /* Integer_2 */ {TRUE , Typeless_8 }, 07622 /* Integer_4 */ {TRUE , Typeless_8 }, 07623 /* Integer_8 */ {TRUE , Typeless_8 }, 07624 /* Real_4 */ {TRUE , Typeless_8 }, 07625 /* Real_8 */ {TRUE , Typeless_8 }, 07626 /* Real_16 */ {FALSE, Err_Res }, 07627 /* Complex_4 */ {FALSE, Err_Res }, 07628 /* Complex_8 */ {FALSE, Err_Res }, 07629 /* Complex_16 */ {FALSE, Err_Res }, 07630 /* CRI_Ptr_8 */ {TRUE , Typeless_8 }, 07631 /* Logical_1 */ {FALSE, Err_Res }, 07632 /* Logical_2 */ {FALSE, Err_Res }, 07633 /* Logical_4 */ {FALSE, Err_Res }, 07634 /* Logical_8 */ {FALSE, Err_Res }, 07635 /* Character_1 */ {FALSE, Err_Res }, 07636 /* Character_2 */ {FALSE, Err_Res }, 07637 /* Character_4 */ {FALSE, Err_Res }, 07638 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07639 /* Structure_Type */ {FALSE, Err_Res }, 07640 /* CRI_Parcel_Ptr_8 */ {TRUE , Typeless_8 }, 07641 }, 07642 /* Real_4 */ { 07643 /* Err_Res */ {FALSE, Err_Res }, 07644 /* Short_Char_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07645 /* Short_Typeless_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07646 /* Typeless_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07647 /* Typeless_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07648 /* Typeless_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07649 /* Typeless_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07650 /* Long_Typeless */ {FALSE, Err_Res }, 07651 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07652 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07653 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07654 /* Integer_8 */ {TRUE , Typeless_8 }, 07655 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07656 /* Real_8 */ {TRUE , Typeless_8 }, 07657 /* Real_16 */ {FALSE, Err_Res }, 07658 /* Complex_4 */ {FALSE, Err_Res }, 07659 /* Complex_8 */ {FALSE, Err_Res }, 07660 /* Complex_16 */ {FALSE, Err_Res }, 07661 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07662 /* Logical_1 */ {FALSE, Err_Res }, 07663 /* Logical_2 */ {FALSE, Err_Res }, 07664 /* Logical_4 */ {FALSE, Err_Res }, 07665 /* Logical_8 */ {FALSE, Err_Res }, 07666 /* Character_1 */ {FALSE, Err_Res }, 07667 /* Character_2 */ {FALSE, Err_Res }, 07668 /* Character_4 */ {FALSE, Err_Res }, 07669 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07670 /* Structure_Type */ {FALSE, Err_Res }, 07671 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07672 }, 07673 /* Real_8 */ { 07674 /* Err_Res */ {FALSE, Err_Res }, 07675 /* Short_Char_Const */ {TRUE , Typeless_8 }, 07676 /* Short_Typeless_Const */ {TRUE , Typeless_8 }, 07677 /* Typeless_1 */ {TRUE , Typeless_8 }, 07678 /* Typeless_2 */ {TRUE , Typeless_8 }, 07679 /* Typeless_4 */ {TRUE , Typeless_8 }, 07680 /* Typeless_8 */ {TRUE , Typeless_8 }, 07681 /* Long_Typeless */ {FALSE, Err_Res }, 07682 /* Integer_1 */ {TRUE , Typeless_8 }, 07683 /* Integer_2 */ {TRUE , Typeless_8 }, 07684 /* Integer_4 */ {TRUE , Typeless_8 }, 07685 /* Integer_8 */ {TRUE , Typeless_8 }, 07686 /* Real_4 */ {TRUE , Typeless_8 }, 07687 /* Real_8 */ {TRUE , Typeless_8 }, 07688 /* Real_16 */ {FALSE, Err_Res }, 07689 /* Complex_4 */ {FALSE, Err_Res }, 07690 /* Complex_8 */ {FALSE, Err_Res }, 07691 /* Complex_16 */ {FALSE, Err_Res }, 07692 /* CRI_Ptr_8 */ {TRUE , Typeless_8 }, 07693 /* Logical_1 */ {FALSE, Err_Res }, 07694 /* Logical_2 */ {FALSE, Err_Res }, 07695 /* Logical_4 */ {FALSE, Err_Res }, 07696 /* Logical_8 */ {FALSE, Err_Res }, 07697 /* Character_1 */ {FALSE, Err_Res }, 07698 /* Character_2 */ {FALSE, Err_Res }, 07699 /* Character_4 */ {FALSE, Err_Res }, 07700 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07701 /* Structure_Type */ {FALSE, Err_Res }, 07702 /* CRI_Parcel_Ptr_8 */ {TRUE , Typeless_8 }, 07703 }, 07704 /* Real_16 */ { 07705 /* Err_Res */ {FALSE, Err_Res }, 07706 /* Short_Char_Const */ {FALSE, Err_Res }, 07707 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07708 /* Typeless_1 */ {FALSE, Err_Res }, 07709 /* Typeless_2 */ {FALSE, Err_Res }, 07710 /* Typeless_4 */ {FALSE, Err_Res }, 07711 /* Typeless_8 */ {FALSE, Err_Res }, 07712 /* Long_Typeless */ {FALSE, Err_Res }, 07713 /* Integer_1 */ {FALSE, Err_Res }, 07714 /* Integer_2 */ {FALSE, Err_Res }, 07715 /* Integer_4 */ {FALSE, Err_Res }, 07716 /* Integer_8 */ {FALSE, Err_Res }, 07717 /* Real_4 */ {FALSE, Err_Res }, 07718 /* Real_8 */ {FALSE, Err_Res }, 07719 /* Real_16 */ {FALSE, Err_Res }, 07720 /* Complex_4 */ {FALSE, Err_Res }, 07721 /* Complex_8 */ {FALSE, Err_Res }, 07722 /* Complex_16 */ {FALSE, Err_Res }, 07723 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07724 /* Logical_1 */ {FALSE, Err_Res }, 07725 /* Logical_2 */ {FALSE, Err_Res }, 07726 /* Logical_4 */ {FALSE, Err_Res }, 07727 /* Logical_8 */ {FALSE, Err_Res }, 07728 /* Character_1 */ {FALSE, Err_Res }, 07729 /* Character_2 */ {FALSE, Err_Res }, 07730 /* Character_4 */ {FALSE, Err_Res }, 07731 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07732 /* Structure_Type */ {FALSE, Err_Res }, 07733 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07734 }, 07735 /* Complex_4 */ { 07736 /* Err_Res */ {FALSE, Err_Res }, 07737 /* Short_Char_Const */ {FALSE, Err_Res }, 07738 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07739 /* Typeless_1 */ {FALSE, Err_Res }, 07740 /* Typeless_2 */ {FALSE, Err_Res }, 07741 /* Typeless_4 */ {FALSE, Err_Res }, 07742 /* Typeless_8 */ {FALSE, Err_Res }, 07743 /* Long_Typeless */ {FALSE, Err_Res }, 07744 /* Integer_1 */ {FALSE, Err_Res }, 07745 /* Integer_2 */ {FALSE, Err_Res }, 07746 /* Integer_4 */ {FALSE, Err_Res }, 07747 /* Integer_8 */ {FALSE, Err_Res }, 07748 /* Real_4 */ {FALSE, Err_Res }, 07749 /* Real_8 */ {FALSE, Err_Res }, 07750 /* Real_16 */ {FALSE, Err_Res }, 07751 /* Complex_4 */ {FALSE, Err_Res }, 07752 /* Complex_8 */ {FALSE, Err_Res }, 07753 /* Complex_16 */ {FALSE, Err_Res }, 07754 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07755 /* Logical_1 */ {FALSE, Err_Res }, 07756 /* Logical_2 */ {FALSE, Err_Res }, 07757 /* Logical_4 */ {FALSE, Err_Res }, 07758 /* Logical_8 */ {FALSE, Err_Res }, 07759 /* Character_1 */ {FALSE, Err_Res }, 07760 /* Character_2 */ {FALSE, Err_Res }, 07761 /* Character_4 */ {FALSE, Err_Res }, 07762 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07763 /* Structure_Type */ {FALSE, Err_Res }, 07764 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07765 }, 07766 /* Complex_8 */ { 07767 /* Err_Res */ {FALSE, Err_Res }, 07768 /* Short_Char_Const */ {FALSE, Err_Res }, 07769 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07770 /* Typeless_1 */ {FALSE, Err_Res }, 07771 /* Typeless_2 */ {FALSE, Err_Res }, 07772 /* Typeless_4 */ {FALSE, Err_Res }, 07773 /* Typeless_8 */ {FALSE, Err_Res }, 07774 /* Long_Typeless */ {FALSE, Err_Res }, 07775 /* Integer_1 */ {FALSE, Err_Res }, 07776 /* Integer_2 */ {FALSE, Err_Res }, 07777 /* Integer_4 */ {FALSE, Err_Res }, 07778 /* Integer_8 */ {FALSE, Err_Res }, 07779 /* Real_4 */ {FALSE, Err_Res }, 07780 /* Real_8 */ {FALSE, Err_Res }, 07781 /* Real_16 */ {FALSE, Err_Res }, 07782 /* Complex_4 */ {FALSE, Err_Res }, 07783 /* Complex_8 */ {FALSE, Err_Res }, 07784 /* Complex_16 */ {FALSE, Err_Res }, 07785 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07786 /* Logical_1 */ {FALSE, Err_Res }, 07787 /* Logical_2 */ {FALSE, Err_Res }, 07788 /* Logical_4 */ {FALSE, Err_Res }, 07789 /* Logical_8 */ {FALSE, Err_Res }, 07790 /* Character_1 */ {FALSE, Err_Res }, 07791 /* Character_2 */ {FALSE, Err_Res }, 07792 /* Character_4 */ {FALSE, Err_Res }, 07793 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07794 /* Structure_Type */ {FALSE, Err_Res }, 07795 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07796 }, 07797 /* Complex_16 */ { 07798 /* Err_Res */ {FALSE, Err_Res }, 07799 /* Short_Char_Const */ {FALSE, Err_Res }, 07800 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07801 /* Typeless_1 */ {FALSE, Err_Res }, 07802 /* Typeless_2 */ {FALSE, Err_Res }, 07803 /* Typeless_4 */ {FALSE, Err_Res }, 07804 /* Typeless_8 */ {FALSE, Err_Res }, 07805 /* Long_Typeless */ {FALSE, Err_Res }, 07806 /* Integer_1 */ {FALSE, Err_Res }, 07807 /* Integer_2 */ {FALSE, Err_Res }, 07808 /* Integer_4 */ {FALSE, Err_Res }, 07809 /* Integer_8 */ {FALSE, Err_Res }, 07810 /* Real_4 */ {FALSE, Err_Res }, 07811 /* Real_8 */ {FALSE, Err_Res }, 07812 /* Real_16 */ {FALSE, Err_Res }, 07813 /* Complex_4 */ {FALSE, Err_Res }, 07814 /* Complex_8 */ {FALSE, Err_Res }, 07815 /* Complex_16 */ {FALSE, Err_Res }, 07816 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07817 /* Logical_1 */ {FALSE, Err_Res }, 07818 /* Logical_2 */ {FALSE, Err_Res }, 07819 /* Logical_4 */ {FALSE, Err_Res }, 07820 /* Logical_8 */ {FALSE, Err_Res }, 07821 /* Character_1 */ {FALSE, Err_Res }, 07822 /* Character_2 */ {FALSE, Err_Res }, 07823 /* Character_4 */ {FALSE, Err_Res }, 07824 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07825 /* Structure_Type */ {FALSE, Err_Res }, 07826 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07827 }, 07828 /* CRI_Ptr_8 */ { 07829 /* Err_Res */ {FALSE, Err_Res }, 07830 /* Short_Char_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07831 /* Short_Typeless_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07832 /* Typeless_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07833 /* Typeless_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07834 /* Typeless_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07835 /* Typeless_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07836 /* Long_Typeless */ {FALSE, Err_Res }, 07837 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07838 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07839 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07840 /* Integer_8 */ {TRUE , Typeless_8 }, 07841 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07842 /* Real_8 */ {TRUE , Typeless_8 }, 07843 /* Real_16 */ {FALSE, Err_Res }, 07844 /* Complex_4 */ {FALSE, Err_Res }, 07845 /* Complex_8 */ {FALSE, Err_Res }, 07846 /* Complex_16 */ {FALSE, Err_Res }, 07847 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 07848 /* Logical_1 */ {FALSE, Err_Res }, 07849 /* Logical_2 */ {FALSE, Err_Res }, 07850 /* Logical_4 */ {FALSE, Err_Res }, 07851 /* Logical_8 */ {FALSE, Err_Res }, 07852 /* Character_1 */ {FALSE, Err_Res }, 07853 /* Character_2 */ {FALSE, Err_Res }, 07854 /* Character_4 */ {FALSE, Err_Res }, 07855 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07856 /* Structure_Type */ {FALSE, Err_Res }, 07857 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 07858 }, 07859 /* Logical_1 */ { 07860 /* Err_Res */ {FALSE, Err_Res }, 07861 /* Short_Char_Const */ {FALSE, Err_Res }, 07862 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07863 /* Typeless_1 */ {FALSE, Err_Res }, 07864 /* Typeless_2 */ {FALSE, Err_Res }, 07865 /* Typeless_4 */ {FALSE, Err_Res }, 07866 /* Typeless_8 */ {FALSE, Err_Res }, 07867 /* Long_Typeless */ {FALSE, Err_Res }, 07868 /* Integer_1 */ {FALSE, Err_Res }, 07869 /* Integer_2 */ {FALSE, Err_Res }, 07870 /* Integer_4 */ {FALSE, Err_Res }, 07871 /* Integer_8 */ {FALSE, Err_Res }, 07872 /* Real_4 */ {FALSE, Err_Res }, 07873 /* Real_8 */ {FALSE, Err_Res }, 07874 /* Real_16 */ {FALSE, Err_Res }, 07875 /* Complex_4 */ {FALSE, Err_Res }, 07876 /* Complex_8 */ {FALSE, Err_Res }, 07877 /* Complex_16 */ {FALSE, Err_Res }, 07878 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07879 /* Logical_1 */ {FALSE, Logical_1 }, 07880 /* Logical_2 */ {FALSE, Logical_2 }, 07881 /* Logical_4 */ {FALSE, Logical_4 }, 07882 /* Logical_8 */ {FALSE, Logical_8 }, 07883 /* Character_1 */ {FALSE, Err_Res }, 07884 /* Character_2 */ {FALSE, Err_Res }, 07885 /* Character_4 */ {FALSE, Err_Res }, 07886 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07887 /* Structure_Type */ {FALSE, Err_Res }, 07888 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07889 }, 07890 /* Logical_2 */ { 07891 /* Err_Res */ {FALSE, Err_Res }, 07892 /* Short_Char_Const */ {FALSE, Err_Res }, 07893 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07894 /* Typeless_1 */ {FALSE, Err_Res }, 07895 /* Typeless_2 */ {FALSE, Err_Res }, 07896 /* Typeless_4 */ {FALSE, Err_Res }, 07897 /* Typeless_8 */ {FALSE, Err_Res }, 07898 /* Long_Typeless */ {FALSE, Err_Res }, 07899 /* Integer_1 */ {FALSE, Err_Res }, 07900 /* Integer_2 */ {FALSE, Err_Res }, 07901 /* Integer_4 */ {FALSE, Err_Res }, 07902 /* Integer_8 */ {FALSE, Err_Res }, 07903 /* Real_4 */ {FALSE, Err_Res }, 07904 /* Real_8 */ {FALSE, Err_Res }, 07905 /* Real_16 */ {FALSE, Err_Res }, 07906 /* Complex_4 */ {FALSE, Err_Res }, 07907 /* Complex_8 */ {FALSE, Err_Res }, 07908 /* Complex_16 */ {FALSE, Err_Res }, 07909 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07910 /* Logical_1 */ {FALSE, Logical_2 }, 07911 /* Logical_2 */ {FALSE, Logical_2 }, 07912 /* Logical_4 */ {FALSE, Logical_4 }, 07913 /* Logical_8 */ {FALSE, Logical_8 }, 07914 /* Character_1 */ {FALSE, Err_Res }, 07915 /* Character_2 */ {FALSE, Err_Res }, 07916 /* Character_4 */ {FALSE, Err_Res }, 07917 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07918 /* Structure_Type */ {FALSE, Err_Res }, 07919 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07920 }, 07921 /* Logical_4 */ { 07922 /* Err_Res */ {FALSE, Err_Res }, 07923 /* Short_Char_Const */ {FALSE, Err_Res }, 07924 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07925 /* Typeless_1 */ {FALSE, Err_Res }, 07926 /* Typeless_2 */ {FALSE, Err_Res }, 07927 /* Typeless_4 */ {FALSE, Err_Res }, 07928 /* Typeless_8 */ {FALSE, Err_Res }, 07929 /* Long_Typeless */ {FALSE, Err_Res }, 07930 /* Integer_1 */ {FALSE, Err_Res }, 07931 /* Integer_2 */ {FALSE, Err_Res }, 07932 /* Integer_4 */ {FALSE, Err_Res }, 07933 /* Integer_8 */ {FALSE, Err_Res }, 07934 /* Real_4 */ {FALSE, Err_Res }, 07935 /* Real_8 */ {FALSE, Err_Res }, 07936 /* Real_16 */ {FALSE, Err_Res }, 07937 /* Complex_4 */ {FALSE, Err_Res }, 07938 /* Complex_8 */ {FALSE, Err_Res }, 07939 /* Complex_16 */ {FALSE, Err_Res }, 07940 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07941 /* Logical_1 */ {FALSE, Logical_4 }, 07942 /* Logical_2 */ {FALSE, Logical_4 }, 07943 /* Logical_4 */ {FALSE, Logical_4 }, 07944 /* Logical_8 */ {FALSE, Logical_8 }, 07945 /* Character_1 */ {FALSE, Err_Res }, 07946 /* Character_2 */ {FALSE, Err_Res }, 07947 /* Character_4 */ {FALSE, Err_Res }, 07948 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07949 /* Structure_Type */ {FALSE, Err_Res }, 07950 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07951 }, 07952 /* Logical_8 */ { 07953 /* Err_Res */ {FALSE, Err_Res }, 07954 /* Short_Char_Const */ {FALSE, Err_Res }, 07955 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07956 /* Typeless_1 */ {FALSE, Err_Res }, 07957 /* Typeless_2 */ {FALSE, Err_Res }, 07958 /* Typeless_4 */ {FALSE, Err_Res }, 07959 /* Typeless_8 */ {FALSE, Err_Res }, 07960 /* Long_Typeless */ {FALSE, Err_Res }, 07961 /* Integer_1 */ {FALSE, Err_Res }, 07962 /* Integer_2 */ {FALSE, Err_Res }, 07963 /* Integer_4 */ {FALSE, Err_Res }, 07964 /* Integer_8 */ {FALSE, Err_Res }, 07965 /* Real_4 */ {FALSE, Err_Res }, 07966 /* Real_8 */ {FALSE, Err_Res }, 07967 /* Real_16 */ {FALSE, Err_Res }, 07968 /* Complex_4 */ {FALSE, Err_Res }, 07969 /* Complex_8 */ {FALSE, Err_Res }, 07970 /* Complex_16 */ {FALSE, Err_Res }, 07971 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 07972 /* Logical_1 */ {FALSE, Logical_8 }, 07973 /* Logical_2 */ {FALSE, Logical_8 }, 07974 /* Logical_4 */ {FALSE, Logical_8 }, 07975 /* Logical_8 */ {FALSE, Logical_8 }, 07976 /* Character_1 */ {FALSE, Err_Res }, 07977 /* Character_2 */ {FALSE, Err_Res }, 07978 /* Character_4 */ {FALSE, Err_Res }, 07979 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 07980 /* Structure_Type */ {FALSE, Err_Res }, 07981 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 07982 }, 07983 /* Character_1 */ { 07984 /* Err_Res */ {FALSE, Err_Res }, 07985 /* Short_Char_Const */ {FALSE, Err_Res }, 07986 /* Short_Typeless_Const */ {FALSE, Err_Res }, 07987 /* Typeless_1 */ {FALSE, Err_Res }, 07988 /* Typeless_2 */ {FALSE, Err_Res }, 07989 /* Typeless_4 */ {FALSE, Err_Res }, 07990 /* Typeless_8 */ {FALSE, Err_Res }, 07991 /* Long_Typeless */ {FALSE, Err_Res }, 07992 /* Integer_1 */ {FALSE, Err_Res }, 07993 /* Integer_2 */ {FALSE, Err_Res }, 07994 /* Integer_4 */ {FALSE, Err_Res }, 07995 /* Integer_8 */ {FALSE, Err_Res }, 07996 /* Real_4 */ {FALSE, Err_Res }, 07997 /* Real_8 */ {FALSE, Err_Res }, 07998 /* Real_16 */ {FALSE, Err_Res }, 07999 /* Complex_4 */ {FALSE, Err_Res }, 08000 /* Complex_8 */ {FALSE, Err_Res }, 08001 /* Complex_16 */ {FALSE, Err_Res }, 08002 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08003 /* Logical_1 */ {FALSE, Err_Res }, 08004 /* Logical_2 */ {FALSE, Err_Res }, 08005 /* Logical_4 */ {FALSE, Err_Res }, 08006 /* Logical_8 */ {FALSE, Err_Res }, 08007 /* Character_1 */ {FALSE, Err_Res }, 08008 /* Character_2 */ {FALSE, Err_Res }, 08009 /* Character_4 */ {FALSE, Err_Res }, 08010 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08011 /* Structure_Type */ {FALSE, Err_Res }, 08012 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08013 }, 08014 /* Character_2 */ { 08015 /* Err_Res */ {FALSE, Err_Res }, 08016 /* Short_Char_Const */ {FALSE, Err_Res }, 08017 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08018 /* Typeless_1 */ {FALSE, Err_Res }, 08019 /* Typeless_2 */ {FALSE, Err_Res }, 08020 /* Typeless_4 */ {FALSE, Err_Res }, 08021 /* Typeless_8 */ {FALSE, Err_Res }, 08022 /* Long_Typeless */ {FALSE, Err_Res }, 08023 /* Integer_1 */ {FALSE, Err_Res }, 08024 /* Integer_2 */ {FALSE, Err_Res }, 08025 /* Integer_4 */ {FALSE, Err_Res }, 08026 /* Integer_8 */ {FALSE, Err_Res }, 08027 /* Real_4 */ {FALSE, Err_Res }, 08028 /* Real_8 */ {FALSE, Err_Res }, 08029 /* Real_16 */ {FALSE, Err_Res }, 08030 /* Complex_4 */ {FALSE, Err_Res }, 08031 /* Complex_8 */ {FALSE, Err_Res }, 08032 /* Complex_16 */ {FALSE, Err_Res }, 08033 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08034 /* Logical_1 */ {FALSE, Err_Res }, 08035 /* Logical_2 */ {FALSE, Err_Res }, 08036 /* Logical_4 */ {FALSE, Err_Res }, 08037 /* Logical_8 */ {FALSE, Err_Res }, 08038 /* Character_1 */ {FALSE, Err_Res }, 08039 /* Character_2 */ {FALSE, Err_Res }, 08040 /* Character_4 */ {FALSE, Err_Res }, 08041 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08042 /* Structure_Type */ {FALSE, Err_Res }, 08043 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08044 }, 08045 /* Character_4 */ { 08046 /* Err_Res */ {FALSE, Err_Res }, 08047 /* Short_Char_Const */ {FALSE, Err_Res }, 08048 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08049 /* Typeless_1 */ {FALSE, Err_Res }, 08050 /* Typeless_2 */ {FALSE, Err_Res }, 08051 /* Typeless_4 */ {FALSE, Err_Res }, 08052 /* Typeless_8 */ {FALSE, Err_Res }, 08053 /* Long_Typeless */ {FALSE, Err_Res }, 08054 /* Integer_1 */ {FALSE, Err_Res }, 08055 /* Integer_2 */ {FALSE, Err_Res }, 08056 /* Integer_4 */ {FALSE, Err_Res }, 08057 /* Integer_8 */ {FALSE, Err_Res }, 08058 /* Real_4 */ {FALSE, Err_Res }, 08059 /* Real_8 */ {FALSE, Err_Res }, 08060 /* Real_16 */ {FALSE, Err_Res }, 08061 /* Complex_4 */ {FALSE, Err_Res }, 08062 /* Complex_8 */ {FALSE, Err_Res }, 08063 /* Complex_16 */ {FALSE, Err_Res }, 08064 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08065 /* Logical_1 */ {FALSE, Err_Res }, 08066 /* Logical_2 */ {FALSE, Err_Res }, 08067 /* Logical_4 */ {FALSE, Err_Res }, 08068 /* Logical_8 */ {FALSE, Err_Res }, 08069 /* Character_1 */ {FALSE, Err_Res }, 08070 /* Character_2 */ {FALSE, Err_Res }, 08071 /* Character_4 */ {FALSE, Err_Res }, 08072 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08073 /* Structure_Type */ {FALSE, Err_Res }, 08074 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08075 }, 08076 /* CRI_Ch_Ptr_8 */ { 08077 /* Err_Res */ {FALSE, Err_Res }, 08078 /* Short_Char_Const */ {FALSE, Err_Res }, 08079 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08080 /* Typeless_1 */ {FALSE, Err_Res }, 08081 /* Typeless_2 */ {FALSE, Err_Res }, 08082 /* Typeless_4 */ {FALSE, Err_Res }, 08083 /* Typeless_8 */ {FALSE, Err_Res }, 08084 /* Long_Typeless */ {FALSE, Err_Res }, 08085 /* Integer_1 */ {FALSE, Err_Res }, 08086 /* Integer_2 */ {FALSE, Err_Res }, 08087 /* Integer_4 */ {FALSE, Err_Res }, 08088 /* Integer_8 */ {FALSE, Err_Res }, 08089 /* Real_4 */ {FALSE, Err_Res }, 08090 /* Real_8 */ {FALSE, Err_Res }, 08091 /* Real_16 */ {FALSE, Err_Res }, 08092 /* Complex_4 */ {FALSE, Err_Res }, 08093 /* Complex_8 */ {FALSE, Err_Res }, 08094 /* Complex_16 */ {FALSE, Err_Res }, 08095 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08096 /* Logical_1 */ {FALSE, Err_Res }, 08097 /* Logical_2 */ {FALSE, Err_Res }, 08098 /* Logical_4 */ {FALSE, Err_Res }, 08099 /* Logical_8 */ {FALSE, Err_Res }, 08100 /* Character_1 */ {FALSE, Err_Res }, 08101 /* Character_2 */ {FALSE, Err_Res }, 08102 /* Character_4 */ {FALSE, Err_Res }, 08103 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08104 /* Structure_Type */ {FALSE, Err_Res }, 08105 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08106 }, 08107 /* Structure_Type */ { 08108 /* Err_Res */ {FALSE, Err_Res }, 08109 /* Short_Char_Const */ {FALSE, Err_Res }, 08110 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08111 /* Typeless_1 */ {FALSE, Err_Res }, 08112 /* Typeless_2 */ {FALSE, Err_Res }, 08113 /* Typeless_4 */ {FALSE, Err_Res }, 08114 /* Typeless_8 */ {FALSE, Err_Res }, 08115 /* Long_Typeless */ {FALSE, Err_Res }, 08116 /* Integer_1 */ {FALSE, Err_Res }, 08117 /* Integer_2 */ {FALSE, Err_Res }, 08118 /* Integer_4 */ {FALSE, Err_Res }, 08119 /* Integer_8 */ {FALSE, Err_Res }, 08120 /* Real_4 */ {FALSE, Err_Res }, 08121 /* Real_8 */ {FALSE, Err_Res }, 08122 /* Real_16 */ {FALSE, Err_Res }, 08123 /* Complex_4 */ {FALSE, Err_Res }, 08124 /* Complex_8 */ {FALSE, Err_Res }, 08125 /* Complex_16 */ {FALSE, Err_Res }, 08126 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08127 /* Logical_1 */ {FALSE, Err_Res }, 08128 /* Logical_2 */ {FALSE, Err_Res }, 08129 /* Logical_4 */ {FALSE, Err_Res }, 08130 /* Logical_8 */ {FALSE, Err_Res }, 08131 /* Character_1 */ {FALSE, Err_Res }, 08132 /* Character_2 */ {FALSE, Err_Res }, 08133 /* Character_4 */ {FALSE, Err_Res }, 08134 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08135 /* Structure_Type */ {FALSE, Err_Res }, 08136 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08137 }, 08138 /* CRI_Parcel_Ptr_8 */ { 08139 /* Err_Res */ {FALSE, Err_Res }, 08140 /* Short_Char_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08141 /* Short_Typeless_Const */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08142 /* Typeless_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08143 /* Typeless_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08144 /* Typeless_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08145 /* Typeless_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08146 /* Long_Typeless */ {FALSE, Err_Res }, 08147 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08148 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08149 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08150 /* Integer_8 */ {TRUE , Typeless_8 }, 08151 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08152 /* Real_8 */ {TRUE , Typeless_8 }, 08153 /* Real_16 */ {FALSE, Err_Res }, 08154 /* Complex_4 */ {FALSE, Err_Res }, 08155 /* Complex_8 */ {FALSE, Err_Res }, 08156 /* Complex_16 */ {FALSE, Err_Res }, 08157 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 08158 /* Logical_1 */ {FALSE, Err_Res }, 08159 /* Logical_2 */ {FALSE, Err_Res }, 08160 /* Logical_4 */ {FALSE, Err_Res }, 08161 /* Logical_8 */ {FALSE, Err_Res }, 08162 /* Character_1 */ {FALSE, Err_Res }, 08163 /* Character_2 */ {FALSE, Err_Res }, 08164 /* Character_4 */ {FALSE, Err_Res }, 08165 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08166 /* Structure_Type */ {FALSE, Err_Res }, 08167 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 08168 } 08169 }; 08170 # endif 08171 08172 08173 exp_tbl_type asg_tbl[Num_Linear_Types][Num_Linear_Types] = { 08174 /* Err_Res */ { 08175 /* Err_Res */ {FALSE, Err_Res }, 08176 /* Short_Char_Const */ {FALSE, Err_Res }, 08177 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08178 /* Typeless_1 */ {FALSE, Err_Res }, 08179 /* Typeless_2 */ {FALSE, Err_Res }, 08180 /* Typeless_4 */ {FALSE, Err_Res }, 08181 /* Typeless_8 */ {FALSE, Err_Res }, 08182 /* Long_Typeless */ {FALSE, Err_Res }, 08183 /* Integer_1 */ {FALSE, Err_Res }, 08184 /* Integer_2 */ {FALSE, Err_Res }, 08185 /* Integer_4 */ {FALSE, Err_Res }, 08186 /* Integer_8 */ {FALSE, Err_Res }, 08187 /* Real_4 */ {FALSE, Err_Res }, 08188 /* Real_8 */ {FALSE, Err_Res }, 08189 /* Real_16 */ {FALSE, Err_Res }, 08190 /* Complex_4 */ {FALSE, Err_Res }, 08191 /* Complex_8 */ {FALSE, Err_Res }, 08192 /* Complex_16 */ {FALSE, Err_Res }, 08193 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08194 /* Logical_1 */ {FALSE, Err_Res }, 08195 /* Logical_2 */ {FALSE, Err_Res }, 08196 /* Logical_4 */ {FALSE, Err_Res }, 08197 /* Logical_8 */ {FALSE, Err_Res }, 08198 /* Character_1 */ {FALSE, Err_Res }, 08199 /* Character_2 */ {FALSE, Err_Res }, 08200 /* Character_4 */ {FALSE, Err_Res }, 08201 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08202 /* Structure_Type */ {FALSE, Err_Res }, 08203 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08204 }, 08205 /* Short_Char_Const */ { 08206 /* Err_Res */ {FALSE, Err_Res }, 08207 /* Short_Char_Const */ {FALSE, Err_Res }, 08208 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08209 /* Typeless_1 */ {FALSE, Err_Res }, 08210 /* Typeless_2 */ {FALSE, Err_Res }, 08211 /* Typeless_4 */ {FALSE, Err_Res }, 08212 /* Typeless_8 */ {FALSE, Err_Res }, 08213 /* Long_Typeless */ {FALSE, Err_Res }, 08214 /* Integer_1 */ {FALSE, Err_Res }, 08215 /* Integer_2 */ {FALSE, Err_Res }, 08216 /* Integer_4 */ {FALSE, Err_Res }, 08217 /* Integer_8 */ {FALSE, Err_Res }, 08218 /* Real_4 */ {FALSE, Err_Res }, 08219 /* Real_8 */ {FALSE, Err_Res }, 08220 /* Real_16 */ {FALSE, Err_Res }, 08221 /* Complex_4 */ {FALSE, Err_Res }, 08222 /* Complex_8 */ {FALSE, Err_Res }, 08223 /* Complex_16 */ {FALSE, Err_Res }, 08224 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08225 /* Logical_1 */ {FALSE, Err_Res }, 08226 /* Logical_2 */ {FALSE, Err_Res }, 08227 /* Logical_4 */ {FALSE, Err_Res }, 08228 /* Logical_8 */ {FALSE, Err_Res }, 08229 /* Character_1 */ {FALSE, Err_Res }, 08230 /* Character_2 */ {FALSE, Err_Res }, 08231 /* Character_4 */ {FALSE, Err_Res }, 08232 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08233 /* Structure_Type */ {FALSE, Err_Res }, 08234 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08235 }, 08236 /* Short_Typeless_Const */ { 08237 /* Err_Res */ {FALSE, Err_Res }, 08238 /* Short_Char_Const */ {FALSE, Err_Res }, 08239 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08240 /* Typeless_1 */ {FALSE, Err_Res }, 08241 /* Typeless_2 */ {FALSE, Err_Res }, 08242 /* Typeless_4 */ {FALSE, Err_Res }, 08243 /* Typeless_8 */ {FALSE, Err_Res }, 08244 /* Long_Typeless */ {FALSE, Err_Res }, 08245 /* Integer_1 */ {FALSE, Err_Res }, 08246 /* Integer_2 */ {FALSE, Err_Res }, 08247 /* Integer_4 */ {FALSE, Err_Res }, 08248 /* Integer_8 */ {FALSE, Err_Res }, 08249 /* Real_4 */ {FALSE, Err_Res }, 08250 /* Real_8 */ {FALSE, Err_Res }, 08251 /* Real_16 */ {FALSE, Err_Res }, 08252 /* Complex_4 */ {FALSE, Err_Res }, 08253 /* Complex_8 */ {FALSE, Err_Res }, 08254 /* Complex_16 */ {FALSE, Err_Res }, 08255 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08256 /* Logical_1 */ {FALSE, Err_Res }, 08257 /* Logical_2 */ {FALSE, Err_Res }, 08258 /* Logical_4 */ {FALSE, Err_Res }, 08259 /* Logical_8 */ {FALSE, Err_Res }, 08260 /* Character_1 */ {FALSE, Err_Res }, 08261 /* Character_2 */ {FALSE, Err_Res }, 08262 /* Character_4 */ {FALSE, Err_Res }, 08263 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08264 /* Structure_Type */ {FALSE, Err_Res }, 08265 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08266 }, 08267 /* Typeless_1 */ { 08268 /* Err_Res */ {FALSE, Err_Res }, 08269 /* Short_Char_Const */ {FALSE, Err_Res }, 08270 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08271 /* Typeless_1 */ {FALSE, Err_Res }, 08272 /* Typeless_2 */ {FALSE, Err_Res }, 08273 /* Typeless_4 */ {FALSE, Err_Res }, 08274 /* Typeless_8 */ {FALSE, Err_Res }, 08275 /* Long_Typeless */ {FALSE, Err_Res }, 08276 /* Integer_1 */ {FALSE, Err_Res }, 08277 /* Integer_2 */ {FALSE, Err_Res }, 08278 /* Integer_4 */ {FALSE, Err_Res }, 08279 /* Integer_8 */ {FALSE, Err_Res }, 08280 /* Real_4 */ {FALSE, Err_Res }, 08281 /* Real_8 */ {FALSE, Err_Res }, 08282 /* Real_16 */ {FALSE, Err_Res }, 08283 /* Complex_4 */ {FALSE, Err_Res }, 08284 /* Complex_8 */ {FALSE, Err_Res }, 08285 /* Complex_16 */ {FALSE, Err_Res }, 08286 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08287 /* Logical_1 */ {FALSE, Err_Res }, 08288 /* Logical_2 */ {FALSE, Err_Res }, 08289 /* Logical_4 */ {FALSE, Err_Res }, 08290 /* Logical_8 */ {FALSE, Err_Res }, 08291 /* Character_1 */ {FALSE, Err_Res }, 08292 /* Character_2 */ {FALSE, Err_Res }, 08293 /* Character_4 */ {FALSE, Err_Res }, 08294 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08295 /* Structure_Type */ {FALSE, Err_Res }, 08296 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08297 }, 08298 /* Typeless_2 */ { 08299 /* Err_Res */ {FALSE, Err_Res }, 08300 /* Short_Char_Const */ {FALSE, Err_Res }, 08301 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08302 /* Typeless_1 */ {FALSE, Err_Res }, 08303 /* Typeless_2 */ {FALSE, Err_Res }, 08304 /* Typeless_4 */ {FALSE, Err_Res }, 08305 /* Typeless_8 */ {FALSE, Err_Res }, 08306 /* Long_Typeless */ {FALSE, Err_Res }, 08307 /* Integer_1 */ {FALSE, Err_Res }, 08308 /* Integer_2 */ {FALSE, Err_Res }, 08309 /* Integer_4 */ {FALSE, Err_Res }, 08310 /* Integer_8 */ {FALSE, Err_Res }, 08311 /* Real_4 */ {FALSE, Err_Res }, 08312 /* Real_8 */ {FALSE, Err_Res }, 08313 /* Real_16 */ {FALSE, Err_Res }, 08314 /* Complex_4 */ {FALSE, Err_Res }, 08315 /* Complex_8 */ {FALSE, Err_Res }, 08316 /* Complex_16 */ {FALSE, Err_Res }, 08317 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08318 /* Logical_1 */ {FALSE, Err_Res }, 08319 /* Logical_2 */ {FALSE, Err_Res }, 08320 /* Logical_4 */ {FALSE, Err_Res }, 08321 /* Logical_8 */ {FALSE, Err_Res }, 08322 /* Character_1 */ {FALSE, Err_Res }, 08323 /* Character_2 */ {FALSE, Err_Res }, 08324 /* Character_4 */ {FALSE, Err_Res }, 08325 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08326 /* Structure_Type */ {FALSE, Err_Res }, 08327 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08328 }, 08329 /* Typeless_4 */ { 08330 /* Err_Res */ {FALSE, Err_Res }, 08331 /* Short_Char_Const */ {FALSE, Err_Res }, 08332 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08333 /* Typeless_1 */ {FALSE, Err_Res }, 08334 /* Typeless_2 */ {FALSE, Err_Res }, 08335 /* Typeless_4 */ {FALSE, Err_Res }, 08336 /* Typeless_8 */ {FALSE, Err_Res }, 08337 /* Long_Typeless */ {FALSE, Err_Res }, 08338 /* Integer_1 */ {FALSE, Err_Res }, 08339 /* Integer_2 */ {FALSE, Err_Res }, 08340 /* Integer_4 */ {FALSE, Err_Res }, 08341 /* Integer_8 */ {FALSE, Err_Res }, 08342 /* Real_4 */ {FALSE, Err_Res }, 08343 /* Real_8 */ {FALSE, Err_Res }, 08344 /* Real_16 */ {FALSE, Err_Res }, 08345 /* Complex_4 */ {FALSE, Err_Res }, 08346 /* Complex_8 */ {FALSE, Err_Res }, 08347 /* Complex_16 */ {FALSE, Err_Res }, 08348 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08349 /* Logical_1 */ {FALSE, Err_Res }, 08350 /* Logical_2 */ {FALSE, Err_Res }, 08351 /* Logical_4 */ {FALSE, Err_Res }, 08352 /* Logical_8 */ {FALSE, Err_Res }, 08353 /* Character_1 */ {FALSE, Err_Res }, 08354 /* Character_2 */ {FALSE, Err_Res }, 08355 /* Character_4 */ {FALSE, Err_Res }, 08356 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08357 /* Structure_Type */ {FALSE, Err_Res }, 08358 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08359 }, 08360 /* Typeless_8 */ { 08361 /* Err_Res */ {FALSE, Err_Res }, 08362 /* Short_Char_Const */ {FALSE, Err_Res }, 08363 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08364 /* Typeless_1 */ {FALSE, Err_Res }, 08365 /* Typeless_2 */ {FALSE, Err_Res }, 08366 /* Typeless_4 */ {FALSE, Err_Res }, 08367 /* Typeless_8 */ {FALSE, Err_Res }, 08368 /* Long_Typeless */ {FALSE, Err_Res }, 08369 /* Integer_1 */ {FALSE, Err_Res }, 08370 /* Integer_2 */ {FALSE, Err_Res }, 08371 /* Integer_4 */ {FALSE, Err_Res }, 08372 /* Integer_8 */ {FALSE, Err_Res }, 08373 /* Real_4 */ {FALSE, Err_Res }, 08374 /* Real_8 */ {FALSE, Err_Res }, 08375 /* Real_16 */ {FALSE, Err_Res }, 08376 /* Complex_4 */ {FALSE, Err_Res }, 08377 /* Complex_8 */ {FALSE, Err_Res }, 08378 /* Complex_16 */ {FALSE, Err_Res }, 08379 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08380 /* Logical_1 */ {FALSE, Err_Res }, 08381 /* Logical_2 */ {FALSE, Err_Res }, 08382 /* Logical_4 */ {FALSE, Err_Res }, 08383 /* Logical_8 */ {FALSE, Err_Res }, 08384 /* Character_1 */ {FALSE, Err_Res }, 08385 /* Character_2 */ {FALSE, Err_Res }, 08386 /* Character_4 */ {FALSE, Err_Res }, 08387 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08388 /* Structure_Type */ {FALSE, Err_Res }, 08389 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08390 }, 08391 /* Long_Typeless */ { 08392 /* Err_Res */ {FALSE, Err_Res }, 08393 /* Short_Char_Const */ {FALSE, Err_Res }, 08394 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08395 /* Typeless_1 */ {FALSE, Err_Res }, 08396 /* Typeless_2 */ {FALSE, Err_Res }, 08397 /* Typeless_4 */ {FALSE, Err_Res }, 08398 /* Typeless_8 */ {FALSE, Err_Res }, 08399 /* Long_Typeless */ {FALSE, Err_Res }, 08400 /* Integer_1 */ {FALSE, Err_Res }, 08401 /* Integer_2 */ {FALSE, Err_Res }, 08402 /* Integer_4 */ {FALSE, Err_Res }, 08403 /* Integer_8 */ {FALSE, Err_Res }, 08404 /* Real_4 */ {FALSE, Err_Res }, 08405 /* Real_8 */ {FALSE, Err_Res }, 08406 /* Real_16 */ {FALSE, Err_Res }, 08407 /* Complex_4 */ {FALSE, Err_Res }, 08408 /* Complex_8 */ {FALSE, Err_Res }, 08409 /* Complex_16 */ {FALSE, Err_Res }, 08410 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08411 /* Logical_1 */ {FALSE, Err_Res }, 08412 /* Logical_2 */ {FALSE, Err_Res }, 08413 /* Logical_4 */ {FALSE, Err_Res }, 08414 /* Logical_8 */ {FALSE, Err_Res }, 08415 /* Character_1 */ {FALSE, Err_Res }, 08416 /* Character_2 */ {FALSE, Err_Res }, 08417 /* Character_4 */ {FALSE, Err_Res }, 08418 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08419 /* Structure_Type */ {FALSE, Err_Res }, 08420 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08421 }, 08422 /* Integer_1 */ { 08423 /* Err_Res */ {FALSE, Err_Res }, 08424 /* Short_Char_Const */ {TRUE , Integer_1 }, 08425 /* Short_Typeless_Const */ {TRUE , Integer_1 }, 08426 /* Typeless_1 */ {TRUE , Integer_1 }, 08427 /* Typeless_2 */ {TRUE , Integer_1 }, 08428 /* Typeless_4 */ {TRUE , Integer_1 }, 08429 /* Typeless_8 */ {TRUE , Integer_1 }, 08430 /* Long_Typeless */ {FALSE, Err_Res }, 08431 /* Integer_1 */ {FALSE, Integer_1 }, 08432 /* Integer_2 */ {FALSE, Integer_1 }, 08433 /* Integer_4 */ {FALSE, Integer_1 }, 08434 /* Integer_8 */ {FALSE, Integer_1 }, 08435 /* Real_4 */ {FALSE, Integer_1 }, 08436 /* Real_8 */ {FALSE, Integer_1 }, 08437 /* Real_16 */ {FALSE, Integer_1 }, 08438 /* Complex_4 */ {FALSE, Integer_1 }, 08439 /* Complex_8 */ {FALSE, Integer_1 }, 08440 /* Complex_16 */ {FALSE, Integer_1 }, 08441 /* CRI_Ptr_8 */ {TRUE , Integer_1 }, 08442 /* Logical_1 */ {FALSE, Err_Res }, 08443 /* Logical_2 */ {FALSE, Err_Res }, 08444 /* Logical_4 */ {FALSE, Err_Res }, 08445 /* Logical_8 */ {FALSE, Err_Res }, 08446 /* Character_1 */ {FALSE, Err_Res }, 08447 /* Character_2 */ {FALSE, Err_Res }, 08448 /* Character_4 */ {FALSE, Err_Res }, 08449 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08450 /* Structure_Type */ {FALSE, Err_Res }, 08451 /* CRI_Parcel_Ptr_8 */ {TRUE , Integer_1 } 08452 }, 08453 /* Integer_2 */ { 08454 /* Err_Res */ {FALSE, Err_Res }, 08455 /* Short_Char_Const */ {TRUE , Integer_2 }, 08456 /* Short_Typeless_Const */ {TRUE , Integer_2 }, 08457 /* Typeless_1 */ {TRUE , Integer_2 }, 08458 /* Typeless_2 */ {TRUE , Integer_2 }, 08459 /* Typeless_4 */ {TRUE , Integer_2 }, 08460 /* Typeless_8 */ {TRUE , Integer_2 }, 08461 /* Long_Typeless */ {FALSE, Err_Res }, 08462 /* Integer_1 */ {FALSE, Integer_2 }, 08463 /* Integer_2 */ {FALSE, Integer_2 }, 08464 /* Integer_4 */ {FALSE, Integer_2 }, 08465 /* Integer_8 */ {FALSE, Integer_2 }, 08466 /* Real_4 */ {FALSE, Integer_2 }, 08467 /* Real_8 */ {FALSE, Integer_2 }, 08468 /* Real_16 */ {FALSE, Integer_2 }, 08469 /* Complex_4 */ {FALSE, Integer_2 }, 08470 /* Complex_8 */ {FALSE, Integer_2 }, 08471 /* Complex_16 */ {FALSE, Integer_2 }, 08472 /* CRI_Ptr_8 */ {TRUE , Integer_2 }, 08473 /* Logical_1 */ {FALSE, Err_Res }, 08474 /* Logical_2 */ {FALSE, Err_Res }, 08475 /* Logical_4 */ {FALSE, Err_Res }, 08476 /* Logical_8 */ {FALSE, Err_Res }, 08477 /* Character_1 */ {FALSE, Err_Res }, 08478 /* Character_2 */ {FALSE, Err_Res }, 08479 /* Character_4 */ {FALSE, Err_Res }, 08480 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08481 /* Structure_Type */ {FALSE, Err_Res }, 08482 /* CRI_Parcel_Ptr_8 */ {TRUE , Integer_2 } 08483 }, 08484 /* Integer_4 */ { 08485 /* Err_Res */ {FALSE, Err_Res }, 08486 /* Short_Char_Const */ {TRUE , Integer_4 }, 08487 /* Short_Typeless_Const */ {TRUE , Integer_4 }, 08488 /* Typeless_1 */ {TRUE , Integer_4 }, 08489 /* Typeless_2 */ {TRUE , Integer_4 }, 08490 /* Typeless_4 */ {TRUE , Integer_4 }, 08491 /* Typeless_8 */ {TRUE , Integer_4 }, 08492 /* Long_Typeless */ {FALSE, Err_Res }, 08493 /* Integer_1 */ {FALSE, Integer_4 }, 08494 /* Integer_2 */ {FALSE, Integer_4 }, 08495 /* Integer_4 */ {FALSE, Integer_4 }, 08496 /* Integer_8 */ {FALSE, Integer_4 }, 08497 /* Real_4 */ {FALSE, Integer_4 }, 08498 /* Real_8 */ {FALSE, Integer_4 }, 08499 /* Real_16 */ {FALSE, Integer_4 }, 08500 /* Complex_4 */ {FALSE, Integer_4 }, 08501 /* Complex_8 */ {FALSE, Integer_4 }, 08502 /* Complex_16 */ {FALSE, Integer_4 }, 08503 /* CRI_Ptr_8 */ {TRUE , Integer_4 }, 08504 /* Logical_1 */ {FALSE, Err_Res }, 08505 /* Logical_2 */ {FALSE, Err_Res }, 08506 /* Logical_4 */ {FALSE, Err_Res }, 08507 /* Logical_8 */ {FALSE, Err_Res }, 08508 /* Character_1 */ {FALSE, Err_Res }, 08509 /* Character_2 */ {FALSE, Err_Res }, 08510 /* Character_4 */ {FALSE, Err_Res }, 08511 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08512 /* Structure_Type */ {FALSE, Err_Res }, 08513 /* CRI_Parcel_Ptr_8 */ {TRUE , Integer_4 } 08514 }, 08515 /* Integer_8 */ { 08516 /* Err_Res */ {FALSE, Err_Res }, 08517 /* Short_Char_Const */ {TRUE , Integer_8 }, 08518 /* Short_Typeless_Const */ {TRUE , Integer_8 }, 08519 /* Typeless_1 */ {TRUE , Integer_8 }, 08520 /* Typeless_2 */ {TRUE , Integer_8 }, 08521 /* Typeless_4 */ {TRUE , Integer_8 }, 08522 /* Typeless_8 */ {TRUE , Integer_8 }, 08523 /* Long_Typeless */ {FALSE, Err_Res }, 08524 /* Integer_1 */ {FALSE, Integer_8 }, 08525 /* Integer_2 */ {FALSE, Integer_8 }, 08526 /* Integer_4 */ {FALSE, Integer_8 }, 08527 /* Integer_8 */ {FALSE, Integer_8 }, 08528 /* Real_4 */ {FALSE, Integer_8 }, 08529 /* Real_8 */ {FALSE, Integer_8 }, 08530 /* Real_16 */ {FALSE, Integer_8 }, 08531 /* Complex_4 */ {FALSE, Integer_8 }, 08532 /* Complex_8 */ {FALSE, Integer_8 }, 08533 /* Complex_16 */ {FALSE, Integer_8 }, 08534 /* CRI_Ptr_8 */ {TRUE , Integer_8 }, 08535 /* Logical_1 */ {FALSE, Err_Res }, 08536 /* Logical_2 */ {FALSE, Err_Res }, 08537 /* Logical_4 */ {FALSE, Err_Res }, 08538 /* Logical_8 */ {FALSE, Err_Res }, 08539 /* Character_1 */ {FALSE, Err_Res }, 08540 /* Character_2 */ {FALSE, Err_Res }, 08541 /* Character_4 */ {FALSE, Err_Res }, 08542 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08543 /* Structure_Type */ {FALSE, Err_Res }, 08544 /* CRI_Parcel_Ptr_8 */ {TRUE , Integer_8 } 08545 }, 08546 /* Real_4 */ { 08547 /* Err_Res */ {FALSE, Err_Res }, 08548 /* Short_Char_Const */ {TRUE , Real_4 }, 08549 /* Short_Typeless_Const */ {TRUE , Real_4 }, 08550 /* Typeless_1 */ {FALSE, Err_Res }, 08551 /* Typeless_2 */ {FALSE, Err_Res }, 08552 /* Typeless_4 */ {TRUE , Real_4 }, 08553 /* Typeless_8 */ {TRUE , Real_4 }, 08554 /* Long_Typeless */ {FALSE, Err_Res }, 08555 /* Integer_1 */ {FALSE, Real_4 }, 08556 /* Integer_2 */ {FALSE, Real_4 }, 08557 /* Integer_4 */ {FALSE, Real_4 }, 08558 /* Integer_8 */ {FALSE, Real_4 }, 08559 /* Real_4 */ {FALSE, Real_4 }, 08560 /* Real_8 */ {FALSE, Real_4 }, 08561 /* Real_16 */ {FALSE, Real_4 }, 08562 /* Complex_4 */ {FALSE, Real_4 }, 08563 /* Complex_8 */ {FALSE, Real_4 }, 08564 /* Complex_16 */ {FALSE, Real_4 }, 08565 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08566 /* Logical_1 */ {FALSE, Err_Res }, 08567 /* Logical_2 */ {FALSE, Err_Res }, 08568 /* Logical_4 */ {FALSE, Err_Res }, 08569 /* Logical_8 */ {FALSE, Err_Res }, 08570 /* Character_1 */ {FALSE, Err_Res }, 08571 /* Character_2 */ {FALSE, Err_Res }, 08572 /* Character_4 */ {FALSE, Err_Res }, 08573 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08574 /* Structure_Type */ {FALSE, Err_Res }, 08575 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08576 }, 08577 /* Real_8 */ { 08578 /* Err_Res */ {FALSE, Err_Res }, 08579 /* Short_Char_Const */ {TRUE , Real_8 }, 08580 /* Short_Typeless_Const */ {TRUE , Real_8 }, 08581 /* Typeless_1 */ {FALSE, Err_Res }, 08582 /* Typeless_2 */ {FALSE, Err_Res }, 08583 /* Typeless_4 */ {FALSE, Err_Res }, 08584 /* Typeless_8 */ {TRUE , Real_8 }, 08585 /* Long_Typeless */ {FALSE, Err_Res }, 08586 /* Integer_1 */ {FALSE, Real_8 }, 08587 /* Integer_2 */ {FALSE, Real_8 }, 08588 /* Integer_4 */ {FALSE, Real_8 }, 08589 /* Integer_8 */ {FALSE, Real_8 }, 08590 /* Real_4 */ {FALSE, Real_8 }, 08591 /* Real_8 */ {FALSE, Real_8 }, 08592 /* Real_16 */ {FALSE, Real_8 }, 08593 /* Complex_4 */ {FALSE, Real_8 }, 08594 /* Complex_8 */ {FALSE, Real_8 }, 08595 /* Complex_16 */ {FALSE, Real_8 }, 08596 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08597 /* Logical_1 */ {FALSE, Err_Res }, 08598 /* Logical_2 */ {FALSE, Err_Res }, 08599 /* Logical_4 */ {FALSE, Err_Res }, 08600 /* Logical_8 */ {FALSE, Err_Res }, 08601 /* Character_1 */ {FALSE, Err_Res }, 08602 /* Character_2 */ {FALSE, Err_Res }, 08603 /* Character_4 */ {FALSE, Err_Res }, 08604 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08605 /* Structure_Type */ {FALSE, Err_Res }, 08606 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08607 }, 08608 /* Real_16 */ { 08609 /* Err_Res */ {FALSE, Err_Res }, 08610 /* Short_Char_Const */ {TRUE , Real_16 }, 08611 /* Short_Typeless_Const */ {TRUE , Real_16 }, 08612 /* Typeless_1 */ {FALSE, Err_Res }, 08613 /* Typeless_2 */ {FALSE, Err_Res }, 08614 /* Typeless_4 */ {FALSE, Err_Res }, 08615 /* Typeless_8 */ {FALSE, Err_Res }, 08616 /* Long_Typeless */ {FALSE, Err_Res }, 08617 /* Integer_1 */ {FALSE, Real_16 }, 08618 /* Integer_2 */ {FALSE, Real_16 }, 08619 /* Integer_4 */ {FALSE, Real_16 }, 08620 /* Integer_8 */ {FALSE, Real_16 }, 08621 /* Real_4 */ {FALSE, Real_16 }, 08622 /* Real_8 */ {FALSE, Real_16 }, 08623 /* Real_16 */ {FALSE, Real_16 }, 08624 /* Complex_4 */ {FALSE, Real_16 }, 08625 /* Complex_8 */ {FALSE, Real_16 }, 08626 /* Complex_16 */ {FALSE, Real_16 }, 08627 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08628 /* Logical_1 */ {FALSE, Err_Res }, 08629 /* Logical_2 */ {FALSE, Err_Res }, 08630 /* Logical_4 */ {FALSE, Err_Res }, 08631 /* Logical_8 */ {FALSE, Err_Res }, 08632 /* Character_1 */ {FALSE, Err_Res }, 08633 /* Character_2 */ {FALSE, Err_Res }, 08634 /* Character_4 */ {FALSE, Err_Res }, 08635 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08636 /* Structure_Type */ {FALSE, Err_Res }, 08637 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08638 }, 08639 /* Complex_4 */ { 08640 /* Err_Res */ {FALSE, Err_Res }, 08641 /* Short_Char_Const */ {TRUE , Complex_4 }, 08642 /* Short_Typeless_Const */ {TRUE , Complex_4 }, 08643 /* Typeless_1 */ {FALSE, Err_Res }, 08644 /* Typeless_2 */ {FALSE, Err_Res }, 08645 /* Typeless_4 */ {FALSE, Err_Res }, 08646 /* Typeless_8 */ {FALSE, Err_Res }, 08647 /* Long_Typeless */ {FALSE, Err_Res }, 08648 /* Integer_1 */ {FALSE, Complex_4 }, 08649 /* Integer_2 */ {FALSE, Complex_4 }, 08650 /* Integer_4 */ {FALSE, Complex_4 }, 08651 /* Integer_8 */ {FALSE, Complex_4 }, 08652 /* Real_4 */ {FALSE, Complex_4 }, 08653 /* Real_8 */ {FALSE, Complex_4 }, 08654 /* Real_16 */ {FALSE, Complex_4 }, 08655 /* Complex_4 */ {FALSE, Complex_4 }, 08656 /* Complex_8 */ {FALSE, Complex_4 }, 08657 /* Complex_16 */ {FALSE, Complex_4 }, 08658 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08659 /* Logical_1 */ {FALSE, Err_Res }, 08660 /* Logical_2 */ {FALSE, Err_Res }, 08661 /* Logical_4 */ {FALSE, Err_Res }, 08662 /* Logical_8 */ {FALSE, Err_Res }, 08663 /* Character_1 */ {FALSE, Err_Res }, 08664 /* Character_2 */ {FALSE, Err_Res }, 08665 /* Character_4 */ {FALSE, Err_Res }, 08666 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08667 /* Structure_Type */ {FALSE, Err_Res }, 08668 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08669 }, 08670 /* Complex_8 */ { 08671 /* Err_Res */ {FALSE, Err_Res }, 08672 /* Short_Char_Const */ {TRUE , Complex_8 }, 08673 /* Short_Typeless_Const */ {TRUE , Complex_8 }, 08674 /* Typeless_1 */ {FALSE, Err_Res }, 08675 /* Typeless_2 */ {FALSE, Err_Res }, 08676 /* Typeless_4 */ {FALSE, Err_Res }, 08677 /* Typeless_8 */ {FALSE, Err_Res }, 08678 /* Long_Typeless */ {FALSE, Err_Res }, 08679 /* Integer_1 */ {FALSE, Complex_8 }, 08680 /* Integer_2 */ {FALSE, Complex_8 }, 08681 /* Integer_4 */ {FALSE, Complex_8 }, 08682 /* Integer_8 */ {FALSE, Complex_8 }, 08683 /* Real_4 */ {FALSE, Complex_8 }, 08684 /* Real_8 */ {FALSE, Complex_8 }, 08685 /* Real_16 */ {FALSE, Complex_8 }, 08686 /* Complex_4 */ {FALSE, Complex_8 }, 08687 /* Complex_8 */ {FALSE, Complex_8 }, 08688 /* Complex_16 */ {FALSE, Complex_8 }, 08689 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08690 /* Logical_1 */ {FALSE, Err_Res }, 08691 /* Logical_2 */ {FALSE, Err_Res }, 08692 /* Logical_4 */ {FALSE, Err_Res }, 08693 /* Logical_8 */ {FALSE, Err_Res }, 08694 /* Character_1 */ {FALSE, Err_Res }, 08695 /* Character_2 */ {FALSE, Err_Res }, 08696 /* Character_4 */ {FALSE, Err_Res }, 08697 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08698 /* Structure_Type */ {FALSE, Err_Res }, 08699 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08700 }, 08701 /* Complex_16 */ { 08702 /* Err_Res */ {FALSE, Err_Res }, 08703 /* Short_Char_Const */ {TRUE , Complex_16 }, 08704 /* Short_Typeless_Const */ {TRUE , Complex_16 }, 08705 /* Typeless_1 */ {FALSE, Err_Res }, 08706 /* Typeless_2 */ {FALSE, Err_Res }, 08707 /* Typeless_4 */ {FALSE, Err_Res }, 08708 /* Typeless_8 */ {FALSE, Err_Res }, 08709 /* Long_Typeless */ {FALSE, Err_Res }, 08710 /* Integer_1 */ {FALSE, Complex_16 }, 08711 /* Integer_2 */ {FALSE, Complex_16 }, 08712 /* Integer_4 */ {FALSE, Complex_16 }, 08713 /* Integer_8 */ {FALSE, Complex_16 }, 08714 /* Real_4 */ {FALSE, Complex_16 }, 08715 /* Real_8 */ {FALSE, Complex_16 }, 08716 /* Real_16 */ {FALSE, Complex_16 }, 08717 /* Complex_4 */ {FALSE, Complex_16 }, 08718 /* Complex_8 */ {FALSE, Complex_16 }, 08719 /* Complex_16 */ {FALSE, Complex_16 }, 08720 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08721 /* Logical_1 */ {FALSE, Err_Res }, 08722 /* Logical_2 */ {FALSE, Err_Res }, 08723 /* Logical_4 */ {FALSE, Err_Res }, 08724 /* Logical_8 */ {FALSE, Err_Res }, 08725 /* Character_1 */ {FALSE, Err_Res }, 08726 /* Character_2 */ {FALSE, Err_Res }, 08727 /* Character_4 */ {FALSE, Err_Res }, 08728 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08729 /* Structure_Type */ {FALSE, Err_Res }, 08730 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08731 }, 08732 /* CRI_Ptr_8 */ { 08733 /* Err_Res */ {FALSE, Err_Res }, 08734 /* Short_Char_Const */ {FALSE, Err_Res }, 08735 /* Short_Typeless_Const */ {TRUE , CRI_Ptr_8 }, 08736 /* Typeless_1 */ {TRUE , CRI_Ptr_8 }, 08737 /* Typeless_2 */ {TRUE , CRI_Ptr_8 }, 08738 /* Typeless_4 */ {TRUE , CRI_Ptr_8 }, 08739 /* Typeless_8 */ {TRUE , CRI_Ptr_8 }, 08740 /* Long_Typeless */ {FALSE, Err_Res }, 08741 /* Integer_1 */ {TRUE , CRI_Ptr_8 }, 08742 /* Integer_2 */ {TRUE , CRI_Ptr_8 }, 08743 /* Integer_4 */ {TRUE , CRI_Ptr_8 }, 08744 /* Integer_8 */ {TRUE , CRI_Ptr_8 }, 08745 /* Real_4 */ {FALSE, Err_Res }, 08746 /* Real_8 */ {FALSE, Err_Res }, 08747 /* Real_16 */ {FALSE, Err_Res }, 08748 /* Complex_4 */ {FALSE, Err_Res }, 08749 /* Complex_8 */ {FALSE, Err_Res }, 08750 /* Complex_16 */ {FALSE, Err_Res }, 08751 /* CRI_Ptr_8 */ {TRUE , CRI_Ptr_8 }, 08752 /* Logical_1 */ {FALSE, Err_Res }, 08753 /* Logical_2 */ {FALSE, Err_Res }, 08754 /* Logical_4 */ {FALSE, Err_Res }, 08755 /* Logical_8 */ {FALSE, Err_Res }, 08756 /* Character_1 */ {FALSE, Err_Res }, 08757 /* Character_2 */ {FALSE, Err_Res }, 08758 /* Character_4 */ {FALSE, Err_Res }, 08759 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08760 /* Structure_Type */ {FALSE, Err_Res }, 08761 /* CRI_Parcel_Ptr_8 */ {TRUE , CRI_Ptr_8 } 08762 }, 08763 /* Logical_1 */ { 08764 /* Err_Res */ {FALSE, Err_Res }, 08765 /* Short_Char_Const */ {FALSE, Err_Res }, 08766 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08767 /* Typeless_1 */ {FALSE, Err_Res }, 08768 /* Typeless_2 */ {FALSE, Err_Res }, 08769 /* Typeless_4 */ {FALSE, Err_Res }, 08770 /* Typeless_8 */ {FALSE, Err_Res }, 08771 /* Long_Typeless */ {FALSE, Err_Res }, 08772 /* Integer_1 */ {FALSE, Err_Res }, 08773 /* Integer_2 */ {FALSE, Err_Res }, 08774 /* Integer_4 */ {FALSE, Err_Res }, 08775 /* Integer_8 */ {FALSE, Err_Res }, 08776 /* Real_4 */ {FALSE, Err_Res }, 08777 /* Real_8 */ {FALSE, Err_Res }, 08778 /* Real_16 */ {FALSE, Err_Res }, 08779 /* Complex_4 */ {FALSE, Err_Res }, 08780 /* Complex_8 */ {FALSE, Err_Res }, 08781 /* Complex_16 */ {FALSE, Err_Res }, 08782 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08783 /* Logical_1 */ {FALSE, Logical_1 }, 08784 /* Logical_2 */ {FALSE, Logical_1 }, 08785 /* Logical_4 */ {FALSE, Logical_1 }, 08786 /* Logical_8 */ {FALSE, Logical_1 }, 08787 /* Character_1 */ {FALSE, Err_Res }, 08788 /* Character_2 */ {FALSE, Err_Res }, 08789 /* Character_4 */ {FALSE, Err_Res }, 08790 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08791 /* Structure_Type */ {FALSE, Err_Res }, 08792 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08793 }, 08794 /* Logical_2 */ { 08795 /* Err_Res */ {FALSE, Err_Res }, 08796 /* Short_Char_Const */ {FALSE, Err_Res }, 08797 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08798 /* Typeless_1 */ {FALSE, Err_Res }, 08799 /* Typeless_2 */ {FALSE, Err_Res }, 08800 /* Typeless_4 */ {FALSE, Err_Res }, 08801 /* Typeless_8 */ {FALSE, Err_Res }, 08802 /* Long_Typeless */ {FALSE, Err_Res }, 08803 /* Integer_1 */ {FALSE, Err_Res }, 08804 /* Integer_2 */ {FALSE, Err_Res }, 08805 /* Integer_4 */ {FALSE, Err_Res }, 08806 /* Integer_8 */ {FALSE, Err_Res }, 08807 /* Real_4 */ {FALSE, Err_Res }, 08808 /* Real_8 */ {FALSE, Err_Res }, 08809 /* Real_16 */ {FALSE, Err_Res }, 08810 /* Complex_4 */ {FALSE, Err_Res }, 08811 /* Complex_8 */ {FALSE, Err_Res }, 08812 /* Complex_16 */ {FALSE, Err_Res }, 08813 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08814 /* Logical_1 */ {FALSE, Logical_2 }, 08815 /* Logical_2 */ {FALSE, Logical_2 }, 08816 /* Logical_4 */ {FALSE, Logical_2 }, 08817 /* Logical_8 */ {FALSE, Logical_2 }, 08818 /* Character_1 */ {FALSE, Err_Res }, 08819 /* Character_2 */ {FALSE, Err_Res }, 08820 /* Character_4 */ {FALSE, Err_Res }, 08821 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08822 /* Structure_Type */ {FALSE, Err_Res }, 08823 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08824 }, 08825 /* Logical_4 */ { 08826 /* Err_Res */ {FALSE, Err_Res }, 08827 /* Short_Char_Const */ {FALSE, Err_Res }, 08828 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08829 /* Typeless_1 */ {FALSE, Err_Res }, 08830 /* Typeless_2 */ {FALSE, Err_Res }, 08831 /* Typeless_4 */ {FALSE, Err_Res }, 08832 /* Typeless_8 */ {FALSE, Err_Res }, 08833 /* Long_Typeless */ {FALSE, Err_Res }, 08834 /* Integer_1 */ {FALSE, Err_Res }, 08835 /* Integer_2 */ {FALSE, Err_Res }, 08836 /* Integer_4 */ {FALSE, Err_Res }, 08837 /* Integer_8 */ {FALSE, Err_Res }, 08838 /* Real_4 */ {FALSE, Err_Res }, 08839 /* Real_8 */ {FALSE, Err_Res }, 08840 /* Real_16 */ {FALSE, Err_Res }, 08841 /* Complex_4 */ {FALSE, Err_Res }, 08842 /* Complex_8 */ {FALSE, Err_Res }, 08843 /* Complex_16 */ {FALSE, Err_Res }, 08844 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08845 /* Logical_1 */ {FALSE, Logical_4 }, 08846 /* Logical_2 */ {FALSE, Logical_4 }, 08847 /* Logical_4 */ {FALSE, Logical_4 }, 08848 /* Logical_8 */ {FALSE, Logical_4 }, 08849 /* Character_1 */ {FALSE, Err_Res }, 08850 /* Character_2 */ {FALSE, Err_Res }, 08851 /* Character_4 */ {FALSE, Err_Res }, 08852 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08853 /* Structure_Type */ {FALSE, Err_Res }, 08854 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08855 }, 08856 /* Logical_8 */ { 08857 /* Err_Res */ {FALSE, Err_Res }, 08858 /* Short_Char_Const */ {FALSE, Err_Res }, 08859 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08860 /* Typeless_1 */ {FALSE, Err_Res }, 08861 /* Typeless_2 */ {FALSE, Err_Res }, 08862 /* Typeless_4 */ {FALSE, Err_Res }, 08863 /* Typeless_8 */ {FALSE, Err_Res }, 08864 /* Long_Typeless */ {FALSE, Err_Res }, 08865 /* Integer_1 */ {FALSE, Err_Res }, 08866 /* Integer_2 */ {FALSE, Err_Res }, 08867 /* Integer_4 */ {FALSE, Err_Res }, 08868 /* Integer_8 */ {FALSE, Err_Res }, 08869 /* Real_4 */ {FALSE, Err_Res }, 08870 /* Real_8 */ {FALSE, Err_Res }, 08871 /* Real_16 */ {FALSE, Err_Res }, 08872 /* Complex_4 */ {FALSE, Err_Res }, 08873 /* Complex_8 */ {FALSE, Err_Res }, 08874 /* Complex_16 */ {FALSE, Err_Res }, 08875 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08876 /* Logical_1 */ {FALSE, Logical_8 }, 08877 /* Logical_2 */ {FALSE, Logical_8 }, 08878 /* Logical_4 */ {FALSE, Logical_8 }, 08879 /* Logical_8 */ {FALSE, Logical_8 }, 08880 /* Character_1 */ {FALSE, Err_Res }, 08881 /* Character_2 */ {FALSE, Err_Res }, 08882 /* Character_4 */ {FALSE, Err_Res }, 08883 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08884 /* Structure_Type */ {FALSE, Err_Res }, 08885 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08886 }, 08887 /* Character_1 */ { 08888 /* Err_Res */ {FALSE, Err_Res }, 08889 /* Short_Char_Const */ {FALSE, Character_1 }, 08890 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08891 /* Typeless_1 */ {FALSE, Err_Res }, 08892 /* Typeless_2 */ {FALSE, Err_Res }, 08893 /* Typeless_4 */ {FALSE, Err_Res }, 08894 /* Typeless_8 */ {FALSE, Err_Res }, 08895 /* Long_Typeless */ {FALSE, Err_Res }, 08896 /* Integer_1 */ {FALSE, Err_Res }, 08897 /* Integer_2 */ {FALSE, Err_Res }, 08898 /* Integer_4 */ {FALSE, Err_Res }, 08899 /* Integer_8 */ {FALSE, Err_Res }, 08900 /* Real_4 */ {FALSE, Err_Res }, 08901 /* Real_8 */ {FALSE, Err_Res }, 08902 /* Real_16 */ {FALSE, Err_Res }, 08903 /* Complex_4 */ {FALSE, Err_Res }, 08904 /* Complex_8 */ {FALSE, Err_Res }, 08905 /* Complex_16 */ {FALSE, Err_Res }, 08906 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08907 /* Logical_1 */ {FALSE, Err_Res }, 08908 /* Logical_2 */ {FALSE, Err_Res }, 08909 /* Logical_4 */ {FALSE, Err_Res }, 08910 /* Logical_8 */ {FALSE, Err_Res }, 08911 /* Character_1 */ {FALSE, Character_1 }, 08912 /* Character_2 */ {FALSE, Err_Res }, 08913 /* Character_4 */ {FALSE, Err_Res }, 08914 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08915 /* Structure_Type */ {FALSE, Err_Res }, 08916 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08917 }, 08918 /* Character_2 */ { 08919 /* Err_Res */ {FALSE, Err_Res }, 08920 /* Short_Char_Const */ {FALSE, Character_2 }, 08921 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08922 /* Typeless_1 */ {FALSE, Err_Res }, 08923 /* Typeless_2 */ {FALSE, Err_Res }, 08924 /* Typeless_4 */ {FALSE, Err_Res }, 08925 /* Typeless_8 */ {FALSE, Err_Res }, 08926 /* Long_Typeless */ {FALSE, Err_Res }, 08927 /* Integer_1 */ {FALSE, Err_Res }, 08928 /* Integer_2 */ {FALSE, Err_Res }, 08929 /* Integer_4 */ {FALSE, Err_Res }, 08930 /* Integer_8 */ {FALSE, Err_Res }, 08931 /* Real_4 */ {FALSE, Err_Res }, 08932 /* Real_8 */ {FALSE, Err_Res }, 08933 /* Real_16 */ {FALSE, Err_Res }, 08934 /* Complex_4 */ {FALSE, Err_Res }, 08935 /* Complex_8 */ {FALSE, Err_Res }, 08936 /* Complex_16 */ {FALSE, Err_Res }, 08937 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08938 /* Logical_1 */ {FALSE, Err_Res }, 08939 /* Logical_2 */ {FALSE, Err_Res }, 08940 /* Logical_4 */ {FALSE, Err_Res }, 08941 /* Logical_8 */ {FALSE, Err_Res }, 08942 /* Character_1 */ {FALSE, Err_Res }, 08943 /* Character_2 */ {FALSE, Character_2 }, 08944 /* Character_4 */ {FALSE, Err_Res }, 08945 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08946 /* Structure_Type */ {FALSE, Err_Res }, 08947 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08948 }, 08949 /* Character_4 */ { 08950 /* Err_Res */ {FALSE, Err_Res }, 08951 /* Short_Char_Const */ {FALSE, Character_4 }, 08952 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08953 /* Typeless_1 */ {FALSE, Err_Res }, 08954 /* Typeless_2 */ {FALSE, Err_Res }, 08955 /* Typeless_4 */ {FALSE, Err_Res }, 08956 /* Typeless_8 */ {FALSE, Err_Res }, 08957 /* Long_Typeless */ {FALSE, Err_Res }, 08958 /* Integer_1 */ {FALSE, Err_Res }, 08959 /* Integer_2 */ {FALSE, Err_Res }, 08960 /* Integer_4 */ {FALSE, Err_Res }, 08961 /* Integer_8 */ {FALSE, Err_Res }, 08962 /* Real_4 */ {FALSE, Err_Res }, 08963 /* Real_8 */ {FALSE, Err_Res }, 08964 /* Real_16 */ {FALSE, Err_Res }, 08965 /* Complex_4 */ {FALSE, Err_Res }, 08966 /* Complex_8 */ {FALSE, Err_Res }, 08967 /* Complex_16 */ {FALSE, Err_Res }, 08968 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 08969 /* Logical_1 */ {FALSE, Err_Res }, 08970 /* Logical_2 */ {FALSE, Err_Res }, 08971 /* Logical_4 */ {FALSE, Err_Res }, 08972 /* Logical_8 */ {FALSE, Err_Res }, 08973 /* Character_1 */ {FALSE, Err_Res }, 08974 /* Character_2 */ {FALSE, Err_Res }, 08975 /* Character_4 */ {FALSE, Character_4 }, 08976 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 08977 /* Structure_Type */ {FALSE, Err_Res }, 08978 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 08979 }, 08980 # if defined(_EXTENDED_CRI_CHAR_POINTER) 08981 /* CRI_Ch_Ptr_8 */ { 08982 /* Err_Res */ {FALSE, Err_Res }, 08983 /* Short_Char_Const */ {FALSE, Err_Res }, 08984 /* Short_Typeless_Const */ {FALSE, Err_Res }, 08985 /* Typeless_1 */ {FALSE, Err_Res }, 08986 /* Typeless_2 */ {FALSE, Err_Res }, 08987 /* Typeless_4 */ {FALSE, Err_Res }, 08988 /* Typeless_8 */ {FALSE, Err_Res }, 08989 /* Long_Typeless */ {FALSE, Err_Res }, 08990 /* Integer_1 */ {TRUE, CRI_Ch_Ptr_8 }, 08991 /* Integer_2 */ {TRUE, CRI_Ch_Ptr_8 }, 08992 /* Integer_4 */ {TRUE, CRI_Ch_Ptr_8 }, 08993 /* Integer_8 */ {TRUE, CRI_Ch_Ptr_8 }, 08994 /* Real_4 */ {FALSE, Err_Res }, 08995 /* Real_8 */ {FALSE, Err_Res }, 08996 /* Real_16 */ {FALSE, Err_Res }, 08997 /* Complex_4 */ {FALSE, Err_Res }, 08998 /* Complex_8 */ {FALSE, Err_Res }, 08999 /* Complex_16 */ {FALSE, Err_Res }, 09000 /* CRI_Ptr_8 */ {TRUE, CRI_Ch_Ptr_8 }, 09001 /* Logical_1 */ {FALSE, Err_Res }, 09002 /* Logical_2 */ {FALSE, Err_Res }, 09003 /* Logical_4 */ {FALSE, Err_Res }, 09004 /* Logical_8 */ {FALSE, Err_Res }, 09005 /* Character_1 */ {FALSE, Err_Res }, 09006 /* Character_2 */ {FALSE, Err_Res }, 09007 /* Character_4 */ {FALSE, Err_Res }, 09008 /* CRI_Ch_Ptr_8 */ {TRUE , CRI_Ch_Ptr_8 }, 09009 /* Structure_Type */ {FALSE, Err_Res }, 09010 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 09011 }, 09012 # else 09013 /* CRI_Ch_Ptr_8 */ { 09014 /* Err_Res */ {FALSE, Err_Res }, 09015 /* Short_Char_Const */ {FALSE, Err_Res }, 09016 /* Short_Typeless_Const */ {FALSE, Err_Res }, 09017 /* Typeless_1 */ {FALSE, Err_Res }, 09018 /* Typeless_2 */ {FALSE, Err_Res }, 09019 /* Typeless_4 */ {FALSE, Err_Res }, 09020 /* Typeless_8 */ {FALSE, Err_Res }, 09021 /* Long_Typeless */ {FALSE, Err_Res }, 09022 /* Integer_1 */ {FALSE, Err_Res }, 09023 /* Integer_2 */ {FALSE, Err_Res }, 09024 /* Integer_4 */ {FALSE, Err_Res }, 09025 /* Integer_8 */ {FALSE, Err_Res }, 09026 /* Real_4 */ {FALSE, Err_Res }, 09027 /* Real_8 */ {FALSE, Err_Res }, 09028 /* Real_16 */ {FALSE, Err_Res }, 09029 /* Complex_4 */ {FALSE, Err_Res }, 09030 /* Complex_8 */ {FALSE, Err_Res }, 09031 /* Complex_16 */ {FALSE, Err_Res }, 09032 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 09033 /* Logical_1 */ {FALSE, Err_Res }, 09034 /* Logical_2 */ {FALSE, Err_Res }, 09035 /* Logical_4 */ {FALSE, Err_Res }, 09036 /* Logical_8 */ {FALSE, Err_Res }, 09037 /* Character_1 */ {FALSE, Err_Res }, 09038 /* Character_2 */ {FALSE, Err_Res }, 09039 /* Character_4 */ {FALSE, Err_Res }, 09040 /* CRI_Ch_Ptr_8 */ {TRUE , CRI_Ch_Ptr_8 }, 09041 /* Structure_Type */ {FALSE, Err_Res }, 09042 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 09043 }, 09044 # endif 09045 /* Structure_Type */ { 09046 /* Err_Res */ {FALSE, Err_Res }, 09047 /* Short_Char_Const */ {FALSE, Err_Res }, 09048 /* Short_Typeless_Const */ {FALSE, Err_Res }, 09049 /* Typeless_1 */ {FALSE, Err_Res }, 09050 /* Typeless_2 */ {FALSE, Err_Res }, 09051 /* Typeless_4 */ {FALSE, Err_Res }, 09052 /* Typeless_8 */ {FALSE, Err_Res }, 09053 /* Long_Typeless */ {FALSE, Err_Res }, 09054 /* Integer_1 */ {FALSE, Err_Res }, 09055 /* Integer_2 */ {FALSE, Err_Res }, 09056 /* Integer_4 */ {FALSE, Err_Res }, 09057 /* Integer_8 */ {FALSE, Err_Res }, 09058 /* Real_4 */ {FALSE, Err_Res }, 09059 /* Real_8 */ {FALSE, Err_Res }, 09060 /* Real_16 */ {FALSE, Err_Res }, 09061 /* Complex_4 */ {FALSE, Err_Res }, 09062 /* Complex_8 */ {FALSE, Err_Res }, 09063 /* Complex_16 */ {FALSE, Err_Res }, 09064 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 09065 /* Logical_1 */ {FALSE, Err_Res }, 09066 /* Logical_2 */ {FALSE, Err_Res }, 09067 /* Logical_4 */ {FALSE, Err_Res }, 09068 /* Logical_8 */ {FALSE, Err_Res }, 09069 /* Character_1 */ {FALSE, Err_Res }, 09070 /* Character_2 */ {FALSE, Err_Res }, 09071 /* Character_4 */ {FALSE, Err_Res }, 09072 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 09073 /* Structure_Type */ {FALSE, Structure_Type }, 09074 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 09075 }, 09076 /* CRI_Parcel_Ptr_8 */ { 09077 /* Err_Res */ {FALSE, Err_Res }, 09078 /* Short_Char_Const */ {FALSE, Err_Res }, 09079 /* Short_Typeless_Const */ {TRUE , CRI_Parcel_Ptr_8 }, 09080 /* Typeless_1 */ {TRUE , CRI_Parcel_Ptr_8 }, 09081 /* Typeless_2 */ {TRUE , CRI_Parcel_Ptr_8 }, 09082 /* Typeless_4 */ {TRUE , CRI_Parcel_Ptr_8 }, 09083 /* Typeless_8 */ {TRUE , CRI_Parcel_Ptr_8 }, 09084 /* Long_Typeless */ {FALSE, Err_Res }, 09085 /* Integer_1 */ {TRUE , CRI_Parcel_Ptr_8 }, 09086 /* Integer_2 */ {TRUE , CRI_Parcel_Ptr_8 }, 09087 /* Integer_4 */ {TRUE , CRI_Parcel_Ptr_8 }, 09088 /* Integer_8 */ {TRUE , CRI_Parcel_Ptr_8 }, 09089 /* Real_4 */ {FALSE, Err_Res }, 09090 /* Real_8 */ {FALSE, Err_Res }, 09091 /* Real_16 */ {FALSE, Err_Res }, 09092 /* Complex_4 */ {FALSE, Err_Res }, 09093 /* Complex_8 */ {FALSE, Err_Res }, 09094 /* Complex_16 */ {FALSE, Err_Res }, 09095 /* CRI_Ptr_8 */ {TRUE , CRI_Parcel_Ptr_8 }, 09096 /* Logical_1 */ {FALSE, Err_Res }, 09097 /* Logical_2 */ {FALSE, Err_Res }, 09098 /* Logical_4 */ {FALSE, Err_Res }, 09099 /* Logical_8 */ {FALSE, Err_Res }, 09100 /* Character_1 */ {FALSE, Err_Res }, 09101 /* Character_2 */ {FALSE, Err_Res }, 09102 /* Character_4 */ {FALSE, Err_Res }, 09103 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 09104 /* Structure_Type */ {FALSE, Err_Res }, 09105 /* CRI_Parcel_Ptr_8 */ {TRUE , CRI_Parcel_Ptr_8 } 09106 } 09107 }; 09108 09109 09110 09111 exp_tbl_type un_plus_tbl[Num_Linear_Types] = { 09112 /* Err_Res */ {FALSE, Err_Res }, 09113 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 09114 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 09115 /* Typeless_1 */ {TRUE , Typeless_1 }, 09116 /* Typeless_2 */ {TRUE , Typeless_2 }, 09117 /* Typeless_4 */ {TRUE , Typeless_4 }, 09118 /* Typeless_8 */ {TRUE , Typeless_8 }, 09119 /* Long_Typeless */ {FALSE, Err_Res }, 09120 /* Integer_1 */ {FALSE, Integer_1 }, 09121 /* Integer_2 */ {FALSE, Integer_2 }, 09122 /* Integer_4 */ {FALSE, Integer_4 }, 09123 /* Integer_8 */ {FALSE, Integer_8 }, 09124 /* Real_4 */ {FALSE, Real_4 }, 09125 /* Real_8 */ {FALSE, Real_8 }, 09126 /* Real_16 */ {FALSE, Real_16 }, 09127 /* Complex_4 */ {FALSE, Complex_4 }, 09128 /* Complex_8 */ {FALSE, Complex_8 }, 09129 /* Complex_16 */ {FALSE, Complex_16 }, 09130 /* CRI_Ptr_8 */ {FALSE, Err_Res }, 09131 /* Logical_1 */ {FALSE, Err_Res }, 09132 /* Logical_2 */ {FALSE, Err_Res }, 09133 /* Logical_4 */ {FALSE, Err_Res }, 09134 /* Logical_8 */ {FALSE, Err_Res }, 09135 /* Character_1 */ {FALSE, Err_Res }, 09136 /* Character_2 */ {FALSE, Err_Res }, 09137 /* Character_4 */ {FALSE, Err_Res }, 09138 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 09139 /* Structure_Type */ {FALSE, Err_Res }, 09140 /* CRI_Parcel_Ptr_8 */ {FALSE, Err_Res } 09141 }; 09142 09143 09144 # if defined(_TARGET_OS_MAX) 09145 exp_tbl_type not_tbl[Num_Linear_Types] = { 09146 /* Err_Res */ {FALSE, Err_Res }, 09147 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 09148 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 09149 /* Typeless_1 */ {TRUE , Typeless_1 }, 09150 /* Typeless_2 */ {TRUE , Typeless_2 }, 09151 /* Typeless_4 */ {TRUE , Typeless_4 }, 09152 /* Typeless_8 */ {TRUE , Typeless_8 }, 09153 /* Long_Typeless */ {FALSE, Err_Res }, 09154 /* Integer_1 */ {TRUE , Typeless_4 }, 09155 /* Integer_2 */ {TRUE , Typeless_4 }, 09156 /* Integer_4 */ {TRUE , Typeless_4 }, 09157 /* Integer_8 */ {TRUE , Typeless_8 }, 09158 /* Real_4 */ {TRUE , Typeless_4 }, 09159 /* Real_8 */ {TRUE , Typeless_8 }, 09160 /* Real_16 */ {FALSE, Err_Res }, 09161 /* Complex_4 */ {FALSE, Err_Res }, 09162 /* Complex_8 */ {FALSE, Err_Res }, 09163 /* Complex_16 */ {FALSE, Err_Res }, 09164 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 09165 /* Logical_1 */ {FALSE, Logical_1 }, 09166 /* Logical_2 */ {FALSE, Logical_2 }, 09167 /* Logical_4 */ {FALSE, Logical_4 }, 09168 /* Logical_8 */ {FALSE, Logical_8 }, 09169 /* Character_1 */ {FALSE, Err_Res }, 09170 /* Character_2 */ {FALSE, Err_Res }, 09171 /* Character_4 */ {FALSE, Err_Res }, 09172 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 09173 /* Structure_Type */ {FALSE, Err_Res }, 09174 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 09175 }; 09176 09177 #else 09178 09179 exp_tbl_type not_tbl[Num_Linear_Types] = { 09180 /* Err_Res */ {FALSE, Err_Res }, 09181 /* Short_Char_Const */ {TRUE , Short_Typeless_Const }, 09182 /* Short_Typeless_Const */ {TRUE , Short_Typeless_Const }, 09183 /* Typeless_1 */ {TRUE , Typeless_1 }, 09184 /* Typeless_2 */ {TRUE , Typeless_2 }, 09185 /* Typeless_4 */ {TRUE , Typeless_4 }, 09186 /* Typeless_8 */ {TRUE , Typeless_8 }, 09187 /* Long_Typeless */ {FALSE, Err_Res }, 09188 /* Integer_1 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 09189 /* Integer_2 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 09190 /* Integer_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 09191 /* Integer_8 */ {TRUE , Typeless_8 }, 09192 /* Real_4 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 09193 /* Real_8 */ {TRUE , Typeless_8 }, 09194 /* Real_16 */ {FALSE, Err_Res }, 09195 /* Complex_4 */ {FALSE, Err_Res }, 09196 /* Complex_8 */ {FALSE, Err_Res }, 09197 /* Complex_16 */ {FALSE, Err_Res }, 09198 /* CRI_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE }, 09199 /* Logical_1 */ {FALSE, Logical_1 }, 09200 /* Logical_2 */ {FALSE, Logical_2 }, 09201 /* Logical_4 */ {FALSE, Logical_4 }, 09202 /* Logical_8 */ {FALSE, Logical_8 }, 09203 /* Character_1 */ {FALSE, Err_Res }, 09204 /* Character_2 */ {FALSE, Err_Res }, 09205 /* Character_4 */ {FALSE, Err_Res }, 09206 /* CRI_Ch_Ptr_8 */ {FALSE, Err_Res }, 09207 /* Structure_Type */ {FALSE, Err_Res }, 09208 /* CRI_Parcel_Ptr_8 */ {TRUE , TYPELESS_DEFAULT_TYPE } 09209 }; 09210 # endif 09211 09212 09213 09214 /******************************************************************************\ 09215 |* data available to s_asg_expr.c and s_utils.c *| 09216 \******************************************************************************/ 09217 09218 boolean pgm_unit_illegal = TRUE; 09219 boolean namelist_illegal = TRUE; 09220 boolean in_component_ref = FALSE; 09221 int constructor_level = 0; 09222 boolean tree_has_ranf = FALSE; 09223 boolean no_sub_or_deref = FALSE; 09224 boolean processing_do_var = FALSE;