dat_display dat_vect_display integeranavol move_datac move_datar realanavol to_char_dat v7d_rounding vol7d_alloc vol7d_alloc_vol vol7d_ana_a vol7d_ana_d vol7d_append vol7d_attr_a vol7d_attr_d vol7d_c_e vol7d_check vol7d_check_vol vol7d_convr vol7d_copy vol7d_delete vol7d_diff_only vol7d_display vol7d_filter vol7d_get_volanaattrb vol7d_get_volanaattrc vol7d_get_volanaattrd vol7d_get_volanaattri vol7d_get_volanaattrr vol7d_get_volanab vol7d_get_volanac vol7d_get_volanad vol7d_get_volanai vol7d_get_volanar vol7d_get_voldatiattrb vol7d_get_voldatiattrc vol7d_get_voldatiattrd vol7d_get_voldatiattri vol7d_get_voldatiattrr vol7d_get_voldatib vol7d_get_voldatic vol7d_get_voldatid vol7d_get_voldatii vol7d_get_voldatir vol7d_init vol7d_level_d vol7d_merge vol7d_network_a vol7d_network_d vol7d_read_from_file vol7d_reform vol7d_set_attr_ind vol7d_smart_sort vol7d_time_d vol7d_timerange_d vol7d_var_a vol7d_var_d vol7d_write_on_file

to_char_dat() character(len=80) function, private vol7d_class::to_char_dat ( type(vol7d_var), intent(in)  this, integer  idat, real  rdat, double precision  ddat, integer(kind=int_b)  bdat, character(len=*)  cdat  ) private Parametri rdat real ddat double precision idat integer bdat byte cdat character Definizione alla linea 934 del file vol7d_class.F90. DO i = 1, nnetwork CALL init(this%network(i)) ENDDO ENDIF ENDIF ENDIF ! Dimensioni dei tipi delle variabili CALL vol7d_varvect_alloc(this%anavar, nanavarr, nanavard, & nanavari, nanavarb, nanavarc, ini) CALL vol7d_varvect_alloc(this%anaattr, nanaattrr, nanaattrd, & nanaattri, nanaattrb, nanaattrc, ini) CALL vol7d_varvect_alloc(this%anavarattr, nanavarattrr, nanavarattrd, & nanavarattri, nanavarattrb, nanavarattrc, ini) CALL vol7d_varvect_alloc(this%dativar, ndativarr, ndativard, & ndativari, ndativarb, ndativarc, ini) CALL vol7d_varvect_alloc(this%datiattr, ndatiattrr, ndatiattrd, & ndatiattri, ndatiattrb, ndatiattrc, ini) CALL vol7d_varvect_alloc(this%dativarattr, ndativarattrr, ndativarattrd, & ndativarattri, ndativarattrb, ndativarattrc, ini) END SUBROUTINE vol7d_alloc FUNCTION vol7d_check_alloc_ana(this) TYPE(vol7d),INTENT(in) :: this LOGICAL :: vol7d_check_alloc_ana vol7d_check_alloc_ana = ASSOCIATED(this%ana) .AND. ASSOCIATED(this%network) END FUNCTION vol7d_check_alloc_ana SUBROUTINE vol7d_force_alloc_ana(this, ini) TYPE(vol7d),INTENT(inout) :: this LOGICAL,INTENT(in),OPTIONAL :: ini ! Alloco i descrittori minimi per avere un volume di anagrafica IF (.NOT. ASSOCIATED(this%ana)) CALL vol7d_alloc(this, nana=1, ini=ini) IF (.NOT. ASSOCIATED(this%network)) CALL vol7d_alloc(this, nnetwork=1, ini=ini)