function [x,hs]=snctrlD ( Start, name, nY, nU, nP, nC, nPhs, objL, ...
		          npInt, phsPt, ytype, ctype, varbds, odecon, algcon )

iOpt = 3;
[x,hs] = ctmex ( iOpt, Start, name, nY, nU, nP, nC, nPhs, objL, ...
		 npInt, phsPt, ytype, ctype, varbds, odecon, algcon );