wjcapehart

====> Installing Nio to the "PyNIO" site packages directory.
non-existing path in '': ''
running install
running build
running config_cc
unifing config_cc, config, build_clib, build_ext, build commands --compiler options
running config_fc
unifing config_fc, config, build_clib, build_ext, build commands --fcompiler options
running build_src
build_src

wjcapehart

program fnl_netcdf

    ! Takes two ascii fields of global data, Temp and Hgt @ 500 hPa
    !    And creates geostrophic u and v winds @ 500 hPa
    !
    ! These fields are written as a netcdf file

    ! Build Instructions
    !     compile with:
    !         gfortran -I${NETCDFINC} -L{NETCDFLIB} -lnetcdff make_netcdf.f90

wjcapehart

netcdf NGP_LOCA_tasmax_ACCESS1-0_r1i1p1_rcp45 {
dimensions:
	time = UNLIMITED ; // (34333 currently)
	bnds = 2 ;
	lat = 302 ;
	lon = 450 ;
variables:
	double lon_bnds(lon, bnds) ;
		lon_bnds:_ChunkSizes = 450, 2 ;
	double lon(lon) ;

wjcapehart

netcdf dods://kyrill.ias.sdsmt.edu:8080/thredds/dodsC/GHCN_POINT_DATA/GHCND-USW00024090__RAPID_CITY_REGIONAL_AIRPORT_SD.nc {
  dimensions:
    time = UNLIMITED;   // (25628 currently)
    bnds = 2;
    name_strlen = 49;
  variables:
    double time(time=25628);
      :units = "days since 1970-01-01 00:00:00";
      :long_name = "time";
      :calendar = "standard";

wjcapehart

netcdf gens003_UCONUS_ALL_2018-10-16_00.wrf_ci_turb {
dimensions:
	depth_below_surface_layer = 4 ;
	depth_below_surface_layer_bounds_1 = 2 ;
	ens = 21 ;
	height_above_ground = 1 ;
	height_above_ground1 = 1 ;
	isobaric = 26 ;
	isobaric1 = 25 ;
	isobaric2 = 21 ;

wjcapehart

program read_unidata2

      use wjc_units_conv_mod
      use wjc_wind_spd_dir_to_u_v_mod

      implicit none

      ! File Control

      integer, parameter :: MAXREC = 100

wjcapehart

program read_unidata2

      use wjc_units_conv_mod

      implicit none

      ! File Control

      integer, parameter :: MAXREC = 100

wjcapehart

program read_unidata2

      implicit none

      ! File Control

      integer, parameter :: MAXREC = 100

      character (len=180) :: directory
      character (len=180) :: filename

wjcapehart

program read_unidata2

      implicit none

      ! File Control

      integer, parameter :: MAXREC = 100

      character (len=180) :: directory
      character (len=180) :: filename

wjcapehart

program read_unidata

      implicit none

      character (len=180) :: directory
      character (len=180) :: filename

      character (len=  4) :: station_code

      integer :: yyyy