C LUJETS INTEGER N,K REAL P,V COMMON/LUJETS/N,K(4000,5),P(4000,5),V(4000,5)