aix平台c语言调用fortran库文件的编译文件

stronggirl

aix下有一个fortran库文件，我写了一个c语言程序调用fortran库文件中的函数，但是同样的程序在linux下没有问题，aix环境下要怎么修改呢，请高手指教。


      bus012_(&length, kbuff , ksup, ksec0, ksec1, ksec2,  &kerr) ;
      buprs0_(ksec0);
      buprs1_(ksec1);

      if (ksup[5] > 1)
        kelem = kvals/ksup[5];
      else
        kelem = KELEM;

      if ( kelem > KELEM ) kelem = KELEM;
      kerr = 0;
      bufrex_(&length,(long *)kbuff,ksup,ksec0,ksec1,ksec2,ksec3,ksec4,
              &kelem,(char **)cnames,(char **)cunits,&kvals,
              values,(char **)cvals,&kerr);
      if ( kerr )
        {
          kerr = 0;
        }

      buukey_(ksec1,ksec2,key,ksup,&kerr);

      busel_(&ktdlen,ktdlst,&ktdexl,ktdexp,&kerr);
      buprs3_(ksec3,&ktdlen,ktdlst,&ktdexl,ktdexp,&kelem,(char **)cnames);

      icode = 0;
      current_ss = 1;
      buprt_(&icode,&current_ss,&current_ss,&kelem,(char **)cnames,
                         (char **)cunits,(char **)cvals,
                         &kvals,values,ksup,ksec1,&kerr);