derived_catalog_name Function

public function derived_catalog_name(i) result(name)

Public only for the unit-test suite.

Arguments

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

Return Value character(len=64)


Calls

proc~~derived_catalog_name~~CallsGraph proc~derived_catalog_name derived_catalog_name proc~ensure_catalog_initialised ensure_catalog_initialised proc~derived_catalog_name->proc~ensure_catalog_initialised

Called by

proc~~derived_catalog_name~~CalledByGraph proc~derived_catalog_name derived_catalog_name proc~rdb_ocean_derived_catalog_name rdb_ocean_derived_catalog_name proc~rdb_ocean_derived_catalog_name->proc~derived_catalog_name

Source Code

   function derived_catalog_name(i) result(name)
      !! Public only for the unit-test suite.
      integer, intent(in) :: i
      character(len=64) :: name
      call ensure_catalog_initialised()
      name = CATALOG(i)%name
   end function derived_catalog_name