print_xyz Subroutine

private impure elemental subroutine print_xyz(this)

Type Bound

color

Arguments

Type IntentOptional Attributes Name
class(color), intent(in) :: this

Called by

proc~~print_xyz~~CalledByGraph proc~print_xyz color%print_xyz proc~print color%print proc~print->proc~print_xyz

Source Code

   elemental impure subroutine print_xyz(this)
      class(color), intent(in) :: this
      print'(a, 3(f8.4, 2x))', "xyz: ", this%xyz_x, this%xyz_y, this%xyz_z
   end subroutine print_xyz