lidar_optics Subroutine

public subroutine lidar_optics(npoints, ncolumns, nlev, npart, ice_type, lidar_freq, lground, q_lsliq, q_lsice, q_cvliq, q_cvice, ls_radliq, ls_radice, cv_radliq, cv_radice, pres, presf, temp, beta_mol, betatot, tau_mol, tautot, tautot_S_liq, tautot_S_ice, betatot_ice, betatot_liq, tautot_ice, tautot_liq)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: npoints
integer, intent(in) :: ncolumns
integer, intent(in) :: nlev
integer, intent(in) :: npart
integer, intent(in) :: ice_type
integer, intent(in) :: lidar_freq
logical, intent(in) :: lground
real(kind=WP), intent(in), dimension(npoints,ncolumns,nlev) :: q_lsliq
real(kind=WP), intent(in), dimension(npoints,ncolumns,nlev) :: q_lsice
real(kind=WP), intent(in), dimension(npoints,ncolumns,nlev) :: q_cvliq
real(kind=WP), intent(in), dimension(npoints,ncolumns,nlev) :: q_cvice
real(kind=WP), intent(in), dimension(npoints,nlev) :: ls_radliq
real(kind=WP), intent(in), dimension(npoints,nlev) :: ls_radice
real(kind=WP), intent(in), dimension(npoints,nlev) :: cv_radliq
real(kind=WP), intent(in), dimension(npoints,nlev) :: cv_radice
real(kind=WP), intent(in), dimension(npoints,nlev) :: pres
real(kind=WP), intent(in), dimension(npoints,nlev+1) :: presf
real(kind=WP), intent(in), dimension(npoints,nlev) :: temp
real(kind=WP), intent(out), dimension(npoints,nlev) :: beta_mol
real(kind=WP), intent(out), dimension(npoints,ncolumns,nlev) :: betatot
real(kind=WP), intent(out), dimension(npoints,nlev) :: tau_mol
real(kind=WP), intent(out), dimension(npoints,ncolumns,nlev) :: tautot
real(kind=WP), intent(out), optional, dimension(npoints,ncolumns) :: tautot_S_liq
real(kind=WP), intent(out), optional, dimension(npoints,ncolumns) :: tautot_S_ice
real(kind=WP), intent(out), optional, dimension(npoints,ncolumns,nlev) :: betatot_ice
real(kind=WP), intent(out), optional, dimension(npoints,ncolumns,nlev) :: betatot_liq
real(kind=WP), intent(out), optional, dimension(npoints,ncolumns,nlev) :: tautot_ice
real(kind=WP), intent(out), optional, dimension(npoints,ncolumns,nlev) :: tautot_liq

Called by

proc~~lidar_optics~~CalledByGraph proc~lidar_optics lidar_optics proc~subsample_and_optics subsample_and_optics proc~subsample_and_optics->proc~lidar_optics proc~subsample_and_optics~2 subsample_and_optics proc~subsample_and_optics~2->proc~lidar_optics proc~lmdz_cosp_interface lmdz_cosp_interface proc~lmdz_cosp_interface->proc~subsample_and_optics proc~lmdz_cosp_interface~2 lmdz_cosp_interface proc~lmdz_cosp_interface~2->proc~subsample_and_optics proc~physiq physiq proc~physiq->proc~lmdz_cosp_interface proc~physiq~2 physiq proc~physiq~2->proc~lmdz_cosp_interface proc~old_lmdz1d old_lmdz1d proc~old_lmdz1d->proc~physiq proc~call_physiq call_physiq proc~call_physiq->proc~physiq proc~call_physiq~2 call_physiq proc~call_physiq~2->proc~physiq proc~scm scm proc~scm->proc~physiq program~lmdz1d lmdz1d program~lmdz1d->proc~old_lmdz1d program~lmdz1d->proc~scm proc~calfis calfis proc~calfis->proc~call_physiq proc~leapfrog leapfrog proc~leapfrog->proc~calfis program~gcm~2 gcm program~gcm~2->proc~leapfrog

Contents