@@ -423,23 +423,23 @@ function WriteSolution3D(sol,grid,data;desc="")
423423 _t = now ()
424424 tm = " $(hour (_t)) _$(minute (_t)) _$(second (_t)) "
425425 desc = isempty (desc) ? desc : " _" * desc
426- path = " ../data/out/$(Date (_t)) /$(tm)$(desc) "
426+ path = joinpath ( @__DIR__ , " ../data/out/$(Date (_t)) /$(tm)$(desc) " )
427427 try
428428 mkpath (path)
429429 catch e
430430 println (" Directory " * path * " already exists." )
431431 end
432432 # mkdir(string(Date(_t)))
433433
434- VoronoiFVM . writeVTK (" $(path) /$(tm) _3D_ptot_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .vtu" , grid; point_data = sol[ip,:])
434+ ExtendableGrids . writeVTK (" $(path) /$(tm) _3D_ptot_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .vtu" , grid; point_data = sol[ip,:])
435435 if solve_T_equation
436- VoronoiFVM . writeVTK (" $(path) /$(tm) _3D_T_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .vtu" , grid; point_data = sol[iT,:] .- 273.15 )
436+ ExtendableGrids . writeVTK (" $(path) /$(tm) _3D_T_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .vtu" , grid; point_data = sol[iT,:] .- 273.15 )
437437 end
438438 for i= 1 : ng
439- VoronoiFVM . writeVTK (" $(path) /$(tm) _3D_x$(gn[i]) _$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .vtu" , grid; point_data = sol[i,:])
439+ ExtendableGrids . writeVTK (" $(path) /$(tm) _3D_x$(gn[i]) _$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .vtu" , grid; point_data = sol[i,:])
440440 end
441441 if dim == 3
442- VoronoiFVM . writeVTK (" $(path) /$(tm) _3D_irradiation_flux_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .vtu" , grid; point_data = sol[ibf,:])
442+ ExtendableGrids . writeVTK (" $(path) /$(tm) _3D_irradiation_flux_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .vtu" , grid; point_data = sol[ibf,:])
443443 end
444444end
445445
@@ -449,7 +449,7 @@ function WriteSolution3D(solt::TransientSolution,grid,data;desc="")
449449 _t = now ()
450450 tm = " $(hour (_t)) _$(minute (_t)) _$(second (_t)) "
451451 desc = isempty (desc) ? desc : " _" * desc
452- path = " ../data/out/$(Date (_t)) /$(tm)$(desc) "
452+ path = joinpath ( @__DIR__ , " ../data/out/$(Date (_t)) /$(tm)$(desc) " )
453453 try
454454 mkpath (path)
455455 catch e
@@ -460,21 +460,21 @@ function WriteSolution3D(solt::TransientSolution,grid,data;desc="")
460460 for (i,t) in enumerate (solt. t)
461461
462462 # pressure
463- VoronoiFVM . writeVTK (" $(path) /3D_ptot_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) _$(i) .vtu" , grid; point_data = solt (t)[ip,:])
463+ ExtendableGrids . writeVTK (" $(path) /3D_ptot_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) _$(i) .vtu" , grid; point_data = solt (t)[ip,:])
464464
465465 # temperature
466466 if solve_T_equation
467- VoronoiFVM . writeVTK (" $(path) /3D_T_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) _$(i) .vtu" , grid; point_data = solt (t)[iT,:] .- 273.15 )
467+ ExtendableGrids . writeVTK (" $(path) /3D_T_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) _$(i) .vtu" , grid; point_data = solt (t)[iT,:] .- 273.15 )
468468 end
469469
470470 # species molar fractions
471471 for j= 1 : ng
472- VoronoiFVM . writeVTK (" $(path) /3D_x$(gn[j]) _$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) _$(i) .vtu" , grid; point_data = solt (t)[j,:])
472+ ExtendableGrids . writeVTK (" $(path) /3D_x$(gn[j]) _$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) _$(i) .vtu" , grid; point_data = solt (t)[j,:])
473473 end
474474
475475 # irradiation boundary flux
476476 if dim == 3
477- VoronoiFVM . writeVTK (" $(path) /3D_irradiation_flux_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) _$(i) .vtu" , grid; point_data = solt (t)[ibf,:])
477+ ExtendableGrids . writeVTK (" $(path) /3D_irradiation_flux_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) _$(i) .vtu" , grid; point_data = solt (t)[ibf,:])
478478 end
479479
480480 end
@@ -559,4 +559,4 @@ function WriteTemperatures(solt,grid,data;desc="")
559559 # CSV.write("data/out/2024-01-26/Tc_Uc.csv", df)
560560 CSV. write (" $(path) /Sim_T_probe_$(data. nom_flux/ ufac " kW/m^2" ) suns_$(nflowin/ ufac " mol/hr" ) .csv" , df)
561561 # "$(path)/Sim_T_probe_$(data.nom_flux/ufac"kW/m^2")suns_$(nflowin/ufac"mol/hr").csv"
562- end
562+ end
0 commit comments