      COMMON/BLK1S/RCZLX(JC,JP,JY,JX),RCPLX(JC,JP,JY,JX)
     2,RCCLX(JC,JP,JY,JX),WGLFX(JC,JP,JY,JX)
     3,WGLFNX(JC,JP,JY,JX),WGLFPX(JC,JP,JY,JX),ARLFZ(JC,JP,JY,JX)
     4,RCZSX(JC,JP,JY,JX),RCPSX(JC,JP,JY,JX),RCCSX(JC,JP,JY,JX)
     5,WGSHEX(JC,JP,JY,JX),WGSHNX(JC,JP,JY,JX)
     6,WGSHPX(JC,JP,JY,JX),HTSHEX(JC,JP,JY,JX)
     7,WTSTXB(JC,JP,JY,JX),WTSTXN(JC,JP,JY,JX),WTSTXP(JC,JP,JY,JX)
