## psb_sprn -- Reinit sparse matrix structure for psblas routines.

    call psb_sprn(a, decsc_a, info, clear)

Type:
  Synchronous.
On Entry
a
  the matrix to be reinitialized.
  Scope:local
  Type:required
  Intent: inout.
  Specified as: a structured data of type spdata`psb_Tspmat_type`.
desc_a
  the communication descriptor.
  Scope:local.
  Type:required.
  Intent: in.
  Specified as: a structured data of type descdata`psb_desc_type`.
clear
  Choose whether to zero out matrix coefficients
  Scope:local.
  Type:optional.
  Intent: in.
  Default: true.

On Return
info
  Error code.
  Scope: local
  Type: required
  Intent: out.
  An integer value; 0 means no error has been detected.

Notes

1. On exit from this routine the sparse matrix is in the update state.