Go to the source code of this file.
|
subroutine | os (OP, X, Y, Z, C, IOPT, INFINI, ZERO) |
|
◆ os()
subroutine os |
( |
character(len=8), intent(in) |
OP, |
|
|
type(bief_obj), intent(inout), optional, target |
X, |
|
|
type(bief_obj), intent(in), optional, target |
Y, |
|
|
type(bief_obj), intent(in), optional, target |
Z, |
|
|
double precision, intent(in), optional |
C, |
|
|
integer, intent(in), optional |
IOPT, |
|
|
double precision, intent(in), optional |
INFINI, |
|
|
double precision, intent(in), optional |
ZERO |
|
) |
| |
- Parameters
-
[in] | iopt | C A given constant |
[in] | INFINI | Prescribed value in case of division by 0. |
[in] | IOPT | Option for divisions by zero 1: NO TEST DONE (WILL CRASH IF DIVISION BY 0.). 2: INFINITE TERMS REPLACED BY CONSTANT INFINI. 3: STOP IF DIVISION BY ZERO. 4: DIVISIONS BY 0. REPLACED BY DIVISIONS/ZERO ZERO BEING AN OPTIONAL ARGUMENT |
[in] | OP | String indicating the operation to be done |
[out] | X | Result (a bief_obj structure) |
[in] | Y | To be used in the operation |
[in] | Z | To be used in the operation |
[in] | ZERO | A threshold minimum value for divisions |
Definition at line 7 of file os.f.