0 0.5D0 0.0D0 0.0D0 0.5D0 0.005D0 300.0D0 0.0D0 0.0D0 0.0D0 0.0D0 0.0D0 0.0D0 0 0 2 0 4 100 100 100 1 101 0 200 0 0 RECALPR.F 101: READ (2,*) IREINT RECALPR.F 104: READ (2,*) DTIMEL,DTIMIO,DTIMUC RECALPR.F 105: READ (2,*) CMIX,WIDTH,TEMPSB RECALPR.F 107: READ (2,*) PEX(1) RECALPR.F 108: READ (2,*) PEX(2) RECALPR.F 109: READ (2,*) PEX(3) RECALPR.F 110: READ (2,*) PEX(4) RECALPR.F 111: READ (2,*) PEX(5) RECALPR.F 112: READ (2,*) PEX(6) RECALPR.F 151: READ (2,*) IPRE,ICAF,ICAR,IPCC,KBZTYP RECALPR.F 152: READ (2,*) IMDC,IMDIC,IOVEC,IRESC,ISTOP,ISTEL,ICOST,IOUT RECALPR.F 154: READ (2,*) KTPCC(ITYP)