Fortran: Module Interface ncdf_river - (Source File: ncdf_rivers.F90)

INTERFACE:

    module ncdf_river

DESCRIPTION:

USES:

    use netcdf
    use time, only: string_to_julsecs,time_diff,add_secs
    use time, only: julianday,secondsofday,juln,secsn,timestep
    use time, only: write_time_string,timestr
    use rivers, only: nriver,river_data,river_name,river_flow,river_factor
    use rivers, only: ok,rriver,real_river_name,river_split
    use rivers, only: temp_missing,salt_missing
    use rivers, only: use_river_temp,use_river_salt,river_temp,river_salt
 #ifdef GETM_BIO
    use bio, only: bio_calc
    use bio_var, only: numc,var_names
    use rivers, only: river_bio
 #endif
 #ifdef _FABM_
    use getm_fabm, only: model,fabm_calc
    use rivers, only: river_fabm
 #endif
    IMPLICIT NONE
    private

PUBLIC MEMBER FUNCTIONS:

    public init_river_input_ncdf,get_river_data_ncdf
   !PRIVATE DATA MEMBERS:
    REALTYPE                            :: offset
    integer                             :: ncid,ndims,dims(2),unlimdimid,textr
    integer                             :: start(1),edges(1)
    integer                             :: timedim,time_id
    integer, allocatable                :: r_ids(:)
    integer, allocatable                :: salt_id(:)
    integer, allocatable                :: temp_id(:)
    integer, allocatable                :: r_salt(:)
    integer, allocatable                :: r_temp(:)
    REAL_4B, allocatable                :: river_times(:)
 #ifdef GETM_BIO
    integer, allocatable                :: bio_id(:,:)
 #endif
 #ifdef _FABM_
    integer, allocatable                :: fabm_id(:,:)
 #endif

REVISION HISTORY:

    Original author(s): Karsten Bolding & Hans Burchard