def ffpr [name] {
ffprobe -print_format json -show_format -show_streams -v -8 $name | from json
}
def vdur [probe] {
$probe | get format.duration
}
def vres [probe] {
let b = ($probe | get streams | filter { |x| $x.codec_type == "video" } | first | get width height )
{ width: $b.0, height: $b.1 }
}