*file member=anxx_load_com library=snoman language=inc *file date=08:Nov:2004 <<< * ANxx: Mnemonics and common blocks. * Contact: M. Huang, Texas. * Revision History:- * ================ * 4.0196 A. Krumins First version. * 5.01 M. Huang prune un-used variables and fix a bug by adding * laanxx in common block * Link Access Block for titles bank ANXX. integer total_bad_tubes integer laanxx(8) , lanxx , ldanxx equivalence (laanxx(6) , lanxx) , (laanxx(7) , ldanxx) common /anxx_load_com/ + laanxx, total_bad_tubes *endfile member=anxx_load_com