libsim  Versione 7.2.6

◆ 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 909 del file vol7d_class.F90.

910  IF (linit) THEN
911  DO i = 1, nlevel
912  CALL init(this%level(i))
913  ENDDO
914  ENDIF
915  ENDIF
916 ENDIF
917 IF (PRESENT(ntimerange)) THEN
918  IF (ntimerange >= 0) THEN
919  IF (ASSOCIATED(this%timerange)) DEALLOCATE(this%timerange)
920  ALLOCATE(this%timerange(ntimerange))
921  IF (linit) THEN
922  DO i = 1, ntimerange
923  CALL init(this%timerange(i))
924  ENDDO
925  ENDIF
926  ENDIF
927 ENDIF
928 IF (PRESENT(nnetwork)) THEN

Generated with Doxygen.