Re: Questions on WRAPIT command

Your code does not have the required
NCL delimiters:
     C NCLFORTSTART
     C NCLEND
These apprear before and after the subroutine
declaration and dimension information.

see: http://www.ncl.ucar.edu/Document/Tools/WRAPIT.shtml

=================
%> cat LuWu.f

C NCLFORTSTART
       SUBROUTINE computeone(N,X,Y,Z)
       REAL X(N),Y(N),Z(N)
C NCLEND
       DO 10 I=1,N
         Z(I) = X(I)+Y(I)
10 CONTINUE
       RETURN
       END
-----------------------

/%> WRAPIT LuWu.f

WRAPIT Version: 120209
COMPILING LuWu.f
LINKING
END WRAPIT

On 12/13/12 10:05 AM, Lu, Xu wrote:
> SUBROUTINE computeone(N,X,Y,Z)
> REAL X(N),Y(N),Z(N)
> DO 10 I=1,N
> Z(I) = X(I)+Y(I)
> 10 CONTINUE
> RETURN
> END
_______________________________________________
ncl-talk mailing list
List instructions, subscriber options, unsubscribe:
http://mailman.ucar.edu/mailman/listinfo/ncl-talk
Received on Thu Dec 13 10:49:27 2012