乐律全书

  置姑洗半律通长三寸九分六厘八毫五丝○二微六纎为实以十亿乗之以十亿○五千九百四十六万三千○九十四除之得三寸七分四厘五毫七丝六忽七微六纎为仲吕
  置仲吕半律通长三寸七分四厘五毫七丝六忽七微六纎为实以十亿乗之以十亿○五千九百四十六万三千○九十四除之得三寸五分三厘五毫五丝三忽纎为姑洗
  置姑洗半律通长三寸九分六厘八毫五丝○二微六纎为实以十亿乗之以十亿○五千九百四十六万三千○九十四除之得三寸七分四厘五毫七丝六忽七微六纎为仲吕
  置仲吕半律通长三寸七分四厘五毫七丝六忽七微六纎为实以十亿乗之以十亿○五千九百四十六万三千○九十四除之得三寸五分三厘五毫五丝三忽六纎为夷则
  置夷则半律通长三寸一分四厘九毫八丝○二防六纎为实以十亿乗之以十亿○五千九百四十六万三千○九十四除之得二寸九分七厘三毫○一忽七微七纎为南吕
  置南吕半律通长二寸九分七厘三毫○一忽七微七纎为实以十亿乗之以十亿○五千九百四十六万三千○九十四除之得三寸八分○六毫一丝五忽五微一纎为无射
  置无射半律通长二寸八分○六毫一厘五忽五微一纎为实以十亿乗之以十亿○五千九百四十六万三千○九十四除之得三寸六分四厘八毫六丝五忽七微七纎为应钟
  次求三十六律外周真数
  先置黄钟倍律通长二尺为实九归得二寸二分二厘二毫二丝二忽二微二纎为其外周就置所得为实依后项乗除之
  置黄钟倍律外周二寸二分二厘二毫二丝二忽二微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百二十六除之得二寸一分五厘八毫九丝五忽九微八纎为大吕
  置大吕倍律外周二寸一分五厘八毫九丝五忽九微八纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得二寸○九厘七毫四丝九忽八微四纎为太蔟
  置太蔟倍律外周二寸○九厘七毫四丝九忽八防四纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得二寸○三厘七毫七丝八忽六微七纎为夹钟
  置夹钟倍律外周二寸○三厘七毫七丝八忽六微七纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸九分七厘七毫七丝七忽四微九纎为姑洗
  置姑洗倍律外周一寸九分七厘九毫七丝七忽四微九纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸九分二厘三毫四丝一忽四微五纎为仲吕
  置仲吕倍律外周一寸九分二厘三毫四丝一忽四微五纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸八分六厘八毫六丝五忽八微七纎为蕤賔
  置蕤賔倍律外周一寸八分六厘八毫六丝五忽八微七纎为賔以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸八分一厘五毫四丝六忽一微六纎为林钟
  置林钟倍律外周一寸八分一厘五毫四丝六忽一微六纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸七分六厘三毫七丝七忽八微九纎为夷则
  置夷则倍律外周一寸七分六厘三毫七丝七忽八微九纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸七分一厘三毫五丝六忽七微五纎为南吕
  置南吕倍律外周一寸七分一厘三毫五丝六忽七微五纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸六分六厘四毫七丝八忽五微六纎为无射
  置无射倍律外周一寸六分六厘四毫七丝八忽五微六纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸六分一厘七毫三丝九忽二微四纎为应钟
  置应钟倍律外周一寸六分一厘七毫三丝九忽二微四纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸五分七厘一毫三丝四忽八微四纎为黄钟
  置黄钟正律外周一寸五分七厘一毫三丝四忽八微四纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸五分二厘六毫六丝一忽五微一纎为大吕
  置大吕正律外周一寸五分二厘六毫六丝一忽五微一纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸四分八厘三毫一丝五忽五微三纎为太蔟
  置太蔟正律外周一寸四分八厘三毫一丝五忽五微三纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸四分四厘○九丝三忽二微八纎为夹钟
  置夹钟正律外周一寸四分四厘○九丝三忽二微八纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸三分九厘九毫九丝一忽二微二纎为姑洗
  置姑洗正律外周一寸三分九厘九毫九丝一忽二微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸三分六厘○○五忽九微四纎为仲吕
  置仲吕正律外周一寸三分六厘○○五忽九微四纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸三分二厘一毫三丝四忽一防二纎为蕤賔
  置蕤賔正律外周一寸三分二厘一毫三丝四忽一微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸二分八厘三毫七丝二忽五微二纎为林钟
  置林钟正律外周一寸二分八厘三毫七丝二忽五微二纎为实以十一乗之以十亿○二千九百三十万○二千二百三十六除之得一寸二分四厘七毫一丝八忽○○为夷则
  置夷则正律外周一寸二分四厘七毫一丝八忽○○为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸二分一厘一毫六丝七忽五微二纎为南吕
  置南吕正律外周一寸二分一厘一毫六丝七忽五微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸一分七厘七毫一丝八忽一微二纎为无射
  置无射正律外周一寸一分十厘七毫一丝八忽一微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸一分四厘三毫六丝六忽九微一纎为应钟
  置应钟正律外周一寸一分四厘三毫六丝六忽九微一纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸一分一厘一毫一丝一忽一微一纎为黄钟
  置黄钟半律外周一寸一分一厘一毫一丝一忽一微一纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸○七厘九毫四丝七忽九微九纎为大吕
  置大吕半律外周一寸○七厘九毫四丝七忽九微九纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸○四厘八毫七丝四忽九微二纎为太蔟
  置太蔟半律外周一寸○四厘八毫七丝四忽九微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得一寸○一厘八毫八丝九忽三微三纎为夹钟
  置夹钟半律外周一寸○一厘八毫八丝九忽三微三纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得九分八厘九毫八丝八忽七微四纎为姑洗
  置姑洗半律外周九分八厘九毫八丝八忽七微四纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得九分六厘一毫七丝○七微二纎为仲吕
  置仲吕半律外周九分六厘一毫七丝○七微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得九分三厘四毫三丝二忽九微三纎为蕤賔
  置蕤賔半律外周九分三厘四毫三丝二忽九微三纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得九分○七毫七丝三忽○八纎为林钟
  置林钟半律外周九分○七毫七丝三忽○八纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得八分八厘一毫八丝八忽九微四纎为夷则
  置夷则半律外周八分分厘一毫八丝八忽九防四纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得八分五厘六毫七丝八忽三微七纎为南吕
  置南吕半律外周八分五厘六毫七丝八忽三微七纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得八分三厘二毫三丝九忽二微八纎为无射
  置无射半律外周八分三厘二毫三丝九忽二微八纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得八分○八毫六丝九忽六微二纎为应钟
  次求三十六律外径真数
  周求径术置黄钟倍律外周二寸二分二厘二毫二丝二忽二微二纎九因得二尺以四十除之得五分自乗得二十五分加倍得五十分为实开平方法除之得七分○七毫一丝○六微七纎是为外径就置所得为实依后项乗除之
  径求周术置黄钟倍律外径七分○七毫一丝○六微七纎自乗得五十分折半得二十五分为实开平方法除之得五分以四十乗之得二尺九归得二寸二分二厘二毫二丝二忽二微二纎是为外周周径互相求即还原法也
  置黄钟倍律外径七分○七毫一丝○六微七纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得六分八厘六毫九丝七忽六微八纎为大吕
  置大吕倍律外径六分八厘六毫九丝七忽六防八纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得六分六厘七毫四丝一忽九微九纎为太蔟
  置太蔟倍律外径六分六厘七毫四丝一忽九微九纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得六分四厘八毫四丝一忽九微七纎为夹钟
  置夹钟倍律外径六分四厘八毫四丝一忽九微七纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得六分二厘九毫九丝六忽○五纎为姑洗
  置姑洗倍律外径六分二厘九毫九丝六忽○五纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得六分一厘二毫○二忽六微七纎为仲吕
  置仲吕倍律外径六分一厘二毫○二忽六微七纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得五分九厘四毫六丝○三微五纎为蕤賔
  置蕤賔倍律外径五分九厘四毫六丝○三微五纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得五分七厘七毫六丝七忽六微三纎为林钟
  置林钟倍律外径五分七厘七毫六丝七忽六微三纎为实以十一乗之以十亿○二千九百三十万○二千二百三十六除之得五分六厘一毫二丝三忽一微○为夷则
  置夷则倍律外径五分六厘一毫二丝三忽一微○为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得五分四厘五毫二丝五忽三微八纎为南吕
  置南吕倍律外径五分四厘五毫二丝五忽三微八纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得五分二厘九毫七丝三忽一微五纎为无射
  置无射倍律外径五分二厘九毫七丝三忽一微五纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得五分一厘四毫六丝五忽一微一纎为应钟
  置应钟倍律外径五分一厘四毫六丝五忽一微一纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得五分为黄钟
  置黄钟正律外径五分为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得四分八厘五毫七丝六忽五微九纎为大吕
  置大吕正律外径四分八厘五毫七丝六忽五微九纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得四分七厘一毫九丝三忽七微一纎为太蔟
  置太蔟正律外径四分七厘一毫九丝三忽七微一纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得四分五厘八毫五丝○二微○为夹钟
  置夹钟正律外径四分五厘八毫五丝○二微○为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得四分四厘五毫四丝四忽九微三纎为姑洗
  置姑洗正律外径四分四厘五毫四丝四忽九微三纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得四分三厘二毫七丝六忽八微二纎为仲吕
  置仲吕正律外径四分三厘二毫七丝六忽八微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得四分二厘○四丝四忽八微二纎为蕤賔
  置防賔正律外径四分二厘○四丝四忽八微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得四分○八毫四丝七忽八微八纎为林钟
  置林钟正律外径四分○八毫四丝七忽八微八纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得三分九厘六毫八丝五忽○二纎为夷则
  置夷则正律外径三分九厘六毫八丝五忽○二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得三分八厘五毫五丝五忽二微七纎为南吕
  置南吕正律外径三分八厘五毫五丝五忽二防七纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得三分七厘四毫五丝七忽六微七纎为无射
  置无射正律外径三分七厘四毫五丝七忽六微七纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得三分六厘三毫九丝一忽三微二纎为应钟
  置应钟正律外径三分六厘三毫九丝一忽三微二纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得三分五厘三毫五丝五忽三微三纎为黄钟
  置黄钟半律外径三分五厘三毫五丝五忽三微三纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得三分四厘三毫四丝八忽八微四纎为大吕
  置大吕半律外径三分四厘三毫四丝八忽八微四纎为实以十亿乗之以十亿○二千九百三十万○二千二百三十六除之得三分三厘三毫七丝○九微九纎为太蔟