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

vol7d_init() subroutine, private vol7d_class::vol7d_init ( type(vol7d), intent(out)  this, integer, intent(in), optional  time_definition  ) private Inizializza un oggetto di tipo vol7d. Non riceve alcun parametro tranne l'oggetto stesso. Attenzione, è necessario comunque chiamare sempre il costruttore per evitare di avere dei puntatori in uno stato indefinito. Parametri [out] this oggetto da inizializzare [in] time_definition 0=time is reference time; 1=time is validity time; 2=time is validity time, forecast range forced to 0 (default=1) Definizione alla linea 522 del file vol7d_class.F90. call display(this%network(i)) end do end IF IF (ASSOCIATED(this%ana))then print*,"---- ana vector ----" print*,"elements=",size(this%ana) do i=1, size(this%ana) call display(this%ana(i)) end do end IF IF (ASSOCIATED(this%time))then print*,"---- time vector ----" print*,"elements=",size(this%time) do i=1, size(this%time) call display(this%time(i)) end do end if IF (ASSOCIATED(this%level)) then print*,"---- level vector ----" print*,"elements=",size(this%level) do i =1,size(this%level)