Miroirs/newrpl
1
0
Fork 0
mirror of https://git.code.sf.net/p/newrpl/sources synced 2024-11-16 19:51:25 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge branch 'master' of ssh://git.code.sf.net/p/newrpl/sources

Browse source
This commit is contained in:
claudiol 2017-09-21 17:22:41 -04:00
commit a4db59a552
2 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
newrpl/rpl-objects/lib-54.nrpl
View file

@ -71,7 +71,7 @@ ULIST
1_fath
1_ftUS
1_mil
1_μ
1_µ
1_Å
1_fermi
{ { "Units" 1 } :: #03600000h TMENULST ; }
@ -198,6 +198,7 @@ ULIST
@#name unitmenu_9_energy
{
1_J
1_kW*h
1_erg
1_Kcal
1_cal

6
newrpl/units.c
View file

@ -88,7 +88,7 @@ const WORD const system_unit_names[]={
MKPROLOG(DOIDENTSIPREFIX,1),TEXT2WORD('l','m', 0 , 0 ), // [153]='lm' (lumen)
MKPROLOG(DOIDENTSIPREFIX,1),TEXT2WORD('l','x', 0 , 0 ), // [155]='lx' (lux)
MKPROLOG(DOIDENT,1),TEXT2WORD('l','y','r', 0 ), // [157]='lyr' (light year)
MKPROLOG(DOIDENT,1),TEXT2WORD(0xce,0xbc, 0 , 0 ), // [159]='μ' (micron)
MKPROLOG(DOIDENT,1),TEXT2WORD(0xc2,0xb5, 0 , 0 ), // [159]='µ' (micron)
MKPROLOG(DOIDENT,1),TEXT2WORD('m','h','o', 0 ), // [161]='mho'
MKPROLOG(DOIDENT,1),TEXT2WORD('m','i', 0 , 0 ), // [163]='mi'
MKPROLOG(DOIDENT,1),TEXT2WORD('m','i','l', 0 ), // [165]='mil' (mils)
@ -562,7 +562,7 @@ const WORD const system_unit_defs[]={
0,0,
//[593]='μ' (micron)
//[593]='µ' (micron)
MKPROLOG(DOUNIT,5),
MAKESINT(1),
MKPROLOG(DOIDENT,1),TEXT2WORD(0xc2,0xb5,'m',0),MAKESINT(1),MAKESINT(1),
@ -1058,7 +1058,7 @@ const WORDPTR const system_unit_dir[]={
(WORDPTR)&system_unit_names[153],(WORDPTR)&system_unit_defs[555], // 'lm'=1_cd*sr
(WORDPTR)&system_unit_names[155],(WORDPTR)&system_unit_defs[565], // 'lx'=1_lm*m^2
(WORDPTR)&system_unit_names[157],(WORDPTR)&system_unit_defs[575], // 'lyr'=365.25_d*c
(WORDPTR)&system_unit_names[159],(WORDPTR)&system_unit_defs[593], // 'μ'=1_μm
(WORDPTR)&system_unit_names[159],(WORDPTR)&system_unit_defs[593], // 'µ'=1_µm
(WORDPTR)&system_unit_names[161],(WORDPTR)&system_unit_defs[599], // 'mho'=1_A/V
(WORDPTR)&system_unit_names[163],(WORDPTR)&system_unit_defs[609], // 'mi'=5280_ft
(WORDPTR)&system_unit_names[165],(WORDPTR)&system_unit_defs[615], // 'mil'=0.001_in