=============  c-n-f5   �i“à—e‚Íc-r-f2‚Æ“¯‚¶�CŠ¿ŽšŠé‹Æ–¼‚ð‰pŽšŠé‹Æ–¼‚É•Ï�X�j 
$$c // ˜AŒ‹�à–±ƒf�[ƒ^ƒZƒNƒVƒ‡ƒ“
$r        // ŠúŠÔŒÀ’èƒRƒ}ƒ“ƒh
2002.04,2003.03   //�š2002”N‚SŒŽ‚©‚ç2003”N‚RŒŽ  �VŠúŠÔŽw’è�i�¼—ï”N‚SŒ…•\‹L�j
$f        //�@�ˆ—�‘Î�ÛŠé‹Æƒtƒ‰ƒOƒRƒ}ƒ“ƒh
<g>==..(7103)17163    //�š‹ÆŽí‚ª“S�|‹Æ‚Ì“ÁŽê�|‚Ƀtƒ‰ƒOg
$n        // Šé‹Æ–¼ƒRƒ}ƒ“ƒh
lst,<g>,eng             //ƒtƒ‰ƒO‚‡‚ÌŠé‹Æ–¼‚̃ŠƒXƒg�o—Í�i‰pŽÐ–¼‚ðŠÜ‚Þ�Ú�׃ŠƒXƒg�j
:n1,<g>,eng             //ƒtƒ‰ƒO‚‡‚ÌŠé‹Æ‰pŽÐ–¼‚Ì�Å�‰‚̉pŽš‚S•¶Žš
:n2,<g>,eng             //ƒtƒ‰ƒO‚‡‚ÌŠé‹Æ‰pŽÐ–¼‚ÌŽŸ‚̉pŽš‚S•¶Žš
:n3,<g>,eng             //ƒtƒ‰ƒO‚‡‚ÌŠé‹Æ‰pŽÐ–¼‚Ì‚»‚ÌŽŸ‚̉pŽš‚S•¶Žš
$p        // Œ´�”’lƒvƒŠƒ“ƒgƒRƒ}ƒ“ƒh
....  �y�V�€”Ô3001�z  ”„�ã�‚�E‰c‹ÆŽû‰v
....  �y�V�€”Ô3006�z  ‰c‹Æ—˜‰v
....  �y�V�€”Ô3008�z  ŽóŽæ—˜‘§�EŠ„ˆø—¿�E—L‰¿�ØŒ”—˜‘§
....  �y�V�€”Ô3009�z  ŽóŽæ”z“–‹à
....  �y�V�€”Ô3016�z  Žx•¥—˜‘§�EŠ„ˆø—¿
....  �y�V�€”Ô3058�z  “–Šú—˜‰v
....  �y�V�€”Ô5056�z  �]‹Æˆõ�”�i’PˆÊ�F�l�j
....  �y�V�€”Ô1026�z  ˜AŒ‹Žq‰ïŽÐ�”�i’PˆÊ�FŽÐ�j
<g>,3001,3006,3008,3009,3016,3058,5056,1026
$c        // ƒNƒ�ƒXƒZƒNƒVƒ‡ƒ“�ì�¬ƒRƒ}ƒ“ƒh
flw,3001,<g>,sales            // ˜AŒ‹”„�ã�‚
flw*3008,<g>,interest income  // ˜AŒ‹ŽóŽæ—˜‘§�EŠ„ˆø—¿(4ƒJƒ‰ƒ€*‚ÍŒ‡‘ª’lƒ[ƒ�’uŠ·)
flw*3009,<g>,dividends income // ˜AŒ‹ŽóŽæ”z“–‹à(4ƒJƒ‰ƒ€*‚ÍŒ‡‘ª’lƒ[ƒ�’uŠ·)
flw*3016,<g>,interest cost    // ˜AŒ‹Žx•¥—˜‘§�EŠ„ˆø—¿(4ƒJƒ‰ƒ€*‚ÍŒ‡‘ª’lƒ[ƒ�’uŠ·)
==============  •Ï—Ê•ª�̓ZƒNƒVƒ‡ƒ“
$$v
$a      // •Ï—Ê‹L�†Š„“–ƒRƒ}ƒ“ƒh
n,:n1,<g>,eng
a,:n2,<g>,eng
m,:n3,<g>,eng
s,sales
r,interest income
d,dividends income
i,interest cost
$d     // •\Ž¦”͈̓Rƒ}ƒ“ƒh
all                // ‘S”͈Í
$t     // •Ï�”•ÏŠ·ƒRƒ}ƒ“ƒh
e=(r+d)            // ˜AŒ‹‹à—ZŽû‰v
c=(i-r-d)          // ˜AŒ‹�ƒ‹à—˜•‰’S
x=(i-r-d)/s*100    // ˜AŒ‹”„�ã�‚�ƒ‹à—˜•‰’S—¦
P=:ci(x)           // ŽU•z“_Ž¯•Ê•¶Žš•Ï—Ê
 =pr*(n,a,m,s,c,x,P)   // �”’lƒvƒŠƒ“ƒg
 =pr*(n,a,m,s,r,d,e,i) // �”’lƒvƒŠƒ“ƒg
....     ŠÖ�”log(x)=-log(s)+log(c)+log100=[-1,1,log100][log(s),log(c),1]'
F=(-1,1,log100)   // ‚ÌŒW�”ƒxƒNƒgƒ‹[-1,1,log100]
============== ƒOƒ‰ƒtƒZƒNƒVƒ‡ƒ“
$$g
$d    // •\Ž¦”͈͎wŽ¦ƒRƒ}ƒ“ƒh
all         // ‘S”͈Í
$p    // ƒvƒ�ƒbƒgƒRƒ}ƒ“ƒh
x,s    // ˜AŒ‹”„�ã�‚�ƒ‹à—˜•‰’S—¦‚˜‚ƘAŒ‹”„�ã�‚‚“‚ð•ÊƒXƒP�[ƒ‹
ei,s   // ˜AŒ‹‹à—ZŽû‰ve�C˜AŒ‹‹à—Z”ï—pi‚𓯈êƒXƒP�[ƒ‹�C˜AŒ‹”„�ã�‚s‚ð•ÊƒXƒP�[ƒ‹
$c    // ŽU•z�i‘ŠŠÖ�j�}ƒRƒ}ƒ“ƒh
c,s,*,P    // �cŽ²c�C‰¡Ž²s�C‰ñ‹A�ü*�CˆóŽš•Ï—Ê‚o
$3    // ‚RŽŸŒ³�}ƒRƒ}ƒ“ƒh
x*s*c*P,F,* // �cŽ²x(‘Î�”*),‰¡Ž²s(‘Î�”*),‰œ�sŽ²c(‘Î�”*),ˆóŽšP,ŠÖ�”F,�‡�¬•Û‘¶*
x,s,c,P,*   // �cŽ²x�C‰¡Ž²s�C‰œ�sŽ²c�CˆóŽšP�C�‡�¬•Û‘¶*
            // �‡�¬�}
============== �I—¹ƒZƒNƒVƒ‡ƒ“
$$