C++ (Cpp) fwritecの例

コード例 #1

ファイル: xwritef.c プロジェクト: Ryu-chan/CLIB

bool 		fwritef(
	int		fd,
	float	f
){
	int part;

	part = (int)f;
	if(!fwritei(fd,part)) return FALSE;
	if(!fwritec(fd,'.'))  return FALSE;
	part = ((int)(f*PRECISION));
	if(!fwritei(fd,part)) return FALSE;
	return TRUE;
}

コード例 #2

ファイル: ciosub.c プロジェクト: JOravetz/SeisUnix

/* fortran interface */
void fwritec_(char *fname, int *lfname, int *irec, int *lrec, float *a) {
	fwritec(fname,*lfname,*irec,*lrec,a);
}