Setup initial file structure
This commit is contained in:
16
Modules/ado/plus/p/polych_ll.ado
Normal file
16
Modules/ado/plus/p/polych_ll.ado
Normal file
@ -0,0 +1,16 @@
|
||||
pro def polych_ll
|
||||
version 8.1
|
||||
|
||||
args lf rho
|
||||
|
||||
#delimit ;
|
||||
qui replace __POLYpi =
|
||||
binorm(__POLY1hi,__POLY2hi,`rho') -
|
||||
binorm(__POLY1lo,__POLY2hi,`rho') -
|
||||
binorm(__POLY1hi,__POLY2lo,`rho') +
|
||||
binorm(__POLY1lo,__POLY2lo,`rho')
|
||||
;
|
||||
#delimit cr
|
||||
qui replace `lf' = ln( __POLYpi )
|
||||
|
||||
end
|
Reference in New Issue
Block a user