emulated

Module

Description

Module emulating not universally available intrinsics

Quick access

Variables:

inan, rnan, rtype

Routines:

initialize_nan(), isnan()

Variables

• emulated/inan [integer,optional/default=z'7fbfffff']

  (KIND=4)

• emulated/rnan [real]

• emulated/rtype [real,parameter=0.0]

Subroutines and functions

subroutine  emulated/initialize_nan()

Call to:

isnan()

function  emulated/isnan(v)

Parameters:

v [real,in]

Return:

isnan [logical]

Called from:

initialize_nan()