LibreOffice CalcでISBN-13からISBN-10への変換

LibreOffice CalcやMicrosoft Excelで［ISBN-13からISBN-10への変換］［ISBN-10からISBN-13への変換］を行なうための関数のコード

A1にハイフン付きでもいいので、ISBN-13のコードを入れる。 B1、C1、D1、それぞれに、以下のコードをコピー＆ペーストすると、［ISBN-13 to ISBN-10］［ISBN-10 to ISBN-13］の変換が、LibreOffice Calcにおいて可能になることが検証された。