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_redi_exit_data_impl(this)type(ocean_redi_t),intent(inout)::thisif(.not.this%is_init)return!$acc exit data delete(this%tr_snap)!$acc exit data delete(this%khtr_u, this%khtr_v)!$acc exit data delete(this%uKb, this%uKt, this%vKb, this%vKt)!$acc exit data delete(this%vPoL, this%vPoR, this%vKoL, this%vKoR, this%vhEff)!$acc exit data delete(this%uPoL, this%uPoR, this%uKoL, this%uKoR, this%uhEff)end subroutine ocean_redi_exit_data_impl