Fixing basepass light culling data

res/shaders/lib/Common.slang

@@ -12,15 +12,12 @@ struct ViewParameter
 layout(set = 0)
 ParameterBlock<ViewParameter> pViewParams;
 
- 
-// Convert screen space coordinates to view space.
-float4 screenToClip( float4 screen )
+float3 screenToClip(float3 screen)
 {
-    // Convert to normalized texture coordinates
     float2 texCoord = screen.xy / pViewParams.screenDimensions;
  
     // Convert to clip space 
-    return float4( float2( texCoord.x, 1.0f-texCoord.y ) * 2.0f - 1.0f, screen.z, screen.w );
+    return float3( float2( texCoord.x, 1.0f-texCoord.y ) * 2.0f - 1.0f, screen.z);
 }
 
 struct Plane

res/shaders/lib/LightEnv.slang

@@ -30,7 +30,7 @@ struct PointLight : ILightEnv
         float3 lightDir_TS = mul(params.tbn, lightDir_WS);
         float d = length(lightDir_TS);
         float illuminance = max(1 - d / colorRange.w, 0);
-        return illuminance * brdf.evaluate(params.tbn, params.viewDir_TS, normalize(lightDir_TS), colorRange.xyz);
+        return illuminance * brdf.evaluate(params.tbn, params.viewDir_TS, -normalize(lightDir_TS), colorRange.xyz);
     }
     float3 getClipPosition()
     {