compress_pixels Subroutine

private pure subroutine compress_pixels(this, rank, method)

Type Bound

pixel

Arguments

Type IntentOptional Attributes Name
class(pixel), intent(inout) :: this
integer, intent(in) :: rank
character(len=*), intent(in), optional :: method

Calls

proc~~compress_pixels~~CallsGraph proc~compress_pixels forsvd::pixel%compress_pixels proc~lowrank forsvd::tsvd%lowrank proc~compress_pixels->proc~lowrank interface~svd forsvd::svd proc~lowrank->interface~svd proc~svd_rel forsvd::svd_rel interface~svd->proc~svd_rel proc~gesdd_rel forsvd::gesdd_rel proc~svd_rel->proc~gesdd_rel proc~gesvd_rel forsvd::gesvd_rel proc~svd_rel->proc~gesvd_rel

Called by

proc~~compress_pixels~~CalledByGraph proc~compress_pixels forsvd::pixel%compress_pixels program~test5 test5 program~test5->proc~compress_pixels

Source Code

   pure subroutine compress_pixels(this, rank, method)
      class(pixel), intent(inout)            :: this
      integer,      intent(in)               :: rank
      character(*), intent(in), optional     :: method
      type(tsvd)                             :: mat

      call mat%lowrank(this%pixels, rank, method)
      this%pixels_app = mat%matrix_app

   end subroutine compress_pixels