1 // Dca' = 2.Sca < Sa ?

     2 //        Dca.(Sa - (1 - Dca/Da).(2.Sca - Sa)) + Sca.(1 - Da) + Dca.(1 - Sa) :

     3 //          (8.Dca <= Da ?

     4 //           Dca.(Sa - (1 - Dca/Da).(2.Sca - Sa).(3 - 8.Dca/Da)) + Sca.(1 - Da) + Dca.(1 - Sa) :

     5 //           (Dca.Sa + ((Dca/Da)^(0.5).Da - Dca).(2.Sca - Sa)) + Sca.(1 - Da) + Dca.(1 - Sa))

     6 // Da'  = Sa + Da - Sa.Da 

     7 vec4 composite(vec4 src, vec4 dst)

     8 {

     9     vec4 result;

    10     float da = max(dst.a, 0.00001);

    11     result.rgb = mix(dst.rgb * (src.a - (1.0 - dst.rgb / da) * (2.0 * src.rgb - src.a)),

    12                      mix(dst.rgb * (src.a - (1.0 - dst.rgb / da) * (2.0 * src.rgb - src.a) * (3.0 - 8.0 * dst.rgb / da)),

    13                          (dst.rgb * src.a + (sqrt(dst.rgb / da) * dst.a - dst.rgb) * (2.0 * src.rgb - src.a)),

    14                          step(dst.a, 8.0 * dst.rgb)),

    15                      step(src.a, 2.0 * src.rgb)) + src.rgb * (1.0 - dst.a) + dst.rgb * (1.0 - src.a);

    16     result.a = src.a + dst.a - src.a * dst.a;

    17     return result;

    18 }