2 c Main program to call the python interface to zscore in a standalone mode
4 include "DIMENSIONS.ZSCOPT"
5 include "COMMON.WEIGHTS"
6 integer number_of_variables,i
7 common /patch/ number_of_variables
8 integer nvarr,iparm,comm /0/
9 double precision xrange(maxvar,2),x(maxvar),xmin(maxvar),fmin
10 call maxlik_init(nvarr,xrange,comm)
11 number_of_variables=nvarr
15 call maxlik_optim(x,xmin,fmin)