CMake: removing qpythia from the depedencies
[u/mrichter/AliRoot.git] / MICROCERN / ufill.F
CommitLineData
fe4da5cc 1*
2* $Id$
3*
fe4da5cc 4#include "kerngen/pilot.h"
5 SUBROUTINE UFILL (IV,JL,JR,ISTUFF)
6C
7C CERN PROGLIB# V300 UFILL .VERSION KERNFOR 1.0 710701
8C ORIG. 01/07/71 JZ
9C
10 DIMENSION IV(*)
11C
12 ITEXT=ISTUFF
13 DO 29 J=JL,JR
14 29 IV(J)=ITEXT
15 RETURN
16 END