COMMON/VSCR2/S15(IMX,KMXP),S14(IMX,KMXP),S13(IMX,KMXP), BS12(IMX,KMXP),S11(IMX,KMXP),S10(IMX,KMXP), AS9(IMX,KMXP),S8(IMX,KMXP),S7(IMX,KMXP), 1S6(IMX,KMXP),S5(IMX,KMXP),S4(IMX,KMXP), 2S3(IMX,KMXP),S2(IMX,KMXP),S1(IMX,KMXP),T1(IMX), 3T2(IMX),T3(IMX),T4(IMX),T5(IMX),T6(IMX),T7(IMX) 4,T8(IMX),T9(IMX)