We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 44b16a7 commit 5e9133cCopy full SHA for 5e9133c
src/cosmic/src/zcnsts.f
@@ -8,9 +8,6 @@ SUBROUTINE zcnsts(z,zpars,path_to_tracks,path_to_he_tracks)
8
9
if (using_METISSE) then
10
!WRITE(*,*) 'Calling METISSE_zcnsts',using_METISSE
11
- !SSE_zcnsts also sets some coefficients used in gntage
12
- !updating gntage for METISSE will remove the need to call this
13
- CALL SSE_zcnsts(z,zpars)
14
CALL METISSE_zcnsts(z,zpars,path_to_tracks,path_to_he_tracks)
15
16
elseif (using_SSE) then
0 commit comments