Define some surface data

In[]:=
lidar=
LiDAR
;

Manually calculate BoxRatios

In[]:=
​​boxratios=
Join[lidar["DataRange"]//Map@Differences//Flatten,lidar["ElevationRange"]//Differences]
lidar["ElevationRange"]//Differences//First
/.{x_,y_,z_}->{x,y,factor}
This gives the same values as V12.3
In[]:=
{BoxRatios{19.328336901028575`,14.496252675771432`,1.`}};

Plot the surface data

In[]:=
ListPlot3D[lidar["Data"],BoxRatios->boxratios,DataRangelidar["DataRange"],ImageSize->Large]/.factor->5