Two Trait Analysis
 Anim 300 !P 
 Sire 300 !P 
 Dam 300 !P
 Day 
 Generation * !I
 Gender * !A 
 Week  
 Weight  !/10
 day !=V4 !/365
M42.dat !SKIP 1 # Pedigree file
M42_rr.dat !SKIP 1 !MAXIT 100 #Data file
!SPLINE spl(Week,3) 2 8 12
Weight ~ fac(Week).Generation*Gender fac(Week).Generation.day   ,
  !r   ![ Anim Week.Anim !] spl(Week,3).Anim  ![ ide(Anim) Week.ide(Anim) !],
   spl(Week,3).ide(Anim) !f mv
1 2 4
386 0 IDEN
6 0 DIAG 1 2 3 4 5 6 !S2==1 !GP
Anim 2
2 Week US !GP !+3
16 
9 6 
419 0 AINV
spl(Week,3).Anim 1
0 0 AINV 1 !GP
ide(Anim) 2
2 Week US !GP !+3
1 
0 1
419 0 I
spl(Week,3).ide(Anim) 1
0 0 I 1