derived_catalog_size Function

public function derived_catalog_size() result(n)

Public only for the unit-test suite.

Arguments

None

Return Value integer


Calls

proc~~derived_catalog_size~~CallsGraph proc~derived_catalog_size derived_catalog_size proc~ensure_catalog_initialised ensure_catalog_initialised proc~derived_catalog_size->proc~ensure_catalog_initialised

Called by

proc~~derived_catalog_size~~CalledByGraph proc~derived_catalog_size derived_catalog_size proc~rdb_ocean_derived_catalog_name rdb_ocean_derived_catalog_name proc~rdb_ocean_derived_catalog_name->proc~derived_catalog_size proc~rdb_ocean_derived_catalog_size rdb_ocean_derived_catalog_size proc~rdb_ocean_derived_catalog_size->proc~derived_catalog_size

Source Code

   function derived_catalog_size() result(n)
      !! Public only for the unit-test suite.
      integer :: n
      call ensure_catalog_initialised()
      n = N_CATALOG
   end function derived_catalog_size