Re: chars and f77

From: Dennis Shea (shea AT XXXXXX)
Date: Fri Jul 30 2004 - 11:04:31 MDT

  • Next message: David B. Reusch: "Lambert conformal and lat/long grid"

    oops ... an ommission on my previous post

    >
    >[5] NCL strings [is this not what u really mean] passed to
    > f77 code. It is basically the reverse of [4]
    >
    > NCL: sString = new ( 1000, "string")
    > : ; fill strings
    > fname = "WhatEver"
    > asciiwrite (fname, sString)

               MYMOD::josh(...,fname,...)
    >
    > system("/bin/rm "+fname)
    >
    > f77:
    > C NCLFORTSTART
    > subroutine josh(...,fname,...)
    > character*(*) fname
    > character*14 chrstr(1000)
    > C NCLEND
    > open (11,file=fname)
    > do n=1,1000
    > read(11,"(a)") chrstr(n)
    > end do

    _______________________________________________
    ncl-talk mailing list
    ncl-talk AT ucar.edu
    http://mailman.ucar.edu/mailman/listinfo/ncl-talk



    This archive was generated by hypermail 2b29 : Fri Jul 30 2004 - 13:13:25 MDT