new_MAPLDataCollection Function

public function new_MAPLDataCollection(template, use_file_coords) result(collection)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: template
logical, intent(in), optional :: use_file_coords

Return Value type(MAPLDataCollection)


Called by

proc~~new_mapldatacollection~~CalledByGraph proc~new_mapldatacollection new_MAPLDataCollection interface~mapldatacollection MAPLDataCollection interface~mapldatacollection->proc~new_mapldatacollection

Source Code

  function new_MAPLDataCollection(template,use_file_coords) result(collection)
    type (MAPLDataCollection) :: collection
    character(len=*), intent(in) :: template
    logical, optional, intent(in) :: use_file_coords

    collection%template = template 
    if (present(use_file_coords)) then
       collection%use_file_coords=use_file_coords
    else
       collection%use_file_coords=.false.
    end if

  end function new_MAPLDataCollection