let
load_from_file fn =
from_buffer (
AlBuffer
.load_from_file fn)