Skip to content
This repository was archived by the owner on Aug 28, 2024. It is now read-only.

Commit

Permalink
Removed duplicate variable definition
Browse files Browse the repository at this point in the history
  • Loading branch information
@daminton
daminton committed Dec 5, 2022
1 parent c50f05a commit 3565093
Showing 1 changed file with 0 additions and 1 deletion.
1 change: 0 additions & 1 deletion src/symba/symba_io.f90
View file
Original file line number Diff line number Diff line change
Expand Up @@ -90,7 +90,6 @@ module subroutine symba_io_encounter_initialize_output(self, param)
call check( nf90_def_var(nciu%id, nciu%time_dimname, nciu%out_type, nciu%time_dimid, nciu%time_varid), "symba_io_encounter_initialize_output nf90_def_var time_varid" )
call check( nf90_def_var(nciu%id, nciu%space_dimname, NF90_CHAR, nciu%space_dimid, nciu%space_varid), "symba_io_encounter_initialize_output nf90_def_var space_varid" )
call check( nf90_def_var(nciu%id, nciu%id_dimname, NF90_INT, nciu%id_dimid, nciu%id_varid), "symba_io_encounter_initialize_output nf90_def_var id_varid" )
call check( nf90_def_var(nciu%id, nciu%name_varname, NF90_CHAR, [nciu%str_dimid, nciu%id_dimid], nciu%name_varid), "symba_io_encounter_initialize_output nf90_def_var name_varid" )

! Variables
call check( nf90_def_var(nciu%id, nciu%name_varname, NF90_CHAR, [nciu%str_dimid, nciu%id_dimid], nciu%name_varid), "symba_io_encounter_initialize_output nf90_def_var name_varid" )
Expand Down

0 comments on commit 3565093

Please sign in to comment.