| H A D | semi_empirical_types.F | 74 REAL(KIND=dp) :: ass, asp, app, de, acoul component
279 sep%acoul = 0.0_dp
368 acoul, nr, de, ass, asp, app, hsp, gsd, gpd, gdd, ppddg, dpddg, ngauss) argument
381 gsp, gpp, gp2, acoul local
407 IF (PRESENT(acoul)) acoul = sep%acoul
466 acoul, nr, de, ass, asp, app, hsp, gsd, gpd, gdd, ppddg, dpddg, ngauss) argument
480 gsp, gpp, gp2, acoul local
505 IF (PRESENT(acoul)) sep%acoul = acoul
685 REAL(KIND=dp) :: acoul, alp, app, asp, ass, de, eheat, & local
709 acoul=acoul, nr=nr, dpddg=dpddg, ngauss=ngauss)
[all …]
|