1c 2c $Id$ 3c 4 double precision ga, gb, gc, gd, sa, sb, sc, sd 5 double precision pa, pb, pc, pd, gab, gcd 6 common /ginf/ ga,gb,gc,gd,sa,sb,sc,sd,pa,pb,pc,pd,gab,gcd 7c 8