assign Subroutine

public subroutine assign(to, from)

Type Bound

ExtData_IoBundle

Arguments

Type IntentOptional Attributes Name
class(ExtData_IoBundle), intent(out) :: to
type(ExtData_IoBundle), intent(in) :: from

Source Code

   subroutine assign(to,from)
      class(ExtData_IOBundle), intent(out) :: to
      type(ExtData_IOBundle), intent(in) :: from
    
    to%bracket_side = from%bracket_side
    to%entry_index = from%entry_index
    to%file_name = from%file_name
    to%time_index = from%time_index
    to%regrid_method = from%regrid_method
    to%fraction = from%fraction
    to%template = from%template

    to%metadata_coll_id=from%metadata_coll_id
    to%server_coll_id=from%server_coll_id
    to%items=from%items 
    to%pbundle=from%pbundle 
    to%CFIO=from%CFIO 
 
   end subroutine assign