Added RAM Metadata handling to FIML objectives.
[openmx:openmx.git] / R / MxRAMMetaData.R
1 #
2 #   Copyright 2007-2010 The OpenMx Project
3 #
4 #   Licensed under the Apache License, Version 2.0 (the "License");
5 #   you may not use this file except in compliance with the License.
6 #   You may obtain a copy of the License at
7
8 #        http://www.apache.org/licenses/LICENSE-2.0
9
10 #   Unless required by applicable law or agreed to in writing, software
11 #   distributed under the License is distributed on an "AS IS" BASIS,
12 #   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 #   See the License for the specific language governing permissions and
14 #   limitations under the License.
15
16 setClass(Class = "MxRAMMetaData",
17         representation = representation(
18                 A = "MxCharOrNumber",
19                 S = "MxCharOrNumber",
20                 F = "MxCharOrNumber",
21                 M = "MxCharOrNumber",
22                 depth = "integer"),
23         contains = "MxBaseObjectiveMetaData")
24
25 setMethod("initialize", "MxRAMMetaData",
26         function(.Object, A, S, F, M, depth) {
27                 .Object@A <- A
28                 .Object@S <- S
29                 .Object@F <- F
30                 .Object@M <- M
31                 .Object@depth <- depth
32                 return(.Object)
33         }
34 )
35
36