38
38
/// @file
39
39
/// Shallow-water equations example using PETSc
40
40
41
- const char help [] = "Solve the shallow-water equations using PETSc and libCEED\n" ;
41
+ const char help [] =
42
+ "Solve the shallow-water equations using PETSc and libCEED\n" ;
42
43
43
44
#include "sw_headers.h"
44
45
@@ -78,7 +79,8 @@ int main(int argc, char **argv) {
78
79
PetscScalar R_e = 6.37122e6 ; // Earth radius (m)
79
80
PetscScalar g = 9.81 ; // gravitational acceleration (m/s^2)
80
81
PetscScalar H0 = 0 ; // constant mean height (m)
81
- PetscScalar gamma = 0 ; // angle between axis of rotation and polar axis
82
+ PetscScalar gamma =
83
+ 0 ; // angle between axis of rotation and polar axis
82
84
PetscScalar mpersquareds ;
83
85
// Check PETSc CUDA support
84
86
PetscBool petschavecuda , setmemtyperequest = PETSC_FALSE ;
@@ -102,7 +104,8 @@ int main(int argc, char **argv) {
102
104
103
105
// Parse command line options
104
106
comm = PETSC_COMM_WORLD ;
105
- ierr = PetscOptionsBegin (comm , NULL , "Shallow-water equations in PETSc with libCEED" ,
107
+ ierr = PetscOptionsBegin (comm , NULL ,
108
+ "Shallow-water equations in PETSc with libCEED" ,
106
109
NULL ); CHKERRQ (ierr );
107
110
ierr = PetscOptionsString ("-ceed" , "CEED resource specifier" ,
108
111
NULL , ceedresource , ceedresource ,
@@ -152,7 +155,8 @@ int main(int argc, char **argv) {
152
155
NULL , second , & second , NULL ); CHKERRQ (ierr );
153
156
second = fabs (second );
154
157
outputfreq = 10 ;
155
- ierr = PetscOptionsInt ("-output_freq" , "Frequency of output, in number of steps" ,
158
+ ierr = PetscOptionsInt ("-output_freq" ,
159
+ "Frequency of output, in number of steps" ,
156
160
NULL , outputfreq , & outputfreq , NULL ); CHKERRQ (ierr );
157
161
contsteps = 0 ;
158
162
ierr = PetscOptionsInt ("-continue" , "Continue from previous solution" ,
@@ -167,7 +171,8 @@ int main(int argc, char **argv) {
167
171
NULL , g , & g , NULL ); CHKERRQ (ierr );
168
172
ierr = PetscOptionsScalar ("-H0" , "Mean height" ,
169
173
NULL , H0 , & H0 , NULL ); CHKERRQ (ierr );
170
- ierr = PetscOptionsScalar ("-H0" , "Angle between axis of rotation and polar axis" ,
174
+ ierr = PetscOptionsScalar ("-H0" ,
175
+ "Angle between axis of rotation and polar axis" ,
171
176
NULL , gamma , & gamma , NULL ); CHKERRQ (ierr );
172
177
PetscStrncpy (user -> outputfolder , "." , 2 );
173
178
ierr = PetscOptionsString ("-of" , "Output folder" ,
@@ -563,7 +568,7 @@ int main(int argc, char **argv) {
563
568
ierr = DMDestroy (& dmviz ); CHKERRQ (ierr );
564
569
ierr = TSDestroy (& ts ); CHKERRQ (ierr );
565
570
ierr = DMDestroy (& dm ); CHKERRQ (ierr );
566
- ierr = MatDestroy (& J );CHKERRQ (ierr );
571
+ ierr = MatDestroy (& J ); CHKERRQ (ierr );
567
572
ierr = PetscFree (units ); CHKERRQ (ierr );
568
573
ierr = PetscFree (user ); CHKERRQ (ierr );
569
574
return PetscFinalize ();
0 commit comments