'BEGIN'
    'ARRAY'
        A0(/1 : 10/), A1(/1 : 10/), A2(/1 : 10/), A3(/1 : 10/),
        A4(/1 : 10/), A5(/1 : 10/), A6(/1 : 10/), A7(/1 : 10/),
        A8(/1 : 10/), A9(/1 : 10/), A10(/1 : 10/), A11(/1 : 10/),
        A12(/1 : 10/), A13(/1 : 10/), A14(/1 : 10/), A15(/1 : 10/),
        A16(/1 : 10/), A17(/1 : 10/), A18(/1 : 10/), A19(/1 : 10/),
        A20(/1 : 10/), A21(/1 : 10/), A22(/1 : 10/), A23(/1 : 10/),
        A24(/1 : 10/), A25(/1 : 10/), A26(/1 : 10/), A27(/1 : 10/),
        A28(/1 : 10/), A29(/1 : 10/), A30(/1 : 10/), A31(/1 : 10/),
        A32(/1 : 10/), A33(/1 : 10/), A34(/1 : 10/), A35(/1 : 10/),
        A36(/1 : 10/), A37(/1 : 10/), A38(/1 : 10/), A39(/1 : 10/),
        A40(/1 : 10/), A41(/1 : 10/), A42(/1 : 10/), A43(/1 : 10/),
        A44(/1 : 10/), A45(/1 : 10/), A46(/1 : 10/), A47(/1 : 10/),
        A48(/1 : 10/), A49(/1 : 10/), A50(/1 : 10/), A51(/1 : 10/),
        A52(/1 : 10/), A53(/1 : 10/), A54(/1 : 10/), A55(/1 : 10/),
        A56(/1 : 10/), A57(/1 : 10/), A58(/1 : 10/), A59(/1 : 10/);
    A0(/1/):= 1.0;    A1(/1/):= 1.0;    A2(/1/):= 1.0;    A3(/1/):= 1.0;
    A4(/1/):= 1.0;    A5(/1/):= 1.0;    A6(/1/):= 1.0;    A7(/1/):= 1.0;
    A8(/1/):= 1.0;    A9(/1/):= 1.0;    A10(/1/):= 1.0;    A11(/1/):= 1.0;
    A12(/1/):= 1.0;    A13(/1/):= 1.0;    A14(/1/):= 1.0;    A15(/1/):= 1.0;
    A16(/1/):= 1.0;    A17(/1/):= 1.0;    A18(/1/):= 1.0;    A19(/1/):= 1.0;
    A20(/1/):= 1.0;    A21(/1/):= 1.0;    A22(/1/):= 1.0;    A23(/1/):= 1.0;
    A24(/1/):= 1.0;    A25(/1/):= 1.0;    A26(/1/):= 1.0;    A27(/1/):= 1.0;
    A28(/1/):= 1.0;    A29(/1/):= 1.0;    A30(/1/):= 1.0;    A31(/1/):= 1.0;
    A32(/1/):= 1.0;    A33(/1/):= 1.0;    A34(/1/):= 1.0;    A35(/1/):= 1.0;
    A36(/1/):= 1.0;    A37(/1/):= 1.0;    A38(/1/):= 1.0;    A39(/1/):= 1.0;
    A40(/1/):= 1.0;    A41(/1/):= 1.0;    A42(/1/):= 1.0;    A43(/1/):= 1.0;
    A44(/1/):= 1.0;    A45(/1/):= 1.0;    A46(/1/):= 1.0;    A47(/1/):= 1.0;
    A48(/1/):= 1.0;    A49(/1/):= 1.0;    A50(/1/):= 1.0;    A51(/1/):= 1.0;
    A52(/1/):= 1.0;    A53(/1/):= 1.0;    A54(/1/):= 1.0;    A55(/1/):= 1.0;
    A56(/1/):= 1.0;    A57(/1/):= 1.0;    A58(/1/):= 1.0;    A59(/1/):= 1.0;
    OUTREAL(99, A0(/1/)+ A1(/1/)+ A2(/1/)+ A3(/1/)+ A4(/1/)+ A5(/1/)+ A6(/1/)
        + A7(/1/)+ A8(/1/)+ A9(/1/)+ A10(/1/)+ A11(/1/)+ A12(/1/)+
        A13(/1/)+ A14(/1/)+ A15(/1/)+ A16(/1/)+ A17(/1/)+ A18(/1/)+
        A19(/1/)+ A20(/1/)+ A21(/1/)+ A22(/1/)+ A23(/1/)+ A24(/1/)+
        A25(/1/)+ A26(/1/)+ A27(/1/)+ A28(/1/)+ A29(/1/)+ A30(/1/)+
        A31(/1/)+ A32(/1/)+ A33(/1/)+ A34(/1/)+ A35(/1/)+ A36(/1/)+
        A37(/1/)+ A38(/1/)+ A39(/1/)+ A40(/1/)+ A41(/1/)+ A42(/1/)+
        A43(/1/)+ A44(/1/)+ A45(/1/)+ A46(/1/)+ A47(/1/)+ A48(/1/)+
        A49(/1/)+ A50(/1/)+ A51(/1/)+ A52(/1/)+ A53(/1/)+ A54(/1/)+
        A55(/1/)+ A56(/1/)+ A57(/1/)+ A58(/1/)+ A59(/1/));
'END'