add .hdr file to dfn for prob inv

GeoscienceAustralia · Mar 21, 2024 · ef6f06f · ef6f06f
1 parent fe58aeb
commit ef6f06f
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/zz_portalcurtains/RDP.jl b/zz_portalcurtains/RDP.jl
@@ -373,7 +373,10 @@ function writeaseggdffromxyzrho(nlayers::Int; src_dir="", dst_dir="",
                 vonerow = vcat(vonerow, nulow[i,:], numid[i,:], nuhigh[i,:])
             end
             transD_GP.CommonToAll.writeasegdat(vonerow, sfmt, outfile, mode)
-            transD_GP.CommonToAll.writeasegdfnfromonerow(vonerow, channel_names, sfmt, outfile)
+            if i == 1
+                transD_GP.CommonToAll.writeasegdfnfromonerow(vonerow, channel_names, sfmt, outfile)
+                transD_GP.dfn2hdr(outfile*".dfn")
+            end    
         end    
     end
 end