libsim  Versione6.3.0

◆ dat_vect_display()

subroutine, private vol7d_class::dat_vect_display ( type(vol7d_var), dimension(:), intent(in)  this,
integer, dimension(:)  idat,
real, dimension(:)  rdat,
double precision, dimension(:)  ddat,
integer(kind=int_b), dimension(:)  bdat,
character(len=*), dimension(:)  cdat 
)
private

stampa a video una sintesi del contenuto

Parametri
[in]thisoggetto da visualizzare
rdatreal
ddatdouble precision
idatinteger
bdatbyte
cdatcharacter

Definizione alla linea 924 del file vol7d_class.F90.

924  IF (linit) THEN
925  DO i = 1, ntimerange
926  CALL init(this%timerange(i))
927  ENDDO
928  ENDIF
929  ENDIF
930 ENDIF
931 IF (PRESENT(nnetwork)) THEN
932  IF (nnetwork >= 0) THEN
933  IF (ASSOCIATED(this%network)) DEALLOCATE(this%network)
934  ALLOCATE(this%network(nnetwork))
935  IF (linit) THEN
936  DO i = 1, nnetwork
937  CALL init(this%network(i))
938  ENDDO
939  ENDIF
940  ENDIF
941 ENDIF
942 ! Dimensioni dei tipi delle variabili
Costruttori per le classi datetime e timedelta.

Generated with Doxygen.