[unix-history] / lib / libI77 / typesize.c

#include "f2c.h"

ftnlen f__typesize[] = { 0, 0, sizeof(shortint), sizeof(integer),
			sizeof(real), sizeof(doublereal),
			sizeof(complex), sizeof(doublecomplex),
			sizeof(logical), sizeof(char) };
Commit	Line	Data
bae7117f WH	1	#include "f2c.h"
	2
	3	ftnlen f__typesize[] = { 0, 0, sizeof(shortint), sizeof(integer),
	4	sizeof(real), sizeof(doublereal),
	5	sizeof(complex), sizeof(doublecomplex),
	6	sizeof(logical), sizeof(char) };