INTERFACE:
subroutine ncd_open(filename,mode,ncid,cstring,usepio)DESCRIPTION:
open netcdf file
ARGUMENTS:
implicit none character(len=*),intent(in) :: filename ! file to open integer ,intent(in) :: mode ! nf_create mode integer ,intent(out):: ncid ! netcdf file id character(len=*),intent(in) :: cstring ! comment string logical,optional,intent(in) :: usepio ! use pio libREVISION HISTORY:
LOCAL VARIABLES: