void drotm(long,double[],long,double[],long,double[]);

.