seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-24 00:44:23 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Upload

Browse Source 
Digital Research
This commit is contained in:
Sepp J Morris
2020-11-06 18:50:37 +01:00
parent 621ed8ccaf
commit 31738079c4
8481 changed files with 1888323 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v102a/libf/ceil.c Normal file
View File

@@ -0,0 +1,26 @@
/*
Copyright 1983
Alcyon Corporation
8716 Production Ave.
San Diego, Ca. 92121
*/
/*char *version "@(#)ceil.c 1.2 10/19/83";*/
/* ceil - returns the smallest integer (as a double precision
number) not greater than x. */
double
ceil(x)
double x;
{
register long i;
double retval;
if( x > 0 )
x += 0.999999999999;
i = x;
retval = i;
return( retval );
}