diff --git a/kratos.gid/apps/PotentialFluid/write/writeProjectParameters.tcl b/kratos.gid/apps/PotentialFluid/write/writeProjectParameters.tcl
index e87dc3b47..0c7070ce9 100644
--- a/kratos.gid/apps/PotentialFluid/write/writeProjectParameters.tcl
+++ b/kratos.gid/apps/PotentialFluid/write/writeProjectParameters.tcl
@@ -3,6 +3,9 @@ proc PotentialFluid::write::writeParametersEvent { } {
     ## Get the base settings dictionary from the base application (Fluid)
     set projectParametersDict [Fluid::write::getParametersDict]
 
+    # Change analysis type to potential flow
+    dict set projectParametersDict analysis_stage "KratosMultiphysics.CompressiblePotentialFlowApplication.potential_flow_analysis"
+
     ## Remove unused entries
     # Remove gravity and initial conditions
     dict set projectParametersDict processes [dict remove [dict get $projectParametersDict processes] gravity]