SUBROUTINE INI_NETDCF  Author  : Marc, 3l50
 Date    : April 2003
 Modified:

 -----------------------------------------------------------------
 What it does
 ============

 -----------------------------------------------------------------
 Structure of Routine
 ====================

 -----------------------------------------------------------------
 Program calls
 ====================

Called by Calls
none
setup_nc(mg,jg*nhem,nl,itime,
ininc(fname1(1:ifname1),
writedim(nc1,iddim1(1),xcoord)
writedim(nc1,iddim1(2),ycoord)
writedim(nc1,iddim1(3),zcoord)
writedim(nc1,iddim1(4),tcoord)
closenc(nc1)
writevar2(nc1,idvar1(3),lug,
writevar2(nc1,idvar1(4),ltg,

 -----------------------------------------------------------------
Return to IGCM home page