4 calls to
RINIT

CONDSE
INPUT
INPUT
INPUT