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_enter_data_impl(this)type(ocean_vcoord_t),intent(inout)::thisif(.not.this%is_init)return!$acc enter data copyin(this%dsig, this%z_ref_global, this%target_h, this%z_ref)!$acc enter data copyin(this%z_top)!$acc enter data copyin(this%z_fixed_zi, this%z_fixed_dz)!$acc enter data copyin(this%rho_target)!$acc enter data copyin(this%remap_total_h, this%remap_h_ref, this%remap_h_old)!$acc enter data copyin(this%remap_conc_t, this%remap_conc_s)end subroutine ocean_vcoord_enter_data_impl