submodule/skia/tests/sksl/intrinsics/Modf.glsl

   1
   2 out vec4 sk_FragColor;
   3 uniform vec4 colorGreen;
   4 uniform vec4 colorRed;
   5 vec4 main() {
   6     vec4 value = vec4(2.5, -2.5, 8.0, -0.125);
   7     const vec4 expectedWhole = vec4(2.0, -2.0, 8.0, 0.0);
   8     const vec4 expectedFraction = vec4(0.5, -0.5, 0.0, -0.125);
   9     bvec4 ok = bvec4(false);
  10     vec4 whole;
  11     vec4 fraction;
  12     fraction.x = modf(value.x, whole.x);
  13     ok.x = whole.x == 2.0 && fraction.x == 0.5;
  14     fraction.xy = modf(value.xy, whole.xy);
  15     ok.y = whole.xy == vec2(2.0, -2.0) && fraction.xy == vec2(0.5, -0.5);
  16     fraction.xyz = modf(value.xyz, whole.xyz);
  17     ok.z = whole.xyz == vec3(2.0, -2.0, 8.0) && fraction.xyz == vec3(0.5, -0.5, 0.0);
  18     fraction = modf(value, whole);
  19     ok.w = whole == expectedWhole && fraction == expectedFraction;
  20     return all(ok) ? colorGreen : colorRed;
  21 }