Go to the source code of this file.
| Functions/Subroutines | |
| subroutine | calc_surface_normal_midpoint (rs, rnx, rny, rnz, it, ip) | 
| subroutine calc_surface_normal_midpoint | ( | real(long),dimension(:,:),pointer | rs, | |
| real(long),intent(out) | rnx, | |||
| real(long),intent(out) | rny, | |||
| real(long),intent(out) | rnz, | |||
| integer | it, | |||
| integer | ip | |||
| ) | 
Definition at line 1 of file calc_surface_normal_midpoint.f90.


 1.6.1
 1.6.1