type two with repeat consecutive records

source_data as (
    
  select 
    'DAVE' as name,
    'LAPTOP' as device,
    '2022-03-04'::date as load_date
  
  union all 
    
    select 
      'DAVE' as name,
      'LAPTOP' as device,
      '2022-03-05'::date as load_date
    
   union all 
  
    select 
        'DAVE' as name,
        'CELL' as device,
        '2022-09-21'::date as load_date
  
  union all 
    
    select 
      'SAM' as name,
      'LAPTOP' as device,
      '2022-03-09'::date as load_date
    
   union all 
  
    select 
        'SAM' as name,
        'CELL' as device,
        '2022-10-21'::date as load_date
  
  union all 
    
    select 
      'DAVE' as name,
      'LAPTOP' as device,
      '2022-10-21'::date as load_date
  

),

process_changes as (

    select 
        *,
        coalesce(device != lag(device) over (
            partition by name
            order by load_date asc
            )  
        , TRUE) as is_device_switch
    from source_data


),

windowed as (

    select 
        name,
        device, 
        load_date as valid_to_ts,
        lead(load_date) over (
            partition by name
            order by load_date asc
        ) 
        as valid_to_current
  
    from process_changes
    where is_device_switch
    
)



select * from windowed order by name, valid_to_ts