Fiats
Source Files
Modules
Procedures
Derived Types
Programs
double_precision_approximately_equal
Interface
127 statements
Source File
neural_network_m.f90
neural_network_m
double_precision_approximately_equal
Contents
None
interface
private elemental module function double_precision_approximately_equal(lhs, rhs) result(lhs_eq_rhs)
Implementation →
Arguments
Type
Intent
Optional
Attributes
Name
class(
neural_network_t
(double_precision)),
intent(in)
::
lhs
class(
neural_network_t
(double_precision)),
intent(in)
::
rhs
Return Value
logical
Description
The result is true if lhs and rhs are the same to within a tolerance