(35S) HP35s - Medical applications

[mchris]

I continue on the CKD-EPI formula. In order to make the formula shorter (and a bit faster) I reuse the A (Age) register after consume its computation.
A: Age
C: Serum Creatinine (mg/dL)
S: Sex (1=male, 2=female)
R: Race (1=non African American, 2=African American)

141*0,993^A*((1+(C/(S*-0,2+1,1)►A)-abs(1-A))/2)^(S*0,082-0,493)*((1+(C/(S*-0,2+1,1)►A)+abs(1-A))/2)^-1,209*(S*0,018+0,982)*(R*0,159+0,841)