user_tracer_example::user_tracer_example_cs logical logical user_tracer_example::user_tracer_example_cs::coupled_tracers coupled_tracers = .false. These tracers are not offered to the coupler. character(len=200) character(len=200) user_tracer_example::user_tracer_example_cs::tracer_ic_file tracer_ic_file The full path to the IC file, or " " to initialize internally. type(time_type), pointer type(time_type), pointer user_tracer_example::user_tracer_example_cs::time time => NULL() A pointer to the ocean model's clock. type(tracer_registry_type), pointer type(tracer_registry_type), pointer user_tracer_example::user_tracer_example_cs::tr_reg tr_reg => NULL() A pointer to the tracer registry. real, dimension(:,:,:,:), pointer real, dimension(:,:,:,:), pointer user_tracer_example::user_tracer_example_cs::tr tr => NULL() The array of tracers used in this subroutine, in g m-3? real, dimension(ntr) real, dimension(ntr) user_tracer_example::user_tracer_example_cs::land_val land_val = -1.0 The value of tr that is used where land is masked out. logical logical user_tracer_example::user_tracer_example_cs::use_sponge use_sponge If true, sponges may be applied somewhere in the domain. integer, dimension(ntr) integer, dimension(ntr) user_tracer_example::user_tracer_example_cs::ind_tr ind_tr Indices returned by aof_set_coupler_flux if it is used and the surface tracer concentrations are to be provided to the coupler. type(diag_ctrl), pointer type(diag_ctrl), pointer user_tracer_example::user_tracer_example_cs::diag diag => NULL() A structure that is used to regulate the timing of diagnostic output. type(vardesc), dimension(ntr) type(vardesc), dimension(ntr) user_tracer_example::user_tracer_example_cs::tr_desc tr_desc Descriptions of each of the tracers. The control structure for the USER_tracer_example module. real vardesc logical time_type user_tracer_example::user_tracer_example_cs use_sponge coupled_tracers time tr_reg tracer_ic_file tr_desc diag ind_tr land_val tr diag_ctrl integer character(len=200) tracer_registry_type user_tracer_example::user_tracer_example_cscoupled_tracers user_tracer_example::user_tracer_example_csdiag user_tracer_example::user_tracer_example_csind_tr user_tracer_example::user_tracer_example_csland_val user_tracer_example::user_tracer_example_cstime user_tracer_example::user_tracer_example_cstr user_tracer_example::user_tracer_example_cstr_desc user_tracer_example::user_tracer_example_cstr_reg user_tracer_example::user_tracer_example_cstracer_ic_file user_tracer_example::user_tracer_example_csuse_sponge