00001 #if !defined(F77_EXTERNS_H)
00002 #define F77_EXTERNS_H
00003
00004 #if defined(F77_FUNC)
00005
00006 #define j2cuitinhoupdate_ F77_FUNC(j2cuitinhoupdate,J2CUITINHOUPDATE)
00007
00008 #else
00009
00010 #error Unknown translation for FORTRAN external symbols
00011
00012 #endif
00013
00014 #endif
00015
00016