Library Functions

Some Common Library Functions in FORTRAN Language Name & Form ABS(a) IABS(i)

Mode of Argument Real Integer

Mode of Result Real Integer

AINT(a)

Real

Real

ALOG(a)

Real

Real

ALOG10(a)

Real

Real

MAXO(I,j,k,…) AMAXI(a,b,c,…)

Integer Real

Integer Real

MINO(I,j,k,…) AMINI(a,b,c,…)

Integer Real

Integer Real

DIM(a,b,…) IDIM(I,j,…)

Real Integer

Real Integer

EXP(a)

Real

Real

FLOAT(i)

Integer

Real

IFIX(a) or INT(a)

Real

Integer

ICHAR(a)

Character

Integer

CHAR(i)

Integer

Character

LEN(a)

Character

Integer

Purpose Returns the absolute value of an argument Returns the value of an argument after truncation Returns the natural algorithm of an argument Returns the base10 algorithm of an argument Returns the value of the largest argument Returns the value of the smallest argument Returns the +ve difference of two arguments (a – b); if a
AMOD(a) MOD(I,j)

Real Integer

Real Integer

NINT(a)

Real

Integer

SQRT(a)

Real

Real

DATE()

―

Character

TIME() CLOCK()

―

Character

RANF()

―

Real

Returns the remainder of a divided by b Returns the nearest integer Returns the square root of an argument Returns the current date Returns the current reading of the system clock Returns a random number between 0.0 and 1.0

Some Common Library Functions in BASIC Language Function ABS

Application 10 LET Y=ABS(X)

ATN

10 LET Y=ATN(X)

COS

10 LET Y=COS(X)

COT

10 LET Y=COT(X)

EXP

10 LET Y=EXP(X)

INT

10 LET Y=INT(X)

LOG

10 LET Y=LOG(X)

SGN

10 LET Y=SGN(X)

SIN

10 LET Y=SIN(X)

SQR

10 LET Y=SQR(X)

Description Calculate the absolute value of x; y=|x| Calculate the arctangent of x; y=arctan(x) Calculate the cosine of x; y=cos(x), x in radians Calculate the cotangent of x; y=cot(x), x in radians Raise e to the x power; y=ex Assign to y the largest integer that algebraically does not exceed x Calculate the natural logarithm of x; y=logex, x>0 Determine the sign of x (y = +1 if x is positive, y = 0 if x = 0, y = -1 if x is negative) Calculate the sine of x, y = sin(x), x in radians Calculate the square

TAB

20 PRINT TAB(N);X

TAN

10 LET Y=TAN(X)

root of x; y = √x, x>0 Causes the value of x to be printed or displayed at column n. (Left column is considered column 0) Calculate the tangent of x; y = tan(x), x in radians