source: JEM-EUSO/esaf_cc_at_lal/packages/simulation/externals/slast/src/atm/transition_r_rint_iss.F @ 114

Last change on this file since 114 was 114, checked in by moretto, 11 years ago

actual version of ESAF at CCin2p3

File size: 198 bytes
Line 
1      SUBROUTINE TRANSITION_R_RINT_ISS(R1,R2,TRANSITION)
2      IMPLICIT NONE
3#include "detector.inc"
4      REAL R1(3),R2(3),TRANSITION(100)
5      CALL LOWTRAN_R_RINT_ISS(R1,R2,TRANSITION)
6      END
Note: See TracBrowser for help on using the repository browser.