! c_pog.h ! ! common pour position du satellite et geometrie du radiometre integer nbcanmax parameter (nbcanmax=4) double precision rfalt,rsat,rflat,rflon,satlon double precision radpix,deltapx(nbcanmax), > radlin,deltaln(nbcanmax) integer nbcan character nomcan(nbcanmax) integer nbpix(nbcanmax),nblin(nbcanmax) integer lpsi common/geosat/rfalt,rsat,rflat,rflon,satlon common/geocan/nbcan,nomcan, > radpix,deltapx, > radlin,deltaln, > nbpix,nblin,lpsi