initialise Function

private function initialise(scale, attributes) result(activation)

Initialise a ReLU activation function

Arguments

Type IntentOptional Attributes Name
real(kind=real32), intent(in), optional :: scale

Optional scale factor for activation output

type(onnx_attribute_type), intent(in), optional :: attributes(:)

Optional ONNX attributes

Return Value type(relu_actv_type)

ReLU activation type


Source Code

  function initialise(scale, attributes) result(activation)
    !! Initialise a ReLU activation function
    implicit none

    ! Arguments
    real(real32), optional, intent(in) :: scale
    !! Optional scale factor for activation output
    type(relu_actv_type) :: activation
    !! ReLU activation type
    type(onnx_attribute_type), optional, intent(in) :: attributes(:)
    !! Optional ONNX attributes


    call activation%reset()

    if(present(scale)) activation%scale = scale
    if(abs(activation%scale-1._real32) .gt. 1.e-6_real32)then
       activation%apply_scaling = .true.
    end if
    if(present(attributes))then
       call activation%apply_attributes(attributes)
    end if

  end function initialise