Nodes of different colours represent the following:
Solid arrows point from a procedure to one which it calls. Dashed
arrows point from an interface to procedures which implement that interface.
This could include the module procedures in a generic interface or the
implementation in a submodule of an interface in a parent module.
Where possible, edges connecting nodes are
given different colours to make them easier to distinguish in
large graphs.
Source Code
subroutine ocean_vcoord_exit_data_impl(this)type(ocean_vcoord_t),intent(inout)::thisif(.not.this%is_init)return!$acc exit data delete(this%remap_conc_t, this%remap_conc_s)!$acc exit data delete(this%remap_h_old, this%remap_h_ref, this%remap_total_h)!$acc exit data delete(this%rho_target)!$acc exit data delete(this%z_fixed_zi, this%z_fixed_dz)!$acc exit data delete(this%z_top)!$acc exit data delete(this%z_ref, this%target_h, this%z_ref_global, this%dsig)end subroutine ocean_vcoord_exit_data_impl