read_neural_operator_layer Function

public function read_neural_operator_layer(unit, verbose) result(layer)

Read neural operator layer from file and return as base_layer_type

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: unit

Unit number
integer, intent(in), optional :: verbose

Verbosity level

Return Value class(base_layer_type), allocatable

Allocated layer instance


Source Code

  function read_neural_operator_layer(unit, verbose) result(layer)
    !! Read neural operator layer from file and return as base_layer_type
    implicit none

    ! Arguments
    integer, intent(in) :: unit
    !! Unit number
    integer, optional, intent(in) :: verbose
    !! Verbosity level
    class(base_layer_type), allocatable :: layer
    !! Allocated layer instance

    ! Local variables
    integer :: verbose_ = 0

    if(present(verbose)) verbose_ = verbose
    allocate(layer, source=neural_operator_layer_type(num_outputs=0))
    call layer%read(unit, verbose=verbose_)

  end function read_neural_operator_layer