set_chunk_size Subroutine

private subroutine set_chunk_size(me, chunk_size)

Set the chunk size in the class.

Type Bound

stl_file

Arguments

Type IntentOptional Attributes Name
class(stl_file), intent(inout) :: me
integer, intent(in) :: chunk_size

must be >0

Source Code

    subroutine set_chunk_size(me,chunk_size)

    class(stl_file),intent(inout) :: me
    integer,intent(in)            :: chunk_size !! must be >0

    me%chunk_size = max(1,chunk_size)

    end subroutine set_chunk_size