diff --git a/schemes/musica/musica_ccpp.F90 b/schemes/musica/musica_ccpp.F90 index 09364397..1ef2ea63 100644 --- a/schemes/musica/musica_ccpp.F90 +++ b/schemes/musica/musica_ccpp.F90 @@ -10,6 +10,8 @@ module musica_ccpp contains + !> \section arg_table_musica_ccpp_register Argument Table + !! \htmlinclude musica_ccpp_register.html subroutine musica_ccpp_register(solver_type, num_grid_cells, constituent_props, errmsg, errcode) use ccpp_constituent_prop_mod, only: ccpp_constituent_properties_t diff --git a/schemes/musica/musica_ccpp.meta b/schemes/musica/musica_ccpp.meta index 30d19bad..85e01f3e 100644 --- a/schemes/musica/musica_ccpp.meta +++ b/schemes/musica/musica_ccpp.meta @@ -2,7 +2,41 @@ name = musica_ccpp type = scheme dependencies = micm/musica_ccpp_micm.F90,micm/musica_ccpp_micm_util.F90,tuvx/musica_ccpp_tuvx.F90,tuvx/musica_ccpp_tuvx_height_grid.F90,musica_ccpp_util.F90 - dynamic_constituent_routine = musica_ccpp_register + +[ccpp-arg-table] + name = musica_ccpp_register + type = scheme +[ solver_type ] + standard_name = micm_solver_type + units = none + type = integer + dimensions = () + intent = in +[ num_grid_cells ] + standard_name = number_of_grid_cells + units = count + type = integer + dimensions = () + intent = in +[ constituent_props ] + standard_name = dynamic_constituents_for_musica_ccpp + units = none + dimensions = (:) + allocatable = True + type = ccpp_constituent_properties_t + intent = out +[ errmsg ] + standard_name = ccpp_error_message + units = none + type = character | kind = len=512 + dimensions = () + intent = out +[ errcode ] + standard_name = ccpp_error_code + units = 1 + type = integer + dimensions = () + intent = out [ccpp-arg-table] name = musica_ccpp_init @@ -140,4 +174,4 @@ units = 1 type = integer dimensions = () - intent = out \ No newline at end of file + intent = out