-- FUNCTION ABS(DOUBLE PRECISION) RETURN DOUBLE
-- FUNCTION ACOS(DOUBLE PRECISION) RETURN DOUBLE
-- FUNCTION ASCII_CHAR(INTEGER) RETURN CHAR(1)
create or replace function ascii_char(x number) return char is
begin
   return chr(x);
end;
/

-- FUNCTION ASCII_VAL(CHAR(1) CHARACTER SET NONE) RETURN INTEGER
create or replace function ascii_val(x char) return number is
begin
   return ascii(x);
end;
/ 

--FUNCTION ASIN(DOUBLE PRECISION) RETURN DOUBLE
--FUNCTION ATAN(DOUBLE PRECISION) RETURN DOUBLE
--FUNCTION ATAN2(DOUBLE PRECISION, DOUBLE PRECISION) RETURN DOUBLE
--XXX FUNCTION BIN_AND(INTEGER, INTEGER) RETURN INTEGER
--XXX FUNCTION BIN_OR(INTEGER, INTEGER) RETURN INTEGER
--XXX FUNCTION BIN_XOR(INTEGER, INTEGER) RETURN INTEGER
--FUNCTION CEILING(DOUBLE PRECISION) RETURNS DOUBLE PRECISION
create or replace function ceiling(x number) return number is
begin
   return ceil(x);
end;
/ 

-- FUNCTION COS(DOUBLE PRECISION) RETURN DOUBLE PRECISION
-- FUNCTION COSH(DOUBLE PRECISION) RETURN DOUBLE PRECISION
-- FUNCTION COT(DOUBLE PRECISION) RETURN DOUBLE PRECISION
-- XXX FUNCTION DIV(INTEGER, INTEGER) RETURN DOUBLE PRECISION (deveuleve ENTERO)?
create or replace function DIV(x number, Y NUMBER) return number is
begin
   return TRUNC(TRUNC(X)/TRUNC(Y));
end;
/

-- FUNCTION FLOOR(DOUBLE PRECISION) RETURN DOUBLE PRECISION
-- FUNCTION LN(DOUBLE PRECISION) RETURN DOUBLE PRECISION
-- FUNCTION LOG(DOUBLE PRECISION, DOUBLE PRECISION) RETURN DOUBLE PRECISION
-- FUNCTION LOG10(DOUBLE PRECISION) RETURN DOUBLE PRECISION
create or replace function log10(x number) return number is
begin
   return log(10, x);
end;
/
 
-- FUNCTION LOWER(CSTRING(80) CHARACTER SET NONE) RETURN CSTRING(80)
-- FUNCTION LTRIM(CSTRING(80) CHARACTER SET NONE) RETURNS CSTRING(80)
-- FUNCTION MOD(INTEGER, INTEGER) RETURN DOUBLE PRECISION 
-- FUNCTION PI RETURN DOUBLE PRECISION BY VALUE 
create or replace Function Pi return number is
begin
   return 3.1415926535897932384626433832795;
end;
/
 
-- xxx FUNCTION RAND (DBMS_RANDOM.RANDOM)
-- FUNCTION RTRIM(CSTRING(80) CHARACTER SET NONE) RETURNS CSTRING(80)
-- FUNCTION SIGN(DOUBLE PRECISION) RETURN INTEGER
-- FUNCTION SIN( DOUBLE PRECISION) RETURN DOUBLE
-- FUNCTION SINH(DOUBLE PRECISION) RETURN DOUBLE
-- FUNCTION SQRT(DOUBLE PRECISION) RETURN DOUBLE
-- FUNCTION STRLEN(CSTRING) RETURN INTEGER BY VALUE 
create or replace function strlen(x varchar2) number is
begin
   return length(x);
end;
/
 
-- FUNCTION SUBSTR(CSTRING(80) CHARACTER SET NONE, SMALLINT, SMALLINT) RETURNS CSTRING(80)
-- FUNCTION TAN(DOUBLE PRECISION) RETURN DOUBLE
-- FUNCTION TANH(DOUBLE PRECISION) RETURN DOUBLE