[NAGWare Gateway Generator] Copyright (c) 1993 by the Numerical Algorithms Group Ltd pdef(see also d03eef)
x real y real alpha real beta real gamma real delta real epslon real phi real psi real [alpha,beta,gamma,delta,epslon,phi,psi] = pdef(x,y) function [alpha,beta,gamma,delta,epslon,phi,psi] = pdef(x,y)