virtualmodelmodule::get_virtual_model Interface Reference

Collaboration diagram for virtualmodelmodule::get_virtual_model:

Private Member Functions
class(virtualmodeltype) function, pointer	get_virtual_model_by_id (model_id)
	Returns a virtual model with the specified id. More...
class(virtualmodeltype) function, pointer	get_virtual_model_by_name (model_name)
	Returns a virtual model with the specified name. More...

Detailed Description

Definition at line 16 of file VirtualModel.f90.

Member Function/Subroutine Documentation

get_virtual_model_by_id()

class(virtualmodeltype) function, pointer virtualmodelmodule::get_virtual_model::get_virtual_model_by_id ( integer(i4b)  model_id )

private

Definition at line 359 of file VirtualModel.f90.

    use virtualdatalistsmodule, only: virtual_model_list
    integer(I4B) :: model_id
    class(VirtualModelType), pointer :: virtual_model
    ! local
    integer(I4B) :: i
    class(*), pointer :: vm
 
    virtual_model => null()
    do i = 1, virtual_model_list%Count()
      vm => virtual_model_list%GetItem(i)
      select type (vm)
      class is (virtualmodeltype)
        if (vm%id == model_id) then
          virtual_model => vm
          return
        end if
      end select
    end do
 

get_virtual_model_by_name()

class(virtualmodeltype) function, pointer virtualmodelmodule::get_virtual_model::get_virtual_model_by_name ( character(len=*)  model_name )

private

Definition at line 383 of file VirtualModel.f90.

    use virtualdatalistsmodule, only: virtual_model_list
    character(len=*) :: model_name
    class(VirtualModelType), pointer :: virtual_model
    ! local
    integer(I4B) :: i
    class(*), pointer :: vm
 
    virtual_model => null()
    do i = 1, virtual_model_list%Count()
      vm => virtual_model_list%GetItem(i)
      select type (vm)
      class is (virtualmodeltype)
        if (vm%name == model_name) then
          virtual_model => vm
          return
        end if
      end select
    end do
 

---

The documentation for this interface was generated from the following file:

• /home/runner/work/modflow6/modflow6/src/Distributed/VirtualModel.f90