RELATIONSHIP
 rel_for animal
 infile ='genea.prn'
 outfile='Pestgenea' [text]
 input
  animal  1  10
  m_p    11  10
  f_p    21  10
 undefined = '         0'

TRANSFORMATION
 treated_as_missing
  TOT none 99999 none
  FIT none 99999 none
 
DATA
 INFILE='SUPTOT8.prn'
 outfile='pestsuptot8fit' [text]
 INPUT
   TOT             0    1 10
   FID             0   11 10   
   FII             0   21 10
   FIT             0   31 10 
   OPTO            9   41 10
   OPmod           9   51 10 
   AE             26   61 10
   EF              4   71 10
   PERM1        1000   81 10
   PERM2        1000   91 10
   animal      60000  101 10

MODEL
  TOT = AE EF OPmod PERM1 animal
  FIT = AE EF OPmod PERM2 animal
 
VE
  1 0
  0 1

VG
  vg_for animal
  1 0
  0 1

  vg_for PERM
  1 0
  0 1

SOLVER
 IOD_GS animal 
 MAX_ITER=1000

PRINTOUT
   outfile='pTOSE.txt'