15-MAY-1996 17:11:04.65 From: KEKVAX::YOKOYA To: @CAIN CC: YOKOYA Dear CAIN collegues I found one more bug in CAIN2.0 In the files setvar.f and setvar2.f in the directory source/control/basic, you find the statements IF(KIND(N).EQ.1) THEN I1=12 I2=9 ELSE I1=9 I2=12 ENDIF (KIND(N) in the first line is KN in setvar2.f) The numbers must be replaced as 12--->11, 9--->8 Sorry for bothering you. Kaoru