data
MyData
=
MyData
{
a
::
Int
,
b
::
Int
,
c
::
Int
}
deriving
(
Show
)
def
=
MyData
1
2
3
makeMyData
::
Int
->
Int
->
MyData
makeMyData a
' b'
=
def
{
a
=
a
', b = b'
}
myData1
=
(
makeMyData
9
10
)
{
a
=
1
}
myData2
=
(
makeMyData
11
12
)
{
c
=
12
}