www.pudn.com > laminar.rar > logic.inc, change:2000-11-23,size:241b


      COMMON /LOGIC/ LWRITE,LREAD,LTEST,LAXIS,LOUTS,LOUTE,
     *        LCAL(NFI),LTIME,LCONT,INIBC
      COMMON /TEXT/ TITLE
      LOGICAL LWRITE,LREAD,LTEST,LAXIS,LOUTS,LOUTE,LCAL,LTIME,
     *        LCONT,INIBC
      CHARACTER TITLE*50