Commit 34ceb330 authored by Gonzalez, Miguel's avatar Gonzalez, Miguel
Browse files

Formatting

parent ddd4a94c
......@@ -236,14 +236,13 @@ IF(N_ELEMENTS(ierr) GT 0) THEN ierrtype=2
Nv = 7.197E22
tv = FLOAT(tv)
ts = FLOAT(ts)
IF iprint THEN BEGIN
IF iprint THEN BEGIN
PRINT, 'Absolute Normalisation:'
PRINT, 'Ns = ',Nsd
PRINT, 'Nv = ',Nv
PRINT, 'ts = ',ts
PRINT, 'tv = ',tv
ENDIF
ENDIF
w_out = ((Nv*tv)/(Nsd*ts))*w_buf*5.08*L2/(4*!pi*chw)
e_out = ((Nv*tv)/(Nsd*ts))*e_buf*5.08*L2/(4*!pi*chw)
ENDIF ELSE BEGIN
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment