The following model declaration:
module X =
type Value = Value of int
type X = {
x : X.Value
}
generates the following lense implementation:
namespace MyProject.Domain.Lenses
// autogenerated with FSCSLensGenerator
open Aether
// autogenerated Aether.Lens-es for MyProject.Domain.Model.X
module X =
let x_ : Lens<MyProject.Domain.Model.X,MyProject.Domain.Model.XModule.Value> =
let getterDef = ( fun (x:MyProject.Domain.Model.X) -> x.x )
let setterDef = ( fun (xx:MyProject.Domain.Model.XModule.Value) (x:MyProject.Domain.Model.X) -> {x with x = xx } )
(getterDef,setterDef)
Which is fails to compile with The type "XModule" is not defined.
The following model declaration:
generates the following lense implementation:
Which is fails to compile with
The type "XModule" is not defined.