readme.txt

!file readme.txt 
!Kajsa Ljungberg 2003-07-13
!Supplementary information to optimize_direct.f90

Initiation routine:
subroutine OPT_DIRECT_INIT(dimensions,shift,int_dim,nchr,n_first,mp)

input parameters:

dimensions   integer 
	     number of QTL in model, 2 or 3

shift	     integer 
	     minimum distance between QTL on same chromosome

int_dim	     integer array with dimension(1:nchr)
	     length in cM of each chromosome

nchr	     integer 
	     number of chromosomes

n_first	     integer 
	     number of function evaluations to be performed
	     before intermediate  refinement step

mp	     integer 
	     total number of function evaluations to be performed



The main routine: 
subroutine OPT_DIRECT_RUN(fmin,coord_min)

output parameters:

fmin	     real(kind=REAL_KIND)
	     on return the minimum function value found
coord_min    real(kind=REAL_KIND), array
	     on return array with coordinares of minimum function value

Clean-up routine:
subroutine OPT_DIRECT_END()


Must be provided for OPT_DIRECT_RUN to work:

module object_function

including functions

function OBJECT_FUNCTION_EVALUATE_2D(coord(1:2))
function OBJECT_FUNCTION_EVALUATE_3D(coord(1:3))

Functions that return real(kind=REAL_KIND) value, objective function value
(squared norm of residual) at the coordinates coord(1:2) and coord(1:3)  

coord(1:3)   real(kind=REAL_KIND) array dimension(1:3)
	     global coordinates of location
coord(1:2)   real(kind=REAL_KIND) array dimension(1:2)
	     global coordinates of location

Included in optimize direct:


MODULE machine_parameters
  IMPLICIT NONE
  PUBLIC


  INTEGER, PARAMETER                                    ::  DBLE_KIND=8  
  INTEGER, PARAMETER                                    ::  REAL_KIND=8    !
  INTEGER, PARAMETER                                    ::  REAL_SKIND=4   !
  INTEGER, PARAMETER                                    ::  INT_KIND=8     !


END MODULE machine_parameters