! This file is generated by 'scripts/generate.py' using ! /src/xbeachlibrary/variables.def ! /src/xbeachlibrary/params.def ! src/xbeachlibray/templates/dispar.mako ! Advice: do not edit this file, but above mentioned files. call xmpi_bcast(par%useXBeachGSettings,toall) call xmpi_bcast(par%wavemodel,toall) call xmpi_bcast(par%wavemodel_str,toall) call xmpi_bcast(par%cyclic,toall) call xmpi_bcast(par%swave,toall) call xmpi_bcast(par%lwave,toall) call xmpi_bcast(par%flow,toall) call xmpi_bcast(par%sedtrans,toall) call xmpi_bcast(par%morphology,toall) call xmpi_bcast(par%avalanching,toall) call xmpi_bcast(par%nonh,toall) call xmpi_bcast(par%gwflow,toall) call xmpi_bcast(par%q3d,toall) call xmpi_bcast(par%swrunup,toall) call xmpi_bcast(par%ships,toall) call xmpi_bcast(par%vegetation,toall) call xmpi_bcast(par%snells,toall) call xmpi_bcast(par%single_dir,toall) call xmpi_bcast(par%bchwiz,toall) call xmpi_bcast(par%setbathy,toall) call xmpi_bcast(par%viscosity,toall) call xmpi_bcast(par%advection,toall) call xmpi_bcast(par%wind,toall) call xmpi_bcast(par%depfile,toall) call xmpi_bcast(par%posdwn,toall) call xmpi_bcast(par%nx,toall) call xmpi_bcast(par%ny,toall) call xmpi_bcast(par%nz,toall) call xmpi_bcast(par%alfa,toall) call xmpi_bcast(par%vardx,toall) call xmpi_bcast(par%dx,toall) call xmpi_bcast(par%dy,toall) call xmpi_bcast(par%xfile,toall) call xmpi_bcast(par%yfile,toall) call xmpi_bcast(par%xori,toall) call xmpi_bcast(par%yori,toall) call xmpi_bcast(par%thetamin,toall) call xmpi_bcast(par%thetamax,toall) call xmpi_bcast(par%dtheta,toall) call xmpi_bcast(par%dtheta_s,toall) call xmpi_bcast(par%thetanaut,toall) call xmpi_bcast(par%gridform,toall) call xmpi_bcast(par%xyfile,toall) call xmpi_bcast(par%gridform_str,toall) call xmpi_bcast(par%tstop,toall) call xmpi_bcast(par%CFL,toall) call xmpi_bcast(par%dtset,toall) call xmpi_bcast(par%defuse,toall) call xmpi_bcast(par%maxdtfac,toall) call xmpi_bcast(par%tunits,toall) call xmpi_bcast(par%g,toall) call xmpi_bcast(par%rho,toall) call xmpi_bcast(par%depthscale,toall) call xmpi_bcast(par%zs0,toall) call xmpi_bcast(par%zsinitfile,toall) call xmpi_bcast(par%hotstartflow,toall) call xmpi_bcast(par%wbctype,toall) call xmpi_bcast(par%wbctype_str,toall) call xmpi_bcast(par%instat,toall) call xmpi_bcast(par%instat_str,toall) call xmpi_bcast(par%taper,toall) call xmpi_bcast(par%Hrms,toall) call xmpi_bcast(par%Tm01,toall) call xmpi_bcast(par%Trep,toall) call xmpi_bcast(par%Tlong,toall) call xmpi_bcast(par%dir0,toall) call xmpi_bcast(par%nmax,toall) call xmpi_bcast(par%m,toall) call xmpi_bcast(par%lateralwave,toall) call xmpi_bcast(par%lateralwave_str,toall) call xmpi_bcast(par%leftwave,toall) call xmpi_bcast(par%leftwave_str,toall) call xmpi_bcast(par%rightwave,toall) call xmpi_bcast(par%rightwave_str,toall) call xmpi_bcast(par%bclwonly,toall) call xmpi_bcast(par%Sfold,toall) call xmpi_bcast(par%bcfile,toall) call xmpi_bcast(par%random,toall) call xmpi_bcast(par%fcutoff,toall) call xmpi_bcast(par%nspr,toall) call xmpi_bcast(par%trepfac,toall) call xmpi_bcast(par%sprdthr,toall) call xmpi_bcast(par%correctHm0,toall) call xmpi_bcast(par%Tm01switch,toall) call xmpi_bcast(par%rt,toall) call xmpi_bcast(par%dtbc,toall) call xmpi_bcast(par%dthetaS_XB,toall) call xmpi_bcast(par%nspectrumloc,toall) call xmpi_bcast(par%wbcversion,toall) call xmpi_bcast(par%nonhspectrum,toall) call xmpi_bcast(par%front,toall) call xmpi_bcast(par%front_str,toall) call xmpi_bcast(par%left,toall) call xmpi_bcast(par%left_str,toall) call xmpi_bcast(par%right,toall) call xmpi_bcast(par%right_str,toall) call xmpi_bcast(par%back,toall) call xmpi_bcast(par%back_str,toall) call xmpi_bcast(par%ARC,toall) call xmpi_bcast(par%order,toall) call xmpi_bcast(par%highcomp,toall) call xmpi_bcast(par%freewave,toall) call xmpi_bcast(par%epsi,toall) call xmpi_bcast(par%nc,toall) call xmpi_bcast(par%tidetype,toall) call xmpi_bcast(par%tidetype_str,toall) call xmpi_bcast(par%zs0file,toall) call xmpi_bcast(par%tideloc,toall) call xmpi_bcast(par%paulrevere,toall) call xmpi_bcast(par%paulrevere_str,toall) call xmpi_bcast(par%ndischarge,toall) call xmpi_bcast(par%ntdischarge,toall) call xmpi_bcast(par%disch_loc_file,toall) call xmpi_bcast(par%disch_timeseries_file,toall) call xmpi_bcast(par%break,toall) call xmpi_bcast(par%break_str,toall) call xmpi_bcast(par%gamma,toall) call xmpi_bcast(par%gamma2,toall) call xmpi_bcast(par%alpha,toall) call xmpi_bcast(par%n,toall) call xmpi_bcast(par%gammax,toall) call xmpi_bcast(par%delta,toall) call xmpi_bcast(par%wavfriccoef,toall) call xmpi_bcast(par%wavfricfile,toall) call xmpi_bcast(par%fwcutoff,toall) call xmpi_bcast(par%breakerdelay,toall) call xmpi_bcast(par%shoaldelay,toall) call xmpi_bcast(par%facsd,toall) call xmpi_bcast(par%facrun,toall) call xmpi_bcast(par%roller,toall) call xmpi_bcast(par%beta,toall) call xmpi_bcast(par%rfb,toall) call xmpi_bcast(par%wci,toall) call xmpi_bcast(par%hwci,toall) call xmpi_bcast(par%hwcimax,toall) call xmpi_bcast(par%cats,toall) call xmpi_bcast(par%bedfriction,toall) call xmpi_bcast(par%bedfriction_str,toall) call xmpi_bcast(par%bedfriccoef,toall) call xmpi_bcast(par%bedfricfile,toall) call xmpi_bcast(par%dynamrough,toall) call xmpi_bcast(par%dstem,toall) call xmpi_bcast(par%droot,toall) call xmpi_bcast(par%maxcf,toall) call xmpi_bcast(par%nuh,toall) call xmpi_bcast(par%nuhfac,toall) call xmpi_bcast(par%nuhv,toall) call xmpi_bcast(par%smag,toall) call xmpi_bcast(par%friction_infiltration,toall) call xmpi_bcast(par%friction_turbulence,toall) call xmpi_bcast(par%friction_acceleration,toall) call xmpi_bcast(par%friction_acceleration_str,toall) call xmpi_bcast(par%gamma_turb,toall) call xmpi_bcast(par%wearth,toall) call xmpi_bcast(par%lat,toall) call xmpi_bcast(par%rhoa,toall) call xmpi_bcast(par%Cd,toall) call xmpi_bcast(par%windv,toall) call xmpi_bcast(par%windth,toall) call xmpi_bcast(par%windfile,toall) call xmpi_bcast(par%kx,toall) call xmpi_bcast(par%ky,toall) call xmpi_bcast(par%kz,toall) call xmpi_bcast(par%dwetlayer,toall) call xmpi_bcast(par%aquiferbot,toall) call xmpi_bcast(par%aquiferbotfile,toall) call xmpi_bcast(par%gw0,toall) call xmpi_bcast(par%gw0file,toall) call xmpi_bcast(par%gwnonh,toall) call xmpi_bcast(par%gwfastsolve,toall) call xmpi_bcast(par%gwscheme,toall) call xmpi_bcast(par%gwscheme_str,toall) call xmpi_bcast(par%gwReturb,toall) call xmpi_bcast(par%gwheadmodel,toall) call xmpi_bcast(par%gwheadmodel_str,toall) call xmpi_bcast(par%gwhorinfil,toall) call xmpi_bcast(par%vonkar,toall) call xmpi_bcast(par%vicmol,toall) call xmpi_bcast(par%kmax,toall) call xmpi_bcast(par%sigfac,toall) call xmpi_bcast(par%deltar,toall) call xmpi_bcast(par%rwave,toall) call xmpi_bcast(par%solver,toall) call xmpi_bcast(par%solver_str,toall) call xmpi_bcast(par%solver_maxit,toall) call xmpi_bcast(par%solver_acc,toall) call xmpi_bcast(par%solver_urelax,toall) call xmpi_bcast(par%kdmin,toall) call xmpi_bcast(par%dispc,toall) call xmpi_bcast(par%Topt,toall) call xmpi_bcast(par%nhbreaker,toall) call xmpi_bcast(par%breakviscfac,toall) call xmpi_bcast(par%maxbrsteep,toall) call xmpi_bcast(par%secbrsteep,toall) call xmpi_bcast(par%reformsteep,toall) call xmpi_bcast(par%breakvisclen,toall) call xmpi_bcast(par%nonhq3d,toall) call xmpi_bcast(par%nhlay,toall) call xmpi_bcast(par%rhos,toall) call xmpi_bcast(par%ngd,toall) call xmpi_bcast(par%nd,toall) call xmpi_bcast(par%dzg1,toall) call xmpi_bcast(par%dzg2,toall) call xmpi_bcast(par%dzg3,toall) call xmpi_bcast(par%por,toall) call xmpi_bcast(par%D15,toall) call xmpi_bcast(par%D50,toall) call xmpi_bcast(par%D90,toall) call xmpi_bcast(par%ws,toall) call xmpi_bcast(par%sedcal,toall) call xmpi_bcast(par%ucrcal,toall) call xmpi_bcast(par%waveform,toall) call xmpi_bcast(par%waveform_str,toall) call xmpi_bcast(par%form,toall) call xmpi_bcast(par%form_str,toall) call xmpi_bcast(par%sws,toall) call xmpi_bcast(par%lws,toall) call xmpi_bcast(par%BRfac,toall) call xmpi_bcast(par%facsl,toall) call xmpi_bcast(par%z0,toall) call xmpi_bcast(par%smax,toall) call xmpi_bcast(par%tsfac,toall) call xmpi_bcast(par%facua,toall) call xmpi_bcast(par%facSk,toall) call xmpi_bcast(par%facAs,toall) call xmpi_bcast(par%turbadv,toall) call xmpi_bcast(par%turbadv_str,toall) call xmpi_bcast(par%turb,toall) call xmpi_bcast(par%turb_str,toall) call xmpi_bcast(par%Tbfac,toall) call xmpi_bcast(par%Tsmin,toall) call xmpi_bcast(par%lwt,toall) call xmpi_bcast(par%betad,toall) call xmpi_bcast(par%swtable,toall) call xmpi_bcast(par%sus,toall) call xmpi_bcast(par%bed,toall) call xmpi_bcast(par%bulk,toall) call xmpi_bcast(par%facDc,toall) call xmpi_bcast(par%jetfac,toall) call xmpi_bcast(par%fallvelred,toall) call xmpi_bcast(par%dilatancy,toall) call xmpi_bcast(par%rheeA,toall) call xmpi_bcast(par%pormax,toall) call xmpi_bcast(par%reposeangle,toall) call xmpi_bcast(par%bdslpeffmag,toall) call xmpi_bcast(par%bdslpeffini,toall) call xmpi_bcast(par%bdslpeffdir,toall) call xmpi_bcast(par%bdslpeffdirfac,toall) call xmpi_bcast(par%ci,toall) call xmpi_bcast(par%phit,toall) call xmpi_bcast(par%incldzdx,toall) call xmpi_bcast(par%inclrelweight,toall) call xmpi_bcast(par%streaming,toall) call xmpi_bcast(par%uprushfac,toall) call xmpi_bcast(par%backwashfac,toall) call xmpi_bcast(par%yturb,toall) call xmpi_bcast(par%facthr,toall) call xmpi_bcast(par%sedfricfac,toall) call xmpi_bcast(par%sedfricfac_str,toall) call xmpi_bcast(par%Arms,toall) call xmpi_bcast(par%Ctrans,toall) call xmpi_bcast(par%slopecorr,toall) call xmpi_bcast(par%slopecorr_str,toall) call xmpi_bcast(par%fsed,toall) call xmpi_bcast(par%phaselag,toall) call xmpi_bcast(par%thetcr,toall) call xmpi_bcast(par%bermslopetransport,toall) call xmpi_bcast(par%bermslopebed,toall) call xmpi_bcast(par%bermslopesus,toall) call xmpi_bcast(par%bermslope,toall) call xmpi_bcast(par%bermslopefac,toall) call xmpi_bcast(par%bermslopegamma,toall) call xmpi_bcast(par%bermslopedepth,toall) call xmpi_bcast(par%alfaD50,toall) call xmpi_bcast(par%morfac,toall) call xmpi_bcast(par%morfacopt,toall) call xmpi_bcast(par%morstart,toall) call xmpi_bcast(par%morstop,toall) call xmpi_bcast(par%wetslp,toall) call xmpi_bcast(par%dryslp,toall) call xmpi_bcast(par%lsgrad,toall) call xmpi_bcast(par%hswitch,toall) call xmpi_bcast(par%dzmax,toall) call xmpi_bcast(par%struct,toall) call xmpi_bcast(par%ne_layer,toall) call xmpi_bcast(par%timings,toall) call xmpi_bcast(par%tstart,toall) call xmpi_bcast(par%tint,toall) call xmpi_bcast(par%tintg,toall) call xmpi_bcast(par%tintp,toall) call xmpi_bcast(par%tintc,toall) call xmpi_bcast(par%tintm,toall) call xmpi_bcast(par%tsglobal,toall) call xmpi_bcast(par%tspoints,toall) call xmpi_bcast(par%tsmean,toall) call xmpi_bcast(par%nglobalvar,toall) call xmpi_bcast(par%globalvars,toall) call xmpi_bcast(par%nmeanvar,toall) call xmpi_bcast(par%meanvars,toall) call xmpi_bcast(par%npointvar,toall) call xmpi_bcast(par%pointvars,toall) call xmpi_bcast(par%npoints,toall) call xmpi_bcast(par%nrugauge,toall) ! start special treatment of par%pointtypes if (xmaster) then if ( .not. allocated(par%pointtypes)) then allocate(par%pointtypes(0)) endif nwork = size(par%pointtypes) endif call xmpi_bcast(nwork,toall) if ( .not. xmaster) then if (allocated(par%pointtypes)) deallocate(par%pointtypes) allocate(par%pointtypes(nwork)) endif ! end special treatment of par%pointtypes call xmpi_bcast(par%pointtypes,toall) ! start special treatment of par%xpointsw if (xmaster) then if ( .not. allocated(par%xpointsw)) then allocate(par%xpointsw(0)) endif nwork = size(par%xpointsw) endif call xmpi_bcast(nwork,toall) if ( .not. xmaster) then if (allocated(par%xpointsw)) deallocate(par%xpointsw) allocate(par%xpointsw(nwork)) endif ! end special treatment of par%xpointsw call xmpi_bcast(par%xpointsw,toall) ! start special treatment of par%ypointsw if (xmaster) then if ( .not. allocated(par%ypointsw)) then allocate(par%ypointsw(0)) endif nwork = size(par%ypointsw) endif call xmpi_bcast(nwork,toall) if ( .not. xmaster) then if (allocated(par%ypointsw)) deallocate(par%ypointsw) allocate(par%ypointsw(nwork)) endif ! end special treatment of par%ypointsw call xmpi_bcast(par%ypointsw,toall) call xmpi_bcast(par%nrugdepth,toall) call xmpi_bcast(par%rugdepth,toall) call xmpi_bcast(par%outputformat,toall) call xmpi_bcast(par%outputformat_str,toall) call xmpi_bcast(par%ncfilename,toall) call xmpi_bcast(par%outputprecision,toall) call xmpi_bcast(par%outputprecision_str,toall) call xmpi_bcast(par%stationid,toall) call xmpi_bcast(par%projection,toall) call xmpi_bcast(par%rotate,toall) call xmpi_bcast(par%remdryoutput,toall) call xmpi_bcast(par%ndrifter,toall) call xmpi_bcast(par%drifterfile,toall) call xmpi_bcast(par%shipfile,toall) call xmpi_bcast(par%nship,toall) call xmpi_bcast(par%veggiefile,toall) call xmpi_bcast(par%veggiemapfile,toall) call xmpi_bcast(par%nveg,toall) call xmpi_bcast(par%vegnonlin,toall) call xmpi_bcast(par%vegcanflo,toall) call xmpi_bcast(par%veguntow,toall) call xmpi_bcast(par%porcanflow,toall) call xmpi_bcast(par%Kp,toall) call xmpi_bcast(par%Cm,toall) call xmpi_bcast(par%scheme,toall) call xmpi_bcast(par%scheme_str,toall) call xmpi_bcast(par%wavint,toall) call xmpi_bcast(par%maxerror,toall) call xmpi_bcast(par%maxerror_angle,toall) call xmpi_bcast(par%maxiter,toall) call xmpi_bcast(par%swkhmin,toall) call xmpi_bcast(par%eps,toall) call xmpi_bcast(par%eps_sd,toall) call xmpi_bcast(par%umin,toall) call xmpi_bcast(par%hmin,toall) call xmpi_bcast(par%secorder,toall) call xmpi_bcast(par%oldhu,toall) call xmpi_bcast(par%thetanum,toall) call xmpi_bcast(par%sourcesink,toall) call xmpi_bcast(par%cmax,toall) call xmpi_bcast(par%frac_dz,toall) call xmpi_bcast(par%nd_var,toall) call xmpi_bcast(par%split,toall) call xmpi_bcast(par%merge,toall) call xmpi_bcast(par%nsetbathy,toall) call xmpi_bcast(par%setbathyfile,toall) call xmpi_bcast(par%mpiboundary,toall) call xmpi_bcast(par%mpiboundary_str,toall) call xmpi_bcast(par%mmpi,toall) call xmpi_bcast(par%nmpi,toall) call xmpi_bcast(par%inner_lowx,toall) call xmpi_bcast(par%inner_highx,toall) call xmpi_bcast(par%inner_lowy,toall) call xmpi_bcast(par%inner_highy,toall) call xmpi_bcast(par%rhog8,toall) call xmpi_bcast(par%dt,toall) call xmpi_bcast(par%t,toall) call xmpi_bcast(par%tnext,toall) ! vim: filetype=fortran