43 lines
680 B
C
43 lines
680 B
C
/* REQUIRED PROCEDURES AND FUNCTIONS */
|
|
|
|
/* PROCEDURES */
|
|
/* FILE HANDLING */
|
|
#define R_REWRITE 1
|
|
#define R_PUT 2
|
|
#define R_RESET 3
|
|
#define R_GET 4
|
|
#define R_PAGE 5
|
|
|
|
/* DYNAMIC ALLOCATION */
|
|
#define R_NEW 6
|
|
#define R_DISPOSE 7
|
|
|
|
/* TRANSFER */
|
|
#define R_PACK 8
|
|
#define R_UNPACK 9
|
|
|
|
/* FUNCTIONS */
|
|
/* ARITHMETIC */
|
|
#define R_ABS 10
|
|
#define R_SQR 11
|
|
#define R_SIN 12
|
|
#define R_COS 13
|
|
#define R_EXP 14
|
|
#define R_LN 15
|
|
#define R_SQRT 16
|
|
#define R_ARCTAN 17
|
|
|
|
/* TRANSFER */
|
|
#define R_TRUNC 18
|
|
#define R_ROUND 19
|
|
|
|
/* ORDINAL */
|
|
#define R_ORD 20
|
|
#define R_CHR 21
|
|
#define R_SUCC 22
|
|
#define R_PRED 23
|
|
|
|
/* BOOLEAN */
|
|
#define R_ODD 24
|
|
#define R_EOF 25
|
|
#define R_EOLN 26
|