error in passing a string

Hello,
    I use WRAPIT calling a fortran subroutine.
    In the code I will pass a file name,
------------------------------------------------
      subroutine prt_snd(z,......,ouf)
       character(len=16),intent(in) :: outf
        .......
       end subroutine prt_snd

C NCLFORTSTART
     subroutine prt_snd(z,.....,outf)
       ......
      character*16 outf
       ........
C NCLEND
------------------------------------
No error for using WRAPIT to get the .so file.

In my ncl code define
 outf="ARM_0003_snd.dat"

When callin subroutine
prt_snd90::prt_snd(z,......,outf)

   I have error
fatal:Number of elements of dimension (0) of argument (21) is (1) in function (prt_snd), expected (16) elements
Where is wrong?
Thanks for your help!
 Mingxuan

_______________________________________________
ncl-talk mailing list
List instructions, subscriber options, unsubscribe:
http://mailman.ucar.edu/mailman/listinfo/ncl-talk
Received on Tue Sep 21 12:00:52 2010