Go to the documentation of this file.00001 #include "f2c.h"
00002 #ifdef __cplusplus
00003 extern "C" {
00004 #endif
00005
00006 ftnlen f__typesize[] = { 0, 0, sizeof(shortint), sizeof(integer),
00007 sizeof(real), sizeof(doublereal),
00008 sizeof(complex), sizeof(doublecomplex),
00009 sizeof(logical), sizeof(char),
00010 0, sizeof(integer1),
00011 sizeof(logical1), sizeof(shortlogical),
00012 #ifdef Allow_TYQUAD
00013 sizeof(longint),
00014 #endif
00015 0};
00016 #ifdef __cplusplus
00017 }
00018 #endif